Мне кажется, что здесь, не уместно столько раз
UpdateWorld(), RenderWorld(), Flip
гонять, можно всё упростить, даже не использовать “кассы”. Вот как я вижу эту программу, пример:
Type
Field
End Type
Function Type()
End Function
Type
Field
End Type
Function Type()
End Function
Function Function()
End Function
Function Function()
End Function
Global GameMenu=0,и.т.д.
Graphics3D Лаунчер, самый крутой, какой нарисовать сможешь!:)
SetBuffer BackBuffer()
camera=CreateCamera()
light=CreateLight()
Вся медия, меню, должна загружаться один раз, до основного цикла!
;GameMenu=0 1 можно через банк памяти передавать CreateBank()
;Namb=0 100 можно через банк памяти передавать CreateBank()
While Not KeyDown( ? )
If GameMenu=1
If KeyHit(1) Then GameMenu=0
UpdateGame()
Namb=100
End If
UpdateWorld(Namb)
RenderWorld()
If GameMenu=0
Namb=0
UpdateMenu()
If вернутся в игру() Or новая игра() Then GameMenu=1
EndIf
Flip
Wend
Удаляем всё()
End
Ну а вообще, там случай, не безнадёжный, для тех кто раньше помогал разобраться не сложно будет, я не могу понять где чё