Simba Code:
program rocktailfisher;
{$i srl/srl/misc/smart.scar}
{$i srl/srl.scar}
{$i SRL/SRL/misc/paintsmart.scar}
var
X, Y, FishSpot, Bank, rod, Rocktail, A, B: Integer;
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := '';
Players[0].Pass := '';
Players[0].Nick := '';
Players[0].Active := True;
Players[0].Pin := '';
Players[0].BoxRewards := ['Xp', 'emote', 'costume', 'coins', 'saphire', 'essence'];
end;
procedure SmartSet;
begin
Smart_Server := 60;
Smart_Members := True;
Smart_Signed := True;
Smart_SuperDetail := False;
end;
procedure AntiRandoms;
begin
FindNormalRandoms;
LampSkill := 'fishing';
LevelUp;
end;
procedure SetDTM;
begin
FishSpot := DTMFromString('mWAAAAHicY2FgYEhlZGBoAOIwIC4F4h9AsQdA/B2I7wJxfe8ahob+tQwT5mxgqOxYwoAOGNEwCAAAo5AMXg==');
Bank := DTMFromString('mbQAAAHicY2VgYDgPxPuA+BYQHwTiy0AsxsjAwA7E6kAsDcSCQJwR7cYQG2TP4OlswRDu78yQEuHMgA0wYsFgAACshgke');
Rocktail := DTMFromString('mbQAAAHicY2VgYAhjZGBIAGJ/II4BYl8g1gViRSA2A2JDINYB0ZoyDOZ68gz+0f4MvpG+DNJiIgzYACMWDAYAnnEFzw==');
A
B
procedure FrDTM;
begin
FreeDTM(FishSpot);
FreeDTM(Bank);
FreeDTM(Rocktail);
FreeDTM(A);
FreeDTM(B);
end;
[Error] (1:1): Unexpected end of file at line 0
Compiling failed.