EQULISTEASM;
; EQU-LISTE FUER KC 85/3 u. 4
; COPYRIGTH BY MPM
;
; SYSTEMRUFE
COLD	EQU	0F000H	;KALTSTART
WARM	EQU	0E000H	;WARMSTART
CAOS	EQU	0F003H	;VERTEILER DEFB
CAOS1	EQU	0F006H	;    "     ARGC
CAOS2	EQU	0F009H	;    "     REG E
CAOS3	EQU	0F00CH  ; WIE 2 MIT IRM
RCALL	EQU	0F00FH	;RELAT.CALL
CAOS4	EQU	0F015H  ; WIE 3 MIT SP
CAOS5	EQU	0F01EH	; WIE 4 MIT ARGC
BWSON	EQU	0F018H	; BWS ON
BWSOF	EQU	0F01BH	; BWS OFF
;
; ARBEITSZELLEN
ARGC	EQU	0B780H	;ZU VERTEILER1/5
ARGN	EQU	0B781H	;ANZAHL ARG.
ARG1	EQU	0B782H
ARG2	EQU	0B784H
ARG3	EQU	0B786H
NUMNX	EQU	0B796H	;ANZAHL ZIFFERN
NUMNV	EQU	0B797H	; ZIFFER
HCADR	EQU	0B799H	;REAKT.SH.+CLEAR
WINNR	EQU	0B79BH	;FENSTERNR.
WINON	EQU	0B79DH	;   "   ANFANG
WINLG	EQU	0B79FH	;   "   GROESSE
CURSO	EQU	0B7A0H	;CURSORPOSITION
STBT	EQU	0B7A2H	; STEUERBYTE
COLOR	EQU	0B7A3H	;
WEND	EQU	0B7A4H	;REAKT.FENSTENDE
CCTL0	EQU	0B7A6H	;ZG0
CCTL1	EQU	0B7A8H	;ZG1
CCTL2	EQU	0B7AAH	;ZG2
CCTL3	EQU	0B7ACH	;ZG3
SYSP	EQU	0B7AEH	;SYSTEMSTACKPOIN
SUTAB	EQU	0B7B0H	;UP-TABELLE
CTAB	EQU	0B7B2H	;CODE-TABELLE
OUTAB	EQU	0B7B9H	;ZEIGER AUSGABE
INTAB	EQU	0B7BBH	;  "    EINGABE
UOUT1	EQU	0B7BDH	; #2
UIN1	EQU	0B7C0H	; #2
UOUT2	EQU	0B7C3H	; #3
UIN2	EQU	0B7C6H	; #3
HOR	EQU	0B7D3H	;X FUER PSET
VERT	EQU	0B7D5H	;Y   - " -
FARB	EQU	0B7D6H	;FARBE "
MIXIT	EQU	0B7D7H	;I- REGISTER,IX
;
;ZUSATZ FUER KC 85/4
;
L3TAB	EQU	0B7DDH 	;ESC-TABELLE
L3SIZ	EQU	0B7DFH
COUNT	EQU	0B7E0H	;ZEITEINHEITEN
HOPZ	EQU	0B7E1H
INTV1	EQU	0B7E2H	;INIT.V24OUT
INTV1L	EQU	0B7E4H
INTV2	EQU	0B7E5H	;INIT.V24DUP
INTV2L	EQU 	0B7E7H
HCPZ2	EQU	0B7E8H
;
;OFFSET FUER IX-ZELLEN
TACO	EQU	13H	;(IX+TACO)
TATAB	EQU	14H	;(IX+TATAB)  =L
			;(IX+TATAB+1)=H
TAON	EQU	8	;BIT 8,(IX+TAON)
			;CODE VERFUEGBAR
;EINIGE TATENCODES
CLS	EQU	0CH
BREAK	EQU	3
STOP	EQU	13H
BEEP	EQU	7
;
; SYSTEMUNTERPROGRAMME FUER CAOS-RUFE
;
CRT	EQU	0
MBOT	EQU	1	;BLOCKAUSGABE
UOT1	EQU	2	;USEROUT1 #2
UOT2	EQU	3	;       2 #3
KBD	EQU	4	;TATATURABFRAGE
MBIN	EQU	5	;BLOCKEINGABE
UIN1	EQU	6	;USERIN1 #2
UIN2	EQU	7	;      2 #3
ISRO	EQU	8	;INIT BANDOUT
CSRO	EQU	9	;CLOSE	"
ISRI	EQU	0AH	;INIT BANDIN
CSRI	EQU	0BH	;CLOSE  "
KBDS	EQU	0CH	;TASTE OHNE QUIT
BYE	EQU	0DH	;-> WARM
KBDZ	EQU	0EH	;TASTE MIT QUIT.
COLOR	EQU	0FH
LOAD	EQU	10H
VERIF	EQU	11H
LOOP	EQU	12H	;-> CAOS
NORM	EQU	13H	;-> CRT,KBD
WAIT	EQU	14H
LARG	EQU	15H	;LADE ARGUMENTE
INTB	EQU	16H	;KANALEINGABE
INLIN	EQU	17H	;ZEILENEINGABE
RHEX	EQU	18H	;ERFASSEN ZAHL
ERRM	EQU	19H	;FEHLERMELDUNG
HLHX	EQU	1AH	;AUSGABE HL
HLDE	EQU	1BH	;   "    HL DE
AHEX	EQU	1CH	;   "    A
ZSUCH	EQU	1DH	;MENUESUCHE
SUUT	EQU	1EH	;AUSGABE SETZEN
SIN	EQU	1FH	;EINGABE   "
NOUT	EQU	20H	;-> CRT
NIN	EQU	21H	;-> KBD
GARG	EQU	22H	;ERFASSEN ARG.
OSTR	EQU	23H	;AUSGABE STRING
OCHR	EQU	24H	;KANALAUSGABE
CUCP	EQU	25H	;CURSOR KOMPLEM.
MODU	EQU	26H
JUMP	EQU	27H
LDMA	EQU	28H	;LD M,A
LDAM	EQU	29H	;LD A,M
BRKT	EQU	2AH
SPAC	EQU	2BH
CRLF	EQU	2CH
HOME	EQU	2DH
MODI	EQU	2EH
PUDE	EQU	2FH	;PRESET
PUSE	EQU	30H	;PSET
SIXD	EQU	31H	;I,IX ->
DABR	EQU	32H	;CURSOR->VRAMADR
TCIF	EQU	33H	;TEST CURSORPOS.
PADR	EQU	34H	;IRM ADRESSE
TON	EQU	35H
SAVE	EQU	36H
MBIN	EQU	37H	;BYTE->KASSETTE
MBOT	EQU	38H	;KASSETTE->BYTE
KEY	EQU	39H
KEYLI	EQU	3AH
DISP	EQU	3BH
WININ	EQU	3CH	;FENSTERINIT
WINAK	EQU	3DH	;   "   AUFRUF
LINE	EQU	3EH
CIRC	EQU	3FH
SQR	EQU	40H
MUL	EQU	41H	;8*8 BIT
CSTBT	EQU	42H	;COMPL 3,(STBT)
JNIE	EQU	43H	;INIT ONE I/O
JNIM	EQU	44H	;INIT SOME I/O
KOUT	EQU	45H	;OUT STRING (HL)
MENU	EQU	46H	;MENUEAUFBAU
;
;ZUSATZ FUER KC 85/4
;
V24OUT	EQU	47H	;DRUCKERAUSGABE
V24DUP	EQU	48H	;DUPLEXROUTINE
;_______________________________________
;	END
(ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ