/[projet1]/public/oric/games/Dungeon Demo/CUTMAP/SETUP.DBG
Defence Force logotype

Contents of /public/oric/games/Dungeon Demo/CUTMAP/SETUP.DBG

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1376 - (show annotations)
Mon Jul 25 19:48:05 2016 UTC (3 years, 3 months ago) by dbug
File size: 8962 byte(s)
Added the complete (not cleaned up, pure legacy) source code and assets for the 1996 Dungeon Master tech demo.
To get that to actually work, you need (at least):
- A dos machine (or a Windows 95/Windows 98)
- The Wacom compiler
- The old version of the Oric Compiler toolchain (the OSDK ancestor)

1 configfile
2 paint all plain menu white on blue
3 paint all standout menu bright white on blue
4 paint all disabled menu grey on blue
5 paint all active menu bright white on black
6 paint all active standout menu yellow on black
7 paint all frame menu yellow on blue
8 paint all disabled title grey on bright white
9 paint all active frame grey on cyan
10 paint all disabled frame grey on bright white
11 paint all icon bright white on red
12 paint all active disabled menu grey on black
13 paint all plain black on bright white
14 paint all active bright white on black
15 paint all selected bright white on red
16 paint all standout red on bright white
17 paint all button red on bright white
18 paint all active standout bright red on black
19 paint status bright white on blue
20 paint dialog plain white on blue
21 paint dialog frame blue on cyan
22 paint dialog shadow black on blue
23 paint dialog plain button blue on white
24 paint dialog standout button bright white on white
25 paint dialog active button blue on cyan
26 paint dialog active standout button bright white on cyan
27 display all /close
28 display status
29 display file /close 0,0,10000,9996
30 display memory /close 3125,2652,6500,7344
31 display stack /close 8000,4896,2000,5100
32 display globals /close 7000,5304,3000,3672
33 display accelerator /close 0,4692,10000,4692
34 display modules /open 8000,6732,2000,3264
35 display register /open 0,0,10000,816
36 display assembly /open 0,0,6875,9996
37 display watch /open 2500,6528,6375,1632
38 display source /open 0,0,10000,6732
39 display locals /open 0,6732,8000,3264
40 font all {-13 0 0 0 700 0 0 0 0 1 2 1 34 "MS Sans Serif"}
41 font memory {-12 0 0 0 400 0 0 0 0 1 2 1 49 "Fixedsys"}
42 set autosave on
43 set assembly lower outside source hexadecimal
44 set variable partial nocode noinherit nocompiler members private protected
45 set variable partial nocode noinherit nocompiler members private protected
46 set functions all
47 set globals all
48 set modules typed
49 set register hexadecimal normal
50 set fpu decimal
51 set bell on
52 set dclick 300
53 set implicit on
54 set radix 10
55 set recursion on
56 set search /caseignore/norx {^$\.[(|?+*~@}
57 set source {.}
58 set symbol /ignore {*}
59 set symbol /add /ignore {*_}
60 set symbol /add /ignore {_*}
61 set tab 8
62 set macro all : {
63 accelerate main file {
64 Command
65 }
66
67 }
68 set macro all / {
69 accelerate main search {
70 Find
71 }
72
73 }
74 set macro all n {
75 accelerate main search {
76 Next
77 }
78
79 }
80 set macro all N {
81 accelerate main search {
82 Previous
83 }
84
85 }
86 set macro all u {
87 accelerate main undo {
88 undo
89 }
90
91 }
92 set macro all U {
93 accelerate main undo {
94 redo
95 }
96
97 }
98 set macro all j {
99 Window CursorDown
100 }
101 set macro all k {
102 Window CursorUp
103 }
104 set macro all h {
105 Window CursorLeft
106 }
107 set macro all l {
108 Window CursorRight
109 }
110 set macro all . {
111 Window Popup
112 }
113 set macro all = {
114 accel main search {
115 Match
116 }
117
118 }
119 set macro all CTRL-z {
120 accel main window {
121 Zoom
122 }
123
124 }
125 set macro all CTRL-UP {
126 accel main undo {
127 Unwind Stack
128 }
129
130 }
131 set macro all CTRL-DOWN {
132 accel main undo {
133 Rewind Stack
134 }
135
136 }
137 set macro all CTRL-LEFT {
138 print {
139 shift starting address up 1 not implemented
140 }
141
142 }
143 set macro all CTRL-RIGHT {
144 print {
145 shift starting address down 1 not implemented
146 }
147
148 }
149 set macro all CTRL-BACKSPACE {
150 accel main undo {
151 Home
152 }
153
154 }
155 set macro all ALT-F10 {
156 Window Popup
157 }
158 set macro all CTRL-F6 {
159 Window Next
160 }
161 set macro all CTRL-TAB {
162 Window Next
163 }
164 set macro all F1 {
165 help
166 }
167 set macro all F2 {
168 accel main break {
169 toggle
170 }
171
172 }
173 set macro all F3 {
174 accel main code {
175 modules
176 }
177
178 }
179 set macro all F4 {
180 accel main run {
181 Run to Cursor
182 }
183
184 }
185 set macro all F5 {
186 accel main window {
187 Zoom
188 }
189
190 }
191 set macro all F6 {
192 accel main window {
193 Next
194 }
195
196 }
197 set macro all F7 {
198 accel main run {
199 Trace Into
200 }
201
202 }
203 set macro all F8 {
204 accel main run {
205 Step Over
206 }
207
208 }
209 set macro all F9 {
210 accel main run {
211 Go
212 }
213
214 }
215 set macro all ALT-F2 {
216 accel main break {
217 New
218 }
219
220 }
221 set macro all ALT-F3 {
222 Window Close
223 }
224 set macro all ALT-F4 {
225 accel main undo {
226 undo
227 }
228
229 }
230 set macro all ALT-F5 {
231 accel main window {
232 Application
233 }
234
235 }
236 set macro all ALT-F7 {
237 Display Assembly; Trace/Assembly/Into
238 }
239 set macro all ALT-F8 {
240 accel main run {
241 Until Return
242 }
243
244 }
245 set macro all ALT-F9 {
246 accel main run {
247 Execute to
248 }
249
250 }
251 set macro all CTRL-F2 {
252 accel main run {
253 restart
254 }
255
256 }
257 set macro all CTRL-F4 {
258 Print
259 }
260 set macro all CTRL-F5 {
261 print {
262 Window Size HotKey not implemented
263 }
264
265 }
266 set macro all CTRL-F7 {
267 display watch; accel {
268 new
269 }
270
271 }
272 set macro all SHIFT-F1 {
273 print {
274 Help not implemented
275 }
276
277 }
278 set macro all SHIFT-F3 {
279 print {
280 Clip not implemented
281 }
282
283 }
284 set macro all SHIFT-F4 {
285 print {
286 Paste not implemented
287 }
288
289 }
290 set supportroutine {__wcpp_*}{IF@*}{RT@*}{__CHK}{__CHP}{__EDA}{__EDC}{__EDD}
291 set supportroutine {__EDM}{__EDS}{__EPI}{__FDA}{__FDC}{__FDD}{__FDFS}{__FDI4}
292 set supportroutine {__FDM}{__FDN}{__FDS}{__FDU4}{__FSA}{__FSC}{__FSD}{__FSFD}
293 set supportroutine {__FSI4}{__FSM}{__FSN}{__FSS}{__FSU4}{__Far16Cdecl2}
294 set supportroutine {__Far16Func2}{__Far16Pascal2}{__Far16ToFlat}{__FlatToFar16}
295 set supportroutine {__GETDS}{__GRO}{__I4D}{__I4FD}{__I4FS}{__I4M}{__PIA}
296 set supportroutine {__PIS}{__PRO}{__PTC}{__PTS}{__RDFS}{__RDI4}{__RDU4}
297 set supportroutine {__RSI4}{__RSU4}{__SCN1}{__SCN2}{__SCN4}{__STK}{__TNC}
298 set supportroutine {__TNK}{__U4D}{__U4FD}{__U4FS}{__U4M}{__wcpp_*}{IF@*}
299 set supportroutine {RT@*}{__CHK}{__CHP}{__EDA}{__EDC}{__EDD}{__EDM}{__EDS}
300 set supportroutine {__EPI}{__FDA}{__FDC}{__FDD}{__FDFS}{__FDI4}{__FDM}
301 set supportroutine {__FDN}{__FDS}{__FDU4}{__FSA}{__FSC}{__FSD}{__FSFD}
302 set supportroutine {__FSI4}{__FSM}{__FSN}{__FSS}{__FSU4}{__Far16Cdecl2}
303 set supportroutine {__Far16Func2}{__Far16Pascal2}{__Far16ToFlat}{__FlatToFar16}
304 set supportroutine {__GETDS}{__GRO}{__I4D}{__I4FD}{__I4FS}{__I4M}{__PIA}
305 set supportroutine {__PIS}{__PRO}{__PTC}{__PTS}{__RDFS}{__RDI4}{__RDU4}
306 set supportroutine {__RSI4}{__RSU4}{__SCN1}{__SCN2}{__SCN4}{__STK}{__TNC}
307 set supportroutine {__TNK}{__U4D}{__U4FD}{__U4FS}{__U4M}{__U4M}{__U4FS}
308 set supportroutine {__U4FD}{__U4D}{__TNK}{__TNC}{__STK}{__SCN4}{__SCN2}
309 set supportroutine {__SCN1}{__RSU4}{__RSI4}{__RDU4}{__RDI4}{__RDFS}{__PTS}
310 set supportroutine {__PTC}{__PRO}{__PIS}{__PIA}{__I4M}{__I4FS}{__I4FD}
311 set supportroutine {__I4D}{__GRO}{__GETDS}{__FlatToFar16}{__Far16ToFlat}
312 set supportroutine {__Far16Pascal2}{__Far16Func2}{__Far16Cdecl2}{__FSU4}
313 set supportroutine {__FSS}{__FSN}{__FSM}{__FSI4}{__FSFD}{__FSD}{__FSC}
314 set supportroutine {__FSA}{__FDU4}{__FDS}{__FDN}{__FDM}{__FDI4}{__FDFS}
315 set supportroutine {__FDD}{__FDC}{__FDA}{__EPI}{__EDS}{__EDM}{__EDD}{__EDC}
316 set supportroutine {__EDA}{__CHP}{__CHK}{RT@*}{IF@*}{__wcpp_*}{__U4M}{__U4FS}
317 set supportroutine {__U4FD}{__U4D}{__TNK}{__TNC}{__STK}{__SCN4}{__SCN2}
318 set supportroutine {__SCN1}{__RSU4}{__RSI4}{__RDU4}{__RDI4}{__RDFS}{__PTS}
319 set supportroutine {__PTC}{__PRO}{__PIS}{__PIA}{__I4M}{__I4FS}{__I4FD}
320 set supportroutine {__I4D}{__GRO}{__GETDS}{__FlatToFar16}{__Far16ToFlat}
321 set supportroutine {__Far16Pascal2}{__Far16Func2}{__Far16Cdecl2}{__FSU4}
322 set supportroutine {__FSS}{__FSN}{__FSM}{__FSI4}{__FSFD}{__FSD}{__FSC}
323 set supportroutine {__FSA}{__FDU4}{__FDS}{__FDN}{__FDM}{__FDI4}{__FDFS}
324 set supportroutine {__FDD}{__FDC}{__FDA}{__EPI}{__EDS}{__EDM}{__EDD}{__EDC}
325 set supportroutine {__EDA}{__CHP}{__CHK}{RT@*}{IF@*}{__wcpp_*}
326 flip off
327 hook progstart {
328 if _dbg@dbg$loaded && !?_dbg@nogo {
329 if ?@@fmain {
330 if !?@@fwinmain {
331 go/noflip @@fmain
332 }
333 else {
334 go @@fmain
335 }
336 }
337 elseif ?@@main {
338 if !?@@winmain {
339 go/noflip @@main
340 }
341 else {
342 go @@main
343 }
344 }
345 elseif ?@@fwinmain {
346 go/noflip @@fwinmain
347 }
348 elseif ?@@winmain {
349 go/noflip @@winmain
350 }
351 }
352 ;
353 }
354 hook progend {
355
356 }
357 hook dllstart {
358
359 }
360 hook dllend {
361
362 }
363 hook execstart {
364
365 }
366 hook execend {
367
368 }
369 hook sourceinfo {
370 display locals; display source
371 }
372 hook assemblyinfo {
373 display register; display assembly
374 }
375 hook modulechange {
376
377 }
378 hook quit {
379
380 }

  ViewVC Help
Powered by ViewVC 1.1.26