Ok i did the include but how would i use this in my script cause i've been trying to get it to work but no luck
anyways could someone post a procedure
Ok i did the include but how would i use this in my script cause i've been trying to get it to work but no luck
anyways could someone post a procedure
Alright, I found this is _Charmz Willow Raper V2 so all credits go to him, not me.
SCAR Code:Function CharmFindAxeHeadColors: Boolean;
Var
AX, AY: Integer;
Begin
If(not(LoggedIn))then Exit;
GameTab(4);
If(FindBitmapMaskTolerance(AxeMask, AX, AY, MIX1, MIY1, MIX2, MIY2, 10, 5))then
Begin
AxeHeadColor1:= GetColor(AX + 5, AY + 3);
AxeHeadColor2:= GetColor(AX + 7, AY + 2);
AxeHeadColor3:= GetColor(AX, AY + 3);
EquipAxe:= False;
Result:= True;
End else
Begin
GameTab(5);
Wait(100+Random(75));
If(FindBitmapMaskTolerance(AxeMask, AX, AY, MIX1, MIY1, MIX2, MIY2, 10, 5))then
Begin
AxeHeadColor1:= GetColor(AX + 5, AY + 3);
AxeHeadColor2:= GetColor(AX + 7, AY + 2);
AxeHeadColor3:= GetColor(AX, AY + 3);
EquipAxe:= True;
Result:= True;
End
GameTab(4);
End
If(Result= True)then
Begin
NoAxe:= False;
WriteLn('Axe head colors - '+IntToStr(AxeHeadColor1)+', '+IntToStr(AxeHeadColor2)+ ', and '+IntToStr(AxeHeadColor3));
End else
Begin
WriteLn('Could NOT Find Axe Colors!, Logging Out!');
Players[CurrentPlayer].Loc:= 'No Axe';
Logout;
End
End;
If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your sig
SCAR Code:Failed when compiling
Line 67: [Error] (15933:14): Type mismatch in script C:\Program Files\SCAR 2.03\Scripts\script.scar
i get that errorany ideas
There are currently 1 users browsing this thread. (0 members and 1 guests)