10REM Hypnotic Spiral illusion
20REM (C) 1996 Jon Ripley
30REM This program is NOT PD
40ONERROROSCLI"Exec !Boot":END
50MODE2:VDU279;0;0;0;0;29,640;512;:MO
VE0,0:C=.5:FORI=0TO427STEP.2:C=C+.5+7*(C
=7.5):GCOL0,C:R=I*2:DRAWR*SINI,R*COSI:NE
XT:C=7:REPEATVDU19,C,7;0;:OSCLI"FX19":VD
U19,C,0;0;:C=C-1-7*(C=1):UNTIL.