ScriptCore3.weap2menu

function weap2menu(Style: Byte): Byte
 Style: Position(Style) of the weapon in the TWeapon.WType
 Result: Position(Style) of the weapon in the Weapons List

Description

Translates the position of the weapon in the WType property of a Weapon Object - weapon in player's hands (TWeapon.WType) to the corresponding position in the Weapon Menu (Weapons List).

Examples

begin
    WriteLn('weap2menu: '+inttostr(weap2menu(1))); //1
    WriteLn('weap2menu: '+inttostr(weap2menu(13))); //14
    WriteLn('weap2menu: '+inttostr(weap2menu(15))); //Exception: Invalid weapon style (Well played, Robin Hood!)
end.