From Uwe Geiken:
I just found the source of "Ball Of Wool" in another group and had to translate it for the Speccy. :-)
10 REM BALL OF WOOL
20 INK 4: PAPER 0: BORDER 0: CLS
30 LET s=86
40 PLOT 128,88
50 FOR x=0 TO 126 STEP 0.2
60 DRAW 128+s*SIN x-PEEK 23677,88+s*COS x*SIN (x*.95)-PEEK 23678
70 NEXT x