Cheesehunk
2006-05-20 00:41:22
How can I fix this compiling error:
Here is the Procedure:
[PHP]Procedure FollowPlayerToBank(WhichBank : string);
var TheBank: String;
begin
case WhichBank of
'feb': TheBank := if Random(2) = 1 then 'falador east' else 'fally east';
'fwb': TheBank := if Random(2) = 1 then 'falador west' else 'fally west';
'vwb': TheBank := 'varrock west';
'veb': TheBank := 'varrock east';
'akb': TheBank := 'al kharid';
'db' : TheBank := 'draynor';
'eb' : TheBank := if Random(2) = 1 then 'edgy' else 'edgeville';
end;
begin
SetupSRL;
FollowPlayerToBank('feb');
end.[/PHP]
Of course, this Procedure isn't nearly done, it will be a last desperation attempt to get to the desired bank when your script is lost!
Thanks for the help in advance,
Cheesehunk.
Line 7: [Error] (12129:19): Syntax error in scriptHere is the Procedure:
[PHP]Procedure FollowPlayerToBank(WhichBank : string);
var TheBank: String;
begin
case WhichBank of
'feb': TheBank := if Random(2) = 1 then 'falador east' else 'fally east';
'fwb': TheBank := if Random(2) = 1 then 'falador west' else 'fally west';
'vwb': TheBank := 'varrock west';
'veb': TheBank := 'varrock east';
'akb': TheBank := 'al kharid';
'db' : TheBank := 'draynor';
'eb' : TheBank := if Random(2) = 1 then 'edgy' else 'edgeville';
end;
begin
SetupSRL;
FollowPlayerToBank('feb');
end.[/PHP]
Of course, this Procedure isn't nearly done, it will be a last desperation attempt to get to the desired bank when your script is lost!
Thanks for the help in advance,
Cheesehunk.