record values
SCAR Code:
type
Tree = record
Col, Tol, Cut : Integer;
HMod, SMod : Extended;
UpText : TStringArray;
Tree : String;
end;
where i declare values
SCAR Code:
Procedure SetupTree;
begin
case Lowercase(Players[CurrentPlayer].Strings[0]) of
'tree': begin
with TreeSetup do //loads recoard to store tree specific infomation for script
begin
Col := 0; //color of what we cutting
Tol := 0; // tolerance for finding tree
Cut := 8000; //how long to wait after cutting started to switch trees
HMod := 0; //used for colortolerancespeed, changes how accurate it is
SMod := 0;
UpText := ['hop down Tree', 'own Tree'] //uptext of tree for cutting
Tree := 'Tree'; //tree name
end;
end;
what i am trying to call
SCAR Code:
if not (IsUpTextMultiCustom(test)) or (Invfull) or not (TimeFromMark(AntiBan) > 8000 + Random(5000)) then
Exit
else