code_source_de_menu.to7_v3.2
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
code_source_de_menu.to7_v3.2 [2023/05/27 14:18] – fool-duplex | code_source_de_menu.to7_v3.2 [2023/05/27 15:19] (current) – fool-duplex | ||
---|---|---|---|
Line 3: | Line 3: | ||
< | < | ||
- | RESET EQU $FFFE | ||
BEGRAM EQU $6100 | BEGRAM EQU $6100 | ||
ENDRAM EQU $E000 | ENDRAM EQU $E000 | ||
Line 13: | Line 12: | ||
RELACH EQU $E02B | RELACH EQU $E02B | ||
RESEAU EQU $E025 | RESEAU EQU $E025 | ||
- | M5VCT EQU $EFFE | ||
ADCNTC EQU $5FFE | ADCNTC EQU $5FFE | ||
ADCRDU EQU $5FF4 | ADCRDU EQU $5FF4 | ||
ADTRCR EQU $5FFA | ADTRCR EQU $5FFA | ||
- | TEMPO EQU $2039 | + | TEMPO EQU $6031 |
- | DUREE EQU $203B | + | DUREE EQU $6033 |
- | TIMBRE EQU $203D | + | TIMBRE EQU $6035 |
- | OCTAVE EQU $203E | + | OCTAVE EQU $6036 |
- | KTSTH EQU $0A | + | KTSTH EQU $E806 |
- | JPUTCH | + | PUTCH |
- | JNOTEH | + | NOTEH |
SIZITM EQU 44 | SIZITM EQU 44 | ||
Line 400: | Line 398: | ||
SCRUT EQU * | SCRUT EQU * | ||
- | | + | |
| | ||
| | ||
Line 406: | Line 404: | ||
FLAGK FCB $00 | FLAGK FCB $00 | ||
- | NEG < | + | * Caractere dans B (a-z) change en majuscule |
- | ??? | + | UPCASE EQU * |
- | | + | CMPB |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | ENDUP EQU * |
- | | + | |
- | | + | |
- | | + | * Routine d' |
- | | + | PUTC |
- | | + | JMP |
- | | + | |
- | | + | * Affiche ALINEA espaces |
- | | + | ALIGN EQU * |
- | | + | PSHS |
- | | + | |
- | | + | |
- | | + | |
- | | + | ALOOP EQU * |
- | | + | LDB #SPACE |
- | | + | |
- | | + | |
- | | + | |
- | | + | ENDAL EQU * |
- | | + | |
- | | + | |
- | | + | * Affiche un message termine par $00 pointe par X |
- | | + | PMSG |
- | | + | LDB ,X+ |
- | | + | |
- | | + | |
- | | + | PCAR |
- | | + | JSR |
- | | + | |
- | | + | |
- | | + | * Retour a la ligne |
- | | + | CRLF |
- | | + | PSHS |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | * Passe la video en page forme |
- | | + | FORM |
- | | + | PSHS |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | * Routine de traitement code reseau inconnu |
- | | + | INCON EQU * |
- | | + | |
- | | + | |
- | | + | * Joue un pouet |
- | | + | BEEP |
- | | + | PSHS |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | PLAY |
- | | + | JMP |
- | CLR ,X | + | |
- | | + | * Convertit un nombre 16 bits non signe en hexadecimal |
- | | + | * D = nombre, X = pointeur sur buffer caractere |
- | | + | CV16 |
- | | + | PSHS |
- | | + | |
- | | + | |
- | | + | |
- | ??? | + | * Convertit un nombre 16 bits non signe en decimal |
- | BEQ $956A | + | * D = nombre, X = pointeur sur buffer caractere |
- | COM < | + | CV10 |
- | NEG < | + | PSHS |
- | NEG < | + | |
- | NEG < | + | |
- | LSR <$10 | + | CONVRT EQU * |
- | NEG <$01 | + | PSHS |
- | NEG <$00 | + | |
- | ??? | + | |
- | NEG <$4F | + | |
- | | + | |
- | | + | LOOP2 EQU * |
- | | + | BSR |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
- | | + | LDB #' |
- | | + | |
- | | + | |
- | | + | |
- | | + | CONTDV EQU * |
- | | + | BSR |
- | | + | |
- | | + | BEGNB EQU * |
- | | + | |
- | | + | |
- | | + | |
- | | + | |
+ | | ||
+ | | ||
+ | |||
+ | NOTHEX EQU * | ||
+ | STB ,X+ ; Stocke le caractere | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | CVEXIT EQU * | ||
+ | PULS | ||
+ | |||
+ | * Division de D par ,U | ||
+ | * D = reste, ,X = dividende (0..9 ou 0..F) | ||
+ | DIVIZ EQU * | ||
+ | CLR ,X | ||
+ | |||
+ | DVLOOP EQU * | ||
+ | SUBD , | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | DVEXIT EQU * | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | BASE10 EQU * | ||
+ | FCB 5 ; 5 chiffres | ||
+ | FDB &10000 | ||
+ | FDB &1000 | ||
+ | FDB &100 | ||
+ | FDB &10 | ||
+ | FDB &1 | ||
+ | |||
+ | BASE16 EQU * | ||
+ | | ||
+ | | ||
+ | FDB $0100 | ||
+ | FDB $0010 | ||
+ | FDB $0001 | ||
+ | |||
+ | * Affiche no. poste contenu dans B | ||
+ | DISPO EQU * | ||
+ | | ||
+ | BSR | ||
+ | | ||
+ | | ||
+ | |||
+ | * Affiche un nombre contenu dans D (inutilise) | ||
+ | DISP10 EQU * | ||
+ | BSR | ||
+ | | ||
+ | | ||
+ | |||
+ | * Affiche un nombre contenu dans D (inutilise) | ||
+ | DSP10B EQU * | ||
+ | BSR | ||
+ | | ||
+ | | ||
+ | |||
+ | * Convertit un nombre 16 bits non signe en chaîne de caracteres (decimal) | ||
+ | * D = nombre, resultat dans STRBUF | ||
+ | CONV10 EQU * | ||
+ | LEAX STRBUF,PCR | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | * Affiche un nombre en hexadecimal 16 bits (inutilise) | ||
+ | DISP16 EQU * | ||
+ | LEAX STRBUF,PCR | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | | ||
+ | |||
+ | STRBUF EQU * | ||
+ | | ||
+ | |||
+ | MAXLEN FCB $00 ; Longueur du plus grand titre | ||
+ | ALINEA FCB $00 ; Alignement a gauche | ||
+ | |||
+ | MSG1 | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | MSG1B FCB $11 | ||
+ | | ||
+ | | ||
+ | |||
+ | MSG2 | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | MSG3 | ||
+ | | ||
+ | | ||
- | ... | + | * Zone de consigne reseau |
+ | CONSIG FCB $18 ; Longueur = 24 | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | FILE | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | * Zone de compte-rendu reseau | ||
+ | CPTRD FCB $08 ; Longueur = 8 | ||
+ | | ||
ENDPRG EQU * | ENDPRG EQU * |
code_source_de_menu.to7_v3.2.1685189905.txt.gz · Last modified: 2023/05/27 14:18 by fool-duplex