ScriptCore3.obj2menu

function obj2menu(Style: Byte): Byte
 Style: Position(Style) of the weapon in the TMapObject.Style
 Result: Position(Style) of the weapon in the Weapons List

Description

Translates the position of the weapon in the Style property of a Map Object - lying weapon (TMapObject.Style) to the corresponding position in the Weapon Menu (Weapons List).

Examples

begin
    WriteLn('obj2menu: '+inttostr(obj2menu(5))); //1
    WriteLn('obj2menu: '+inttostr(obj2menu(26))); //14
    WriteLn('obj2menu: '+inttostr(obj2menu(1))); //Exception: Invalid object style ( Unfortunately you can't choose flag in the weapon menu ;( )
end.