' "Sonne" in Strichpunktlinie

Pi! = 4! * ATN(1!)

SCREEN 11
FOR i% = 0 TO 43
  w! = CSNG(i%) * Pi! / 22!
  LINE (320! + 20! * COS(w!), 240! + 20! * SIN(w!))-(320! + 238! * COS(w!), 240! + 238! * SIN(w!)), 4, , &HFF33
NEXT i%

d$ = INPUT$(1)
SCREEN 0