Op 10-12-2018 om 08:29 schreef Ben Coman:
solver := Key5Solver new startCalculation .
Thanks
but still problems
I have this :
startCalculation
| zeros zerosSize count secret candidate |
secret := 'abcde'.
zeros := '000'.
zerosSize := zeros size.
count := 0.
[
[ candidate := secret , count printString.
((MD5 hashMessage: candidate) hex first: zerosSize) = zeros
] whileFalse:
[
count := count + 1.
].
result := count "<<<<< need to store the result of the
calculation"
self inform: 'Mining calculation is complete. You can now
ask me for the result'.
] forkAt: 35 named: 'Mining'.
but I see this error message : instance of smallInteger does not
understand @self.
So some debugging to do.
Roelof
