well… you’re needing an example on what brute force means… here it’s … 1) set that the password you’re searching it’s a number between 1 and 200 and you don’t know it. VAR brutetry : integer; Found : boolean; brutetry := 0; found := false; WHILE ((brutetry < 200) AND (NOT found)) DO BEGIN brutetry += 1; IF (MyPassword = brutetry) THEN BEGIN found := TRUE; END; END; MESSAGE('The password its %1',brutetry);