SCAR Code:
procedure PlayerSetup;
begin
HowManyPlayers := 2;
CurrentPlayer := 0;
NumberOfPlayers(HowManyPlayers);
Players[0].Name := ''; //Username
Players[0].Pass := ''; //Password
Players[0].Nick := ''; //3-4 letters of username. e.x sern
Players[0].Active := True;
Players[0].Strings1 := 'Bait'; //How i define this?
Players[1].Name := ''; //Username
Players[1].Pass := ''; //Password
Players[1].Nick := ''; //3-4 letters of username. e.x sern
Players[1].Active := True;
Players[1].Strings1 := 'Net'; //How i define this?
Writeln('Using ' + IntToStr(HowManyPlayers) + ' Player(s)');
end;
If i compile this, i get an 'Unknown Identifier' error, because the Strings1 thing.. I looked it off someone else's script, but, that didnt work
I want to make the strings1 do this:
SCAR Code:
if (FindObj(x, y, 'pot', 15394011, 25)) or FindObj(x, y, 'ishing', 13216659, 25) then
begin
if (Players[CurrentPlayer].Strings1 = 'Net') then
begin
Mouse(x, y, 5, 5, true);
end;
if (Players[CurrentPlayer].Strings1 = 'Bait') then
begin
Mouse(x, y, 5, 5, false);
ChooseOption('Bait');
end;
So it knows if it has to just click, or right click>bait.
It would be even better when i could name it 'Players[CurrentPlayer].Style'
Instead of 'Players[CurrentPlayer].Strings1'