Creating a Option for my script?

[ffcfoo]

Hello, well I got a Fletching script that I made and I was going to add a option for different types of logs to cut so I was going to do this:

procedure LogsToCut;
begin
if LogsType := 'Willow' then
Do WillowCut;
end;

Then add LogsType := 'Willow' In the declare players. Then I would just create a bunch of procedures for each log. But I do not know if this will work because I just made this up and I do not know if that procedure will even work. Also I want to know if there is a better way to do something like this.

[Dgby714]

well Players is a type that doesn't include "LogsType" in it so you can use "Strings[0]" instead so here

Your declare players will look something like this

procedure DeclarePlayers;
begin
with Players[0] do
begin
... //other players crap like nick and pass
Strings[0] := 'Willow'; //Logtype here =)
... // maybe some other varables
end;
end;

then too use that "Strings[0]" you can do


case LowerCase(Players[CurrentPlayer].Strings[0]) of
'willow', 'willows': CutWillows;
'someothertree', 'alias': CutOtherTree;
else
CutTheElseTree;
end;

Updated to case because of Frements post =)

[Frement]

case Players[CurrentPlayer].Strings[0] of
...
end;

Use cases.

[ffcfoo]

well Players is a type that doesn't include "LogsType" in it so you can use "Strings[0]" instead so here

Your declare players will look something like this

procedure DeclarePlayers;
begin
with Players[0] do
begin
... //other players crap like nick and pass
Strings[0] := 'Willow'; //Logtype here =)
... // maybe some other varables
end;
end;

then too use that "Strings[0]" you can do


case LowerCase(Players[CurrentPlayer].Strings[0]) of
'willow', 'willows': CutWillows;
'someothertree', 'alias': CutOtherTree;
else
CutTheElseTree;
end;

Updated to case because of Frements post =)

"CutTheElseTree;" What? Why would you cut a tree that has already been listed? Wouldn't be:

case LowerCase(Players[CurrentPlayer].Strings[0]) of
'willow', 'willows': CutWillows;
'someothertree', 'alias': CutOtherTree;
else
TerminateScript;
end;

Also it would look like this correct?:

procedure KindOfLogs;
begin
if not LoggedIn then Exit;
case LowerCase(Players[CurrentPlayer].Strings[0]) of
'tree', 'trees': CutTrees;
'oak', 'oaks': CutOaks;
'willow', 'willows': CutWillows;
'maple', 'maples': CutMaples;
'yew', 'yews': CutYews;
'magic', 'magics': CutMagics;
else
TerminateScript;
end;
end;

[Dgby714]

Yes and you can add as many aliases as you need =)

like for a normal tree it could be


'tree', 'trees', 'normal': CutTrees;

and yes you can put anything in the else thing, I just make it cut normal trees if people don't set it. (I also add a little warning that they didn't set it!)

[ffcfoo]

Yes and you can add as many aliases as you need =)

like for a normal tree it could be


'tree', 'trees', 'normal': CutTrees;

and yes you can put anything in the else thing, I just make it cut normal trees if people don't set it. (I also add a little warning that they didn't set it!)

Okay I understand.