Анимация

  1. 5 rem присваиваем переменным значение
  2. 10 img%=0
  3. 15 maximg%=5
  4. 20 rem код выбора картинки
  5. 25 rem если последнjaja картинка загружена, то обнулjaем значение
  6. 30 if img%=maximg% th img%=0
  7. 35 rem сменjaем номер картинки
  8. 40 img%=img%+1
  9. 45 rem устанавливаем имja длja изображений
  10. 50 anim$="anim_"+str$(img%)+".png"
  11. 55 rem создаём гели/спрайты
  12. 60 gelload "anim",anim$
  13. 65 spritegel "anim","anim"
  14. 70 rem выводим на экран
  15. 75 spritemove "anim",30,30
  16. 80 rem начинаем всё сначала
  17. 85 sleep 50:goto 20
Мой вариант анимации
Кол-во картинок задаётся в переменной maximg%, имя - в переменной img$
В моём случае:
anim_1.png,...,anim_5.png

Реклама

Мы в соцсетях

tw tg yt gt