[zxspectrum] Pickover

From: Enrico Maria Giordano <e.m.giordano@xxxxxxxxxxxxxxx>
To: The ZX Spectrum Mailing-List <zxspectrum@xxxxxxxxxxxxx>
Date: Wed, 17 Jan 2018 11:48:41 +0100

CLS

LET a = 0.2
LET b = 0.2
LET c = 5.7
LET t = 0.04

LET x = 1
LET y = 0
LET z = 0

@loop

PLOT x * 7 + 128, y * 7 + 88

LET tx = x
LET x = x - t * (y + z)
LET y = y + t * (tx + a * y)
LET z = z + t * (b + tx * z - c * z)

GOTO @loop

EMG

--
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

Follow-Ups:
- [zxspectrum] Re: Pickover
  - From: Enrico Maria Giordano

Other related posts:

» [zxspectrum] Pickover - Enrico Maria Giordano
» [zxspectrum] Re: Pickover- Enrico Maria Giordano