source: thomson/code/3rdparty/sources5-hmel/TO-GRAPH/GRAPH-EQ.ASM@ ceffc47

main
Last change on this file since ceffc47 was ceffc47, checked in by Adrien Destugues <pulkomandy@…>, 10 years ago

Add that collection of 3rdparty source I had lying on my disk for some time...

git-svn-id: svn://localhost/thomson@51 85ae3b6b-dc8f-4344-a89d-598714f2e4e5

  • Property mode set to 100644
File size: 8.5 KB
Line 
1 TITLE TO-GRAPH: Equates
2* ------------------------------
3 PAGE
4
5****************************************
6* *
7* TO-GRAPH *
8* *
9* Equates *
10* *
11****************************************
12
13
14* Definition des points d'entree dans
15* le moniteur TO9
16*-------------------------------------
17
18STATUS EQU $6019 état machine
19RANG EQU $601B rangee courante
20COLN EQU $6020 colonne courante
21TIMEPT EQU $6027 vecteur IT timer
22RSOPC EQU $602B
23USERAF EQU $602D pt car. user
24ATRANG EQU $6039 attrib. courants
25ATRSCR EQU $603A ... écran
26COLOUR EQU $603B couleur cour.
27TELETL EQU $603C mode page
28CHDRAW EQU $6041 tracé point ou car
29MAXBK EQU $6047 dernier bank libre
30DKDRV EQU $6049 drive courant
31DKNUM EQU $604D entrelacement
32SCRMOD EQU $605F mode écran
33BUFCLV EQU $6079 pt buffer clavier
34SIZCLV EQU $607B lg buffer clavier
35IDSAUT EQU $6082 buffer clav. std.
36PTGENE EQU $60CF géné. car.
37
38VALTYP EQU $6105 calculs
39FACMO EQU $6150
40FACLO EQU $6151
41ARGMO EQU $615B
42ARGLO EQU $615C
43DEBZON EQU $616B
44FINZON EQU $616E
45EOFFLG EQU $6178
46NAMSEC EQU $618E
47NAMSLT EQU $618F
48CARCOU EQU $6196
49SECBUF EQU $6197
50FATPTR EQU $6199
51COULGR EQU $619F couleur graphique
52TRATYP EQU $61A0 type tracé
53XXXXXX EQU $61A1 curseur graphique
54YYYYYY EQU $61A3 .
55XL EQU $61A5 marges graphiques
56YB EQU $61A7
57XR EQU $61A9
58YT EQU $61AB
59X0COD EQU $61D6
60Y0COD EQU $61D7
61X1COD EQU $61D8
62Y1COD EQU $61D9
63PASSCD EQU $61DB
64LSTBYT EQU $61DC
65FILFLG EQU $61EF flag remplissage
66AXEH EQU $61F1 rayons ellipses
67AXEV EQU $61F0
68CAMFLG EQU $61F2
69
70PUTFLG EQU $6249 mode cod/decod ima
71FILMOD EQU $624B
72FILTYP EQU $624C
73ASCFLG EQU $624D
74FILNAM EQU $624F nom fichier
75OPTBUF EQU $625A
76MACP EQU $627D pt motif rempliss.
77WITH EQU $6288 type tracé
78
79BANKC EQU $E7E5 gate commut bank
80
81PUTC EQU $E803 edition ecran
82INITC EQU $E800 init ecran
83GETC EQU $E806 lecture clavier
84KTST EQU $E809 test clavier
85RSCO EQU $E812 e/s
86GETL EQU $E818 lect souris
87LPIN EQU $E81B lect touche souris
88GETP EQU $E821 lect point graphi.
89GETS EQU $E824 lect écran
90MENU EQU $E82D retour TO9
91KBIN EQU $E830 clig. curs. IT
92SETP EQU $EC00 definition couleur
93EXTRA EQU $EC0C extra. moniteur
94RESETC EQU 0 .
95RESETW EQU 1 .
96FCBINI EQU 2 .
97OPEN EQU 3 .
98PRINT EQU 4 .
99INPUT EQU 5 .
100CLOSE EQU 6 .
101DIR0 EQU 8 .
102ERRMSG EQU 20 .
103CIRCLE EQU 24 .
104PSETXY EQU 25 .
105LINE EQU 26 .
106BOX EQU 27 .
107CHOIX EQU 28 .
108PAINT EQU 29 .
109MIG EQU 30 .
110SHOW EQU 33 .
111MOVE EQU 38 .
112INITOR EQU 39 .
113CMPTOR EQU 40 .
114SGN EQU 41 .
115SQR EQU 44 .
116FRCTYP EQU 50 .
117SUBGO EQU 55 .
118MULTGO EQU 56 .
119DIVGO EQU 57 .
120MOVFM EQU 62 .
121MOVMF EQU 63 .
122MOVAF EQU 64 .
123EXTFIN EQU 65 .
124CODE EQU 69 .
125
126SQI EQU $10 accès fichier
127SQO EQU $20
128
129
130* Equates caractères
131*---------------------------------------
132
133BS EQU $08 codes ASCII ctrl
134HT EQU $09
135LF EQU $0A
136VT EQU $0B
137FF EQU $0C
138RC EQU $0D
139SS2 EQU $16
140CAN EQU $18
141ESC EQU $1B
142INS EQU $1C
143EFF EQU $1D
144RS EQU $1E
145US EQU $1F
146SP EQU $20
147GRAVE EQU $41
148AIGU EQU $42
149CIRCON EQU $43
150DEL EQU $7F
151
152* Equates des outils
153*---------------------------------------
154
155POINTS EQU 0
156LIGNES EQU 1
157RECTAN EQU 2
158CARRE EQU 3
159ELLIPS EQU 4
160CERCLE EQU 5
161CARACT EQU 6
162PEINTU EQU 7
163GOMME EQU 8
164LOUPE EQU 9
165COUCOP EQU 10
166COLLER EQU 11
167
168* Etats des outils
169*---------------------------------------
170
171POINTE EQU 0
172TIRE EQU 1
173
174* Tailles caractère
175*---------------------------------------
176
177TCN EQU $4C
178TCDH EQU $4D
179TCDL EQU $4E
180TCDT EQU $4F
181
182* Définition des bank RAM utilisées
183*---------------------------------------
184
185BKTIR EQU 2 RAM
186PBKPIL EQU 3 Pile fenêtre
187DBKPIL EQU 6
188BKMANO EQU 6 Zone manoeuvre
189PBKTRA EQU 7 Feuille travail
190DBKTRA EQU 12
191PBKALB EQU 13 Albums
192
193* Définition des caractères utilisateurs
194*---------------------------------------
195
196* Nb de $80 à $AF ... icones outils !!!
197* Nb de $B0 à $BB ... icones taille trai
198MOTRAZ EQU $BC icone raz
199MOTRET EQU $BD icone retour
200MOTSUI EQU $BE suite
201CSCRG0 EQU $BF icones scroll
202CSCRG1 EQU $C0
203CSCRG2 EQU $C1
204CSCRD0 EQU $C2
205CSCRD1 EQU $C3
206CSCRD2 EQU $C4
207CSCRH0 EQU $C5
208CSCRH1 EQU $C6
209CSCRH2 EQU $C7
210CSCRB0 EQU $C8
211CSCRB1 EQU $C9
212CSCRB2 EQU $CA
213
214* Déplacements sur RAM
215*---------------------------------------
216
217 ORG $6800
218
219PILE EQU *-1 pile soft
220
221ZONFEN RMB 1080 zone fenêtrage
222
223OUTIL RMB 1 outil courant
224
225MAXALB RMB 1 max. albums
226NBALB RMB 1 nb album courant
227TABALB RMB 16*(8+1)
228* 16 postes max
229* 8 car: nom
230* 1 car: bank
231
232ETAOUT RMB 1 état outil
233
234X0TIRE RMB 2 coordo. dessins
235Y0TIRE RMB 2 provisoires
236X1TIRE RMB 2
237Y1TIRE RMB 2
238
239REGCC RMB 1 pile (/U) des
240REGA RMB 1 param FEN
241REGB RMB 1
242REGX RMB 2
243REGY RMB 2
244PILFEN EQU *
245
246CARMOT RMB 8 motif courant
247MOTIF EQU *
248
249TXTMOT RMB 8 motif ASCII
250
251 RMB 8 motif plein
252PLEIN EQU *
253
254TCAR RMB 1 taille caractère
255
256TLIGN RMB 1 taille ligne
257
258FLGSS2 RMB 1 drapeau SS2
259
260FLGLOU RMB 1 drapeau loupe
261RNGLOU RMB 1 fenêtre loupe
262COLLOU RMB 1 ...
263
264STDTOR RMB 1 drapeau tortue std
265
266CADRNG RMB 1 zone cadréee dans
267CADCOL RMB 1 la fenêtre par
268CADHAU RMB 1 SPCADR
269CADLAR RMB 1 CADCOL=0..59!
270
271COEFMU RMB 4 réel coef écr/impr
272MEMREL RMB 4 réel manoeuvre
273
274DESCOU RMB 8 fichier courant
275
276* Chien de garde (peinture)
277*---------------------------------------
278
279BKDOG RMB 1
280ADRDOG RMB 2
281STKDOG RMB 2
282DPDOG RMB 1
283FLGDOG RMB 1
284XDOG RMB FDOG-DDOG
285
286* Page 0 en accès rapide:
287* - Tiroir
288* - Echanges écran <-> feuille
289*---------------------------------------
290
291 ORG $6F00
292MANTIR EQU *
293FLGTIR RMB 1 signale un tiroir
294* dans $A000...
295XT0 RMB 2 cordonnées points
296YT0 RMB 2 début
297XT1 RMB 2 cordonnées points
298YT1 RMB 2 fin
299CPTLT RMB 1 compteurs
300CPTCT RMB 1
301HPTTIR RMB 1 hauteur en points
302LPTTIR RMB 2 largeur ...
303LARTIR RMB 1 largeur en segment
304DECTIR RMB 1 décalage bit
305COLT0 RMB 1 col. car. gauche
306COLT1 RMB 1 col. car. droite
307ADPRSG RMB 2 adresse 1er seg.
308* dans chaque page
309ADPRSL RMB 2 adresse 1er seg.
310* ligne courante
311PRE7C3 RMB 1 page 1er segment
312NBSEG1 RMB 1 nb seg. 1ère page
313NBSEG2 RMB 1 nb seg. 2ème page
314DECSEG RMB 1 décalage visu
315DECLIG RMB 1
316LARTV RMB 1 taille visu
317HAUTV RMB 1
318ADF RMB 2 adr. début feuille
319* pour les 2 pages
320* 0..48959 (3 banks)
321ADPRRL RMB 2 adr. deb. ligne
322RGDECR RMB 1 rangée début écran
323* 0..101 (8 pts)
324CLDECR RMB 1 colonne ...
325* 0..59 (16 pts)
326
327* Variables de gestion "copier" sur
328* album
329*---------------------------------------
330
331COPALB RMB 1 flag FF=>en cours
332COPAOU RMB 1 mémo outil
333ALBCOU RMB 2 pt album courant
334
335
336* Tortue de pointage en mode caractère
337*---------------------------------------
338
339FLGTXT RMB 1 flag mode texte
340CLITXT RMB 1 flag clign tortue
341TORTXT RMB 100 descrip. tortue
342* pour mode texte
343TXTX EQU TORTXT+6 abscisse tortue
344TXTY EQU TORTXT+9 ordonne tortue
345TFORME EQU TORTXT+16 forme
346
347* Tiroir ou zone manoeuvre (codage/
348* décodage,remplissage,copie fichier)
349* utilise tout le bank RAM
350*---------------------------------------
351
352ZONTRA EQU $A000
353LGZTRA EQU $E000-ZONTRA
354FINTRA EQU $DFFF
Note: See TracBrowser for help on using the repository browser.