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 (ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ