Ну...и смех и слезы...
А ларчик-то просто открывался. Вот как я решил траблу, и все пашет:
Function fnMenuGame()
Repeat
Cls
mhit1= MouseHit(1)
mhit2= MouseHit(2)
EnterKey = KeyHit(28)
Delay 2
If gamestate$="mainmenu"
fnmainmenu()
EndIf
; ВОТ ЭТОГО НЕ ХВАТАЛО В ЦИКЛЕ
If gamestate$="game"
Exit
EndIf
If KeyHit(1)
ClearWorld()
Graphics 640,480,16,2
SetBuffer BackBuffer()
loadimages()
gamestate$="mainmenu"
End If
If enterkey=1 Then gamestate$="game"
Flip
Forever
End Function
Но если хорошо извратиться, и поставить бомбу, не дать ей взорваться и выйти в главное меню (2 раза ecs) то будет ошибка
ScaleEntity (bomb\obj,scale#,scale#,scale#)
Удивительно! Но ведь я через clearWorld все объекты удаляю! Почему такая ошибочка?
Можно пойти на хитрость)
fnDestroyField() если esc нажали, но тогда будет ошибка в удаоении: типа объекта нет, а вы удаляете (как я растолковал это для себя)
Как мне быть в этой ситуации?