Unexpected End of file at line 0 ERROR

[ABC!]

program SwampToadCollector; <<- This is the line!

[Error] (1:1): Unexpected end of file at line 0
Compiling failed.

^^ Keep getting this error! But I can't see that I'm doing anything wrong!

program SwampToadCollector;

[x[Warrior]x3500]

umm do you have an "end." at the end of your script? is the main loop correct?

[YoHoJo]

Copy/paste script you are running, put it in simba tags.

[ABC!]

program SwampToadCollector;

{$DEFINE SRL5}
{$DEFINE SMART}

{$i SRL/SRL.simba}

Const

//SRL Stats
SRLStats_Username = '';
SRLStats_Password = '';

//Break Settings
BreakIn = 135;
BreakFor = 15;
Version = 1.0;


Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
with Players[0] do
begin
Name := ''; //Enter your Runescape Username Here
Pass := ''; //Enter your Runescape Password Here
Pin := ''; //Enter your Bank Pin Here, Leave blank if you dont have one BoxRewards := ['XP','xp','lamp'];
LampSkill := Skill_Agility;
Active := True;
end;
end;

Var
x, y: Integer;

Procedure Antiban;
Begin

Case Random(100) Of
1: HoverSkill('magic', False);
2: HoverSkill('random', False);
3: Boredhuman;
4: Wait(2500 + random(4500));
5: RandomRClick;
6: PickUpMouse;
7: RandomMovement;
end;
end;
Procedure PickUpFrog;
begin
repeat
FindNormalRandoms;
if FindObjCustom(x, y, ['Swamp', 'toad'], [2190656], 5) then
begin
Mouse(x, y, 0, 0, false);
ChooseOption('Take');
end;
repeat
Until not IsUpText('toad') or (InvFull);
until(InvFull);
End;

Procedure RadialWalkToBank;
var
x,y, Roadcolor: Integer;
begin
If (InvFull) then
begin
RoadColor := AutoColor(1);
writeln(ToStr(RoadColor));
repeat
RadialWalkAutoColor(RoadColor, 160, 180, 65, 1, 1);
until(FindSymbol(x, y, 'summoning obelisk'));
end;


begin
Smart_Server := 23;
Smart_Members := True;
Smart_Signed := False;
Smart_SuperDetail := False;

SetUpSRL;
ActivateClient;
DeclarePlayers;
LoginPlayer;

SetAngle(SRL_ANGLE_HIGH);
PickUpFrog;
RadialWalkToBank;
end

There it is, nothing special, but hoping to get it fully working, would be a good first script to make ( I think).

[John]

Last line, "End" Should be "End."

[ABC!]

Last line, "End" Should be "End."

Yeah i tried that still not working -.- and thanks for the message aha, hopefully no-one saw that!

[John]

Yeah i tried that still not working -.- and thanks for the message aha, hopefully no-one saw that!
;) no probs, 1 second and i'll have another look.

E: Spot the difference :P
program SwampToadCollector;

{$DEFINE SRL5}
{$DEFINE SMART}

{$i SRL/SRL.simba}

Const

//SRL Stats
SRLStats_Username = '';
SRLStats_Password = '';

//Break Settings
BreakIn = 135;
BreakFor = 15;
Version = 1.0;


Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
with Players[0] do
begin
Name := ''; //Enter your Runescape Username Here
Pass := ''; //Enter your Runescape Password Here
Pin := ''; //Enter your Bank Pin Here, Leave blank if you dont have one BoxRewards := ['XP','xp','lamp'];
LampSkill := Skill_Agility;
Active := True;
end;
end;

Var
x, y: Integer;

Procedure Antiban;
Begin

Case Random(100) Of
1: HoverSkill('magic', False);
2: HoverSkill('random', False);
3: Boredhuman;
4: Wait(2500 + random(4500));
5: RandomRClick;
6: PickUpMouse;
7: RandomMovement;
end;
end;
Procedure PickUpFrog;
begin
repeat
FindNormalRandoms;
if FindObjCustom(x, y, ['Swamp', 'toad'], [2190656], 5) then
begin
Mouse(x, y, 0, 0, false);
ChooseOption('Take');
end;
repeat
Until not IsUpText('toad') or (InvFull);
until(InvFull);
End;

Procedure RadialWalkToBank;
var
x,y, Roadcolor: Integer;
begin
If (InvFull) then
begin
RoadColor := AutoColor(1);
writeln(ToStr(RoadColor));
repeat
RadialWalkAutoColor(RoadColor, 160, 180, 65, 1, 1);
until(FindSymbol(x, y, 'summoning obelisk'));
end;
end;


begin
Smart_Server := 23;
Smart_Members := True;
Smart_Signed := False;
Smart_SuperDetail := False;

SetUpSRL;
ActivateClient;
DeclarePlayers;
LoginPlayer;

SetAngle(SRL_ANGLE_HIGH);
PickUpFrog;
RadialWalkToBank;
end.

You Missed an "End" in RadialWalkBank.

[masterBB]

fix'd
program SwampToadCollector;

{$DEFINE SRL5}
{$DEFINE SMART}

{$i SRL/SRL.simba}

Const

//SRL Stats
SRLStats_Username = '';
SRLStats_Password = '';

//Break Settings
BreakIn = 135;
BreakFor = 15;
Version = 1.0;


Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
with Players[0] do
begin
Name := ''; //Enter your Runescape Username Here
Pass := ''; //Enter your Runescape Password Here
Pin := ''; //Enter your Bank Pin Here, Leave blank if you dont have one BoxRewards := ['XP','xp','lamp'];
LampSkill := Skill_Agility;
Active := True;
end;
end;

Var
x, y: Integer;

Procedure Antiban;
Begin

Case Random(100) Of
1: HoverSkill('magic', False);
2: HoverSkill('random', False);
3: Boredhuman;
4: Wait(2500 + random(4500));
5: RandomRClick;
6: PickUpMouse;
7: RandomMovement;
end;
end;
Procedure PickUpFrog;
begin
repeat
FindNormalRandoms;
if FindObjCustom(x, y, ['Swamp', 'toad'], [2190656], 5) then
begin
Mouse(x, y, 0, 0, false);
ChooseOption('Take');
end;
repeat
Until not IsUpText('toad') or (InvFull);
until(InvFull);
End;

Procedure RadialWalkToBank;
var
x,y, Roadcolor: Integer;
begin
If (InvFull) then
begin
RoadColor := AutoColor(1);
writeln(ToStr(RoadColor));
repeat
RadialWalkAutoColor(RoadColor, 160, 180, 65, 1, 1);
until(FindSymbol(x, y, 'summoning obelisk'));
end;
end; //added end


begin
Smart_Server := 23;
Smart_Members := True;
Smart_Signed := False;
Smart_SuperDetail := False;

SetUpSRL;
ActivateClient;
DeclarePlayers;
LoginPlayer;

SetAngle(SRL_ANGLE_HIGH);
PickUpFrog;
RadialWalkToBank;
end. //added .

[ABC!]

Ty guys + repped both!