********************************
*             PRIME            *
*     Bulletin Board System    *
*                              *
*       (C)opyright 1989       *
*       By Daniel Haynes       *
*                              *
*         Published By         *
*     SmokeSignal Software     *
*                              *
*        Program Version       *
*              2.2             *
*                              *
*         Amper Version        *
*              1.0             *
*                              *
********************************
;
;

********************************
*            Equates           *
********************************


ZPTR = $03
STRLEN = $05
PTR = $06
XREG = $08
AREG = $0A
STATUS = $0B
YREG = $0C

REFSTR1 = PTR
CMPSTR1 = PTR+1
CNTR = PTR+2

VALTYP = $11
EDSC = $19
EDTL = $19
EDIT = $1A
SDSC = $1C
SFLD = $1D
DPLC = $1F

CH = $24
CV = $25
BAS = $28

A1L = $3C
A2L = $3E

A4L = $42

LINNUM = $50
INDEX = $5E

STREND = $6D
FRETOP = $6F

CURLIN = $75

VARNAM = $81
VARPNT = $83
FORPNT = $85

LOWTR = $9B
FAC = $9D

DPTR = $A0
SIGN = $A2

CHRGET = $B1
CHRGOT = $B7
TXTPTR = $B8

ERRFLG = $D8
ERRNUM = $DE
ERRLIN = $DA


KPAUSE = $13 ;^S

NMBR = $0100

INTRP = $0300
OH = $0301
CARRIER = $0302
SLOTN = $0303
BAUD = $0304
SYSOP = $0306 ;Sysop Page Status

* 0307
* 0308
* 0309
* 030A

TIMPRO = $030B ;Timer Protected
KABORT = $030C
NEXT = $030D
ATIME = $030E

* 030F

* 0310
* 0311
* 0312
* 0313
* 0314
* 0315

CHTCHR = $0316 ;Chat Character?
GRNTLVL = $031C ;Security Level Granted
SYSMOD = $0319 ;System Mode

* 031A
* 031B
* 031C
* 031D
* 031E
* 031F

TBUFF = $0320
LOWCAS = $0321
LASTCHR = $0322
MODEMON = $0323
SCRNON = $0324
LINFD = $0325
SLOT = $0326
MDMCASE = $0327

* 0328
* 0329
* 032A

OUTWDTH = $032B ;Output Screen Width
TIMREM = $032C ;Time remaining/allocated
TIMOOF = $032D ;Timer On/Off

* 032E
* 032F

* 0330
* 0331

MNUCOL = $0332 ;Menu Columns

* 0333
* 0334
* 0335
* 0336
* 0337

NULLS = $0338
OUTMASK = $0339
MSKCHR = $033A
TBUFF1 = $033B
MCHR = $033C

* 033D

CHTFLG = $033E

* 03EF

* 0340

PRVFLG = $0341

* 0342

TERMINAL = $0343
GRNTLV1 = $0344 ;Prime Security Level Ganted

* 0345
* 0346
* 0347
* 0348

MSGUPD = $0349 ;Message read update flag

* 034A
* 034B
* 034C

CPU = $034D
UBITCD = $034E

* 034F

SCRNMSK = $0350 ;Screen inverse mask

* 0351
* 0352

ID = $0353
MEM = $0354
COLUMN = $0355
CLOCK = $0356
CLKCRD = $0356 ;Is there a clock card?

* 0358

RREG = $0359

* 035A
* 035B
* 035C
* 035D
* 035E
* 035F

* 0360
* 0361
* 0362
* 0363
* 0364
* 0365
MSGNUM = $0366 ;Message number (2 bytes)
IGNORE = $0368
MSGKEY = $0369
USRKEY = $036A
* 036B
* 036C
* 036D
* 036E
* 036F

* 0370

SPECIAL = $0371

* 0372

WHIZ = $0373 ;NO LONGER USED
CARR = $0374
WHZTXT = $0375 ;NO LONGER USED

* 0376
* 0377
* 0378
* 0379
* 037A
* 037B
* 037C
* 037D
* 037E
* 037F

SCRN = $07D0
INPUT = SCRN+37

EQUAL = 208

HBUFF = $9880

KEY = $C000
SPEAKER = $C030

MLI = $BF00
MACHID = $BF98

ERROR = $D412
LINGET = $DA0C
LET1 = $DA5B
SAVD = $DA9A
SAVSTR = $DAA1
FRMNUM = $DD67
CHKNUM = $DD6A
CHKSTR = $DD6C
MISMTCH = $DD76
FRMEVL = $DD7B
CHKCOM = $DEBE
SYNCHR = $DEC0
SYNERR = $DEC9
PTRGET = $DFE3

GIVAYF = $E2F2
SGNFLT = $E301
STRLIT = $E3E7
FREFAC = $E600
FTED = $E625
GETBYT = $E6F8
GETADR = $E752
FADDH = $E7A0
FADD = $E7BE
FADDT = $E7C1
FMULTT = $E982
MUL10 = $EA39
MOVMF = $EB2B
MOVAF = $EB63
RNDB = $EB72
FLOAT = $EB93
ABS = $EBAF
INT = $EC23
FOUT = $ED34
NEGOP = $EED0

GETARYPT = $F7D9
TABV = $FB5B
HOME = $FC58
WAIT = $FCA8
COUT = $FDED
INVERSE = $FE80
NORMAL = $FE84
MOVE = $FE2C
RESTORE = $FF3F
SAVREG = $FF4A
SETV = $FF58

EX = %10101010

MSGBUF = $6800
OPENBUF = MSGBUF-$0400

REFSTR = $7000
CMPSTR = $7100

MSGSIZ = 55
CMD = MSGBUF+$0800
OFF = CMD+MSGSIZ
ACCESS = OFF+MSGSIZ
TYPE = ACCESS+MSGSIZ
WHERE = TYPE+MSGSIZ
NAME = WHERE+MSGSIZ
PASS = NAME+MSGSIZ
BITCD = PASS+MSGSIZ
HBITCD = BITCD+MSGSIZ

STACK = $DF00

NEWLINE = $BED1
CRDPRM = $BED5
CDSKBUF = CRDPRM+2
CREQLEN = CRDPRM+4
GOSYS = $BE70
