CLS
SCREEN 9
x = 2
FOR y = 1 TO 5000
w = w + 300
x = x + 2 * SIN(z)
z = z + 10
LINE (x, y)-(w, z), 9
LINE (x + 2, y - 2)-(w - 2, z + 2), 0
FOR t = 1 TO 500: NEXT t
NEXT y