SRL Archive - Classic

Leo sleep wont work


Camaro'

2009-11-28 14:20:11

For some reason , everything says its working, but it types 'aa' everytime. So i go to the hc folder to see the bitmap its making, they are all just black rectangles. Nothing inside of them.

That must mean my coords are off. Im using this

const
hc_route = 'C:\Users\Aaron\Desktop\RSCLEO\SBot6.6\hc.bmp';
txt_route = 'C:\Users\Aaron\Desktop\RSCLEO\SBot6.6\slword.txt';

procedure getimage(); //Thanks too 'gottapercha'

var
b: Integer;
begin
b:= Bitmapfromstring(RSSX1+254,39, ''); //Create an empty bitmap with the correct width and height
alert('1');
CopyClientToBitmap(b, RSSX1+255, 230, RSSX1 + 509, 269); //Take a screenshot and copy it to b
alert('2');
sleep(400);
SaveBitmap(b, hc_route );
alert('3');
sleep(5000);
writeln('Got Image Sent to Leosleep!');
//FreeBitmap(b); //Don't forget to free your bitmap after using
alert('4');
end;

procedure gettext; // By Thick As Blood
var
s2 : string;
InFile : Integer;
begin
InFile:= OpenFile(txt_route, False);
alert('5');
writeln('Typeing Text Now');
ReadFileString(InFile, s2, FileSize(InFile));
alert('6');
s2 := GetLetters(s2);
CloseFile(InFile);
alert('7');
if s2 = 'unknown' then//antiban...
begin
Mouse(RSSX1+170, 298, 12, 3, true);
Exit;
end;
Wait(Random(1500));
TypeSend(s2);
//inc(players[currentplayer].integers[1]);

end;

begin
getimage;
gettext;
end.

tom99

2009-12-22 03:54:38

does this works?

Sex

2009-12-26 00:34:35

From: tom99
does this works?

Obviously no. He just said it doesn't (for him at least).