Ruslan_Isaev

pointer

Feb 26th, 2018
545
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. SCREEN 12
  2. dir = 0
  3. x = 320
  4. y = 240
  5. pi = 3.141626535897932#
  6. 10
  7. dir = dir + 1
  8. LINE (x, y)-(x + 100 * COS(dir * pi / 180), y + 100 * SIN(dir * pi / 180))
  9. LINE (x + 100 * COS(dir * pi / 180), y + 100 * SIN(dir * pi / 180))-(x + 75 * COS(dir * pi / 180) + COS(dir * pi / 180), y + 75 * SIN(dir * pi / 180) + 25 + SIN(dir * pi / 180))
  10. LINE (x + 100 * COS(dir * pi / 180), y + 100 * SIN(dir * pi / 180))-(x + 75 * COS(dir * pi / 180) - 25 - COS(dir * pi / 180), y + 75 * SIN(dir * pi / 180) - 25 - SIN(dir * pi / 180))
  11. SLEEP 1
  12. CLS
  13. IF dir < 360 GOTO 10
RAW Paste Data