hey i m almost finished with a little script ive been working on but i m not sure about free dtm i would love some help
Code:program Cow_Killer; {$I SRL/SRL.Simba} {$I SRL/SRL/Misc/Debug.Simba} {$I P07Include.Simba} var x, y: Integer; Test: Tstringarray; procedure DeclarePlayers; Begin HowManyPlayers := 1; NumberOfPlayers(HowManyPlayers); CurrentPlayer := 0; Players[0].Name :=''; Players[0].Pass :=''; Players[0].Nick :=''; Players[0].Active:=True; End; procedure Kill_Cow; Begin repeat //If P07_FindObjCustom (x,y, ['ow'], [1848381, 11975615],3) then ClickMouse2(Mouse_left); Wait(4500) until(HPPercent <10); End; Procedure Eat_Food; Begin Repeat If (HPPercent <10) then if P07_FindObjcustom(x,y, ['rout'], [7238283], 2) then Clickmouse2(mouse_left); until(HPPercent > 50) End; begin ClearDebug; SetupP07Include; DeclarePlayers; P07_LoginPlayer; Repeat Kill_Cow; Eat_Food; Until(false); end.


Reply With Quote








