Simba Code:
Type
Monster = Record
Colour,Toll:Integer;
Hue,Sat :Extended;
Uptext :String;
End;
var
MonsterSetup : Monster
Function MonsterDetails(MonsterName:String):Monster;
Begin
Case MonsterName Of
'Goblin':Begin
with MonsterSetup do //loads recoard to store specific infomation for script
begin
Colour:= ;
Toll:= ;
Hue:= ;
Sat:= ;
Uptext:= '' ;
end;
End;
End;
End;
use the above case to store all monsters.
when you call a specific one use MonsterSetup.Colour, Toll and so on to call the relevant info.
thats how i did it last time, hope it all makes sense