02-03-2003, 05:01 PM
This 1 looks really stupid for a few seconds until the palette gets fully changed so please wait for that..
1 SCREEN 13
2 DEFINT A-Z
3 FOR Ix = 0 TO 319
4Â Â Â Â Â Â FOR Iy = 0 TO 199
5Â Â Â Â Â Â Â Â Â Â PSET (Ix, Iy), ((Ix - L) XOR (Iy + L)) Xor ((Ix + L) XOR (Iy - L))
6Â Â Â Â Â Â NEXT Iy, Ix
7Â Â Â Â Â Â L = (L + 1) AND 255
8Â Â Â Â Â Â PALETTE L, (255 - L) \ 4
9 IF INKEY$ = "" THEN 3
1 SCREEN 13
2 DEFINT A-Z
3 FOR Ix = 0 TO 319
4Â Â Â Â Â Â FOR Iy = 0 TO 199
5Â Â Â Â Â Â Â Â Â Â PSET (Ix, Iy), ((Ix - L) XOR (Iy + L)) Xor ((Ix + L) XOR (Iy - L))
6Â Â Â Â Â Â NEXT Iy, Ix
7Â Â Â Â Â Â L = (L + 1) AND 255
8Â Â Â Â Â Â PALETTE L, (255 - L) \ 4
9 IF INKEY$ = "" THEN 3
very F***ing song remains the same
To everyone who sucks-up for the fame
Out of strength you know we speak the truth
Every trend that dies is living proof
MasterMinds Software
To everyone who sucks-up for the fame
Out of strength you know we speak the truth
Every trend that dies is living proof
MasterMinds Software