[comp.binaries.apple2] GS silly text color cycler

laba-4an@web4d.berkeley.edu (Andy McFadden) (05/12/88)

Here's a rather silly little program I wrote a while ago.  It work best if
you BLOAD it, get into the monitor, and execute it with "1000G".  For some
reason "call 4096" hangs up...

It isn't hard to modify this to put the time at the upper-right hand corner
of the screen.

--- like, cut here ---
CALL-151
E00:38 A5 FF D0 32 D8 20 8E FD AD 30 BF 8D 6A 0E 20 00 BF C7 6D 0E 0D 80 02
E18:D0 1D 20 00 BF C5 69 0E B0 15 AD 81 02 29 0F AA E8 8E 80 02 A9 2F 8D 81
E30:02 20 00 BF C6 6D 0E A2 08 B0 0E 20 00 BF C3 70 0E B0 06 A2 26 20 53 0E
E48:AA 20 53 0E 4C D0 03 20 ED FD E8 BD 59 0E D0 F7 60 A0 F3 E1 F6 E5 E4 8D
E60:00 C5 F2 F2 EF F2 87 8D 00 02 00 81 02 01 80 02 07 7E 0E E3 06 00 10 00
E78:00 00 AB B0 30 0E 0A C3 CF CC CF D2 C2 D5 D2 D3 D4 00
F00:D8 A0 00 84 FF 88 84 E0 A9 0F 85 E1 20 67 FD A0 00 A2 FF 20 2F 0F E6 E0
F18:D0 02 E6 E1 0A 0A 0A 0A 91 E0 20 2F 0F 11 E0 91 E0 45 FF 85 FF 90 E4 E8
F30:BD 00 02 09 80 C9 A0 F0 F6 49 B0 C9 0A 90 17 69 88 09 20 C9 FA B0 0C 68
F48:68 E0 04 B0 BF 98 91 E0 4C 69 FF 18 29 0F 60
F00G
18FBC230A23810A000BFA9800054E100F40E00F4E100F400BFA20310220000E1
B012F40400A20323220000E1B00638FBE23060EA850000008B484BABAF22C0E0
48290F8D37BF6829F04A4A4A4AA8881002A00FCC37BFF0F6980A0A0A0A0D37BF
8F22C0E08F47C0E068AB186B36

BSAVE COLORBURST,A$1000,L$006C
E00G