Меню
- 10 for m%=1 to 4
- 20 gelload "menu"+str$(m%),"menu"+str$(m%)+".png"
- 30 next m%
- 38 m%=1
- 39 spritegel "menu","menu"+str$(m%)
- 40 spritemove "menu",0,0
- 50 if down(0) then m%=m%-1:goto 1000
- 60 if up(0) then m%=m%+1:goto 1000
- 65 rem выбор
- 70 if fire(0) then goto 2000
- 80 goto 50
- 1000 rem расчёт
- 1010 if m%<1 th m%=4
- 1020 if m%>4 th m%=1
- 1025 rem вывод
- 1030 spritegel "menu","menu"+str$(m%)
- 1040 spritemove "menu",0,0
- 1050 goto 70
- 2000 rem действия
- 2010 if m%=1 th...
- 2020 if m%=2 th...
- 2030 if m%=3 th...
- 2040 if m%=4 th...
Тупой вариант, зато легкорасширяемый
Картинки menu1.png,...,menu4.png - полноразмерные изображения (должны быть равны разрешению экрана)
Картинки menu1.png,...,menu4.png - полноразмерные изображения (должны быть равны разрешению экрана)
