i need help with this script
its for http://apps.facebook.com/mindjolt/games/hover
i dont know what ive forgotten it just dosent seem to work ?
i need help with this script
its for http://apps.facebook.com/mindjolt/games/hover
i dont know what ive forgotten it just dosent seem to work ?

Try editing this (In Scripts/Flash Games):
SCAR Code:// Script created for game:
// [url]http://albinoblacksheep.com/flash/kick-ups.php[/url]
// by JangleBits
program KickUps;
var
x, y: Integer;
begin
repeat
if(FindColorTolerance(x, y, 52479, 1, 1, 350, 320, 25))then
begin
MoveMouse(x, y);
ClickMouse(x, y, True);
Wait(100);
end;
until(False)
end.
yea. the ball changes colour several times as the game goes on

I can fix this. One second.
SCAR Code:program New;
var
DTM, x, y: Integer;
procedure ScriptTerminate;
begin
FreeDTM(DTM);
end;
begin
DTM := DTMFromString('78DA631465626010046234F01F88194134103' +
'08A01E59F32E25403026035764CF8D53801E58509A8790964F1E1' +
'570300F4090BD5');
repeat
if(FindDTM(DTM, x, y, 0, 0, 1000, 1000))then
MoveMouse(x, y);
until(False);
end.
Hmm.. If it goes partially off screen it gets messed up. I'll make a smaller DTM. Possibly multiple? Not sure yet.
Last edited by ian.; 07-14-2009 at 10:39 PM.
That probably wont find the Circle when its not completely visible :P

This One should run endless... Or Until lag occurs xD
Code:program New; var x,y,xw,xh,newc,black : integer; begin GetClientDimensions(xw,xh); black := BitmapFromString(45, 21, 'beNrtwQEBAAAAgiD/r25IQAE' + 'AwLUBCxMAAQ=='); repeat wait(10); If FindBitmapIn(black,x,y,0,0,xw, xh) then begin MoveMouse(x+20,y+20); end else begin GetMousePos(x,y); newc := GetColor(x,y); If ( FindColor(x,y,NewC,0,0,xw,xh)) then begin if not((newc = 0)and(newc = 16016386)) then MoveMouse(x+20,y+20); end; end; until(false); end.
Last edited by caused; 07-14-2009 at 11:52 PM. Reason: Some Lag Reduction

Bravo, caused.Would've been easier if I slept..
Been awake for two days :/ Still debating killing myself >.>
It doesnt go on forever...
I dont know why though...
T~M
Last edited by caused; 07-14-2009 at 11:54 PM.
There are currently 1 users browsing this thread. (0 members and 1 guests)