45 lines
1.3 KiB
Plaintext
45 lines
1.3 KiB
Plaintext
1
|
||
(P) to Pause, (A) to Abort
|
||
|
||
APPLE PEEKS & POKES
|
||
===================
|
||
|
||
POKE 33,33........SQUEEZE A/S LISTINGS
|
||
POKE 50,128.......INVISIBLE WRITING
|
||
POKE 44033,X......MAKE CATALOG TRACK #X
|
||
POKE 43624,X......CHANGE DRIVE TO #X
|
||
POKE 43626,X......CHANGE SLOT TO #X
|
||
POKE 249,X........MAKE ROT=X
|
||
POKE 241,X........MAKE SPEED=256-X
|
||
POKE 228,X........CHANGE HCOLOR
|
||
PRINT PEEK(222)...PRINT ERROR CODE
|
||
POKE 214,255......AUTO-RUN PROGRAM
|
||
POKE 48,X.........MAKE LORES COLOR=X*17
|
||
POKE 37,X.........VTAB X+1
|
||
POKE 36,X.........HTAB X+1
|
||
POKE 32,X.........LEFT EDGE OF WINDOW-1
|
||
POKE 2049,1.......LIST PROTECTION
|
||
CALL 42350........CATALOG
|
||
CALL -998.........MOVE CURSOR UP 1 LINE
|
||
CALL -1233........TEXT
|
||
CALL -3106........HGR
|
||
CALL -3116........HGR2
|
||
CALL -3086........CLEAR HIRES SCREEN
|
||
CALL -1216........GR
|
||
CALL -1184........PRINT "APPLE ]["
|
||
CALL -384.........INVERSE
|
||
CALL -380.........NORMAL
|
||
CALL -936.........HOME
|
||
CALL -1052........RING BELL
|
||
CALL -1036........MOVE CURSOR RIGHT
|
||
CALL -1008........MOVE CURSOR LEFT
|
||
CALL -756..... ...WAIT FOR KEYPRESS
|
||
|
||
|
||
|
||
|
||
|
||
Magazine (1-2,A,?=List,*=Logoff):
|
||
|
||
|
||
Magazine (1-2,A,?=List,*=Logoff): |