CLS
SCREEN 11, 0, 0
FOR a = 0 TO 7 * 3.14159 STEP .001#
x = 100 * SIN(a + 3) * SIN(a + 32) + 320
y = 100 * COS(a - 24) - 34 * COS(a * 5) + 240
PSET (x, y)
NEXT a