; PV 	- permanent variable---DO NOT USE
; TV 	- temporary variable---maybe use
; DV 	- double vairable---probably do not use
; Vhh	- free to use, but used by BASIC
; Uhh	- not used by BASIC at all

	;***********************************************
	; COLOR BASIC
	;***********************************************

CB.endflg	equ	$00	; stop/end flag; positive=stop, neg=end
.charac		equ	$01	; terminator flag 1
.endcur		equ	$02	; terminator flag 2
.tmploc		equ	$03	; scratch variable
.ifctr		equ	$04	; IF counter - how many IF statement in a line
.dimflg		equ	$05	; *DV* array flag 0=evaluate 1=dimentioning
.valtyp		equ	$06	; *DV* *PV type flag; 0=numeric, $FF=string
.garbfl		equ	$07	; *TV string space housekeeping flag
.arydis		equ	$08	; disable array search; 0=allow search
.inpflg		equ	$09	; *TV input flag: read=0, input<>0
.relflg		equ	$0A	; *TV relational operator flag
.temppt		equ	$0B	; *PV temporary string stack pointer
.lastpt		equ	$0D	; *PV addr of last used string stack address
.temptr		equ	$0F	; temporary pointer
.tmptr1		equ	$11	; temporary descriptor storage (stack search)
.fpa2		equ	$13	; floating point accumulator #2 mantissa
.botstk		equ	$17	; bottom of stack at last check
.txttab		equ	$19	; *PV beginning of BASIC program
.vartab		equ	$1B	; *PV start of variables
.arytab		equ	$1D	; *PV start of arrays
.aryend		equ	$1F	; *PV end of arrays (+1)
.fretop		equ	$21	; *PV start of string storage (top of free RAM)
.strtab		equ	$23	; *PV start of string variables
.frespc		equ	$25	; utility string pointer
.memsiz		equ	$27	; *PV top of string space
.oldtxt		equ	$29	; saved line number during a "STOP"
.binval		equ	$2B	; binary value of a converted line number
.oldptr		equ	$2D	; saved input ptr during a "STOP"
.tinptr		equ	$2F	; temporary input pointer storage
.dattxt		equ	$31	; *PV "DATA" statement line number pointer
.datptr		equ	$33	; *PV "DATA" statement address pointer
.dattmp		equ	$35	; data pointer for "INPUT" & "READ"
.varnam		equ	$37	; *TV temp storage for a variable name
.varptr		equ	$39	; *TV pointer to a variable descriptor
.vardes		equ	$3B	; temp pointer to a variable descriptor
.relptr		equ	$3D	; pointer to relational operator processing routine
.trelfl		equ	$3F	; temporary relational operator flag byte
V40		equ	$40	; FPA #3 packed
V41		equ	$41
V42		equ	$42
V43		equ	$43
V44		equ	$44
V45		equ	$45	; FPA #4 packed
V46		equ	$46
V47		equ	$47
V48		equ	$48
V49		equ	$49
V4A		equ	$4A	; FPA #5 packed
V4B		equ	$4B
V4C		equ	$4C
V4D		equ	$4D
V4E		equ	$4D
CB.fp0exp	equ	$4F	; FPA #0 exponent
.fpa0		equ	$50	; FPA #0 mantissa
.fp0sgn		equ	$54	; FPA #0 sign
.coefct		equ	$55	; polynomial coefficient counter
.strdes		equ	$56	; temporary string descriptor
.fpcary		equ	$5B	; floating point carry byte
.fp1exp		equ	$5C	; FPA #1 exponent
.fpa1		equ	$5D	; FPA #1 mantissa
.fp1sgn		equ	$61	; FPA #1 sign
.ressgn		equ	$62	; sign of result of floating point operation
.fpsbyt		equ	$63	; floating point sub byte (fifth byte)
.coefpt		equ	$64	; polynomial coefficient pointer
.lsttxt		equ	$66	; current line pointer during list
.curlin		equ	$68	; *PV current line # of BASIC program, $FFFF = direct
.devcfw		equ	$6A	; *TV tab field width
.devlcf		equ	$6B	; *TV tab zone
.devpos		equ	$6C	; *TV print position
.devwid		equ	$6D	; *TV width
.prtdev		equ	$6E	; *TV print device: 0=not cassette, -1=cassette
.devnum		equ	$6F	; *PV device number: 0=DLOAD, -2=PRINTER , -1=CASSETTE, 0=SCREEN, 1-15=DISK
.cinbfl		equ	$70	; *PV console in buffer flag: 00=not empty, $FF=empty
.rstflg		equ	$71	; *PV warm start flag: $55=warm, other=cold
.rstvec		equ	$72	; *PV warm start vector - jump address for warm start
.topram		equ	$74	; *PV top of RAM
U76		equ	$76
U77		equ	$77
CB.filsta	equ	$78	; *PV file status flag: 0=closed, 1=input, 2=output
.cinctr		equ	$79	; *PV console in buffer char counter
.cinptr		equ	$7A	; *PV console in buffer pointer
.blktyp		equ	$7C	; *TV cass block type: 0=header, 1=data, $FF=EOF
.blklen		equ	$7D	; *TV cassette byte count
.cbufad		equ	$7E	; *TV cassette load buffer pointer
.ccksum		equ	$80	; *TV cassette checksum byte
.csrerr		equ	$81	; *TV error flag/character count
.cpulwd		equ	$82	; *TV pulse width count
.cpertm		equ	$83	; *TV bit counter
.cbtpha		equ	$84	; *TV bit phase flag
.clstsn		equ	$85	; *TV last sine table entry
.grblok		equ	$86	; *TV graphic block value for SET, RESET and POINT
.ikeyim		equ	$87	; *TV INKEY$ RAM image
.curpos		equ	$88	; *PV cursor location
.zero		equ	$8A	; *PV dummy - these two bytes are alwas zero
.sndton		equ	$8C	; *TV tone value for SOUND command
.snddur		equ	$8D	; *TV duration value for SOUND command
.cmpmid		equ	$8F	; *PV 1200/2400 Hertz partition		<-- moved from ROM
.cmp0		equ	$90	; *PV upper limit of 1200 Hz period	"
.cmp1		equ	$91	; *PV upper limit of 2400 Hz period	"
.syncln		equ	$92	; *PV number of $55s to cassette leader	"
.blkcnt		equ	$94	; *PV cursor blink delay		"
.lptbtd		equ	$95	; *PV Baud rate constant (600)		"
.lptlnd		equ	$97	; *PV Printer carriage return delay	"
.lptcfw		equ	$99	; *PV tab field width			"
.lptlcf		equ	$9A	; *PV last tab zone			"
.lptwid		equ	$9B	; *PV printer width			"
.lptpos		equ	$9C	; *PV line printer position		"
.execjp		equ	$9D	; *PV jump address for EXEC command	<-- moved from ROM
.getnch		equ	$9F	; *PV 	function			<-- moved from ROM
.getcch		equ	$A5	; *PV	function			"
.charad		equ	$A6	; *PV   function			<-- moved from ROM
VAB		equ	$AB	; low order four bytes of the product
VAC		equ	$AC	; of a floating point multiplication
VAD		equ	$AD	; these bytes are used as random data
VAE		equ	$AE	; by the RND statement

	;***********************************************
	; EXTENDED COLOR BASIC
	;***********************************************

ECB.trcflg	equ	$AF	; *PV trace flag 0=off else on
.usradr		equ	$B0	; *PV address of the start of usr vectors
.forcol		equ	$B2	; *PV foreground color
.bakcol		equ	$B3	; *PV background color
.wcolor		equ	$B4	; *TV wofking color being used by ECB
.allcol		equ	$B5	; *TV all pixels in the byte set to color of bakcol
.pmode		equ	$B6	; *PV PMODE's mode argument
.endgrp		equ	$B7	; *PV end of current graphic page
.horbyt		equ	$B9	; *PV number of bytes/horizontal grpahic line
.beggrp		equ	$BA	; *PV start of graphc page
.grpram		equ	$BC	; *PV start of graphic RAM (MSB)
.horbeg		equ	$BD	; *DV* *PV horizontal coordinate start point
.verbeg		equ	$BF	; *DV* *PV vertical coordinate start point
.cssyal		equ	$C1	; *PV SCREEN's color set argument
.setflg		equ	$C2	; *PV PRESET/PSET flag: 0=PRESET, 1=PSET
.horend		equ	$C3	; *DV* *PV horizontal coordinate ending point
.verend		equ	$C5	; *DV* *PV vertical coordinate ending point
.hordef		equ	$C7	; *PV horizontal coordinate default coordinate
.verdef		equ	$C9	; *PV vertical coordiate default coordiate
VCB		equ	$CB
VCC		equ	$CC
VCD		equ	$CD
VCE		equ	$CE
VCF		equ	$CF
VD0		equ	$D0
VD1		equ	$D1
VD2		equ	$D2
VD3		equ	$D3
VD4		equ	$D4
VD5		equ	$D5
VD6		equ	$D6
VD7		equ	$D7
VD8		equ	$D8
VD9		equ	$D9
VDA		equ	$DA
ECB.chgflg	equ	$DB	; *TV flag to indicate if graphic data has been changed
.tmpstk		equ	$DC	; *TV stack pointer storage during paint
.octave		equ	$DE	; *PV octage value (PLAY)
.volhi		equ	$DF	; *DV* *PV volume high value (PLAY)
.vollow		equ	$E0	; *DV* *PV volume low value (PLAY)
.noteln		equ	$E1	; *PV note length (PLAY)
.tempo		equ	$E2	; *PV tempo value (PLAY)
.plytmr		equ	$E3	; *TV timer for the PLAY command
.dotyal		equ	$E5	; *TV dotted note timer scale factor
.dlbaud		equ	$E6	; *DV* *PV DLOAD baud rate constant $B0=300, $2C=1200
.timout		equ	$E7	; *DV* *PV DLOAD timeout constant
.angle		equ	$E8	; *DV* *PV angle value (DRAW)
.scale		equ	$E9	; *DV* *PV scale value (DRAW)

	;***********************************************
	; DISK [EXTENDED] COLOR BASIC
	;***********************************************

DECB.dcopc	equ	$EA	; *PV DSKCON operation code 0-3
.dcdrv		equ	$EB	; *PV DSKCON drive nubmer 0-3
.dctrk		equ	$EC	; *PV DSKCON track number 0-34
.dsec		equ	$ED	; *PV DSKCON sector number 1-18
.dcbpt		equ	$EE	; *PV DSKCON data pointer
.dcsta		equ	$F0	; *PV DSKCON status byte
.fcbtmp		equ	$F1	; temporary FCB pointer
UF3		equ	$F3
UF4		equ	$F4
UF5		equ	$F5
UF6		equ	$F6
UF7		equ	$F7
UF8		equ	$F8
UF9		equ	$F9
UFA		equ	$FA
UFB		equ	$FB
UFC		equ	$FC
UFD		equ	$FD
UFE		equ	$FE
UFF		equ	$FF