[HolyDel]

лучше - бы весь код в студию.
а так сильно имхо:

if keydown(57)
for t.tank1=each tank1
freeentity t\obj ; удаляем модель
delete t
next
endif