So I can't figure out what the hell I'm doing wrong with bitmaps. After adding multiple writeln checks I figured out that the script just stops doing anything as soon as it gets to any FindBitmap type function I'm using. Could anyone explain this to me please?
Code:Procedure GoBank2; begin bankmen := BitmapFromString(8, 11, 'beNoLCfYP8ENGgUGBQBQcgh' + 'D/908QiNDEgSJ//jB9/cpw9y4DsjhQEIjevmU4cwZFnIGBEagSKAh' + 'koJkPFIEI0tN8dP8CANexX5o='); writeln('trying alternate banking route'); MakeCompass('N'); repeat if(FindDeformedBitmapToleranceRotationIn(bankmen, x, y, 532, 1, 716, 167, 15, 10, Accuracy, radians(2), radians(0), radians(359), finangle))then begin writeln('found bank bitmap'); Mouse(x, y, 2, 2, true); FFlag(0); if(FindColorSpiralTolerance(x,y, 8887480, 2, 2, 518, 337, 15))then begin mouse(x,y, 1, 1, false); wait(350+random(100)); chooseoption('Bank Banker'); wait(1000+random(500)); end; end; failsafecount := failsafecount + 1; if(failsafecount > 20)then begin writeln('failed to bank'); terminatescript; end; writeln(failsafecount); until(BankScreen) if(Bankscreen)then begin deposit(2, 28, true); wait(250+random(250)); CloseBank; end; end;





Reply With Quote







