handy peeks & pokes

Started by Blacklord, June 12, 2006, 10:17 AM

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Blacklord

CLEAR KEYBOARD BUFFER       POKE 208,0
DISABLE LIST                         POKE 774,139
ENABLE LIST                           POKE 774,81
DISABLE STOP/RESTORE         POKE 808,103
ENABLE STOP/RESTORE           POKE 808,110
DISABLE LOAD                        POKE 816,0
ENABLE LOAD                          POKE 816,108
CHANGE KEY REPEATS             POKE 2594,X (X=64...No keys repeat X=225...all keys repeat X=0...some keys repeat(cursor,etc))
CHANGE PRINT COLOR             POKE 241,(0-15)
CLEAR FUNCTION KEY DEFs      POKE 4096,0
USE LOWER CASE WITH CHAR  POKE 4588,216
USE UPPER CASE WITH CHAR   POKE 4588,208
SWITCH FAST/SLOW(0=SLOW) POKE 53296,(0-1)
DISABLE SAVE                        POKE 818,1
ENABLE SAVE                          POKE 818,78

DETECT WHICH COMPUTER A PROGRAM IS ON    PEEK(65534)...72= C64...23=128..253= +4
DETECT SCREEN WIDTH          PEEK(215) (0=40 columns...128=80 columns)

Anyone have anymore to add ?

TB

Reset the computer then typing list        poke 774,61:poke 775,255
2Mhz (works in both 64 and 128 mode)  poke 53296,1
1Mhz (works in both 64 and 128 mode)  poke 53296,0
Give F1-F8 same function as 64 mode    poke 828,183
Reset (same as sys64738 on 64)           sys65341

xlar54

Some peeks/pokes regarding modems, from zimmers.net:

Detecting a ring:
if(peek(56577) and 8) = 0  then print "ringing"

Detecting a connection is accomplished by simply watching the Data  
Carrier Detect line on the modem port.  That will be bit 4 in location  
56577.  When the following BASIC condition becomes true, the BBS should  
go online:  

   (peek(56577)and16)=16  
 
The BBS program should go online by swinging its Data Terminal Ready  
signal high.  This can be done with the following:  
poke56577,6:poke56579,6  
 
The BBS program should hang up whenever it detects the Data Carrier  
Detect line go low.  That's done with something similar to the peek  
above:  

   (peek(56577)and16)=0  
 
The next step is to drop the Data Terminal ready signal by entering:  

   poke56577,0:poke56579,32