1 | ****************************************
|
---|
2 | * FAB Monitor v3.1 *
|
---|
3 | ****************************************
|
---|
4 | ** Fichier des définitions d'EQUates. **
|
---|
5 |
|
---|
6 | PCRTAD EQU $5FFC retour indirection
|
---|
7 | SCREEN EQU $4078 mémoire écran
|
---|
8 | MYGETC EQU $5FE9 indirection source
|
---|
9 | FONTS EQU $3300 police caractères
|
---|
10 | GETC EQU $4B55 lecture caractère
|
---|
11 | CODE EQU $0000 début du programme
|
---|
12 | F1F5BF EQU $36B0 mémoires de INPUT
|
---|
13 | FAT EQU $3700 buffer disque FAT
|
---|
14 | CATALG EQU $3800 buffer disque DIR
|
---|
15 | IOZONE EQU $3900 buffer disque DATA
|
---|
16 | MNEMO1 EQU $3A00 commandes simples
|
---|
17 | MNEMO2 EQU $3D7E "" complexes(10)
|
---|
18 | MNEMO3 EQU $3E24 "" complexes(11)
|
---|
19 | LINE EQU $3E44 la ligne courante
|
---|
20 | DIR EQU $3F page directe pour
|
---|
21 | Z EQU 0 pile et variables
|
---|
22 | CMPT EQU Z compteur standard
|
---|
23 | XPOS EQU Z+2 abscisse curseur
|
---|
24 | CLIGNO EQU Z+3 =$FF si curseur ON
|
---|
25 | CURSOR EQU Z+4 position à l'écran
|
---|
26 | WRKCSR EQU Z+6 curseur grande fen
|
---|
27 | BOTTOM EQU Z+8 bas de la fenêtre
|
---|
28 | DMPBYT EQU Z+10 début du DUMP hexa
|
---|
29 | FIRBYT EQU Z+12 débt désassemblage
|
---|
30 | REGIST EQU Z+28+1 15 o:les registres
|
---|
31 |
|
---|
32 | DKOPC EQU Z+29 code opération DSK
|
---|
33 | DKDRV EQU Z+30 face du disk (0/1)
|
---|
34 | DKTRK EQU Z+31 piste
|
---|
35 | DKSEC EQU Z+32 secteur
|
---|
36 | DKBUF EQU Z+33 adresse buffer DSK
|
---|
37 | TRACK EQU Z+35 position tête disk
|
---|
38 | DKTMP EQU Z+36 registre tampon
|
---|
39 |
|
---|
40 | * lecture d'une chaîne:
|
---|
41 | NBDGIT EQU Z+36 nbre max de digits
|
---|
42 | NBDGRL EQU Z+37 nb digits utilisés
|
---|
43 | INPCHK EQU Z+38 &(test CHR valide)
|
---|
44 | INPVAL EQU Z+40 &(calcul Val-Ret)
|
---|
45 | CODCDD EQU Z+42 mode d'affichage*3
|
---|
46 | C3E4 EQU Z+45 registres E7C3/E4
|
---|
47 | * désassemblage et dump:
|
---|
48 | CURBYT EQU Z+128 l'octet à traiter
|
---|
49 | OPCODE EQU Z+130 code instruction
|
---|
50 | ADRMOD EQU Z+132 mode d'adressage
|
---|
51 | * remplissage/copie mémoire:
|
---|
52 | FILBEG EQU Z+128 début de la zone
|
---|
53 | FILEND EQU Z+130 fin zone à remplir
|
---|
54 | COPBEG EQU Z+128 début zone source
|
---|
55 | COPEND EQU Z+130 fin zone source
|
---|
56 | * exécution sous-routine:
|
---|
57 | STKBAK EQU Z+128 sauvegarde la pile
|
---|
58 | SUBADR EQU Z+130 adresse exécution
|
---|
59 | * recherche:
|
---|
60 | SRLEN EQU Z+128 longueur de chaîne
|
---|
61 | * sauvegarde d'une image au format PPM:
|
---|
62 | IMABNK EQU Z+138 bank courante
|
---|
63 | IS4080 EQU Z+139 flag =0 si 40 cols
|
---|
64 | CMPTLH EQU Z+140 compteurs Lrg/Haut
|
---|
65 | HIGADR EQU Z+142 adresse écran lig0
|
---|
66 | * fichiers sur disquette:
|
---|
67 | LSHIFT EQU Z+128 décalage à la lect
|
---|
68 | LASTBK EQU Z+130 flag: dernier bloc
|
---|
69 | LASTSC EQU Z+131 flag: "" secteur
|
---|
70 | BYLASE EQU Z+132 nb octets du der."
|
---|
71 |
|
---|
72 | BEGADR EQU Z+130 adresse début ""
|
---|
73 | EXEADR EQU Z+132 adresse exécution
|
---|
74 | FATPTR EQU Z+134 0-159:bloc cour.+1
|
---|
75 | DIRSEC EQU Z+135 secteur à modifier
|
---|
76 | DIRPTR EQU Z+136 entrée dans CATALG
|
---|
77 | FILETY EQU Z+144 type du fichier
|
---|
78 | DATATY EQU Z+145 type des données
|
---|
79 | FILSIZ EQU Z+146 taille du fichier
|
---|
80 | * affichage du catalogue:
|
---|
81 | VIWTMP EQU Z+128 tampons pour les
|
---|
82 | VWTMP2 EQU Z+130 calculs > 16 bits.
|
---|
83 | FILEN EQU Z+132 Nb blocs utilisés
|
---|
84 |
|
---|
85 |
|
---|
86 |
|
---|
87 | ORG DIR*256+XPOS
|
---|
88 | FDB 0,SCREEN,SCREEN
|
---|
89 | FDB SCREEN+24*320,G,G
|
---|
90 | FCB 9
|
---|
91 | ORG DIR*256+INPCHK
|
---|
92 | FDB CHKHEX,VALHEX
|
---|
93 | ORG F1F5BF
|
---|
94 | FDB 0,0,0,0,0,0,0,0
|
---|
95 | FDB 0,0,0,0,0,0,0,0
|
---|
96 | FDB 0,0,0,0,0,0,0,0
|
---|
97 | FDB 0,0,0,0,0,0,0,0
|
---|
98 | FDB 0,0,0,0,0,0,0,0
|
---|