I need help with my first script :(
hey,
i'm busy with a MSN script, since i don't play Runescape anymore :D
i followed the TUT about bitmaps and created this:
SCAR Code:
program MSNautoTalk;
var
x,y,Bitmap:integer;
procedure DeclareBMPS;
begin
bitmap := BitmapFromString(5, 6, 'z78DA458E4112C0200803BF94' +
'4B6B3C16B0FF7F5203E874322AB291687438078889E0921E1A9DE' +
'4DC55A0E9C22B6D0F446A396F2635F902ED37FC33AF3ABBEE3DE9' +
'71AAA31CCDC4CABBD46F039952898756B77FF5015E0028B7');
bitmap := BitmapFromString(7, 7, 'z78DA4D8E490E04210C03BF1' +
'4CD34B139129AFCFF496D9659408910291764FED6C0DC159144B7' +
'C160E7EAF36C7F603631359BEEA9795A5B3D6CF39BB9E5BB13083' +
'8AA0D034FE730DACCD6E36C192A57BE68DEE9A44C30F23E291E12' +
'A8E959D87899EB55F116F44F6AF2872CC92C98CCC537C197E6C1A' +
'2535772FBBFAFA3C94C559985ED948DEBB7F23EA3F1451B');
bitmap := BitmapFromString(6, 6, 'z78DA558E510E80200C43AFD' +
'4A860F9840DEE7F240B231AF7C2026F0DE0C8C2710B4766A63109' +
'C3218C64C1E00F8C6D4CE9ACCCC584AE93B1B3A1B26BA92F63387' +
'9D29190E4A06A8488FE1A95A3A028FF99B6F661FAFC21AB6E6E91' +
'84CFD7B9FB32310D1E491A2F5F');
end;
procedure ClickBMPS;
begin
wait(300+random(32))
movemousesmooth(x,y)
wait(32+random(16))
clickmouse(x,y,true)
end;
Procedure FindBMPS;
begin
if(FindBitmap(Bitmap,x,y))then
ClickBMPS;
clickBMPS;
end;
begin
repeat
wait(1300)
declareBMPS;
findbmps;
until(false)
end.
but now, the scripts needs to talk..
HELP pls :duh:
Script only works with MSN live Messenger.