Is there another method for && through pascal? I'm pretty new at it, and can't figure it out! I've got this so far
How would I make the && into something pascal? I'm confuzzledCode:if (IsInCombat = 0 && not P07InvFull) then![]()
Is there another method for && through pascal? I'm pretty new at it, and can't figure it out! I've got this so far
How would I make the && into something pascal? I'm confuzzledCode:if (IsInCombat = 0 && not P07InvFull) then![]()
e.g.Simba Code:and
Simba Code:if (IsInCombat = 0 and not P07InvFull) then
if (IsInCombat = 0 and not P07InvFull) then
EDIT: Fu TK!![]()
Creds to DannyRS for this wonderful sig!
Perfection! Thank's a bunch. Now, instead of spamming threads, i'll post my other problem here... I want my script to bury every bone in its inventory, but it'll only bury 1 bone, then proceed to pickup another bone, then bury 1, repeat. How can I fix this? I know the "until not Bone:....." is completely incorrect, but that's to give you the idea of what I want to do. Is there a way, instead of doing the method 27 times?
Code:Bone := DTMFromString('mggAAAHicY2NgYHBlYmCwAmInIPYAYl8o+yoQXwbic0B8AYivA/FtIG4oL2fISExk2L1hA8PSWTMZpnZ3MXi6uDDgAow4MAQAAO+jD7s='); if FindDTM(Bone, x, y, MIX1, MIY1, MIX2, MIY2) then begin writeLn('BuryingBone'); Mouse(x, y, 1, 1, true);; end; until not(Bone := DTMFromString('mggAAAHicY2NgYHBlYmCwAmInIPYAYl8o+yoQXwbic0B8AYivA/FtIG4oL2fISExk2L1hA8PSWTMZpnZ3MXi6uDDgAow4MAQAAO+jD7s=')); end;
Simba Code:for i:= 1 to 28 do
begin
if P07_ExistsItemDTM(Bone, x, y) then
begin
writeLn('BuryingBone');
Mouse(x, y, 1, 1, true);;
end;
end;
use this
Simba Code:function P07_ExistsItemDTM(dtm: Integer; var x, y: Integer): Boolean;
begin
P07_Gametab(tab_Inv);
Wait(300 + Random(300));
Result := FindDTM(dtm, x, y, P07_MIx1, P07_MIy1, P07_MIx2, P07_MIy2);
end;
Creds to DannyRS for this wonderful sig!
There are currently 1 users browsing this thread. (0 members and 1 guests)