-
Notifications
You must be signed in to change notification settings - Fork 2
/
+Interpreter_Config.s
165 lines (156 loc) · 4.15 KB
/
+Interpreter_Config.s
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
; Données de Configuration Interpréteur
;
; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
EdT Macro
dc.b 0
dc.b .\@E-.\@D
.\@D dc.b "\2"
.\@E
EndM
EdD Macro
dc.b 0
dc.b .\@E-.\@D
.\@D \2
.\@E
EndM
; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
; Zone de données DC
dc.l "PId1" Code de securite!
dc.l Dat2-Dat1
Dat1
; Initialisation de la trappe
; ~~~~~~~~~~~~~~~~~~~~~~~~~~~
PI_ParaTrap dc.l 0 * 0 - Adresse actualisation
PI_AdMouse dc.l 0 * 4 - Adresse souris
dc.w 68 * 8 - Nombre de bobs
dc.w 50 * 10- Position par defaut ecran!!
dc.l 12*1024 * 12- Taille liste copper
dc.l 128 * 16- Nombre lignes sprites
; Taille des buffers
; ~~~~~~~~~~~~~~~~~~
PI_VNmMax dc.l 1024*16 * 20- Buffer des noms de variable
PI_TVDirect dc.w 42*6 * 24- Variables mode direct
PI_DefSize dc.l 1024*320 * 26- Taille buffer par defaut
; Directory
; ~~~~~~~~~
PI_DirSize dc.w 30 * 30-
PI_DirMax dc.w 128 * 32-
; Faire carriage return lors de PRINT?
; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PI_PrtRet dc.b 1 34-
; Faire des icones?
; ~~~~~~~~~~~~~~~~~
PI_Icons dc.b 0 35-
; Autoclose workbench?
; ~~~~~~~~~~~~~~~~~~~~
PI_AutoWB dc.b 0 36- Fermer automatiquement
PI_AllowWB dc.b 1 37- Close Workbench effective?
; Close editor?
; ~~~~~~~~~~~~~~~~~~~~
PI_CloseEd dc.b 1 38- Close editor effective
PI_KillEd dc.b 1 39- Kill editor effective
PI_FsSort dc.b 1 40- Sort files
PI_FsSize dc.b 1 41- Size of files
PI_FsStore dc.b 0 42- Store directories
; Securite flags
; ~~~~~~~~~~~~~~
dc.b 0 43- Flag libre
ds.b 4 44- 4 libres
; Text reader
; ~~~~~~~~~~~
PI_RtSx dc.w 640 48- Taille X ecran Readtext
PI_RtSy dc.w 256 50- Taille Y ecran Readtext
PI_RtWx dc.w 129 52- Position X
PI_RtWy dc.w 50 54- Position Y
PI_RtSpeed dc.w 8 56- Vitesse apparition
; File selector
; ~~~~~~~~~~~~
PI_FsDSx dc.w 448 58- Taille X fsel
PI_FsDSy dc.w 158 60- Taille Y fsel
PI_FsDWx dc.w 129+48 62- Position X
PI_FsDWy dc.w 50+20 64- Position Y
PI_FsDVApp dc.w 8 66- Vitesse app
; Ecran par defaut
; ~~~~~~~~~~~~~~~~
PI_DefETx dc.w 320 68- Tx default
PI_DefETy dc.w 256 70- Ty default
PI_DefECo dc.w 4 72- Nplan default
PI_DefECoN dc.w 16 74- NColor default
PI_DefEMo dc.w 0 76- Mode default
PI_DefEBa dc.w 0 78- Default colour back
PI_DefEPa dc.w $000,$A40,$FFF,$000,$F00,$0F0,$00F,$666
dc.w $555,$333,$733,$373,$773,$337,$737,$377
dc.w 0,0,0,0,0,0,0,0
dc.w 0,0,0,0,0,0,0,0
PI_DefEWx dc.w 0 144- Position par defaut
PI_DefEWy dc.w 0 146-
PI_DefAmigA dc.l $00404161 148- Touche AMIGA-A par defaut
; Zone de securite!
; ~~~~~~~~~~~~~~~~~
ds.l 6
Dat2
; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
; Zone de données TEXTE
dc.l "PIt1" Code de securite!
dc.l Txt2-Txt1
; Liste des fichiers système
; ~~~~~~~~~~~~~~~~~~~~~~~~~~
Txt1 EdT 1,<APSystem/>
EdT 2,<>
EdT 3,<>
EdT 4,<Def_Icon>
EdT 5,<AutoExec.AMOS>
EdT 6,<AMOSPro_Editor>
EdT 7,<AMOSPro_Editor_Config>
EdT 8,<AMOSPro_Default_Resource.Abk>
EdT 9,<AMOSPro_Productivity1:Equates/AMOSPro_System_Equates>
EdT 10,<AMOSPro_Monitor>
EdT 11,<AMOSPro_Monitor_Resource.Abk>
EdT 12,<AMOSPro_Accessories:AMOSPro_Help/AMOSPro_Help>
EdT 13,<AMOSPro_Accessories:AMOSPro_Help/LatestNews>
EdT 14,<AMOSPro.Lib>
EdT 15,<>
; Liste des 26 extensions
; ~~~~~~~~~~~~~~~~~~~~~~~
EdT 16,<AMOSPro_Music.Lib>
EdT 17,<AMOSPro_Compact.Lib>
EdT 18,<AMOSPro_Request.Lib>
EdT 19,<>
EdT 20,<AMOSPro_Compiler.Lib>
EdT 21,<AMOSPro_IOPorts.Lib>
EdT 22,<>
EdT 23,<>
EdT 24,<>
EdT 25,<>
EdT 26,<>
EdT 27,<>
EdT 28,<>
EdT 29,<>
EdT 30,<>
EdT 31,<>
EdT 32,<>
EdT 33,<>
EdT 34,<>
EdT 35,<>
EdT 36,<>
EdT 37,<>
EdT 38,<>
EdT 39,<>
EdT 40,<>
EdT 41,<>
EdT 42,<>
; Ports de communication
; ~~~~~~~~~~~~~~~~~~~~~~
EdT 43,<Par:>
EdT 44,<Aux:>
EdT 45,<>
; Flash curseur
; ~~~~~~~~~~~~~
EdT 46,<(000,2)(440,2)(880,2)(bb0,2)(dd0,2)(ee0,2)(ff2,2)(ff8,2)(ffc,2)(fff,2)(aaf,2)(88c,2)(66a,2)(226,2)(004,2)(001,2)>
; Filtre negatif directory
; ~~~~~~~~~~~~~~~~~~~~~~~~
EdT 47,<>
dc.b 0,$FF
even
Txt2