*
*  Monitor JSR Locations 
*
PROMPT	EQU	$C050
GET		EQU	$C053
PUT		EQU	$C056
CLRDISP	EQU	$C059
SENDCH	EQU	$C05C
SENDSTR	EQU	$C05F
DISNUM	EQU	$C062
SOUND		EQU	$C065
RD_KNB	EQU	$C068
PWR_AD	EQU	$C06B
READ_AD	EQU	$C06E
*
*  Monitor BUFFERS Locations 
*
DISBUF	EQU	$C000		; $C000 - $C01F
KEY		EQU	$C030
DUR		EQU	$C031
FREQ		EQU	$C032
KNB_POS	EQU	$C035
*
	ORG	$8010
*
AGAIN	JSR	CLRDISP
	JSR	RD_KNB		; Frob knob is at AD num 7
	TBA
	LDX	#DISBUF
	JSR	DISNUM
	JSR	PUT
	JMP	AGAIN
*
