PASEXDOKASM;----------------------- ; \ ; DOKUMENTATION \ ; zu PASEX.KCC \ ; \ ; ` ml 28.12.1990 \ ;----------------------- PV1 EQU 0F003H DEFW 7F7FH DEFM 'PASINFO' DEFB 1 CALL TITLE CALL PV1 DEFB 23H DEFM 'Das Programm dient ' DEFM 'zur Diskettenarbeit ' ; DEFM 'mit dem KC-PASCAL-Co' DEFM 'mpiler. Es besteht ' ; DEFM 'aus zwei Teilen:' ; DEFW 0A0DH DEFB 0AH DEFM '1. Routine PASEX' DEFW 0A0DH DEFM '2. Dokumentation dazu' DEFW 0A0DH DEFW 0A0AH DEFM 'Die PASEX-Routine is' DEFM 't mit folgenden Be- ' ; DEFM 'fehlen auf Diskette ' DEFM 'abzuspeichern:' DEFW 0A0DH DEFB 0AH DEFM '1. PASEX-Kassettenve' DEFM 'rsion einlesen:' DEFW 0A0DH DEFB 0AH DEFM '%LOAD' DEFW 0A0DH DEFB 0AH DEFM '2. SERVICE-Programm ' DEFM 'von Diskette laden: ' DEFB 0AH DEFM '%FLOAD' DEFW 0A0DH DEFM 'NAME:SERVICE' DEFW 0A0DH DEFB 0AH DEFM '3. PASEX selbststart' DEFM 'end auf Diskette ab-' DEFM 'speichern:' DEFW 0A0DH DEFB 0AH DEFM '%FSAVE BC00 BD35 BC0' DEFM '0' DEFW 0A0DH DEFM 'Name:PASEX' DEFW 0A0DH DEFB 0 CALL TAST CALL TITLE CALL PV1 DEFB 23H DEFM 'PASEX ist vor der Ar' DEFM 'beit mit dem Compi- ' ; DEFM 'ler zu laden. Es erw' DEFM 'eitert das CAOS-Men}' ; DEFM 'um die Worte:' DEFW 0A0DH DEFB 0AH DEFM '%PASTAPE und' DEFW 0A0DH DEFM '%PASDISK' DEFW 0A0DH DEFB 0AH DEFM 'Die Funktion ist {hn' DEFM 'lich der Routinen ' ; DEFM 'BASEX oder DEVEX. Es' DEFM ' werden alle Kasset-' ; DEFM 'tenzugriffe des PASC' DEFM 'AL-Compilers auf ' ; DEFM 'Diskette umgelenkt. ' DEFM 'Das gilt auch f}r ' ; DEFM 'MC-Programme, die mi' DEFM 't dem "T"-Befehl des' ; DEFM 'Compilers erzeugt wu' DEFM 'rden, sofern sie Da-' ; DEFM 'ten ein- bzw. ausgeb' DEFM 'en.' ; DEFW 0A0DH DEFB 0AH DEFM 'Zum Umschalten von K' DEFM 'assette auf Diskette' ; DEFM 'oder umgekehrt ist d' DEFM 'er Compiler zu ver- ' ; DEFM 'lassen und das entsp' DEFM 'rechende Men}wort ' ; DEFM 'aufzurufen. Der Comp' DEFM 'iler kann mit' DEFW 0A0DH DEFM '%PASOLD wieder errei' DEFM 'cht werden, ohne da~' ; DEFM 'Daten verloren gehen' DEFM '.' DEFW 0A0DH DEFB 0AH DEFM 'HINWEIS:' DEFW 0A0DH DEFM 'PASEX darf nur gelad' DEFM 'en werden, wenn kei-' ; DEFM 'ne andere Erweiterun' DEFM 'g auf Diskettenbe- ' ; DEFM 'trieb geschaltet ist !' DEFW 0A0DH DEFB 0 RET TITLE CALL PV1 DEFB 23H DEFB 0CH DEFM ' DOKUMENTATION ' DEFM 'ZU PASEX.KCC ' DEFM ' ==============' DEFM '============' DEFW 0A0DH DEFB 0AH DEFB 0 RET TAST CALL PV1 DEFB 23H DEFW 0A0DH DEFM ' TASTE !' DEFB 0 CALL PV1 DEFB 4 RET  À@Àt(Àp6ÀnTop of Text: End of Text: Start of MC: ASM-Offset : õÛˆö$ÓˆñÉ TASTE !' DEFB 0 CALL PV1 DEFB 4 RET  À@Àt(Àp6ÀnTop of Text: End of Text: Start of MC: ASM-Offset : õÛˆö$ÓˆñÉ