Анимация

  1. 10 gelload "down","Down.png"
  2. 20 gelload "up","Up.png"
  3. 30 gelload "right","Right.png"
  4. 40 gelload "left","Left.png"
  5.  
  6. 50 spritegel "Down","down"
  7. 60 spritegel "Up","up"
  8. 70 spritegel "Right","right"
  9. 80 spritegel "Left","left"
  10. 81 spritemove "Down",-500,-100
  11. 82 spritemove "Right",-500,-100
  12. 83 spritemove "Up",-500,-100
  13. 84 spritemove "Left",-500,-100
  14.  
  15. 85 x%=100:y%=120
  16.  
  17. 90 spritemove "Right",-500,-100
  18. 100 spritemove "Up",-500,-100
  19. 110 spritemove "Left",-500,-100
  20. 120 spritemove "Down",x%,y%
  21. 130 if down(0) then y%=y%+1
  22. 140 if left(0) then goto 180
  23. 150 if right(0) then goto 270
  24. 160 if up(0) then goto 360
  25. 170 repaint:sleep 20:goto 90
  26.  
  27. 180 spritemove "Right",-500,-100
  28. 190 spritemove "Up",-500,-100
  29. 200 spritemove "Down",-500,-100
  30. 210 spritemove "Left",x%,y%
  31. 220 if left(0) then x%=x%-1
  32. 230 if right(0) then goto 270
  33. 240 if up(0) then goto 360
  34. 250 if down(0) then goto 90
  35. 255 if x%<0 then x%=0
  36. 260 repaint:sleep 20:goto 180
  37.  
  38. 270 spritemove "Left",-500,-100
  39. 280 spritemove "Up",-500,-100
  40. 290 spritemove "Down",-500,-100
  41. 300 spritemove "Right",x%,y%
  42. 310 if right(0) then x%=x%+1
  43. 320 if left(0) then goto 180
  44. 330 if up(0) then goto 360
  45. 340 if down(0) then goto 90
  46. 350 repaint:sleep 20:goto 270
  47.  
  48.  
  49. 360 spritemove "Right",-500,-100
  50. 370 spritemove "Left",-500,-100
  51. 380 spritemove "Down",-500,-100
  52. 390 spritemove "Up",x%,y%
  53. 400 if up(0) then y%=y%-1
  54. 410 if left(0) then goto 180
  55. 420 if right(0) then goto 270
  56. 430 if down(0) then goto 90
  57. 436 if y%<0 then y%=0
  58. 440 repaint:sleep 20:goto 360
Анимация в 4 стороны.

Реклама

Мы в соцсетях

tw tg yt gt