[Mhyhr]

тип того:

select Weapon
case 1
Прячем_оружие(Пистолет-1)
Показываем_оружие(Пистолет)
case 2
...
End Select

На счёт анимации тут огромное пространство вариантов. Самое лучшее это попробовать и включить моzzZг =)