02-04-2003, 01:16 PM
Hey again...this ones just a bunch of rotating points, i wouldnt recommend looking at it for too long
Code:
1 SCREEN 13
2 angle = angle + 1
3 IF angle = 360 THEN angle = 0
4 xy = xy + .09'RND * .5
5 PSET (160 + COS(angle) * xy - SIN(angle) * xy, 100 + SIN(angle) * xy + COS(angle) * xy), RND * 2
6 PSET (160 + COS(360 - angle) * xy - SIN(360 - angle) * xy, 100 + SIN(360 - angle) * xy + COS(360 - angle) * xy), RND * 4 + 2
7 IF xy > 160 THEN xy = 0
8 IF xy = 0 THEN LINE (0, 0)-(319, 199), 0, BF
9 GOTO 2