My script never seems to be able to solve this case:
SCAR Code:case Players[CurrentPlayer].Strings[0] of
'mithril': begin
writeln('o.0 finally made it here');
FWithdrawOre(MithrilOreDTM, 'ithril', 5);
FWithdrawOre(CoalDTM, 'oal', 20);
writeln('finished with "mithril" case');
end;
'adamantite': begin
FWithdrawOre(AdamantiteOreDTM, 'damantite', 3);
FWithdrawOre(CoalDTM, 'oal', 18);
end;
'runite': begin
FWithdrawOre(RuniteOreDTM, 'unite', 3);
FWithdrawOre(CoalDTM, 'oal', 24);
end;
end;
It's remotely possible that the problem is some were else, but almost certain that it has something to do with these lines. Just for grins though, this is what my player declaration looks like:
SCAR Code:CurrentPlayer := StartPlayer; //Sooo, what player will start 'er off?
NumberOfPlayers(HowManyPlayers);
Players[0].Name := 'Username'; //Username
Players[0].Pass := 'Password'; //Password
Players[0].Nick := 'Nickname'; //3-4 consecutive letters of your username, (ex: "Nickname" -> "ick").
Players[0].Pin := '0000'; //You're four-digit bank pin... (0000 if none)
Players[0].Strings[0] := 'veb'; //Search for "OpenBankQuiet" in the SRL Manual for a list of valid arguments.
Players[0].Strings[1] := 'mithril'; //What type of bar will you be superheat? ("mithril", "adamantite" or "runite").
Players[0].Strings[2] := 'Prayer'; //Which skill would you like to use Genie Lamps etc on, (if any are recieved).
Players[0].Active := True; //Say, are you going to use this player?
Players[0].Integers[0] := 100; //How many Bars would you like this player to superheat?
Any suggestions?


Reply With Quote
