Мда.... "Ganociy" А типы для кого придумали??? А?
Тем более глобальные переменные тормознутее типов, учи логику и типы, и не пиши ерись. И еще а ты пули тоже в глобальных переменных хранишь???
Циклично их создаеш??? bullet1,bullet2,bullet3......
Type weapon
Field model, max_bullets, name_weapon$
end type
Type bullet
Field model,damage,type_bullet$
end type
Еще может быть у одного оружия несколько видов боеприпасов.