[mr.DIMAS]

А готовый проимер незя?
Ато ручками соберать незнамо что! както неочень тянет!
Хотябы фотки кинь чтоли!=)

Просто надо было подождать

Э... Небольшая поправка чтоли
Вместо

For x=0 to 36
Radius=Radius+10
CreateOskolok(X,Y,Z,0,Radius,0)
Next

Лучше
CreateOskolok(X,Y,Z,0,10,0)
CreateOskolok(X,Y,Z,0,20,0)
CreateOskolok(X,Y,Z,0,30,0)
CreateOskolok(X,Y,Z,0,40,0)
CreateOskolok(X,Y,Z,0,50,0)
CreateOskolok(X,Y,Z,0,60,0)
CreateOskolok(X,Y,Z,0,70,0)
CreateOskolok(X,Y,Z,0,80,0)
CreateOskolok(X,Y,Z,0,90,0)
CreateOskolok(X,Y,Z,0,100,0)
CreateOskolok(X,Y,Z,0,110,0)
CreateOskolok(X,Y,Z,0,120,0)
CreateOskolok(X,Y,Z,0,130,0)
CreateOskolok(X,Y,Z,0,140,0)
CreateOskolok(X,Y,Z,0,150,0)
CreateOskolok(X,Y,Z,0,160,0)
CreateOskolok(X,Y,Z,0,170,0)
CreateOskolok(X,Y,Z,0,180,0)
CreateOskolok(X,Y,Z,0,190,0)
CreateOskolok(X,Y,Z,0,200,0)
CreateOskolok(X,Y,Z,0,210,0)
CreateOskolok(X,Y,Z,0,220,0)
CreateOskolok(X,Y,Z,0,230,0)
CreateOskolok(X,Y,Z,0,240,0)
CreateOskolok(X,Y,Z,0,250,0)
CreateOskolok(X,Y,Z,0,260,0)
CreateOskolok(X,Y,Z,0,270,0)
CreateOskolok(X,Y,Z,0,280,0)
CreateOskolok(X,Y,Z,0,290,0)
CreateOskolok(X,Y,Z,0,300,0)
CreateOskolok(X,Y,Z,0,310,0)
CreateOskolok(X,Y,Z,0,320,0)
CreateOskolok(X,Y,Z,0,330,0)
CreateOskolok(X,Y,Z,0,340,0)
CreateOskolok(X,Y,Z,0,350,0)
CreateOskolok(X,Y,Z,0,360,0)
Ну а вот и собсно пример реализующий гранату(управление броском гранаты - пробел)