' This program exported from BASIC Anywhere Machine (Version [5.2.3].[2023.12.16.16.28]) on 2024.02.13 at 04:26 (Coordinated Universal Time)
' Program by Charlie Veniot

SCREEN 12
COLOR 14
m% = 0
StartDrawing:
  FOR this_angle% = (360-m%) TO (10-m%) STEP - 10
    DRAW "B M320,240"
    DRAW "TA " + this_angle% + " B D200"
    DRAW "TA " + this_angle% + " R80 U400 L160 D400 R80"
    DRAW "B M320,240"
    DRAW "TA " + this_angle% + " B D150"
    DRAW "TA " + this_angle% + " R50 U300 L100 D300 R50"
    DRAW "B M320,240"
    DRAW "TA " + this_angle% + " B D100"
    DRAW "TA " + this_angle% + " R40 U200 L80 D200 R40"
  NEXT this_angle%
  SLEEP 0.05
  CLS
  m% = m% + 1 : IF m% = 10 THEN m% = 0
GOTO StartDrawing: