Spriraalin piirtäminen ei ihan QB:n omalla CIRCLE:llä onnistukaan. Mutta trigonometrisillä funktioilla ja PSET:illä helposti. Spiraalin muodot ovat kylläkin melko vääristyneitä.
SCREEN 13
pii = 4 * ATN(1)
kx = 160
ky = 100
sade = 80
DO
FOR i = 0 TO 2 * pii STEP .01
PSET (kx + SIN(i) * sade, ky + COS(i) * sade)
sade = sade - .02 'miten nopeasti säde pienenee
IF sade <= 0 THEN EXIT DO
NEXT
LOOPWow!
wou
Aihe on jo aika vanha, joten et voi enää vastata siihen.