home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BMUG PD-ROM 1995 Fall
/
PD-ROM F95.toast
/
Programming
/
Programming Languages
/
PC Basic ƒ
/
PCBASIC Stand alone version
/
PCBASIC Demo
/
PCBASICDemoR.lst
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
File List
|
1992-02-22
|
90.1 KB
|
2,824 lines
|
[
TEXT/ttxt
]
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 1
1: ;
2: ; Resource File For PCDemo
3: ; McAssembly ( or direct compile) format
4: ;
5: ; The PCBASIC Manual, $50, describes the
6: ; McAssembly Resource format
7: ;
8: ; order from:
9: ;
10: ; Pterodactyl Software
11: ; c/o Harland Harrison
12: ; 200 Davey Glen Rd #416
13: ; Belmont CA 94002
14: ; (415) 591-5270
15: ;
16: ; some equates we'll need:
17: ;
18:00000012 chk equ $12 ;ascii for check mark character
19:0000FFFF visible equ $FFFF ;TRUE boolean
20:00000000 invisible equ 0 ;FALSE boolean
21:00000000 nogoaway equ 0 ;FALSE boolean
22:0000FFFF goaway equ $FFFF ;TRUE boolean
23:00000004 button equ 4 ;DITL BUTTON
24:00000005 chkbox equ 5 ;DITL CHECK BOX
25:00000006 radio equ 6 ;DITL RADIO BUTTON
26:00000088 stattext equ 8+128 ;DITL STATIC TEXT (DISABLED)
27:00000090 editxtds equ 16+128 ;EDIT TEXT DISABLED
28:00000020 iconitem equ 32 ICON in dialog box
29: ;
30: ; Signature of program
31: ;
32:00000000 [[ DEMO,0
33:00000000 2A504342 TEXT #"PCBASIC Demo Version 2.0 January 3, 1992"
34:0000002B ]]
35:
36: ; Apple menu
37:
38:0000002B $$ MENU,1,4 Menu ID 1
39:0000002B 00010000 0,0,0 Placeholders
0000002F 00000000
00000033 0000
40:00000035 FFFFFFFB $FFFFFFFB enable mask - item 2 disabled
41:00000039 0114 "/$14" menu title = apple char
42:0000003B 2 two items in this menu
43: ; item 1:
44:0000003B 1541626F About PCBASIC Demo... the menu item
0000003F 75742050
00000043 43424153
00000047 49432044
0000004B 656D6F2E
0000004F 2E2E
45:00000051 0000 0,0 no icon, no keybd equivalent
46:00000053 0000 0,0 no marking char, text style = plain
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 2
47: ; item 2:
48:00000055 142D2D2D -------------------- the menu item
00000059 2D2D2D2D
0000005D 2D2D2D2D
00000061 2D2D2D2D
00000065 2D2D2D2D
00000069 2D
49:0000006A 00000000 0,0,0,0 no icon, no keybd, no mark, plain text
0000006E 00
50:
51: ;
52: ; Files menu
53: ;
54:
55:0000006F $$ MENU,302,4 Menu ID 302
56:0000006F 012E0000 0,0,0 Placeholders
00000073 00000000
00000077 0000
57:00000079 FFFFFFFF $FFFFFFFF enable mask - none disabled
58:0000007D 054F7264 Order menu title
00000081 6572
59:00000083 3 three items in this menu
60: ; item 1:
61:00000083 0D53656E "Send A Manual" the menu item
00000087 64204120
0000008B 4D616E75
0000008F 616C
62:00000091 0100 1,0 icon 257, no keybd equivalent
63:00000093 0000 0,0 no marking char, text style = plain
64: ; item 2:
65:00000095 0E53656E "Send Shareware" the menu item
00000099 64205368
0000009D 61726577
000000A1 617265
66:000000A4 0000 0,0 no icon, no keybd equivalent
67:000000A6 0000 0,0 no marking char, text style = plain
68: ; item 3:
69:000000A8 04517569 "Quit"
000000AC 74
70:000000AD 0000 0,0 no icon, no keybd equivalent
71:000000AF 000000 0,0 no marking char, text style = plain
72: ; item 4:
73:
74:
75: ; Edit menu
76:
77:000000B2 $$ MENU,301,4 Menu ID 301
78:000000B2 012D0000 0,0,0 Placeholders
000000B6 00000000
000000BA 0000
79:000000BC FFFFFFFB $FFFFFFFB enable mask - 2nd disabled
80:000000C0 04456469 Edit menu title
000000C4 74
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 3
81:000000C5 6 six items in this menu
82: ; item 1:
83:000000C5 04556E64 "Undo" the menu item
000000C9 6F
84:000000CA 00000000 0,0,0,0 no icon, no keybd equivalent no marking char, text style = plain
85: ; item 2:
86:000000CE 0A2D2D2D "----------" the menu item
000000D2 2D2D2D2D
000000D6 2D2D2D
87:000000D9 00000000 0,0,0,0 no icon, no keybd, no mark, plain text
88: ; item 3:
89:000000DD 03437574 "Cut"
90:000000E1 00580000 0,'X',0,0 no icon, cmd X, no mark, plain text
91: ; item 4:
92:000000E5 04436F70 "Copy" the menu item
000000E9 79
93:000000EA 00430000 0,'C',0,0 no icon, cmd C, no mark, plain text
94: ; item 5:
95:000000EE 05506173 "Paste" the menu item
000000F2 7465
96:000000F4 00560000 0,'V',0,0 no icon, cmd V, no mark, plain text
97: ; item 6:
98:000000F8 05436C65 "Clear" the menu item
000000FC 6172
99:000000FE 00000000 0,0,0,0 no icon, no keybd, no mark, plain text
00000102 00
100:
101:
102: ; Help menu
103:
104:00000103 $$ MENU,303,4 Menu ID 303
105:00000103 012F0000 0,0,0 Placeholders
00000107 00000000
0000010B 0000
106:0000010D FFFFFFFF $FFFFFFFF enable mask - none disabled
107:00000111 0448656C "Help" menu title
00000115 70
108:00000116 4 four items in this menu
109: ; item 1:
110:00000116 0E557369 "Using the Demo" the menu item
0000011A 6E672074
0000011E 68652044
00000122 656D6F
111:00000125 0048 0,'H' no icon, keybd equivalent is H
112:00000127 0000 0,0 no marking char, text style = plain
113: ; item 2:
114:00000129 1148656C "Help with program" the menu item
0000012D 70207769
00000131 74682070
00000135 726F6772
00000139 616D
115:0000013B 0000 0,0 no icon, no keybd equivalent
116:0000013D 0000 0,0 no marking char, text style = plain
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 4
117: ; item 3:
118:0000013F 0C486F77 "How to order"
00000143 20746F20
00000147 6F726465
0000014B 72
119:0000014C 0000 0,0 no icon, no keybd equivalent
120:0000014E 0000 0,0 no marking char, text style = plain
121: ; item 4:
122:00000150 1448656C "Help with help boxes"
00000154 70207769
00000158 74682068
0000015C 656C7020
00000160 626F7865
00000164 73
123:00000165 0000 0,0 no icon, no keybd equivalent
124:00000167 000000 0,0 no marking char, text style = plain
125:
126: ; Features function menu
127:
128:0000016A $$ MENU,304,4 Menu ID 304
129:0000016A 01300000 0,0,0 Placeholders
0000016E 00000000
00000172 0000
130:00000174 FFFFFFFF $FFFFFFFF enable mask - none disabled
131:00000178 08466561 "Features" menu title
0000017C 74757265
00000180 73
132:00000181 7 seven items in this menu
133: ; item 1:
134:00000181 0D496E74 "International" the menu item
00000185 65726E61
00000189 74696F6E
0000018D 616C
135:0000018F 0000 0,0 no icon, no keybd equivalent
136:00000191 0000 0,0 no marking char, text style = plain
137: ; item 2:
138:00000193 0E49424D "IBM Compatible" the menu item
00000197 20436F6D
0000019B 70617469
0000019F 626C65
139:000001A2 0000 0,0 no icon, no keybd equivalent
140:000001A4 0000 0,0 no marking char, text style = plain
141: ; item 3:
142:000001A6 174D656E "Menus and Function Keys"
000001AA 75732061
000001AE 6E642046
000001B2 756E6374
000001B6 696F6E20
000001BA 4B657973
143:000001BE 0000 0,0 no icon, no keybd equivalent
144:000001C0 0000 0,0 no marking char, text style = plain
145: ; item 4:
146:000001C2 16446961 "Dialog and Alert Boxes"
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 5
000001C6 6C6F6720
000001CA 616E6420
000001CE 416C6572
000001D2 7420426F
000001D6 786573
147:000001D9 0000 0,0 no icon, no keybd equivalent
148:000001DB 0000 0,0 no marking char, text style = plain
149: ; item 5:
150:000001DD 114D6F75 "Mouse and Editing"
000001E1 73652061
000001E5 6E642045
000001E9 64697469
000001ED 6E67
151:000001EF 0000 0,0 no icon, no keybd equivalent
152:000001F1 0000 0,0 no marking char, text style = plain
153: ; item 6:
154:000001F3 174C6172 "Large Programs and Data"
000001F7 67652050
000001FB 726F6772
000001FF 616D7320
00000203 616E6420
00000207 44617461
155:0000020B 0000 0,0 no icon, no keybd equivalent
156:0000020D 0000 0,0 no marking char, text style = plain
157: ; item 7:
158:0000020F 13496E64 "Industrial Strength"
00000213 75737472
00000217 69616C20
0000021B 53747265
0000021F 6E677468
159:00000223 0000 0,0 no icon, no keybd equivalent
160:00000225 000000 0,0 no marking char, text style = plain
161:
162:
163:
164: ; Help Dialog List
165:
166:00000228 $$ DITL,303,32 Dialog item list, ID = 303, ATTR=(32)
167:00000228 0007 8 8 items in list
168:
169: ; item 1:
170:0000022A 00000000 0 handle holder
171:0000022E 000A0019 10,25,30,455 display rectangle
00000232 001E01C7
172:00000236 88 StatText item type
173:00000237 1F537562 "Subject for Help Menu item text" ;the item
0000023B 6A656374
0000023F 20666F72
00000243 2048656C
00000247 70204D65
0000024B 6E752069
0000024F 74656D20
00000253 74657874
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 6
00000257 00
174:
175: ; item 2:
176:00000258 00000000 0 handle holder
177:0000025C 00280019 40,25,60,455 display rectangle
00000260 003C01C7
178:00000264 88 StatText item type
179:00000265 025E30 "^0" the item
180:
181: ; item 3:
182:00000268 00000000 0 handle holder
183:0000026C 003C0019 60,25,80,455 display rectangle
00000270 005001C7
184:00000274 88 StatText item type
185:00000275 025E31 "^1" the item
186:
187: ; item 4:
188:00000278 00000000 0 handle holder
189:0000027C 00500019 80,25,100,455 display rectangle
00000280 006401C7
190:00000284 88 StatText item type
191:00000285 025E32 "^2" the item
192:
193: ; item 5:
194:00000288 00000000 0 handle holder
195:0000028C 00640019 100,25,120,455 display rectangle
00000290 007801C7
196:00000294 88 StatText item type
197:00000295 025E33 "^3" the item
198:
199: ; QUIT must be Item 6 or less
200: ; item 6:
201:00000298 00000000 0 handle holder
202:0000029C 008C0168 140,360,157,410 display rectangle
000002A0 009D019A
203:000002A4 04 button item type
204:000002A5 04515549 "QUIT" the item
000002A9 54
205:
206: ; NEXT must always be Item 7
207: ; item 7:
208:000002AA 00000000 0 handle holder
209:000002AE 008C00D7 140,215,157,265 display rectangle
000002B2 009D0109
210:000002B6 04 button item type
211:000002B7 044E4558 "NEXT" the item
000002BB 54
212:
213: ; BACK must always be Item 8
214: ; item 8:
215:000002BC 00000000 0 handle holder
216:000002C0 008C0046 140,70,157,120 display rectangle
000002C4 009D0078
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 7
217:000002C8 04 button item type
218:000002C9 04424143 "BACK" the item
000002CD 4B
219:
220: ; Order Dialog List
221:
222:000002CE $$ DITL,501,32 Dialog item list, ID = 501, ATTR=(32)
223:000002CE 0012 19 19 items in list
224:
225: ; item 1:
226:000002D0 00000000 0 handle holder
227:000002D4 001400AF 20,175,40,455 display rectangle
000002D8 002801C7
228:000002DC 88 StatText item type
229:000002DD 1F504342 "PCBASIC by Pterodactyl Software" ;the item
000002E1 41534943
000002E5 20627920
000002E9 50746572
000002ED 6F646163
000002F1 74796C20
000002F5 536F6674
000002F9 77617265
000002FD 00
230:
231: ; item 2:
232:000002FE 00000000 0 handle holder
233:00000302 003C007D 60,125,80,455 display rectangle
00000306 005001C7
234:0000030A 90 editxtds item type
235:0000030B 012000 " "
236:
237: ; item 3:
238:0000030E 00000000 0 handle holder
239:00000312 0055007D 85,125,105,455 display rectangle
00000316 006901C7
240:0000031A 90 editxtds item type
241:0000031B 012000 " "
242:
243: ; item 4:
244:0000031E 00000000 0 handle holder
245:00000322 006E007D 110,125,130,455 display rectangle
00000326 008201C7
246:0000032A 90 editxtds item type
247:0000032B 012000 " "
248:
249: ; item 5:
250:0000032E 00000000 0 handle holder
251:00000332 0087007D 135,125,155,455 display rectangle
00000336 009B01C7
252:0000033A 90 editxtds item type
253:0000033B 012000 " "
254:
255: ; item 6:
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 8
256:0000033E 00000000 0 handle holder
257:00000342 00A0007D 160,125,180,275 display rectangle
00000346 00B40113
258:0000034A 90 editxtds item type
259:0000034B 012000 " "
260:
261: ; item 7:
262:0000034E 00000000 0 handle holder
263:00000352 00BE0019 190,25,210,200 display rectangle
00000356 00D200C8
264:0000035A 05 chkbox item type
265:0000035B 0B537461 "Stand Alone" the item
0000035F 6E642041
00000363 6C6F6E65
00000367 00
266:
267: ; item 8:
268:00000368 00000000 0 handle holder
269:0000036C 00D20019 210,25,230,200 display rectangle
00000370 00E600C8
270:00000374 05 chkbox item type
271:00000375 034D5057 "MPW" the item
00000379 00
272:
273: ; item 9:
274:0000037A 00000000 0 handle holder
275:0000037E 00BE00C8 190,200,210,450 display rectangle
00000382 00D201C2
276:00000386 06 radio item type
277:00000387 1753656E "Send me a Manual ($50) " the item
0000038B 64206D65
0000038F 2061204D
00000393 616E7561
00000397 6C202824
0000039B 35302920
0000039F 00
278:
279: ; item 10:
280:000003A0 00000000 0 handle holder
281:000003A4 00D200C8 210,200,230,450 display rectangle
000003A8 00E601C2
282:000003AC 06 radio item type
283:000003AD 1B53656E "Send me a trial disk (free)" the item
000003B1 64206D65
000003B5 20612074
000003B9 7269616C
000003BD 20646973
000003C1 6B202866
000003C5 72656529
000003C9 00
284:
285: ; item 11:
286:000003CA 00000000 0 handle holder
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 9
287:000003CE 00E60168 230,360,247,410 display rectangle
000003D2 00F7019A
288:000003D6 04 button item type
289:000003D7 05507269 "Print" the item
000003DB 6E7400
290:
291: ; item 12:
292:000003DE 00000000 0 handle holder
293:000003E2 00E600D7 230, 215, 247, 265 display rectangle
000003E6 00F70109
294:000003EA 04 button item type
295:000003EB 04536176 "Save" the item
000003EF 65
296:
297: ; item 13:
298:000003F0 00000000 0 handle holder
299:000003F4 00E60046 230,70,247,120 display rectangle
000003F8 00F70078
300:000003FC 04 button item type
301:000003FD 0643616E "Cancel" the item
00000401 63656C
302:
303: ; item 14:
304:00000404 00000000 0 handle holder
305:00000408 003C0019 60,25,80,120 display rectangle
0000040C 00500078
306:00000410 88 StatText item type
307:00000411 044E616D "Name" the item
00000415 65
308:
309: ; item 15:
310:00000416 00000000 0 handle holder
311:0000041A 00550019 85,25,105,120 display rectangle
0000041E 00690078
312:00000422 88 StatText item type
313:00000423 07436F6D "Company" the item
00000427 70616E79
0000042B 00
314:
315: ; item 16:
316:0000042C 00000000 0 handle holder
317:00000430 006E0019 110,25,130,120 display rectangle
00000434 00820078
318:00000438 88 StatText item type
319:00000439 06537472 "Street" the item
0000043D 656574
320:
321: ; item 17:
322:00000440 00000000 0 handle holder
323:00000444 00870019 135,25,155,120 display rectangle
00000448 009B0078
324:0000044C 88 StatText item type
325:0000044D 04436974 "City" the item
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 10
00000451 79
326:
327: ; item 18:
328:00000452 00000000 0 handle holder
329:00000456 00A00019 160,25,180,120 display rectangle
0000045A 00B40078
330:0000045E 88 StatText item type
331:0000045F 0954656C "Telephone" the item
00000463 6570686F
00000467 6E6500
332:
333: ; item 19:
334:0000046A 00000000 0 handle holder
335:0000046E 000C0019 12,25,44,57 display rectangle
00000472 002C0039
336:00000476 20 iconitem item type
337:00000477 020101 257 Resource ID of icon
338:
339: ; Debugger Dialog List
340:
341:0000047A $$ DITL,650,32 Dialog item list, ID = 650, ATTR=(32)
342:0000047A 0008 9 9 items in list
343:
344: ; item 1:
345:0000047C 00000000 0 handle holder
346:00000480 00A00019 160,25,177,75 display rectangle
00000484 00B1004B
347:00000488 04 button item type
348:00000489 04537465 "Step" the item
0000048D 70
349:
350: ; item 2:
351:0000048E 00000000 0 handle holder
352:00000492 00A000AA 160,170,177,220 display rectangle
00000496 00B100DC
353:0000049A 04 button item type
354:0000049B 024730 "G0" the item
355:
356: ; item 3:
357:0000049E 00000000 0 handle holder
358:000004A2 00A0013B 160,315,177,365 display rectangle
000004A6 00B1016D
359:000004AA 04 button item type
360:000004AB 04517569 "Quit" the item
000004AF 74
361:
362: ; item 4:
363:000004B0 00000000 0 handle holder
364:000004B4 0014007D 20,125,40,455 display rectangle
000004B8 002801C7
365:000004BC 88 StatText item type
366:000004BD 10504342 "PCBASIC Debugger"
000004C1 41534943
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 11
000004C5 20446562
000004C9 75676765
000004CD 72
367:
368: ; item 5:
369:000004CE 00000000 0 handle holder
370:000004D2 00780019 120,25,140,190 display rectangle
000004D6 008C00BE
371:000004DA 88 StatText item type
372:000004DB 0853746F "Stop at "
000004DF 70206174
000004E3 20
373:
374: ; item 6:
375:000004E4 00000000 0 handle holder
376:000004E8 007800C8 120,200,140,340 display rectangle
000004EC 008C0154
377:000004F0 90 editxtds item type
378:000004F1 013000 "0" ;the item
379:
380: ; item 7:
381:000004F4 00000000 0 handle holder
382:000004F8 005F0019 95,25,115,380 display rectangle
000004FC 0073017C
383:00000500 88 StatText item type
384:00000501 064C696E "Line #" ;the item
00000505 652023
385:
386: ; item 8:
387:00000508 00000000 0 handle holder
388:0000050C 00320019 50,25,70,380 display rectangle
00000510 0046017C
389:00000514 88 StatText item type
390:00000515 0A612056 "a Variable" ; the item
00000519 61726961
0000051D 626C65
391:
392: ; item 9:
393:00000520 00000000 0 handle holder
394:00000524 00460019 70,25,90,380 display rectangle
00000528 005A017C
395:0000052C 88 StatText item type
396:0000052D 0A612056 "a Variable" ; the item
00000531 61726961
00000535 626C65
397:
398: ;
399: ; Add more StatText items here if you want to
400: ; display more than two variables at a time
401: ;
402:
403:
404:
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 12
405: ; Help Dialog Box
406:
407:00000538 $$ DLOG,303,32 dialog, ID = 303, ATTR=32
408:00000538 005A000F 90,15,260,495 bounds rectangle
0000053C 010401EF
409:00000540 0001 1 type = modal dialog box
410:00000542 FFFF visible initial state
411:00000544 0000 nogoaway no close box
412:00000546 00000000 0 refcon
413:0000054A 012F 303 resc ID of DLOG's item list
414:0000054C 00 | no title
415:
416: ; Order Dialog Box
417:
418:0000054D $$ DLOG,501,32 dialog, ID = 501, ATTR=32
419:0000054D 002D000F 45,15,300,495 bounds rectangle
00000551 012C01EF
420:00000555 0001 1 type = modal dialog box
421:00000557 FFFF visible initial state
422:00000559 0000 nogoaway no close box
423:0000055B 00000000 0 refcon
424:0000055F 01F5 501 resc ID of DLOG's item list
425:00000561 00 | no title
426:
427: ; Debugger Dialog Box
428:
429:00000562 $$ DLOG,650,32 dialog, ID = 650, ATTR=32
430:00000562 0064003C 100,60,280,450 bounds rectangle
00000566 011801C2
431:0000056A 0001 1 type = modal dialog box
432:0000056C FFFF visible initial state
433:0000056E 0000 nogoaway no close box
434:00000570 00000000 0 refcon
435:00000574 028A 650 resc ID of DLOG's item list
436:00000576 00 | no title
437:
438:
439: ; BASIC default Window
440:
441:00000577 $$ WIND,300,4 Window, id=300, attr=4
442:00000577 0028000A 40,10,325,500
0000057B 014501F4
443:0000057F 0008 8 Zoom type window !!!
444:00000581 FFFF visible
445:00000583 0000 nogoaway
446:00000585 00000000 0 refcon
447:00000589 0C504342 PCBASIC Demo title
0000058D 41534943
00000591 2044656D
00000595 6F
448:
449:
450: ; Vertical scroll bar for WIND 300
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 13
451:
452:00000596 $$ CNTL,300
453:00000596 00140190 20,400,220,416
0000059A 00DC01A0
454:0000059E 0000 0 initial value
455:000005A0 0000 Invisible
456:000005A2 2EE0 12000 max value
457:000005A4 0000 0 min value
458:000005A6 0010 16 scroll bar
459:000005A8 00000000 0 refcon
460:000005AC 13766572 "vertical scroll bar" ;title
000005B0 74696361
000005B4 6C207363
000005B8 726F6C6C
000005BC 20626172
461:
462:
463: ; Horizontal scroll bar for WIND 300
464:
465:000005C0 $$ CNTL,400
466:000005C0 00C80014 200,20,216,400
000005C4 00D80190
467:000005C8 0000 0 initial value
468:000005CA 0000 Invisible
469:000005CC 2EE0 12000 max value
470:000005CE 0000 0 min value
471:000005D0 0010 16 scroll bar
472:000005D2 00000000 0 refcon
473:000005D6 15686F72 "horizontal scroll bar" ;title
000005DA 697A6F6E
000005DE 74616C20
000005E2 7363726F
000005E6 6C6C2062
000005EA 6172
474:
475: ; Cursor
476:000005EC $$ CURS,300,4
477:000005EC 01801A70 $01801A70,$2648264A,$124D1249,$68099801,$88024002,$20022004,$10040808,$04080408
000005F0 2648264A
000005F4 124D1249
000005F8 68099801
000005FC 88024002
00000600 20022004
00000604 10040808
00000608 04080408
478:0000060C 00000000 $00000000,$00000000,$00000000,$00000000,$00000000,$00000000,$00000000,$00000000
00000610 00000000
00000614 00000000
00000618 00000000
0000061C 00000000
00000620 00000000
00000624 00000000
00000628 00000000
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 14
479:0000062C 00080008 $0008,$0008
480:
481: ; Pterodactyl Icon for menu item
482:00000630 $$ ICON,257
483:00000630 01000000 $01000000,$00800000,$00400000,$00600000,$00300000,$00380000,$001C0000,$001E0000
00000634 00800000
00000638 00400000
0000063C 00600000
00000640 00300000
00000644 00380000
00000648 001C0000
0000064C 001E0000
484:00000650 001F0000 $001F0000,$000F8000,$000FD800,$000FD3FC,$000FE0FF,$000FE1C0,$000FF270,$001FF618
00000654 000F8000
00000658 000FD800
0000065C 000FD3FC
00000660 000FE0FF
00000664 000FE1C0
00000668 000FF270
0000066C 001FF618
485:00000670 001FFC00 $001FFC00,$003FF000,$003FF000,$00FFE000,$01FFE000,$07BFC000,$FC3F8000,$F07F8000
00000674 003FF000
00000678 003FF000
0000067C 00FFE000
00000680 01FFE000
00000684 07BFC000
00000688 FC3F8000
0000068C F07F8000
486:00000690 C07F4000 $C07F4000,$00FE6000,$00F80000,$01F00000,$03C00000,$07800000,$3E000000,$F8000000
00000694 00FE6000
00000698 00F80000
0000069C 01F00000
000006A0 03C00000
000006A4 07800000
000006A8 3E000000
000006AC F8000000
487:
488: ; Pterodactyl Icon & Mask for Program Icon
489:000006B0 $$ ICN#,128
490:000006B0 01000000 $01000000,$00800000,$00400000,$00600000,$00300000,$00380000,$001C0000,$001E0000
000006B4 00800000
000006B8 00400000
000006BC 00600000
000006C0 00300000
000006C4 00380000
000006C8 001C0000
000006CC 001E0000
491:000006D0 001F0000 $001F0000,$000F8000,$000FD800,$000FD3FC,$000FE0FF,$000FE1C0,$000FF270,$001FF618
000006D4 000F8000
000006D8 000FD800
000006DC 000FD3FC
000006E0 000FE0FF
000006E4 000FE1C0
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 15
000006E8 000FF270
000006EC 001FF618
492:000006F0 001FFC00 $001FFC00,$003FF000,$003FF000,$00FFE000,$01FFE000,$07BFC000,$FC3F8000,$F07F8000
000006F4 003FF000
000006F8 003FF000
000006FC 00FFE000
00000700 01FFE000
00000704 07BFC000
00000708 FC3F8000
0000070C F07F8000
493:00000710 C07F4000 $C07F4000,$00FE6000,$00F80000,$01F00000,$03C00000,$07800000,$3E000000,$F8000000
00000714 00FE6000
00000718 00F80000
0000071C 01F00000
00000720 03C00000
00000724 07800000
00000728 3E000000
0000072C F8000000
494:00000730 FFFFFFFF $FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF
00000734 FFFFFFFF
00000738 FFFFFFFF
0000073C FFFFFFFF
00000740 FFFFFFFF
00000744 FFFFFFFF
00000748 FFFFFFFF
0000074C FFFFFFFF
495:00000750 FFFFFFFF $FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF
00000754 FFFFFFFF
00000758 FFFFFFFF
0000075C FFFFFFFF
00000760 FFFFFFFF
00000764 FFFFFFFF
00000768 FFFFFFFF
0000076C FFFFFFFF
496:00000770 FFFFFFFF $FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF
00000774 FFFFFFFF
00000778 FFFFFFFF
0000077C FFFFFFFF
00000780 FFFFFFFF
00000784 FFFFFFFF
00000788 FFFFFFFF
0000078C FFFFFFFF
497:00000790 FFFFFFFF $FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF,$FFFFFFFF
00000794 FFFFFFFF
00000798 FFFFFFFF
0000079C FFFFFFFF
000007A0 FFFFFFFF
000007A4 FFFFFFFF
000007A8 FFFFFFFF
000007AC FFFFFFFF
498:
499: ; Document Icon and mask for Document Icon
500:000007B0 $$ ICN#,129
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 16
501:000007B0 01073A26 $01073A26,$0084A369,$0044BAA9,$0064A229,$00373A26,$00380000,$001C0000,$000E0000
000007B4 0084A369
000007B8 0044BAA9
000007BC 0064A229
000007C0 00373A26
000007C4 00380000
000007C8 001C0000
000007CC 000E0000
502:000007D0 000F0000 $000F0000,$000F8000,$000FD800,$000FD3FC,$000FE0FF,$000FE1C0,$000FF270,$001FF618
000007D4 000F8000
000007D8 000FD800
000007DC 000FD3FC
000007E0 000FE0FF
000007E4 000FE1C0
000007E8 000FF270
000007EC 001FF618
503:000007F0 001FFC00 $001FFC00,$003FF000,$003FF000,$00FFE000,$01FFE000,$07BFC000,$FC3F8000,$F07F8000
000007F4 003FF000
000007F8 003FF000
000007FC 00FFE000
00000800 01FFE000
00000804 07BFC000
00000808 FC3F8000
0000080C F07F8000
504:00000810 C07F4000 $C07F4000,$00FE6000,$00F80000,$01F00000,$03C00000,$07800000,$3E000000,$F8000000
00000814 00FE6000
00000818 00F80000
0000081C 01F00000
00000820 03C00000
00000824 07800000
00000828 3E000000
0000082C F8000000
505:00000830 07C7FFFF $07C7FFFF,$07E7FFFF,$07F7FFFF,$03F7FFFF,$01FFFFFF,$00FFFFFF,$00FE0000,$007F0000
00000834 07E7FFFF
00000838 07F7FFFF
0000083C 03F7FFFF
00000840 01FFFFFF
00000844 00FFFFFF
00000848 00FE0000
0000084C 007F0000
506:00000850 007F8000 $007F8000,$007FFFFE,$007FFFFF,$003FFFFF,$003FFFFF,$003FFFFF,$003FFFFC,$003FFFFE
00000854 007FFFFE
00000858 007FFFFF
0000085C 003FFFFF
00000860 003FFFFF
00000864 003FFFFF
00000868 003FFFFC
0000086C 003FFFFE
507:00000870 007FFFFE $007FFFFE,$007FFF00,$00FFFC00,$03FFFC00,$FFFFF800,$FFFFF000,$FFFFE000,$FFFFE000
00000874 007FFF00
00000878 00FFFC00
0000087C 03FFFC00
00000880 FFFFF800
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 17
00000884 FFFFF000
00000888 FFFFE000
0000088C FFFFE000
508:00000890 F9FFE000 $F9FFE000,$E1FFF000,$03FFF000,$07FC0000,$0FFC0000,$FFF80000,$FF800000,$FF000000
00000894 E1FFF000
00000898 03FFF000
0000089C 07FC0000
000008A0 0FFC0000
000008A4 FFF80000
000008A8 FF800000
000008AC FF000000
509:
510:
511: ; Help dialog strings
512:000008B0 $$ STR#,303,32
513:000008B0 0010 16
514: ;
515: ; panel 1 : Using DEMO...
516:000008B2 3253656C "Select the items you would like to know about from"
000008B6 65637420
000008BA 74686520
000008BE 6974656D
000008C2 7320796F
000008C6 7520776F
000008CA 756C6420
000008CE 6C696B65
000008D2 20746F20
000008D6 6B6E6F77
000008DA 2061626F
000008DE 75742066
000008E2 726F6D
517:000008E5 2E746865 "the FEATURES menu. Use the ORDER menu to add a"
000008E9 20464541
000008ED 54555245
000008F1 53206D65
000008F5 6E752E20
000008F9 55736520
000008FD 74686520
00000901 4F524445
00000905 52206D65
00000909 6E752074
0000090D 6F206164
00000911 642061
518:00000914 2A6E616D "name to the mailing list file. Examine the"
00000918 6520746F
0000091C 20746865
00000920 206D6169
00000924 6C696E67
00000928 206C6973
0000092C 74206669
00000930 6C652E20
00000934 4578616D
00000938 696E6520
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 18
0000093C 746865
519:0000093F 2F424153 "BASIC source of this program. It is very short."
00000943 49432073
00000947 6F757263
0000094B 65206F66
0000094F 20746869
00000953 73207072
00000957 6F677261
0000095B 6D2E2049
0000095F 74206973
00000963 20766572
00000967 79207368
0000096B 6F72742E
520: ; panel 2 : Help with program...
521:0000096F 36507465 "Pterodactyl Software can help you get your application"
00000973 726F6461
00000977 6374796C
0000097B 20536F66
0000097F 74776172
00000983 65206361
00000987 6E206865
0000098B 6C702079
0000098F 6F752067
00000993 65742079
00000997 6F757220
0000099B 6170706C
0000099F 69636174
000009A3 696F6E
522:000009A6 3372756E "running quickly ! Order our manual for $50. If your"
000009AA 6E696E67
000009AE 20717569
000009B2 636B6C79
000009B6 2021204F
000009BA 72646572
000009BE 206F7572
000009C2 206D616E
000009C6 75616C20
000009CA 666F7220
000009CE 2435302E
000009D2 20496620
000009D6 796F7572
523:000009DA 38737461 "staff is too busy, you can hire a Pterodactyl programmer"
000009DE 66662069
000009E2 7320746F
000009E6 6F206275
000009EA 73792C20
000009EE 796F7520
000009F2 63616E20
000009F6 68697265
000009FA 20612050
000009FE 7465726F
00000A02 64616374
00000A06 796C2070
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 19
00000A0A 726F6772
00000A0E 616D6D65
00000A12 72
524:00000A13 34617320 "as a consultant at convenient fixed or hourly rates!"
00000A17 6120636F
00000A1B 6E73756C
00000A1F 74616E74
00000A23 20617420
00000A27 636F6E76
00000A2B 656E6965
00000A2F 6E742066
00000A33 69786564
00000A37 206F7220
00000A3B 686F7572
00000A3F 6C792072
00000A43 61746573
00000A47 21
525: ; panel 3 : How to order...
526:00000A48 324F7264 "Order the PCBASIC manual from Pterodactyl Software"
00000A4C 65722074
00000A50 68652050
00000A54 43424153
00000A58 4943206D
00000A5C 616E7561
00000A60 6C206672
00000A64 6F6D2050
00000A68 7465726F
00000A6C 64616374
00000A70 796C2053
00000A74 6F667477
00000A78 617265
527:00000A7B 25202020 " 200 Davey Glen Rd #416"
00000A7F 20202020
00000A83 20202020
00000A87 20202020
00000A8B 32303020
00000A8F 44617665
00000A93 7920476C
00000A97 656E2052
00000A9B 64202334
00000A9F 3136
528:00000AA1 1F202020 " Belmont CA 94002"
00000AA5 20202020
00000AA9 20202020
00000AAD 20202020
00000AB1 42656C6D
00000AB5 6F6E7420
00000AB9 43412039
00000ABD 34303032
529:00000AC1 20202020 " phone: (415) 591-5270"
00000AC5 20202020
00000AC9 20202070
00000ACD 686F6E65
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 20
00000AD1 3A092028
00000AD5 34313529
00000AD9 20353931
00000ADD 2D353237
00000AE1 30
530: ; panel 4 : Help with help boxes
531:00000AE2 36497473 "Its easy to create Help boxes like these with PCBASIC."
00000AE6 20656173
00000AEA 7920746F
00000AEE 20637265
00000AF2 61746520
00000AF6 48656C70
00000AFA 20626F78
00000AFE 6573206C
00000B02 696B6520
00000B06 74686573
00000B0A 65207769
00000B0E 74682050
00000B12 43424153
00000B16 49432E
532:00000B19 37466972 "First put the subject titles in Menu 303. Then put text"
00000B1D 73742070
00000B21 75742074
00000B25 68652073
00000B29 75626A65
00000B2D 63742074
00000B31 69746C65
00000B35 7320696E
00000B39 204D656E
00000B3D 75203330
00000B41 332E2054
00000B45 68656E20
00000B49 70757420
00000B4D 74657874
533:00000B51 34666F72 "for each subject, up to about 1K in String list 303."
00000B55 20656163
00000B59 68207375
00000B5D 626A6563
00000B61 742C2075
00000B65 7020746F
00000B69 2061626F
00000B6D 75742031
00000B71 4B20696E
00000B75 20537472
00000B79 696E6720
00000B7D 6C697374
00000B81 20333033
00000B85 2E
534:00000B86 33496620 "If you don't need Help boxes, just delete Menu 303."
00000B8A 796F7520
00000B8E 646F6E27
00000B92 74206E65
00000B96 65642048
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 21
00000B9A 656C7020
00000B9E 626F7865
00000BA2 732C206A
00000BA6 75737420
00000BAA 64656C65
00000BAE 7465204D
00000BB2 656E7520
00000BB6 3330332E
535:
536: ; Text of feature messages. This are used with :
537: ; RESTORE # ID% : READ OneLine$
538: ;
539: ; International features
540:
541:00000BBA $$ STR#,501,32
542:00000BBA 0012 18
543:00000BBC 2C202020 " PCBASIC programs can be written for easy"
00000BC0 20504342
00000BC4 41534943
00000BC8 2070726F
00000BCC 6772616D
00000BD0 73206361
00000BD4 6E206265
00000BD8 20777269
00000BDC 7474656E
00000BE0 20666F72
00000BE4 20656173
00000BE8 79
544:00000BE9 36747261 "translation into foreign languages. The menus, dialogs"
00000BED 6E736C61
00000BF1 74696F6E
00000BF5 20696E74
00000BF9 6F20666F
00000BFD 72656967
00000C01 6E206C61
00000C05 6E677561
00000C09 6765732E
00000C0D 20546865
00000C11 206D656E
00000C15 75732C20
00000C19 6469616C
00000C1D 6F6773
545:00000C20 38616E64 "and titles can all be defined in the resource file. Even"
00000C24 20746974
00000C28 6C657320
00000C2C 63616E20
00000C30 616C6C20
00000C34 62652064
00000C38 6566696E
00000C3C 65642069
00000C40 6E207468
00000C44 65207265
00000C48 736F7572
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 22
00000C4C 63652066
00000C50 696C652E
00000C54 20457665
00000C58 6E
546:00000C59 35746578 "text messages, like these, can be put in the resource"
00000C5D 74206D65
00000C61 73736167
00000C65 65732C20
00000C69 6C696B65
00000C6D 20746865
00000C71 73652C20
00000C75 63616E20
00000C79 62652070
00000C7D 75742069
00000C81 6E207468
00000C85 65207265
00000C89 736F7572
00000C8D 6365
547:00000C8F 2466696C "file as string lists, such as this :"
00000C93 65206173
00000C97 20737472
00000C9B 696E6720
00000C9F 6C697374
00000CA3 732C2073
00000CA7 75636820
00000CAB 61732074
00000CAF 68697320
00000CB3 3A
548:00000CB4 00 ""
549:00000CB5 11202020 " $$ STR#,501,32"
00000CB9 24242053
00000CBD 5452232C
00000CC1 3530312C
00000CC5 3332
550:00000CC7 04202020 " 2"
00000CCB 32
551:00000CCC 2D202020 " PCBASIC programs can be written for easy"
00000CD0 20205043
00000CD4 42415349
00000CD8 43207072
00000CDC 6F677261
00000CE0 6D732063
00000CE4 616E2062
00000CE8 65207772
00000CEC 69747465
00000CF0 6E20666F
00000CF4 72206561
00000CF8 7379
552:00000CFA 28202020 " translation into foreign languages."
00000CFE 20207472
00000D02 616E736C
00000D06 6174696F
00000D0A 6E20696E
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 23
00000D0E 746F2066
00000D12 6F726569
00000D16 676E206C
00000D1A 616E6775
00000D1E 61676573
00000D22 2E
553:00000D23 00 ""
554:00000D24 34546865 "The strings are used in BASIC like DATA statements :"
00000D28 20737472
00000D2C 696E6773
00000D30 20617265
00000D34 20757365
00000D38 6420696E
00000D3C 20424153
00000D40 4943206C
00000D44 696B6520
00000D48 44415441
00000D4C 20737461
00000D50 74656D65
00000D54 6E747320
00000D58 3A
555:00000D59 00 ""
556:00000D5A 13092020 " RESTORE #501"
00000D5E 20202020
00000D62 52455354
00000D66 4F524520
00000D6A 23353031
557:00000D6E 23092020 " READ Msg$1,Msg$2,Msg$3,Msg$4"
00000D72 20202020
00000D76 52454144
00000D7A 204D7367
00000D7E 24312C4D
00000D82 73672432
00000D86 2C4D7367
00000D8A 24332C4D
00000D8E 73672434
558:00000D92 2C092020 " ? Msg$1 : ? Msg$2 : ? Msg$3 : ? Msg$4"
00000D96 20202020
00000D9A 3F204D73
00000D9E 67243120
00000DA2 3A203F20
00000DA6 4D736724
00000DAA 32203A20
00000DAE 3F204D73
00000DB2 67243320
00000DB6 3A203F20
00000DBA 4D736724
00000DBE 34
559:00000DBF 00 "
560:00000DC0 03454E44 "END"
561:
562: ; IBM compatible
563:
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 24
564:00000DC4 $$ STR#,502,32
565:00000DC4 000E 14
566:00000DC6 2D202020 " PCBASIC makes converting IBM* PC programs"
00000DCA 20504342
00000DCE 41534943
00000DD2 206D616B
00000DD6 65732063
00000DDA 6F6E7665
00000DDE 7274696E
00000DE2 67204942
00000DE6 4DAA2050
00000DEA 43207072
00000DEE 6F677261
00000DF2 6D73
567:00000DF4 34746F20 "to Macintosh* programs simple. PCBASIC is compatible"
00000DF8 4D616369
00000DFC 6E746F73
00000E00 68AA2070
00000E04 726F6772
00000E08 616D7320
00000E0C 73696D70
00000E10 6C652E20
00000E14 50434241
00000E18 53494320
00000E1C 69732063
00000E20 6F6D7061
00000E24 7469626C
00000E28 65
568:00000E29 33776974 "with BASICA, the BASIC used on the IBM* PC. Special"
00000E2D 68204241
00000E31 53494341
00000E35 2C207468
00000E39 65204241
00000E3D 53494320
00000E41 75736564
00000E45 206F6E20
00000E49 74686520
00000E4D 49424DAA
00000E51 2050432E
00000E55 20537065
00000E59 6369616C
569:00000E5D 384D6163 "Macintosh features like dialog boxes and windows, can be"
00000E61 696E746F
00000E65 73682066
00000E69 65617475
00000E6D 72657320
00000E71 6C696B65
00000E75 20646961
00000E79 6C6F6720
00000E7D 626F7865
00000E81 7320616E
00000E85 64207769
00000E89 6E646F77
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 25
00000E8D 732C2063
00000E91 616E2062
00000E95 65
570:00000E96 37616464 "added in the resource file. Most special IBM functions,"
00000E9A 65642069
00000E9E 6E207468
00000EA2 65207265
00000EA6 736F7572
00000EAA 63652066
00000EAE 696C652E
00000EB2 204D6F73
00000EB6 74207370
00000EBA 65636961
00000EBE 6C204942
00000EC2 4D206675
00000EC6 6E637469
00000ECA 6F6E732C
571:00000ECE 38747261 "translate automatically into Macintosh features. The IBM"
00000ED2 6E736C61
00000ED6 74652061
00000EDA 75746F6D
00000EDE 61746963
00000EE2 616C6C79
00000EE6 20696E74
00000EEA 6F204D61
00000EEE 63696E74
00000EF2 6F736820
00000EF6 66656174
00000EFA 75726573
00000EFE 2E205468
00000F02 65204942
00000F06 4D
572:00000F07 3A66756E "function keys become menu items. The multiple screen pages"
00000F0B 6374696F
00000F0F 6E206B65
00000F13 79732062
00000F17 65636F6D
00000F1B 65206D65
00000F1F 6E752069
00000F23 74656D73
00000F27 2E205468
00000F2B 65206D75
00000F2F 6C746970
00000F33 6C652073
00000F37 63726565
00000F3B 6E207061
00000F3F 676573
573:00000F42 33617661 "available on some adapters, become multiple windows"
00000F46 696C6162
00000F4A 6C65206F
00000F4E 6E20736F
00000F52 6D652061
00000F56 64617074
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 26
00000F5A 6572732C
00000F5E 20626563
00000F62 6F6D6520
00000F66 6D756C74
00000F6A 69706C65
00000F6E 2077696E
00000F72 646F7773
574:00000F76 3A6F6E20 "on the Macintosh. The programs can even read back the text"
00000F7A 74686520
00000F7E 4D616369
00000F82 6E746F73
00000F86 682E2054
00000F8A 68652070
00000F8E 726F6772
00000F92 616D7320
00000F96 63616E20
00000F9A 6576656E
00000F9E 20726561
00000FA2 64206261
00000FA6 636B2074
00000FAA 68652074
00000FAE 657874
575:00000FB1 2F777269 "written on the screen in PCBASIC, as in BASICA."
00000FB5 7474656E
00000FB9 206F6E20
00000FBD 74686520
00000FC1 73637265
00000FC5 656E2069
00000FC9 6E205043
00000FCD 42415349
00000FD1 432C2061
00000FD5 7320696E
00000FD9 20424153
00000FDD 4943412E
576:00000FE1 00 ""
577:00000FE2 3849424D "IBM is a trademark of Internation Business Machines Inc."
00000FE6 20697320
00000FEA 61207472
00000FEE 6164656D
00000FF2 61726B20
00000FF6 6F662049
00000FFA 6E746572
00000FFE 6E617469
00001002 6F6E2042
00001006 7573696E
0000100A 65737320
0000100E 4D616368
00001012 696E6573
00001016 20496E63
0000101A 2E
578:0000101B 2F4D6163 "Macintosh is a trademark of Apple Computer Inc."
0000101F 696E746F
00001023 73682069
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 27
00001027 73206120
0000102B 74726164
0000102F 656D6172
00001033 6B206F66
00001037 20417070
0000103B 6C652043
0000103F 6F6D7075
00001043 74657220
00001047 496E632E
579:0000104B 03454E44 "END"
580:
581: ; Menu & function keys
582:
583:0000104F $$ STR#,503,32
584:0000104F 0012 18
585:00001051 35202020 " In PCBASIC, the menus are created from resources."
00001055 20496E20
00001059 50434241
0000105D 5349432C
00001061 20746865
00001065 206D656E
00001069 75732061
0000106D 72652063
00001071 72656174
00001075 65642066
00001079 726F6D20
0000107D 7265736F
00001081 75726365
00001085 732E
586:00001087 3A4F7468 "Other BASIC implementations use BASIC statements to create"
0000108B 65722042
0000108F 41534943
00001093 20696D70
00001097 6C656D65
0000109B 6E746174
0000109F 696F6E73
000010A3 20757365
000010A7 20424153
000010AB 49432073
000010AF 74617465
000010B3 6D656E74
000010B7 7320746F
000010BB 20637265
000010BF 617465
587:000010C2 35657665 "every item of every menu. With PCBASIC, the menus are"
000010C6 72792069
000010CA 74656D20
000010CE 6F662065
000010D2 76657279
000010D6 206D656E
000010DA 752E2057
000010DE 69746820
000010E2 50434241
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 28
000010E6 5349432C
000010EA 20746865
000010EE 206D656E
000010F2 75732061
000010F6 7265
588:000010F8 39646566 "defined with a resource compiler or editor. Of course the"
000010FC 696E6564
00001100 20776974
00001104 68206120
00001108 7265736F
0000110C 75726365
00001110 20636F6D
00001114 70696C65
00001118 72206F72
0000111C 20656469
00001120 746F722E
00001124 204F6620
00001128 636F7572
0000112C 73652074
00001130 6865
589:00001132 3B70726F "program can change any menu item with BASIC statements. The"
00001136 6772616D
0000113A 2063616E
0000113E 20636861
00001142 6E676520
00001146 616E7920
0000114A 6D656E75
0000114E 20697465
00001152 6D207769
00001156 74682042
0000115A 41534943
0000115E 20737461
00001162 74656D65
00001166 6E74732E
0000116A 20546865
590:0000116E 396D656E "menu items can be enabled, disabled, inhibited, or marked"
00001172 75206974
00001176 656D7320
0000117A 63616E20
0000117E 62652065
00001182 6E61626C
00001186 65642C20
0000118A 64697361
0000118E 626C6564
00001192 2C20696E
00001196 68696269
0000119A 7465642C
0000119E 206F7220
000011A2 6D61726B
000011A6 6564
591:000011A8 29776974 "with a check mark or any other character."
000011AC 68206120
000011B0 63686563
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 29
000011B4 6B206D61
000011B8 726B206F
000011BC 7220616E
000011C0 79206F74
000011C4 68657220
000011C8 63686172
000011CC 61637465
000011D0 722E
592:000011D2 00 ""
593:000011D3 35202020 " PCBASIC can compile many programs written for the"
000011D7 20504342
000011DB 41534943
000011DF 2063616E
000011E3 20636F6D
000011E7 70696C65
000011EB 206D616E
000011EF 79207072
000011F3 6F677261
000011F7 6D732077
000011FB 72697474
000011FF 656E2066
00001203 6F722074
00001207 6865
594:00001209 3B49424D "IBM* PC or compatibles. Those programs may use the function"
0000120D AA205043
00001211 206F7220
00001215 636F6D70
00001219 61746962
0000121D 6C65732E
00001221 2054686F
00001225 73652070
00001229 726F6772
0000122D 616D7320
00001231 6D617920
00001235 75736520
00001239 74686520
0000123D 66756E63
00001241 74696F6E
595:00001245 386B6579 "keys on those machines. BASICA statements such as these,"
00001249 73206F6E
0000124D 2074686F
00001251 7365206D
00001255 61636869
00001259 6E65732E
0000125D 20424153
00001261 49434120
00001265 73746174
00001269 656D656E
0000126D 74732073
00001271 75636820
00001275 61732074
00001279 68657365
0000127D 2C
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 30
596:0000127E 00 ""
597:0000127F 23092020 " KEY (1) ON : ON KEY(1) GOSUB 100"
00001283 4B455920
00001287 28312920
0000128B 4F4E203A
0000128F 204F4E20
00001293 4B455928
00001297 31292047
0000129B 4F535542
0000129F 20313030
598:000012A3 00 ""
599:000012A4 3A617265 "are compiled without change. The function keys become menu"
000012A8 20636F6D
000012AC 70696C65
000012B0 64207769
000012B4 74686F75
000012B8 74206368
000012BC 616E6765
000012C0 2E205468
000012C4 65206675
000012C8 6E637469
000012CC 6F6E206B
000012D0 65797320
000012D4 6265636F
000012D8 6D65206D
000012DC 656E75
600:000012DF 3A697465 "items. They can be grouped into any number of menus, which"
000012E3 6D732E20
000012E7 54686579
000012EB 2063616E
000012EF 20626520
000012F3 67726F75
000012F7 70656420
000012FB 696E746F
000012FF 20616E79
00001303 206E756D
00001307 62657220
0000130B 6F66206D
0000130F 656E7573
00001313 2C207768
00001317 696368
601:0000131A 2D63616E "can be arranged in any order on the menu bar."
0000131E 20626520
00001322 61727261
00001326 6E676564
0000132A 20696E20
0000132E 616E7920
00001332 6F726465
00001336 72206F6E
0000133A 20746865
0000133E 206D656E
00001342 75206261
00001346 722E
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 31
602:00001348 03454E44 "END"
603:
604: ; Dialogs & Alerts
605:
606:0000134C $$ STR#,504,32
607:0000134C 0013 19
608:0000134E 33202020 " Dialogs and alert boxes are easy to create with"
00001352 20446961
00001356 6C6F6773
0000135A 20616E64
0000135E 20616C65
00001362 72742062
00001366 6F786573
0000136A 20617265
0000136E 20656173
00001372 7920746F
00001376 20637265
0000137A 61746520
0000137E 77697468
609:00001382 33504342 "PCBASIC. One BASIC statement will show the operator"
00001386 41534943
0000138A 2E204F6E
0000138E 65204241
00001392 53494320
00001396 73746174
0000139A 656D656E
0000139E 74207769
000013A2 6C6C2073
000013A6 686F7720
000013AA 74686520
000013AE 6F706572
000013B2 61746F72
610:000013B6 3961204D "a Modal Dialog or an Alert, wait for the operator to make"
000013BA 6F64616C
000013BE 20446961
000013C2 6C6F6720
000013C6 6F722061
000013CA 6E20416C
000013CE 6572742C
000013D2 20776169
000013D6 7420666F
000013DA 72207468
000013DE 65206F70
000013E2 65726174
000013E6 6F722074
000013EA 6F206D61
000013EE 6B65
611:000013F0 36612073 "a selection or edit text, and return when the operator"
000013F4 656C6563
000013F8 74696F6E
000013FC 206F7220
00001400 65646974
00001404 20746578
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 32
00001408 742C2061
0000140C 6E642072
00001410 65747572
00001414 6E207768
00001418 656E2074
0000141C 6865206F
00001420 70657261
00001424 746F72
612:00001427 29707573 "pushes a button. It is as simple as this:"
0000142B 68657320
0000142F 61206275
00001433 74746F6E
00001437 2E204974
0000143B 20697320
0000143F 61732073
00001443 696D706C
00001447 65206173
0000144B 20746869
0000144F 733A
613:00001451 00 ""
614:00001452 2D092020 " REM Display alert box 500 as a Stop Alert."
00001456 52454D20
0000145A 44697370
0000145E 6C617920
00001462 616C6572
00001466 7420626F
0000146A 78203530
0000146E 30206173
00001472 20612053
00001476 746F7020
0000147A 416C6572
0000147E 742E
615:00001480 2C092020 " REM The number of the button the operator"
00001484 52454D20
00001488 54686520
0000148C 6E756D62
00001490 6572206F
00001494 66207468
00001498 65206275
0000149C 74746F6E
000014A0 20746865
000014A4 206F7065
000014A8 7261746F
000014AC 72
616:000014AD 22092020 " REM pressed will be in CHOICE%."
000014B1 52454D20
000014B5 70726573
000014B9 73656420
000014BD 77696C6C
000014C1 20626520
000014C5 696E2043
000014C9 484F4943
000014CD 45252E
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 33
617:000014D0 1E092020 " 100 CHOICE%=ERROR(501,STOP)"
000014D4 31303020
000014D8 43484F49
000014DC 4345253D
000014E0 4552524F
000014E4 52283530
000014E8 312C5354
000014EC 4F5029
618:000014EF 00 ""
619:000014F0 2C092020 " REM Display dialog 500. Wait for a reply."
000014F4 52454D20
000014F8 44697370
000014FC 6C617920
00001500 6469616C
00001504 6F672035
00001508 30302E20
0000150C 57616974
00001510 20666F72
00001514 20612072
00001518 65706C79
0000151C 2E
620:0000151D 2C092020 " REM The button number will be in CHOICE%."
00001521 52454D20
00001525 54686520
00001529 62757474
0000152D 6F6E206E
00001531 756D6265
00001535 72207769
00001539 6C6C2062
0000153D 6520696E
00001541 2043484F
00001545 49434525
00001549 2E
621:0000154A 15092020 " CHOICE%=DIALOG#500"
0000154E 43484F49
00001552 4345253D
00001556 4449414C
0000155A 4F472335
0000155E 3030
622:00001560 00 ""
623:00001561 33092020 " REM Remove the box. The blank spot on the window"
00001565 52454D20
00001569 52656D6F
0000156D 76652074
00001571 68652062
00001575 6F782E20
00001579 54686520
0000157D 626C616E
00001581 6B207370
00001585 6F74206F
00001589 6E207468
0000158D 65207769
00001591 6E646F77
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 34
624:00001595 29092020 " REM will be drawn again, automatically"
00001599 52454D20
0000159D 77696C6C
000015A1 20626520
000015A5 64726177
000015A9 6E206167
000015AD 61696E2C
000015B1 20617574
000015B5 6F6D6174
000015B9 6963616C
000015BD 6C79
625:000015BF 0E092020 " CLOSE#500"
000015C3 2020434C
000015C7 4F534523
000015CB 353030
626:000015CE 03454E44 "END"
627:
628: ; Mouse, fonts and editing
629:
630:000015D2 $$ STR#,505,32
631:000015D2 0014 20
632:000015D4 3C202020 " PCBASIC handles the mouse activity for the system, menus,"
000015D8 50434241
000015DC 53494320
000015E0 68616E64
000015E4 6C657320
000015E8 74686520
000015EC 6D6F7573
000015F0 65206163
000015F4 74697669
000015F8 74792066
000015FC 6F722074
00001600 68652073
00001604 79737465
00001608 6D2C206D
0000160C 656E7573
00001610 2C
633:00001611 3B646961 "dialog boxes and scroll bars. The BASIC programmer only has"
00001615 6C6F6720
00001619 626F7865
0000161D 7320616E
00001621 64207363
00001625 726F6C6C
00001629 20626172
0000162D 732E2054
00001631 68652042
00001635 41534943
00001639 2070726F
0000163D 6772616D
00001641 6D657220
00001645 6F6E6C79
00001649 20686173
634:0000164D 3B746F20 "to take care of clicks within the main windows. PCBASIC can"
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 35
00001651 74616B65
00001655 20636172
00001659 65206F66
0000165D 20636C69
00001661 636B7320
00001665 77697468
00001669 696E2074
0000166D 6865206D
00001671 61696E20
00001675 77696E64
00001679 6F77732E
0000167D 20504342
00001681 41534943
00001685 2063616E
635:00001689 3C657665 "even vector to a line number as soon as the mouse is clicked"
0000168D 6E207665
00001691 63746F72
00001695 20746F20
00001699 61206C69
0000169D 6E65206E
000016A1 756D6265
000016A5 72206173
000016A9 20736F6F
000016AD 6E206173
000016B1 20746865
000016B5 206D6F75
000016B9 73652069
000016BD 7320636C
000016C1 69636B65
000016C5 64
636:000016C6 15696E20 "in the active window."
000016CA 74686520
000016CE 61637469
000016D2 76652077
000016D6 696E646F
000016DA 772E
637:000016DC 0120 " "
638:000016DE 3E202020 " The special Edit menu simplifies editing. It takes care of"
000016E2 20546865
000016E6 20737065
000016EA 6369616C
000016EE 20456469
000016F2 74206D65
000016F6 6E752073
000016FA 696D706C
000016FE 69666965
00001702 73206564
00001706 6974696E
0000170A 672E2049
0000170E 74207461
00001712 6B657320
00001716 63617265
0000171A 206F66
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 36
639:0000171D 3E274375 "'Cut', 'Copy' and 'Paste' for your dialog boxes automatically."
00001721 74272C20
00001725 27436F70
00001729 79272061
0000172D 6E642027
00001731 50617374
00001735 65272066
00001739 6F722079
0000173D 6F757220
00001741 6469616C
00001745 6F672062
00001749 6F786573
0000174D 20617574
00001751 6F6D6174
00001755 6963616C
00001759 6C792E
640:0000175C 3A427574 "But you can handle the Edit menu selections for the active"
00001760 20796F75
00001764 2063616E
00001768 2068616E
0000176C 646C6520
00001770 74686520
00001774 45646974
00001778 206D656E
0000177C 75207365
00001780 6C656374
00001784 696F6E73
00001788 20666F72
0000178C 20746865
00001790 20616374
00001794 697665
641:00001797 3D77696E "window yourself. The Edit menu can vector to a BASIC line, or"
0000179B 646F7720
0000179F 796F7572
000017A3 73656C66
000017A7 2E205468
000017AB 65204564
000017AF 6974206D
000017B3 656E7520
000017B7 63616E20
000017BB 76656374
000017BF 6F722074
000017C3 6F206120
000017C7 42415349
000017CB 43206C69
000017CF 6E652C20
000017D3 6F72
642:000017D5 38796F75 "you can poll for menu selections whenever you are ready."
000017D9 2063616E
000017DD 20706F6C
000017E1 6C20666F
000017E5 72206D65
000017E9 6E752073
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 37
000017ED 656C6563
000017F1 74696F6E
000017F5 73207768
000017F9 656E6576
000017FD 65722079
00001801 6F752061
00001805 72652072
00001809 65616479
0000180D 2E
643:0000180E 0120 " "
644:00001810 3D202020 " PCBASIC has powerful mouse sensing commands, to make your"
00001814 20504342
00001818 41534943
0000181C 20686173
00001820 20706F77
00001824 65726675
00001828 6C206D6F
0000182C 75736520
00001830 73656E73
00001834 696E6720
00001838 636F6D6D
0000183C 616E6473
00001840 2C20746F
00001844 206D616B
00001848 6520796F
0000184C 7572
645:0000184E 3E6A6F62 "job still easier. Your BASIC program can detect a single click"
00001852 20737469
00001856 6C6C2065
0000185A 61736965
0000185E 722E2059
00001862 6F757220
00001866 42415349
0000186A 43207072
0000186E 6F677261
00001872 6D206361
00001876 6E206465
0000187A 74656374
0000187E 20612073
00001882 696E676C
00001886 6520636C
0000188A 69636B
646:0000188D 3D6F7220 "or a multiple click with one MOUSE function call. Other calls"
00001891 61206D75
00001895 6C746970
00001899 6C652063
0000189D 6C69636B
000018A1 20776974
000018A5 68206F6E
000018A9 65204D4F
000018AD 55534520
000018B1 66756E63
000018B5 74696F6E
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 38
000018B9 2063616C
000018BD 6C2E204F
000018C1 74686572
000018C5 2063616C
000018C9 6C73
647:000018CB 3F726574 "return the starting, ending and current locations of the mouse."
000018CF 75726E20
000018D3 74686520
000018D7 73746172
000018DB 74696E67
000018DF 2C20656E
000018E3 64696E67
000018E7 20616E64
000018EB 20637572
000018EF 72656E74
000018F3 206C6F63
000018F7 6174696F
000018FB 6E73206F
000018FF 66207468
00001903 65206D6F
00001907 7573652E
648:0000190B 3F546865 "The functions can return either graphic coordinates or the line"
0000190F 2066756E
00001913 6374696F
00001917 6E732063
0000191B 616E2072
0000191F 65747572
00001923 6E206569
00001927 74686572
0000192B 20677261
0000192F 70686963
00001933 20636F6F
00001937 7264696E
0000193B 61746573
0000193F 206F7220
00001943 74686520
00001947 6C696E65
649:0000194B 3D616E64 "and column location for editing text! That makes highlighting"
0000194F 20636F6C
00001953 756D6E20
00001957 6C6F6361
0000195B 74696F6E
0000195F 20666F72
00001963 20656469
00001967 74696E67
0000196B 20746578
0000196F 74212054
00001973 68617420
00001977 6D616B65
0000197B 73206869
0000197F 67686C69
00001983 67687469
00001987 6E67
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 39
650:00001989 3A73656C "selected text simple, even when using a proportional font."
0000198D 65637465
00001991 64207465
00001995 78742073
00001999 696D706C
0000199D 652C2065
000019A1 76656E20
000019A5 7768656E
000019A9 20757369
000019AD 6E672061
000019B1 2070726F
000019B5 706F7274
000019B9 696F6E61
000019BD 6C20666F
000019C1 6E742E
651:000019C4 03454E44 "END"
652:
653: ; Large programs and segmentation
654:
655:000019C8 $$ STR#,506,32
656:000019C8 0011 17
657:000019CA 3A202020 " PCBASIC compiles large programs and systems containing"
000019CE 20504342
000019D2 41534943
000019D6 20636F6D
000019DA 70696C65
000019DE 73206C61
000019E2 72676520
000019E6 70726F67
000019EA 72616D73
000019EE 20616E64
000019F2 20737973
000019F6 74656D73
000019FA 20636F6E
000019FE 7461696E
00001A02 696E67
658:00001A05 3A6D616E "many programs. You can divide large programs into segments"
00001A09 79207072
00001A0D 6F677261
00001A11 6D732E20
00001A15 596F7520
00001A19 63616E20
00001A1D 64697669
00001A21 6465206C
00001A25 61726765
00001A29 2070726F
00001A2D 6772616D
00001A31 7320696E
00001A35 746F2073
00001A39 65676D65
00001A3D 6E7473
659:00001A40 3C776974 "with one simple command. These segments will be read in from"
00001A44 68206F6E
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 40
00001A48 65207369
00001A4C 6D706C65
00001A50 20636F6D
00001A54 6D616E64
00001A58 2E205468
00001A5C 65736520
00001A60 7365676D
00001A64 656E7473
00001A68 2077696C
00001A6C 6C206265
00001A70 20726561
00001A74 6420696E
00001A78 2066726F
00001A7C 6D
660:00001A7D 3A746865 "the disk when they are needed. They will be discarded when"
00001A81 20646973
00001A85 6B207768
00001A89 656E2074
00001A8D 68657920
00001A91 61726520
00001A95 6E656564
00001A99 65642E20
00001A9D 54686579
00001AA1 2077696C
00001AA5 6C206265
00001AA9 20646973
00001AAD 63617264
00001AB1 65642077
00001AB5 68656E
661:00001AB8 3A6D656D "memory space is short. This happens automatically, without"
00001ABC 6F727920
00001AC0 73706163
00001AC4 65206973
00001AC8 2073686F
00001ACC 72742E20
00001AD0 54686973
00001AD4 20686170
00001AD8 70656E73
00001ADC 20617574
00001AE0 6F6D6174
00001AE4 6963616C
00001AE8 6C792C20
00001AEC 77697468
00001AF0 6F7574
662:00001AF3 23616E79 "any effort by the BASIC programmer."
00001AF7 20656666
00001AFB 6F727420
00001AFF 62792074
00001B03 68652042
00001B07 41534943
00001B0B 2070726F
00001B0F 6772616D
00001B13 6D65722E
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 41
663:00001B17 00 ""
664:00001B18 3E202020 " Many small programs can be compiled together as a package."
00001B1C 204D616E
00001B20 7920736D
00001B24 616C6C20
00001B28 70726F67
00001B2C 72616D73
00001B30 2063616E
00001B34 20626520
00001B38 636F6D70
00001B3C 696C6564
00001B40 20746F67
00001B44 65746865
00001B48 72206173
00001B4C 20612070
00001B50 61636B61
00001B54 67652E
665:00001B57 3E546865 "These programs can all be in memory at the same time. When one"
00001B5B 73652070
00001B5F 726F6772
00001B63 616D7320
00001B67 63616E20
00001B6B 616C6C20
00001B6F 62652069
00001B73 6E206D65
00001B77 6D6F7279
00001B7B 20617420
00001B7F 74686520
00001B83 73616D65
00001B87 2074696D
00001B8B 652E2057
00001B8F 68656E20
00001B93 6F6E65
666:00001B96 3F70726F "program calls another program in the package, the code will not"
00001B9A 6772616D
00001B9E 2063616C
00001BA2 6C732061
00001BA6 6E6F7468
00001BAA 65722070
00001BAE 726F6772
00001BB2 616D2069
00001BB6 6E207468
00001BBA 65207061
00001BBE 636B6167
00001BC2 652C2074
00001BC6 68652063
00001BCA 6F646520
00001BCE 77696C6C
00001BD2 206E6F74
667:00001BD6 1E686176 "have to be read from the disk."
00001BDA 6520746F
00001BDE 20626520
00001BE2 72656164
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 42
00001BE6 2066726F
00001BEA 6D207468
00001BEE 65206469
00001BF2 736B2E
668:00001BF5 00 ""
669:00001BF6 3B202020 " Programs with large data spaces are handled easily too."
00001BFA 2050726F
00001BFE 6772616D
00001C02 73207769
00001C06 7468206C
00001C0A 61726765
00001C0E 20646174
00001C12 61207370
00001C16 61636573
00001C1A 20617265
00001C1E 2068616E
00001C22 646C6564
00001C26 20656173
00001C2A 696C7920
00001C2E 746F6F2E
670:00001C32 40417272 "Arrays are dynamic. They can be erased and created again, with a"
00001C36 61797320
00001C3A 61726520
00001C3E 64796E61
00001C42 6D69632E
00001C46 20546865
00001C4A 79206361
00001C4E 6E206265
00001C52 20657261
00001C56 73656420
00001C5A 616E6420
00001C5E 63726561
00001C62 74656420
00001C66 61676169
00001C6A 6E2C2077
00001C6E 69746820
00001C72 61
671:00001C73 3E646966 "different size, while the program is running. Large arrays are"
00001C77 66657265
00001C7B 6E742073
00001C7F 697A652C
00001C83 20776869
00001C87 6C652074
00001C8B 68652070
00001C8F 726F6772
00001C93 616D2069
00001C97 73207275
00001C9B 6E6E696E
00001C9F 672E204C
00001CA3 61726765
00001CA7 20617272
00001CAB 61797320
00001CAF 617265
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 43
672:00001CB2 3D72656C "relocatable blocks. The move around in memory to reuse space."
00001CB6 6F636174
00001CBA 61626C65
00001CBE 20626C6F
00001CC2 636B732E
00001CC6 20546865
00001CCA 206D6F76
00001CCE 65206172
00001CD2 6F756E64
00001CD6 20696E20
00001CDA 6D656D6F
00001CDE 72792074
00001CE2 6F207265
00001CE6 75736520
00001CEA 73706163
00001CEE 652E
673:00001CF0 03454E44 "END"
674:
675: ; Industrial strength
676:
677:00001CF4 $$ STR#,507,32
678:00001CF4 000C 12
679:00001CF6 3D202020 " PCBASIC is an 'Industrial Strength' programming language."
00001CFA 20504342
00001CFE 41534943
00001D02 20697320
00001D06 616E2027
00001D0A 496E6475
00001D0E 73747269
00001D12 616C2053
00001D16 7472656E
00001D1A 67746827
00001D1E 2070726F
00001D22 6772616D
00001D26 6D696E67
00001D2A 206C616E
00001D2E 67756167
00001D32 652E
680:00001D34 40546869 "This means all the features of the Macintosh are accessible from"
00001D38 73206D65
00001D3C 616E7320
00001D40 616C6C20
00001D44 74686520
00001D48 66656174
00001D4C 75726573
00001D50 206F6620
00001D54 74686520
00001D58 4D616369
00001D5C 6E746F73
00001D60 68206172
00001D64 65206163
00001D68 63657373
00001D6C 69626C65
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 44
00001D70 2066726F
00001D74 6D
681:00001D75 3A504342 "PCBASIC. The important features, such as dialogs, windows,"
00001D79 41534943
00001D7D 2E205468
00001D81 6520696D
00001D85 706F7274
00001D89 616E7420
00001D8D 66656174
00001D91 75726573
00001D95 2C207375
00001D99 63682061
00001D9D 73206469
00001DA1 616C6F67
00001DA5 732C2077
00001DA9 696E646F
00001DAD 77732C
682:00001DB0 41736372 "scroll bars, menus, and alert boxes are all part of the extended"
00001DB4 6F6C6C20
00001DB8 62617273
00001DBC 2C206D65
00001DC0 6E75732C
00001DC4 2020616E
00001DC8 6420616C
00001DCC 65727420
00001DD0 626F7865
00001DD4 73206172
00001DD8 6520616C
00001DDC 6C207061
00001DE0 7274206F
00001DE4 66207468
00001DE8 65206578
00001DEC 74656E64
00001DF0 6564
683:00001DF2 42424153 "BASIC language. All of the other features in the ROM and Operating"
00001DF6 4943206C
00001DFA 616E6775
00001DFE 6167652E
00001E02 20416C6C
00001E06 206F6620
00001E0A 74686520
00001E0E 6F746865
00001E12 72206665
00001E16 61747572
00001E1A 65732069
00001E1E 6E207468
00001E22 6520524F
00001E26 4D20616E
00001E2A 64204F70
00001E2E 65726174
00001E32 696E67
684:00001E35 3E537973 "System, can be called from BASIC. Special BASIC statements can"
00001E39 74656D2C
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 45
00001E3D 2063616E
00001E41 20626520
00001E45 63616C6C
00001E49 65642066
00001E4D 726F6D20
00001E51 42415349
00001E55 432E2053
00001E59 70656369
00001E5D 616C2042
00001E61 41534943
00001E65 20737461
00001E69 74656D65
00001E6D 6E747320
00001E71 63616E
685:00001E74 3F616363 "access any of the ToolBox and QuickDraw routines. Even register"
00001E78 65737320
00001E7C 616E7920
00001E80 6F662074
00001E84 68652054
00001E88 6F6F6C42
00001E8C 6F782061
00001E90 6E642051
00001E94 7569636B
00001E98 44726177
00001E9C 20726F75
00001EA0 74696E65
00001EA4 732E2045
00001EA8 76656E20
00001EAC 72656769
00001EB0 73746572
686:00001EB4 3F626173 "based calls, and calls that return function values can be used."
00001EB8 65642063
00001EBC 616C6C73
00001EC0 2C20616E
00001EC4 64206361
00001EC8 6C6C7320
00001ECC 74686174
00001ED0 20726574
00001ED4 75726E20
00001ED8 66756E63
00001EDC 74696F6E
00001EE0 2076616C
00001EE4 75657320
00001EE8 63616E20
00001EEC 62652075
00001EF0 7365642E
687:00001EF4 3B506173 "Pascal or Assembler code can be linked to PCBASIC programs,"
00001EF8 63616C20
00001EFC 6F722041
00001F00 7373656D
00001F04 626C6572
00001F08 20636F64
00001F0C 65206361
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 46
00001F10 6E206265
00001F14 206C696E
00001F18 6B656420
00001F1C 746F2050
00001F20 43424153
00001F24 49432070
00001F28 726F6772
00001F2C 616D732C
688:00001F30 3D6F7220 "or short segments of 68000 Assembly language can actually be "
00001F34 73686F72
00001F38 74207365
00001F3C 676D656E
00001F40 7473206F
00001F44 66203638
00001F48 30303020
00001F4C 41737365
00001F50 6D626C79
00001F54 206C616E
00001F58 67756167
00001F5C 65206361
00001F60 6E206163
00001F64 7475616C
00001F68 6C792062
00001F6C 6520
689:00001F6E 1F696D62 "imbedded within the BASIC code."
00001F72 65646465
00001F76 64207769
00001F7A 7468696E
00001F7E 20746865
00001F82 20424153
00001F86 49432063
00001F8A 6F64652E
690:00001F8E 03454E44 "END"
691:
692: ; Introduction
693:
694:00001F92 $$ STR#,508,32
695:00001F92 0011 17
696:00001F94 37205043 " PCBASIC is a BASIC compiler from Pterodactyl Software."
00001F98 42415349
00001F9C 43206973
00001FA0 20612042
00001FA4 41534943
00001FA8 20636F6D
00001FAC 70696C65
00001FB0 72206672
00001FB4 6F6D2050
00001FB8 7465726F
00001FBC 64616374
00001FC0 796C2053
00001FC4 6F667477
00001FC8 6172652E
697:00001FCC 022020 " "
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 47
698:00001FCF 2E205468 " There are two versions on the shareware disk:"
00001FD3 65726520
00001FD7 61726520
00001FDB 74776F20
00001FDF 76657273
00001FE3 696F6E73
00001FE7 206F6E20
00001FEB 74686520
00001FEF 73686172
00001FF3 65776172
00001FF7 65206469
00001FFB 736B3A
699:00001FFE 022020 " "
700:00002001 30202020 " PCBASIC MPW is a 'tool' which runs under MPW."
00002005 50434241
00002009 53494320
0000200D 4D505720
00002011 69732061
00002015 2027746F
00002019 6F6C2720
0000201D 77686963
00002021 68207275
00002025 6E732075
00002029 6E646572
0000202D 204D5057
00002031 2E
701:00002032 28202020 " PCBASIC STA is a standalone compiler."
00002036 50434241
0000203A 53494320
0000203E 53544120
00002042 69732061
00002046 20737461
0000204A 6E64616C
0000204E 6F6E6520
00002052 636F6D70
00002056 696C6572
0000205A 2E
702:0000205B 022020 " "
703:0000205E 37205468 " This program demonstrates a few of PCBASIC's features."
00002062 69732070
00002066 726F6772
0000206A 616D2064
0000206E 656D6F6E
00002072 73747261
00002076 74657320
0000207A 61206665
0000207E 77206F66
00002082 20504342
00002086 41534943
0000208A 27732066
0000208E 65617475
00002092 7265732E
704:00002096 022020 " "
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 48
705:00002099 28202020 " To get your copy of PCBASIC contact "
0000209D 20546F20
000020A1 67657420
000020A5 796F7572
000020A9 20636F70
000020AD 79206F66
000020B1 20504342
000020B5 41534943
000020B9 20636F6E
000020BD 74616374
000020C1 20
706:000020C2 0120 " "
707:000020C4 1D202020 " Harland Harrison "
000020C8 20202020
000020CC 20202048
000020D0 61726C61
000020D4 6E642048
000020D8 61727269
000020DC 736F6E20
000020E0 2020
708:000020E2 22202020 " Pterodactyl Software "
000020E6 20202020
000020EA 20202050
000020EE 7465726F
000020F2 64616374
000020F6 796C2053
000020FA 6F667477
000020FE 61726520
00002102 202020
709:00002105 22202020 " 200 Davey Glen Rd #416 "
00002109 20202020
0000210D 20202032
00002111 30302044
00002115 61766579
00002119 20476C65
0000211D 6E205264
00002121 20233431
00002125 362020
710:00002128 22202020 " Belmont CA 94002 "
0000212C 20202020
00002130 20202042
00002134 656C6D6F
00002138 6E742043
0000213C 41202039
00002140 34303032
00002144 20202020
00002148 202020
711:0000214B 22202020 " (415) 591-5270 "
0000214F 20202020
00002153 20202020
00002157 28343135
0000215B 29203539
0000215F 312D3532
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 49
00002163 37302020
00002167 20202020
0000216B 202020
712:0000216E 03454E44 "END"
713:
714: ; Runtime Configuration
715:
716:00002172 [[ CFIG,301
717: ; .I
718: ; SCREEN buffer & Update method
719: ; 2 = Text buffer with attributes
720: ; 6 = Text buffer without attributes
721: ; 10 = Text buffer exists but don't use for automatic update
722: ; 14 = Text buffer without attributes but don't update
723:00002172 0002 DC.W 2
724: ; String Space growth rate
725:00002174 1000 DC.W 4096
726: ; File Buffer Space
727:00002176 1000 DC.W 4096
728: ; Document Width
729:00002178 0280 DC.W 640
730: ; Document Height
731:0000217A 0190 DC.W 400
732: ; Border Width
733:0000217C 0028 DC.W 40
734: ; Border Height
735:0000217E 001E DC.W 30
736: ; Horiz Point Scale * 16
737:00002180 0010 DC.W 16
738: ; Vert Point Scale * 16
739:00002182 0010 DC.W 16
740: ; Aspect *16
741:00002184 0010 DC.W 16
742: ; Default font
743:00002186 0000 DC.W 0
744: ; Default font size
745:00002188 000C DC.W 12
746: ; Character cell Height
747:0000218A 000C DC.W 12
748: ; Character cell Width
749:0000218C FFFF DC.W -1
750:0000218E ]]
751:
752:
753: ; File reference for program
754:
755:0000218E $$ FREF,128 FREF resc, ID = 128
756:0000218E 4150504C APPL filetype
757:00002192 0000 0 local ID for icon list
758:00002194 00 | no filename follows the application
759:
760: ; File reference for document
761:
McASM V6.0 Filename: &8073PCBASICDemoR Page no. 50
762:00002195 $$ FREF,129 FREF resc, ID = 129
763:00002195 54455854 TEXT filetype
764:00002199 0001 1 local ID for icon list
765:0000219B 00 | no filename follows the application
766:
767: ; Bundle
768:
769:0000219C $$ BNDL,128 bundle resc, ID = 128
770:0000219C 44454D4F DEMO the application's signature again
771:000021A0 0000 0 ID is again 0 by convention
772:000021A2 0001 2 two resc types in the BNDL list:
773:000021A4 49434E23 ICN#,2 map one icon list:
000021A8 0001
774:000021AA 00000080 0,128 local ID 0 -> actual ID 128
775:000021AE 00010081 1,129
776:000021B2 46524546 FREF,2 map one FREF list:
000021B6 0001
777:000021B8 00000080 0,128 local ID 0 -> actual ID 128
778:000021BC 00010081 1,129
779:
780:
781:
Assembly completed for file &8073PCBASICDemoR
Code size = 0, Resource size = 8640, A5 size = 0, JTBL size = 0
Number of errors = 0, number of warnings = 0
