Advertisement
Guest User

Untitled

a guest
Oct 22nd, 2019
123
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.54 KB | None | 0 0
  1. IF Actor("this").VelocityZ = 0
  2. STATIC _G0
  3. IF _G0 = 0
  4. SET _G0 = 1
  5. Map("this").PlaySprite("smoke01", Actor("this").X, Actor("this").Y + 1, Actor("this").Z, 1, -1, 0, 0.0175, 0)
  6. ELSE
  7. IF Actor("this").Variable("open") = 1
  8. STATIC _G1
  9. IF _G1 = 0
  10. SET _G1 = 1
  11. Pause(1000)
  12. STATIC _G2
  13. IF 1
  14. SET _G2 = Math.RandomDifferent(1, 2, _G2)
  15. ELSE
  16. SET _G2 = Math.Random(1, 2)
  17. ENDIF
  18. IF _G2 = 1
  19. STATIC _G3
  20. SET _G3 = 1
  21. :g9
  22. IF _G3 <= 5
  23. Pause(100)
  24. Map("this").CreateActor("money", "", Actor("this").X, Actor("this").Y, Actor("this").Z + 20, 0, 0)
  25. SET _G3 = _G3 + 1
  26. GOTO g9
  27. ENDIF
  28. :g131071
  29. ELSEIF _G2 = 2
  30. STATIC _G4
  31. SET _G4 = 1
  32. :g11
  33. IF _G4 <= 10
  34. Pause(100)
  35. Map("this").CreateActor("money", "", Actor("this").X, Actor("this").Y, Actor("this").Z + 20, 0, 0)
  36. SET _G4 = _G4 + 1
  37. GOTO g11
  38. ENDIF
  39. :g196607
  40. ENDIF
  41. ELSE
  42. ENDIF
  43. ELSE
  44. ENDIF
  45. ENDIF
  46. ELSE
  47. ENDIF
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement