-
Notifications
You must be signed in to change notification settings - Fork 2
/
colossal-adventure-v1.txt
1658 lines (1658 loc) · 100 KB
/
colossal-adventure-v1.txt
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
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
**************************************************************************
Level 9 A-Code game dissassembly for
**************************************************************************
0x7e0
0x0000 (0x07e0): (0x00) Goto 0x0005
**************************************************************************
0x0002 (0x07e2): (0x00) Goto 0x0049
**************************************************************************
0x0005 (0x07e5): (0x06) Function - Clear Workspace (0x05)
0x0007 (0x07e7): (0x08) Set var[0x01] = (constant) 0x01
0x000a (0x07ea): (0x08) Set var[0x02] = (constant) 0x02
0x000d (0x07ed): (0x08) Set var[0x03] = (constant) 0xff
0x0010 (0x07f0): (0x09) Set var[0x04] = var[0x01]
0x0013 (0x07f3): (0xa2) Set var[0x05] = list#2[var[0x04]] (list address 0x0795)
0x0016 (0x07f6): (0xe3) Set list#3[var[0x04]] = var[0x05] (list address 0x0860)
0x0019 (0x07f9): (0xe5) Set list#5[var[0x04]] = var[0x06] (list address 0x08b0)
0x001c (0x07fc): (0xe1) Set list#1[var[0x04]] = var[0x06] (list address 0x07e0)
0x001f (0x07ff): (0x0a) Set var[0x04] += var[0x01]
0x0022 (0x0802): (0x1a) If var[0x04] < (constant) 0x22 then Goto 0x0013
0x0026 (0x0806): (0xe1) Set list#1[var[0x04]] = var[0x06] (list address 0x07e0)
0x0029 (0x0809): (0x0a) Set var[0x04] += var[0x01]
0x002c (0x080c): (0x1a) If var[0x04] < (constant) 0x6e then Goto 0x0026
0x0030 (0x0810): (0x08) Set var[0x07] = (constant) 0x78
0x0033 (0x0813): (0x09) Set var[0x08] = var[0x02]
0x0036 (0x0816): (0x08) Set var[0x09] = (constant) 0x1e
0x0039 (0x0819): (0x09) Set var[0x0a] = var[0x02]
0x003c (0x081c): (0x09) Set var[0x0b] = var[0x01]
0x003f (0x081f): (0x08) Set var[0x0c] = (constant) 0xd8
0x0042 (0x0822): (0x04) Print message var[0x01]
/ Print message "\n "
0x0044 (0x0824): (0x05) Print message (constant) 0x0c
0x0046 (0x0826): (0x09) Set var[0x0d] = var[0x01]
0x0049 (0x0829): (0x00) Goto 0x03ed
**************************************************************************
0x004c (0x082c): (0x01) Gosub 0x0da7
0x004f (0x082f): (0x09) Set var[0x0e] = var[0x0f]
0x0052 (0x0832): (0x19) If var[0x0d] != (constant) 0x32 then Goto 0x0059
0x0056 (0x0836): (0x09) Set var[0x10] = var[0x01]
0x0059 (0x0839): (0x1b) If var[0x0d] > (constant) 0xa5 then Goto 0x0061
0x005d (0x083d): (0x1b) If var[0x0d] > (constant) 0x31 then Goto 0x0066
0x0061 (0x0841): (0x09) Set var[0x11] = var[0x06]
0x0064 (0x0844): (0x00) Goto 0x0084
**************************************************************************
0x0066 (0x0846): (0x06) Function - Random - Set var[0x04]=<random number>
0x0069 (0x0849): (0x1b) If var[0x04] > (constant) 0x05 then Goto 0x0084
0x006d (0x084d): (0x12) If var[0x04] < var[0x02] then Goto 0x009e
0x0071 (0x0851): (0x13) If var[0x12] > var[0x06] then Goto 0x007c
/ Print message "\nA dwarf appears and throws an axe which misses you. The dwarf curses and runs off round a corner "
0x0075 (0x0855): (0x05) Print message (constant) 0x5b
0x0077 (0x0857): (0x83) Set list#3[0x1a] = var[0xd]
0x007a (0x085a): (0x00) Goto 0x0081
**************************************************************************
/ Print message "\nAn evil little dwarf appears! "
0x007c (0x085c): (0x05) Print message (constant) 0x5c
0x007e (0x085e): (0x0a) Set var[0x11] += var[0x01]
0x0081 (0x0861): (0x0a) Set var[0x12] += var[0x01]
0x0084 (0x0864): (0x01) Gosub 0x0f33
0x0087 (0x0867): (0x01) Gosub 0x0f25
/ Print message "\nWhat now?\n "
0x008a (0x086a): (0x05) Print message (constant) 0x0d
0x008c (0x086c): (0x07) Input - results in word1 var[0x13], word2 var[0x14], word3 var[0x15], count var[0x16]
0x0091 (0x0871): (0x06) Function - Clear Stack (0x06)
0x0093 (0x0873): (0x01) Gosub 0x0f0b
0x0096 (0x0876): (0x10) If var[0x16] == var[0x06] then Goto 0x008c
0x009a (0x087a): (0x0e) Jump table at 0x00bf (0x089f) - nth entry in var[0x13]
0x009e (0x087e): (0xc5) Set var[0x04] = list#5[0x18]
0x00a1 (0x0881): (0x10) If var[0x04] == var[0x01] then Goto 0x0071
0x00a5 (0x0885): (0x09) Set var[0x17] = var[0x03]
0x00a8 (0x0888): (0x09) Set var[0x18] = var[0x03]
0x00ab (0x088b): (0x01) Gosub 0x09b3
0x00ae (0x088e): (0x10) If var[0x19] == var[0x06] then Goto 0x0071
0x00b2 (0x0892): (0x08) Set var[0x18] = (constant) 0x73
0x00b5 (0x0895): (0x83) Set list#3[0x18] = var[0x18]
0x00b8 (0x0898): (0x01) Gosub 0x09b3
/ Print message "\nOut from the shadows behind you pounces a bearded pirate! "HAR, HAR", he chortles, "I'll just take all this booty and hide it with me chest deep in the maze!". He snatches all of your treasure and vanishes into the gloom\n "
0x00bb (0x089b): (0x05) Print message (constant) 0x5d
0x00bd (0x089d): (0x00) Goto 0x0084
**************************************************************************
Jump Table (Idx)
**************************************************************************
0x00bf (0x089f): (0x00) If player cmd in n/a Goto 0x01b5
0x00c1 (0x08a1): (0x01) If player cmd in {'NORTH'} Goto 0x0237
0x00c3 (0x08a3): (0x02) If player cmd in {'NORTHEAST', 'NEAST'} Goto 0x0237
0x00c5 (0x08a5): (0x03) If player cmd in {'EAST'} Goto 0x0237
0x00c7 (0x08a7): (0x04) If player cmd in {'SOUTH'} Goto 0x0237
0x00c9 (0x08a9): (0x05) If player cmd in {'SEAST', 'SOUTHEAST'} Goto 0x0237
0x00cb (0x08ab): (0x06) If player cmd in {'SWEST', 'SOUTHWEST'} Goto 0x0237
0x00cd (0x08ad): (0x07) If player cmd in {'WEST'} Goto 0x0237
0x00cf (0x08af): (0x08) If player cmd in {'NWEST', 'NORTHWEST'} Goto 0x0237
0x00d1 (0x08b1): (0x09) If player cmd in {'UPWARDS', 'ABOVE'} Goto 0x0237
0x00d3 (0x08b3): (0x0a) If player cmd in {'DOWN'} Goto 0x0237
0x00d5 (0x08b5): (0x0b) If player cmd in {'INSIDE', 'INTO', 'ENTER'} Goto 0x0237
0x00d7 (0x08b7): (0x0c) If player cmd in {'EXIT', 'LEAVE', 'OUTSIDE'} Goto 0x0237
0x00d9 (0x08b9): (0x0d) If player cmd in {'LEAP', 'JUMP'} Goto 0x0237
0x00db (0x08bb): (0x0e) If player cmd in {'CLIMB'} Goto 0x0237
0x00dd (0x08bd): (0x0f) If player cmd in {'CROSS', 'OVER', 'ACROSS'} Goto 0x0237
0x00df (0x08bf): (0x10) If player cmd in {'CARRY', 'GET', 'KEEP', 'TAKE', 'CATCH'} Goto 0x04a5
0x00e1 (0x08c1): (0x11) If player cmd in {'DROP', 'RELEASE', 'DISCARD', 'FREE'} Goto 0x051b
0x00e3 (0x08c3): (0x12) If player cmd in {'LOB', 'THROW', 'CHUCK'} Goto 0x05d3
0x00e5 (0x08c5): (0x13) If player cmd in {'UNLOCK', 'OPEN'} Goto 0x065c
0x00e7 (0x08c7): (0x14) If player cmd in {'LOCK', 'SHUT', 'CLOSE'} Goto 0x0db6
0x00e9 (0x08c9): (0x15) If player cmd in {'ON', 'LIGHT'} Goto 0x0707
0x00eb (0x08cb): (0x16) If player cmd in {'OFF'} Goto 0x071a
0x00ed (0x08cd): (0x17) If player cmd in {'FILL'} Goto 0x0728
0x00ef (0x08cf): (0x18) If player cmd in {'EMPTY'} Goto 0x075b
0x00f1 (0x08d1): (0x19) If player cmd in {'POUR'} Goto 0x07c7
0x00f3 (0x08d3): (0x1a) If player cmd in {'FIGHT', 'ATTACK', 'KILL', 'HIT'} Goto 0x07e8
0x00f5 (0x08d5): (0x1b) If player cmd in {'READ'} Goto 0x086b
0x00f7 (0x08d7): (0x1c) If player cmd in {'OIL'} Goto 0x07a9
0x00f9 (0x08d9): (0x1d) If player cmd in {'WATER'} Goto 0x0776
0x00fb (0x08db): (0x1e) If player cmd in {'SCORE'} Goto 0x087d
0x00fd (0x08dd): (0x1f) If player cmd in {'QUIT', 'STOP'} Goto 0x092e
0x00ff (0x08df): (0x20) If player cmd in {'PLUGH'} Goto 0x0947
0x0101 (0x08e1): (0x21) If player cmd in {'XYZZY'} Goto 0x0966
0x0103 (0x08e3): (0x22) If player cmd in {'PLOVER'} Goto 0x097f
0x0105 (0x08e5): (0x23) If player cmd in {'GRATE'} Goto 0x01bd
0x0107 (0x08e7): (0x24) If player cmd in {'KEYS', 'BUNCH'} Goto 0x01bd
0x0109 (0x08e9): (0x25) If player cmd in {'LAMP', 'LANTERN'} Goto 0x01bd
0x010b (0x08eb): (0x26) If player cmd in {'SANDWICHES', 'FOOD'} Goto 0x01bd
0x010d (0x08ed): (0x27) If player cmd in {'BOTTLE'} Goto 0x01bd
0x010f (0x08ef): (0x28) If player cmd in {'CAGE'} Goto 0x01bd
0x0111 (0x08f1): (0x29) If player cmd in {'ROD'} Goto 0x01bd
0x0113 (0x08f3): (0x2a) If player cmd in {'BIRD'} Goto 0x01bd
0x0115 (0x08f5): (0x2b) If player cmd in {'GOLD', 'NUGGET'} Goto 0x0e25
0x0117 (0x08f7): (0x2c) If player cmd in {'BARS', 'SILVER'} Goto 0x01bd
0x0119 (0x08f9): (0x2d) If player cmd in {'JEWELRY'} Goto 0x01bd
0x011b (0x08fb): (0x2e) If player cmd in {'DIAMONDS'} Goto 0x01bd
0x011d (0x08fd): (0x2f) If player cmd in {'BEAR'} Goto 0x01bd
0x011f (0x08ff): (0x30) If player cmd in {'PLATINUM', 'PYRAMID'} Goto 0x01bd
0x0121 (0x0901): (0x31) If player cmd in {'EMERALD'} Goto 0x01bd
0x0123 (0x0903): (0x32) If player cmd in {'EGGS'} Goto 0x01bd
0x0125 (0x0905): (0x33) If player cmd in {'PILLOW', 'CUSHION'} Goto 0x01bd
0x0127 (0x0907): (0x34) If player cmd in {'VASE'} Goto 0x01bd
0x0129 (0x0909): (0x35) If player cmd in {'TRIDENT', 'FORK'} Goto 0x01bd
0x012b (0x090b): (0x36) If player cmd in {'PEARL'} Goto 0x01bd
0x012d (0x090d): (0x37) If player cmd in {'GAZETTE', 'MAGAZINE', 'SPELUNKERS'} Goto 0x01bd
0x012f (0x090f): (0x38) If player cmd in {'COINS', 'MONEY'} Goto 0x01bd
0x0131 (0x0911): (0x39) If player cmd in {'CHAIN'} Goto 0x01bd
0x0133 (0x0913): (0x3a) If player cmd in {'RUG', 'CARPET'} Goto 0x01bd
0x0135 (0x0915): (0x3b) If player cmd in {'CHEST', 'TREASURE'} Goto 0x01bd
0x0137 (0x0917): (0x3c) If player cmd in {'SPICES'} Goto 0x01bd
0x0139 (0x0919): (0x3d) If player cmd in {'AXE', 'HATCHET'} Goto 0x01bd
0x013b (0x091b): (0x3e) If player cmd in {'DYNAMITE'} Goto 0x01bd
0x013d (0x091d): (0x3f) If player cmd in {'JADE', 'PENTACLE'} Goto 0x01bd
0x013f (0x091f): (0x40) If player cmd in {'ELIXIR'} Goto 0x01bd
0x0141 (0x0921): (0x41) If player cmd in {'ORB'} Goto 0x01bd
0x0143 (0x0923): (0x42) If player cmd in {'SCEPTRE'} Goto 0x01bd
0x0145 (0x0925): (0x43) If player cmd in {'CROWN'} Goto 0x01bd
0x0147 (0x0927): (0x44) If player cmd in {'BREAK', 'SMASH'} Goto 0x0b80
0x0149 (0x0929): (0x45) If player cmd in {'DWARVES', 'DWARF'} Goto 0x01bd
0x014b (0x092b): (0x46) If player cmd in {'PLANT', 'BEANSTALK'} Goto 0x01bd
0x014d (0x092d): (0x47) If player cmd in {'CATALOGUE', 'INVENTORY'} Goto 0x048f
0x014f (0x092f): (0x48) If player cmd in {'DRAGON'} Goto 0x01bd
0x0151 (0x0931): (0x49) If player cmd in {'SNAKE'} Goto 0x01bd
0x0153 (0x0933): (0x4a) If player cmd in {'EAT'} Goto 0x0b8d
0x0155 (0x0935): (0x4b) If player cmd in {'OK', 'PLEASE', 'YEAH', 'YES'} Goto 0x01bd
0x0157 (0x0937): (0x4c) If player cmd in {'NON', 'NEIN', 'NIET'} Goto 0x01bd
0x0159 (0x0939): (0x4d) If player cmd in {'GIVE'} Goto 0x0bf0
0x015b (0x093b): (0x4e) If player cmd in {'DESCRIBE', 'LOOK'} Goto 0x03ed
0x015d (0x093d): (0x4f) If player cmd in {'FEE'} Goto 0x0bc7
0x015f (0x093f): (0x50) If player cmd in {'FIE'} Goto 0x0bc7
0x0161 (0x0941): (0x51) If player cmd in {'FOE'} Goto 0x0bc7
0x0163 (0x0943): (0x52) If player cmd in {'FOO'} Goto 0x0bc7
0x0165 (0x0945): (0x53) If player cmd in {'RUB'} Goto 0x0c5c
0x0167 (0x0947): (0x54) If player cmd in {'DETONATE', 'BLAST'} Goto 0x0c6c
0x0169 (0x0949): (0x55) If player cmd in {'CLAM', 'OYSTER'} Goto 0x01bd
0x016b (0x094b): (0x56) If player cmd in {'MIRROR'} Goto 0x01bd
0x016d (0x094d): (0x57) If player cmd in {'FEED'} Goto 0x0abb
0x016f (0x094f): (0x58) If player cmd in {'WAVE', 'SHAKE'} Goto 0x0b18
0x0171 (0x0951): (0x59) If player cmd in {'SHAZAM', 'SESAME', 'HOCUS'} Goto 0x0b78
0x0173 (0x0953): (0x5a) If player cmd in {'DRINK'} Goto 0x0ba1
0x0175 (0x0955): (0x5b) If player cmd in {'DOOR'} Goto 0x01b5
0x0177 (0x0957): (0x5c) If player cmd in {'SAVE'} Goto 0x0ead
0x0179 (0x0959): (0x5d) If player cmd in {'RESTORE'} Goto 0x0eb5
0x017b (0x095b): (0x5e) If player cmd in {'SAY'} Goto 0x0e31
**************************************************************************
0x017d (0x095d): (0x01) Gosub 0x0cbb
0x0180 (0x0960): (0x1a) If var[0x0d] < (constant) 0x32 then Goto 0x004c
0x0185 (0x0965): (0x10) If var[0x11] == var[0x06] then Goto 0x004c
0x018a (0x096a): (0x06) Function - Random - Set var[0x04]=<random number>
0x018d (0x096d): (0x1b) If var[0x04] > (constant) 0x50 then Goto 0x004c
/ Print message "\nA sharp little knife is thrown at you\n "
0x0192 (0x0972): (0x05) Print message (constant) 0x5e
0x0194 (0x0974): (0x08) Set var[0x04] = (constant) 0x14
0x0197 (0x0977): (0x10) If var[0x0a] == var[0x06] then Goto 0x019e
0x019b (0x097b): (0x08) Set var[0x04] = (constant) 0x32
0x019e (0x097e): (0x10) If var[0x11] == var[0x01] then Goto 0x01a5
0x01a2 (0x0982): (0x0a) Set var[0x04] += var[0x04]
0x01a5 (0x0985): (0x06) Function - Random - Set var[0x05]=<random number>
0x01a8 (0x0988): (0x13) If var[0x05] > var[0x04] then Goto 0x01b0
/ Print message "It gets you! "
0x01ac (0x098c): (0x05) Print message (constant) 0x5f
0x01ae (0x098e): (0x00) Goto 0x01cd
**************************************************************************
/ Print message "It misses! "
0x01b0 (0x0990): (0x05) Print message (constant) 0x60
0x01b2 (0x0992): (0x00) Goto 0x004c
**************************************************************************
/ Print message "I don't understand\n "
0x01b5 (0x0995): (0x05) Print message (constant) 0x05
0x01b7 (0x0997): (0x00) Goto 0x017d
**************************************************************************
/ Print message "Please be more specific "
0x01b9 (0x0999): (0x05) Print message (constant) 0x06
0x01bb (0x099b): (0x00) Goto 0x017d
**************************************************************************
/ Print message "Eh? "
0x01bd (0x099d): (0x05) Print message (constant) 0x07
0x01bf (0x099f): (0x00) Goto 0x017d
**************************************************************************
/ Print message "You can't see it "
0x01c1 (0x09a1): (0x05) Print message (constant) 0x08
0x01c3 (0x09a3): (0x00) Goto 0x017d
**************************************************************************
/ Print message "You don't have it "
0x01c5 (0x09a5): (0x05) Print message (constant) 0x09
0x01c7 (0x09a7): (0x00) Goto 0x017d
**************************************************************************
/ Print message "Are you mad? You should only attack enemies "
0x01c9 (0x09a9): (0x05) Print message (constant) 0x4d
0x01cb (0x09ab): (0x00) Goto 0x017d
**************************************************************************
0x01cd (0x09ad): (0x09) Set var[0x17] = var[0x0d]
0x01d0 (0x09b0): (0x08) Set var[0x0d] = (constant) 0x13
0x01d3 (0x09b3): (0x13) If var[0x1a] > var[0x06] then Goto 0x0213
0x01d7 (0x09b7): (0x0a) Set var[0x1b] += var[0x01]
0x01da (0x09ba): (0x08) Set var[0x04] = (constant) 0x34
0x01dd (0x09bd): (0x0a) Set var[0x04] += var[0x1b]
0x01e0 (0x09c0): (0x04) Print message var[0x04]
/ Print message "\nI'm not very good at this ... but do you want me to try and resurrect you?\n "
0x01e2 (0x09c2): (0x05) Print message (constant) 0x298
0x01e5 (0x09c5): (0x07) Input - results in word1 var[0x13], word2 var[0x14], word3 var[0x15], count var[0x16]
0x01ea (0x09ca): (0x01) Gosub 0x0c41
0x01ed (0x09cd): (0x10) If var[0x1c] == var[0x02] then Goto 0x01e2
0x01f1 (0x09d1): (0x10) If var[0x1c] == var[0x06] then Goto 0x0213
0x01f5 (0x09d5): (0x1a) If var[0x1b] < (constant) 0x03 then Goto 0x01fe
/ Print message "Curses, the green smoke is used up! "
0x01f9 (0x09d9): (0x05) Print message (constant) 0x29a
0x01fc (0x09dc): (0x00) Goto 0x0213
**************************************************************************
/ Print message "There is a puff of choking green smoke. It gradually clears and...\n "
0x01fe (0x09de): (0x05) Print message (constant) 0x299
0x0201 (0x09e1): (0x09) Set var[0x18] = var[0x17]
0x0204 (0x09e4): (0x01) Gosub 0x09b3
0x0207 (0x09e7): (0x83) Set list#3[0x2] = var[0x1]
0x020a (0x09ea): (0x09) Set var[0x0a] = var[0x06]
0x020d (0x09ed): (0x08) Set var[0x0d] = (constant) 0x0e
0x0210 (0x09f0): (0x00) Goto 0x0049
**************************************************************************
/ Print message "\nYou scored "
0x0213 (0x09f3): (0x05) Print message (constant) 0x52
0x0215 (0x09f5): (0x01) Gosub 0x0888
0x0218 (0x09f8): (0x03) Print Number var[0x1c]
/ Print message "out of 1100\n "
0x021a (0x09fa): (0x05) Print message (constant) 0x51
0x021c (0x09fc): (0x04) Print message var[0x1d]
0x021e (0x09fe): (0x08) Set var[0x0d] = (constant) 0x13
/ Print message "\nWould you like another game?\n "
0x0221 (0x0a01): (0x05) Print message (constant) 0x29e
0x0224 (0x0a04): (0x07) Input - results in word1 var[0x13], word2 var[0x14], word3 var[0x15], count var[0x16]
0x0229 (0x0a09): (0x01) Gosub 0x0c41
0x022c (0x0a0c): (0x10) If var[0x1c] == var[0x02] then Goto 0x0224
0x0230 (0x0a10): (0x10) If var[0x1c] == var[0x01] then Goto 0x0000
0x0235 (0x0a15): (0x06) Function - Quit (0x01)
0x0237 (0x0a17): (0x0f) Exits - check location var[0x0d] can move var[0x13] - exit flags in var[0x04] and target location (or 0x00) in var[0x17]
0x023c (0x0a1c): (0x18) If var[0x0d] == (constant) 0x4d then Goto 0x03b9
0x0241 (0x0a21): (0x1b) If var[0x0d] > (constant) 0xa5 then Goto 0x025f
0x0245 (0x0a25): (0x1a) If var[0x0d] < (constant) 0x91 then Goto 0x025f
0x0249 (0x0a29): (0x11) If var[0x17] != var[0x06] then Goto 0x025f
0x024d (0x0a2d): (0x09) Set var[0x17] = var[0x0d]
0x0250 (0x0a30): (0x0a) Set var[0x17] += var[0x13]
0x0253 (0x0a33): (0x1a) If var[0x17] < (constant) 0xa6 then Goto 0x025f
0x0257 (0x0a37): (0x08) Set var[0x04] = (constant) 0x15
0x025a (0x0a3a): (0x0b) Set var[0x17] -= var[0x04].
0x025d (0x0a3d): (0x00) Goto 0x0253
**************************************************************************
0x025f (0x0a3f): (0x01) Gosub 0x0df3
0x0262 (0x0a42): (0x10) If var[0x17] == var[0x06] then Goto 0x027a
0x0266 (0x0a46): (0x12) If var[0x04] < var[0x02] then Goto 0x027f
0x026a (0x0a4a): (0x1b) If var[0x0d] > (constant) 0x6e then Goto 0x027f
0x026e (0x0a4e): (0xa1) Set var[0x05] = list#1[var[0x0d]] (list address 0x07e0)
0x0271 (0x0a51): (0x10) If var[0x05] == var[0x01] then Goto 0x027f
0x0275 (0x0a55): (0x01) Gosub 0x02a7
0x0277 (0x0a57): (0x00) Goto 0x017d
**************************************************************************
/ Print message "You can't move in that direction "
0x027a (0x0a5a): (0x05) Print message (constant) 0x04
0x027c (0x0a5c): (0x00) Goto 0x017d
**************************************************************************
0x027f (0x0a5f): (0x11) If var[0x17] != var[0x03] then Goto 0x0288
/ Print message "You fall to the rocks below "
0x0283 (0x0a63): (0x05) Print message (constant) 0x1c
0x0285 (0x0a65): (0x00) Goto 0x01cd
**************************************************************************
0x0288 (0x0a68): (0x01) Gosub 0x09ea
0x028b (0x0a6b): (0x10) If var[0x1e] == var[0x01] then Goto 0x029f
0x028f (0x0a6f): (0x10) If var[0x1f] == var[0x01] then Goto 0x029f
0x0293 (0x0a73): (0x06) Function - Random - Set var[0x04]=<random number>
0x0296 (0x0a76): (0x1b) If var[0x04] > (constant) 0x55 then Goto 0x029f
/ Print message "You fell into a pit in the dark: dangerous places these caves "
0x029a (0x0a7a): (0x05) Print message (constant) 0x34
0x029c (0x0a7c): (0x00) Goto 0x01cd
**************************************************************************
0x029f (0x0a7f): (0x01) Gosub 0x02e9
0x02a1 (0x0a81): (0x09) Set var[0x0d] = var[0x17]
0x02a4 (0x0a84): (0x00) Goto 0x03ed
**************************************************************************
0x02a7 (0x0a87): (0x19) If var[0x0d] != (constant) 0x04 then Goto 0x02b4
0x02ab (0x0a8b): (0x19) If var[0x17] != (constant) 0x11 then Goto 0x02b4
/ Print message "The grate is locked "
0x02af (0x0a8f): (0x05) Print message (constant) 0x10
0x02b1 (0x0a91): (0x00) Goto 0x017d
**************************************************************************
0x02b4 (0x0a94): (0x19) If var[0x0d] != (constant) 0x11 then Goto 0x02bc
0x02b8 (0x0a98): (0x18) If var[0x17] == (constant) 0x04 then Goto 0x02af
0x02bc (0x0a9c): (0x19) If var[0x0d] != (constant) 0x34 then Goto 0x02c2
/ Print message "The snake rears up above you, blocking the way out. Venom drips from its fangs, burning smoking holes in the rocky floor "
0x02c0 (0x0aa0): (0x05) Print message (constant) 0x20
0x02c2 (0x0aa2): (0x19) If var[0x0d] != (constant) 0x3a then Goto 0x02cc
0x02c6 (0x0aa6): (0x19) If var[0x17] != (constant) 0x3b then Goto 0x02cc
0x02ca (0x0aaa): (0x00) Goto 0x027a
**************************************************************************
0x02cc (0x0aac): (0x19) If var[0x0d] != (constant) 0x3b then Goto 0x02d4
0x02d0 (0x0ab0): (0x18) If var[0x17] == (constant) 0x3a then Goto 0x02ca
0x02d4 (0x0ab4): (0x19) If var[0x0d] != (constant) 0x5c then Goto 0x02de
0x02d8 (0x0ab8): (0x19) If var[0x17] != (constant) 0x5e then Goto 0x02de
/ Print message "There is nothing here to climb "
0x02dc (0x0abc): (0x05) Print message (constant) 0x39
0x02de (0x0abe): (0x19) If var[0x0d] != (constant) 0x6b then Goto 0x02e8
0x02e2 (0x0ac2): (0x19) If var[0x17] != (constant) 0x47 then Goto 0x02e8
/ Print message "The gate squeaks but does not budge. It seems to be rusted solid "
0x02e6 (0x0ac6): (0x05) Print message (constant) 0x3a
0x02e8 (0x0ac8): (0x02) Return
**************************************************************************
0x02e9 (0x0ac9): (0x01) Gosub 0x0e48
0x02ec (0x0acc): (0xc3) Set var[0x04] = list#3[0x08]
0x02ef (0x0acf): (0x11) If var[0x04] != var[0x03] then Goto 0x030d
0x02f3 (0x0ad3): (0x19) If var[0x0d] != (constant) 0x32 then Goto 0x0300
0x02f7 (0x0ad7): (0x19) If var[0x17] != (constant) 0x1f then Goto 0x0300
/ Print message "You can't climb back up to the pit from the Hall of Mists "
0x02fb (0x0adb): (0x05) Print message (constant) 0x38
0x02fd (0x0add): (0x00) Goto 0x017d
**************************************************************************
0x0300 (0x0ae0): (0x19) If var[0x0d] != (constant) 0x1f then Goto 0x030d
0x0304 (0x0ae4): (0x19) If var[0x17] != (constant) 0x32 then Goto 0x030d
/ Print message "You fall to the rocks below "
0x0308 (0x0ae8): (0x05) Print message (constant) 0x1c
0x030a (0x0aea): (0x00) Goto 0x01cd
**************************************************************************
0x030d (0x0aed): (0x19) If var[0x17] != (constant) 0xf4 then Goto 0x031f
0x0311 (0x0af1): (0x06) Function - Random - Set var[0x04]=<random number>
0x0314 (0x0af4): (0x1b) If var[0x04] > (constant) 0x09 then Goto 0x0311
0x0318 (0x0af8): (0x08) Set var[0x17] = (constant) 0x61
0x031b (0x0afb): (0x0a) Set var[0x17] += var[0x04]
0x031e (0x0afe): (0x02) Return
**************************************************************************
0x031f (0x0aff): (0x19) If var[0x0d] != (constant) 0x68 then Goto 0x0334
0x0323 (0x0b03): (0x19) If var[0x17] != (constant) 0x65 then Goto 0x0330
0x0327 (0x0b07): (0x06) Function - Random - Set var[0x05]=<random number>
0x032a (0x0b0a): (0x1a) If var[0x05] < (constant) 0x78 then Goto 0x027a
0x032f (0x0b0f): (0x02) Return
**************************************************************************
0x0330 (0x0b10): (0x18) If var[0x17] == (constant) 0x55 then Goto 0x0327
0x0334 (0x0b14): (0x18) If var[0x0d] == (constant) 0x4e then Goto 0x033c
0x0338 (0x0b18): (0x19) If var[0x0d] != (constant) 0x12 then Goto 0x036a
0x033c (0x0b1c): (0x18) If var[0x17] == (constant) 0x12 then Goto 0x0344
0x0340 (0x0b20): (0x19) If var[0x17] != (constant) 0x4e then Goto 0x036a
0x0344 (0x0b24): (0x09) Set var[0x20] = var[0x17]
0x0347 (0x0b27): (0x09) Set var[0x17] = var[0x03]
0x034a (0x0b2a): (0x09) Set var[0x18] = var[0x03]
0x034d (0x0b2d): (0x01) Gosub 0x09b3
0x0350 (0x0b30): (0x10) If var[0x21] == var[0x06] then Goto 0x035f
0x0354 (0x0b34): (0x13) If var[0x21] > var[0x01] then Goto 0x0363
0x0358 (0x0b38): (0xc3) Set var[0x04] = list#3[0x0e]
0x035b (0x0b3b): (0x11) If var[0x04] != var[0x03] then Goto 0x0363
0x035f (0x0b3f): (0x09) Set var[0x17] = var[0x20]
0x0362 (0x0b42): (0x02) Return
**************************************************************************
/ Print message "Something that you're carrying is too big to fit through the gap\n "
0x0363 (0x0b43): (0x05) Print message (constant) 0x289
0x0366 (0x0b46): (0x09) Set var[0x17] = var[0x0d]
0x0369 (0x0b49): (0x02) Return
**************************************************************************
0x036a (0x0b4a): (0x19) If var[0x17] != (constant) 0xfc then Goto 0x0377
0x036e (0x0b4e): (0x11) If var[0x22] != var[0x01] then Goto 0x027a
0x0373 (0x0b53): (0x08) Set var[0x17] = (constant) 0xab
0x0376 (0x0b56): (0x02) Return
**************************************************************************
0x0377 (0x0b57): (0x18) If var[0x0d] == (constant) 0x5d then Goto 0x037f
0x037b (0x0b5b): (0x19) If var[0x0d] != (constant) 0x20 then Goto 0x03d8
0x037f (0x0b5f): (0x18) If var[0x17] == (constant) 0x20 then Goto 0x0387
0x0383 (0x0b63): (0x19) If var[0x17] != (constant) 0x5d then Goto 0x03d8
0x0387 (0x0b67): (0x10) If var[0x23] == var[0x06] then Goto 0x039e
0x038b (0x0b6b): (0x10) If var[0x23] == var[0x01] then Goto 0x03ac
0x038f (0x0b6f): (0xc3) Set var[0x04] = list#3[0x0c]
0x0392 (0x0b72): (0x10) If var[0x04] == var[0x03] then Goto 0x03b1
0x0396 (0x0b76): (0x11) If var[0x23] != var[0x02] then Goto 0x039d
0x039a (0x0b7a): (0x09) Set var[0x23] = var[0x06]
0x039d (0x0b7d): (0x02) Return
**************************************************************************
/ Print message "A huge troll jumps out and blocks your way, snarling 'Gotcha! Thought you could evade paying the toll did you? Well I was much too quick for you.. you had no chance of outwitting me.. an exmaze of twisty little passages, all the samepert bridge-keeper for a thousand years.. never missed a day..' etc. etc. Eventually the troll shuts up and stands blocking the bridge, one hand outstretched for payment of a treasure "
0x039e (0x0b7e): (0x05) Print message (constant) 0x3e
0x03a0 (0x0b80): (0x09) Set var[0x23] = var[0x01]
0x03a3 (0x0b83): (0x81) Set list#1[0x5d] = var[0x1]
0x03a6 (0x0b86): (0x81) Set list#1[0x20] = var[0x1]
0x03a9 (0x0b89): (0x00) Goto 0x017d
**************************************************************************
/ Print message "The troll blocks your way, holding out a fist for payment "
0x03ac (0x0b8c): (0x05) Print message (constant) 0x3f
0x03ae (0x0b8e): (0x00) Goto 0x017d
**************************************************************************
/ Print message "When you reach the middle of the bridge it collapses under the bear's weight, throwing you into the chasm. "
0x03b1 (0x0b91): (0x05) Print message (constant) 0x5a
0x03b3 (0x0b93): (0x83) Set list#3[0xc] = var[0x6]
0x03b6 (0x0b96): (0x00) Goto 0x01cd
**************************************************************************
0x03b9 (0x0b99): (0x19) If var[0x0d] != (constant) 0x4d then Goto 0x0288
0x03be (0x0b9e): (0x19) If var[0x17] != (constant) 0xfe then Goto 0x03ca
0x03c2 (0x0ba2): (0x08) Set var[0x09] = (constant) 0xb4
/ Print message "You crawl through a network of twisty passages, get totally disorientated and end up back at Witt's End. The Witt Construction company have been practicing for years with one way schemes above ground so you will not get away easily! "
0x03c5 (0x0ba5): (0x05) Print message (constant) 0x2b
0x03c7 (0x0ba7): (0x00) Goto 0x017d
**************************************************************************
0x03ca (0x0baa): (0x19) If var[0x17] != (constant) 0x4c then Goto 0x03c5
0x03ce (0x0bae): (0x06) Function - Random - Set var[0x04]=<random number>
0x03d1 (0x0bb1): (0x13) If var[0x04] > var[0x09] then Goto 0x03c5
0x03d5 (0x0bb5): (0x00) Goto 0x02a1
**************************************************************************
0x03d8 (0x0bb8): (0x10) If var[0x22] == var[0x06] then Goto 0x039d
0x03dc (0x0bbc): (0x19) If var[0x0d] != (constant) 0x11 then Goto 0x039d
0x03e0 (0x0bc0): (0x19) If var[0x17] != (constant) 0x04 then Goto 0x039d
0x03e4 (0x0bc4): (0x09) Set var[0x24] = var[0x01]
/ Print message "The elves are waiting for you in a golden host surrounding their king. They cheer wildly as you emerge into the sunlight.\n "
0x03e7 (0x0bc7): (0x05) Print message (constant) 0x2af
0x03ea (0x0bca): (0x00) Goto 0x0213
**************************************************************************
0x03ed (0x0bcd): (0x01) Gosub 0x09ea
0x03f0 (0x0bd0): (0x11) If var[0x1e] != var[0x06] then Goto 0x03f9
/ Print message "It is dark, you cannot see "
0x03f4 (0x0bd4): (0x05) Print message (constant) 0x3b
0x03f6 (0x0bd6): (0x00) Goto 0x017d
**************************************************************************
0x03f9 (0x0bd9): (0x08) Set var[0x04] = (constant) 0x64
0x03fc (0x0bdc): (0x0a) Set var[0x04] += var[0x0d]
0x03ff (0x0bdf): (0x04) Print message var[0x04]
/ Print message "\n "
0x0401 (0x0be1): (0x05) Print message (constant) 0x0c
0x0403 (0x0be3): (0x19) If var[0x0d] != (constant) 0xc7 then Goto 0x0413
0x0407 (0x0be7): (0x10) If var[0x25] == var[0x01] then Goto 0x0410
/ Print message "A heavy dungeon door opens onto the stairway "
0x040b (0x0beb): (0x05) Print message (constant) 0x2a0
0x040e (0x0bee): (0x00) Goto 0x0413
**************************************************************************
/ Print message "The dungeon door is locked "
0x0410 (0x0bf0): (0x05) Print message (constant) 0x2a1
0x0413 (0x0bf3): (0x1b) If var[0x0d] > (constant) 0x6e then Goto 0x0441
0x0417 (0x0bf7): (0xa1) Set var[0x04] = list#1[var[0x0d]] (list address 0x07e0)
0x041a (0x0bfa): (0x08) Set var[0x05] = (constant) 0x14a
0x041e (0x0bfe): (0x11) If var[0x04] != var[0x01] then Goto 0x0426
0x0422 (0x0c02): (0x08) Set var[0x05] = (constant) 0x1b8
0x0426 (0x0c06): (0x0a) Set var[0x05] += var[0x0d]
0x0429 (0x0c09): (0x04) Print message var[0x05]
0x042b (0x0c0b): (0x19) If var[0x0d] != (constant) 0x5c then Goto 0x0441
0x042f (0x0c0f): (0x08) Set var[0x27] = (constant) 0x282
0x0433 (0x0c13): (0x10) If var[0x26] == var[0x06] then Goto 0x043f
0x0437 (0x0c17): (0x08) Set var[0x27] = (constant) 0x283
0x043b (0x0c1b): (0x11) If var[0x26] != var[0x01] then Goto 0x0441
0x043f (0x0c1f): (0x04) Print message var[0x27]
0x0441 (0x0c21): (0x18) If var[0x0d] == (constant) 0xc3 then Goto 0x0449
0x0445 (0x0c25): (0x19) If var[0x0d] != (constant) 0xc5 then Goto 0x0450
0x0449 (0x0c29): (0x10) If var[0x27] == var[0x06] then Goto 0x0450
/ Print message "A crystal bridge spans the fissure "
0x044d (0x0c2d): (0x05) Print message (constant) 0x1f2
0x0450 (0x0c30): (0x19) If var[0x0d] != (constant) 0xbf then Goto 0x045b
0x0454 (0x0c34): (0x10) If var[0x28] == var[0x01] then Goto 0x045b
/ Print message "Lots of skeletons are chained to the walls "
0x0458 (0x0c38): (0x05) Print message (constant) 0x297
0x045b (0x0c3b): (0x01) Gosub 0x0e95
/ Print message "\n "
0x045e (0x0c3e): (0x05) Print message (constant) 0x0c
0x0460 (0x0c40): (0x09) Set var[0x18] = var[0x0d]
0x0463 (0x0c43): (0x09) Set var[0x04] = var[0x01]
0x0466 (0x0c46): (0x01) Gosub 0x0a30
0x0469 (0x0c49): (0x0a) Set var[0x04] += var[0x01]
0x046c (0x0c4c): (0x1a) If var[0x04] < (constant) 0x21 then Goto 0x0466
0x0470 (0x0c50): (0x01) Gosub 0x0e7a
0x0473 (0x0c53): (0x1a) If var[0x0d] < (constant) 0x32 then Goto 0x017d
0x0478 (0x0c58): (0x10) If var[0x11] == var[0x06] then Goto 0x017d
0x047d (0x0c5d): (0x13) If var[0x11] > var[0x01] then Goto 0x0486
/ Print message "There is one threatening little dwarf here "
0x0481 (0x0c61): (0x05) Print message (constant) 0x61
0x0483 (0x0c63): (0x00) Goto 0x017d
**************************************************************************
/ Print message "There are "
0x0486 (0x0c66): (0x05) Print message (constant) 0x62
0x0488 (0x0c68): (0x03) Print Number var[0x11]
/ Print message "threatening little dwarves here "
0x048a (0x0c6a): (0x05) Print message (constant) 0x63
0x048c (0x0c6c): (0x00) Goto 0x017d
**************************************************************************
/ Print message "You have: "
0x048f (0x0c6f): (0x05) Print message (constant) 0x0a
/ Print message "\n "
0x0491 (0x0c71): (0x05) Print message (constant) 0x0c
0x0493 (0x0c73): (0x09) Set var[0x17] = var[0x03]
0x0496 (0x0c76): (0x09) Set var[0x18] = var[0x03]
0x0499 (0x0c79): (0x01) Gosub 0x09b3
0x049c (0x0c7c): (0x13) If var[0x21] > var[0x06] then Goto 0x0463
/ Print message "Nothing "
0x04a0 (0x0c80): (0x05) Print message (constant) 0x0b
0x04a2 (0x0c82): (0x00) Goto 0x017d
**************************************************************************
0x04a5 (0x0c85): (0x11) If var[0x14] != var[0x06] then Goto 0x04b7
0x04a9 (0x0c89): (0x10) If var[0x16] == var[0x02] then Goto 0x04b2
/ Print message "I don't understand\n "
0x04ad (0x0c8d): (0x05) Print message (constant) 0x05
0x04af (0x0c8f): (0x00) Goto 0x017d
**************************************************************************
/ Print message "Please be more specific "
0x04b2 (0x0c92): (0x05) Print message (constant) 0x3c
0x04b4 (0x0c94): (0x00) Goto 0x017d
**************************************************************************
0x04b7 (0x0c97): (0x01) Gosub 0x050a
0x04ba (0x0c9a): (0x19) If var[0x0d] != (constant) 0x28 then Goto 0x04c7
0x04be (0x0c9e): (0x11) If var[0x08] != var[0x02] then Goto 0x04c7
/ Print message "The bear snaps dangerously, forcing you to back away to the far side of the room "
0x04c2 (0x0ca2): (0x05) Print message (constant) 0x2f
0x04c4 (0x0ca4): (0x00) Goto 0x017d
**************************************************************************
0x04c7 (0x0ca7): (0xa3) Set var[0x04] = list#3[var[0x14]] (list address 0x0860)
0x04ca (0x0caa): (0x10) If var[0x04] == var[0x0d] then Goto 0x04dc
0x04ce (0x0cae): (0x11) If var[0x04] != var[0x03] then Goto 0x04d7
/ Print message "You are already carrying it "
0x04d2 (0x0cb2): (0x05) Print message (constant) 0x3d
0x04d4 (0x0cb4): (0x00) Goto 0x017d
**************************************************************************
/ Print message "You can't see it "
0x04d7 (0x0cb7): (0x05) Print message (constant) 0x08
0x04d9 (0x0cb9): (0x00) Goto 0x017d
**************************************************************************
0x04dc (0x0cbc): (0x19) If var[0x14] != (constant) 0x07 then Goto 0x04e6
0x04e0 (0x0cc0): (0x10) If var[0x29] == var[0x06] then Goto 0x04e6
0x04e4 (0x0cc4): (0x00) Goto 0x04d7
**************************************************************************
0x04e6 (0x0cc6): (0xe5) Set list#5[var[0x14]] = var[0x01] (list address 0x08b0)
0x04e9 (0x0cc9): (0x01) Gosub 0x0d87
0x04ec (0x0ccc): (0x09) Set var[0x17] = var[0x03]
0x04ef (0x0ccf): (0x09) Set var[0x18] = var[0x03]
0x04f2 (0x0cd2): (0x01) Gosub 0x09b3
0x04f5 (0x0cd5): (0x1a) If var[0x21] < (constant) 0x04 then Goto 0x04fe
/ Print message "Your hands are full, you can't carry anything else unless you drop something first "
0x04f9 (0x0cd9): (0x05) Print message (constant) 0x2e
0x04fb (0x0cdb): (0x00) Goto 0x017d
**************************************************************************
0x04fe (0x0cde): (0x01) Gosub 0x0bff
0x0501 (0x0ce1): (0xe3) Set list#3[var[0x14]] = var[0x03] (list address 0x0860)
/ Print message "I have it now "
0x0504 (0x0ce4): (0x05) Print message (constant) 0x288
0x0507 (0x0ce7): (0x00) Goto 0x017d
**************************************************************************
0x050a (0x0cea): (0x1a) If var[0x14] < (constant) 0x24 then Goto 0x01b9
0x050f (0x0cef): (0x1b) If var[0x14] > (constant) 0x43 then Goto 0x01b9
0x0514 (0x0cf4): (0x08) Set var[0x04] = (constant) 0x23
0x0517 (0x0cf7): (0x0b) Set var[0x14] -= var[0x04].
0x051a (0x0cfa): (0x02) Return
**************************************************************************
0x051b (0x0cfb): (0x01) Gosub 0x050a
0x051d (0x0cfd): (0xa3) Set var[0x04] = list#3[var[0x14]] (list address 0x0860)
0x0520 (0x0d00): (0x10) If var[0x04] == var[0x03] then Goto 0x052f
/ Print message "You don't have it "
0x0524 (0x0d04): (0x05) Print message (constant) 0x09
0x0526 (0x0d06): (0x00) Goto 0x017d
**************************************************************************
0x0529 (0x0d09): (0xe3) Set list#3[var[0x14]] = var[0x0d] (list address 0x0860)
0x052c (0x0d0c): (0x00) Goto 0x017d
**************************************************************************
0x052f (0x0d0f): (0x11) If var[0x0c] != var[0x03] then Goto 0x0538
0x0533 (0x0d13): (0x18) If var[0x0d] == (constant) 0xd1 then Goto 0x0e74
0x0538 (0x0d18): (0x19) If var[0x14] != (constant) 0x07 then Goto 0x055d
0x053c (0x0d1c): (0x09) Set var[0x29] = var[0x06]
0x053f (0x0d1f): (0x18) If var[0x0d] == (constant) 0x44 then Goto 0x054e
0x0543 (0x0d23): (0x19) If var[0x0d] != (constant) 0x34 then Goto 0x0529
/ Print message "The bird attacks the snake and in a flurry of feathers drives it off! "
0x0547 (0x0d27): (0x05) Print message (constant) 0x22
0x0549 (0x0d29): (0x81) Set list#1[0x34] = var[0x1]
0x054c (0x0d2c): (0x00) Goto 0x0529
**************************************************************************
0x054e (0x0d2e): (0xa1) Set var[0x04] = list#1[var[0x0d]] (list address 0x07e0)
0x0551 (0x0d31): (0x10) If var[0x04] == var[0x03] then Goto 0x0529
/ Print message "The bird attacks the dragon and in a flurry of feathers is eaten! The dragon licks its lips and returns to sleep "
0x0555 (0x0d35): (0x05) Print message (constant) 0x27
0x0557 (0x0d37): (0x83) Set list#3[0x7] = var[0x6]
0x055a (0x0d3a): (0x00) Goto 0x017d
**************************************************************************
0x055d (0x0d3d): (0x19) If var[0x14] != (constant) 0x0c then Goto 0x0576
0x0561 (0x0d41): (0x19) If var[0x0d] != (constant) 0x20 then Goto 0x0529
0x0565 (0x0d45): (0x1b) If var[0x23] > (constant) 0x01 then Goto 0x0529
/ Print message "The bear shambles towards the troll and rears up on its hind legs. The troll gives a loud shriek and runs away in panic. The bear follows it for a short distance and then returns "
0x0569 (0x0d49): (0x05) Print message (constant) 0x32
0x056b (0x0d4b): (0x81) Set list#1[0x20] = var[0x6]
0x056e (0x0d4e): (0x81) Set list#1[0x5d] = var[0x6]
0x0571 (0x0d51): (0x08) Set var[0x23] = (constant) 0x03
0x0574 (0x0d54): (0x00) Goto 0x0529
**************************************************************************
0x0576 (0x0d56): (0x19) If var[0x14] != (constant) 0x11 then Goto 0x058d
0x057a (0x0d5a): (0xc3) Set var[0x04] = list#3[0x10]
0x057d (0x0d5d): (0x10) If var[0x04] == var[0x0d] then Goto 0x0529
0x0581 (0x0d61): (0x18) If var[0x0d] == (constant) 0x54 then Goto 0x0529
/ Print message "The precious vase shatters into a million tiny pieces on the hard ground! "
0x0585 (0x0d65): (0x05) Print message (constant) 0x2d
0x0587 (0x0d67): (0x83) Set list#3[0x11] = var[0x6]
0x058a (0x0d6a): (0x00) Goto 0x017d
**************************************************************************
0x058d (0x0d6d): (0x19) If var[0x14] != (constant) 0x15 then Goto 0x05a1
0x0591 (0x0d71): (0x19) If var[0x0d] != (constant) 0x91 then Goto 0x0529
0x0595 (0x0d75): (0x09) Set var[0x2a] = var[0x03]
0x0598 (0x0d78): (0x83) Set list#3[0x15] = var[0x6]
/ Print message "The machine grabs the money and replaces your batteries. It then whirs, clicks brokenly and stops. A sign lights up saying 'MACHINE EMPTY' "
0x059b (0x0d7b): (0x05) Print message (constant) 0x28a
0x059e (0x0d7e): (0x00) Goto 0x017d
**************************************************************************
0x05a1 (0x0d81): (0x19) If var[0x14] != (constant) 0x05 then Goto 0x05af
0x05a5 (0x0d85): (0x10) If var[0x29] == var[0x06] then Goto 0x05af
0x05a9 (0x0d89): (0x83) Set list#3[0x7] = var[0xd]
0x05ac (0x0d8c): (0x00) Goto 0x0529
**************************************************************************
0x05af (0x0d8f): (0x19) If var[0x14] != (constant) 0x1d then Goto 0x05c8
0x05b3 (0x0d93): (0x19) If var[0x0d] != (constant) 0xbf then Goto 0x05c3
/ Print message "The skeletons regenerate back into handsome elves, and you notice a few humans amongst them (possibly former adventurers). All the resurrected folk cluster round you, proclaiming their thanks. Then, as if at some secret signal, they dance off singing joyfully, leaving you alone "
0x05b7 (0x0d97): (0x05) Print message (constant) 0x296
0x05ba (0x0d9a): (0x09) Set var[0x28] = var[0x01]
0x05bd (0x0d9d): (0x83) Set list#3[0x1d] = var[0x6]
0x05c0 (0x0da0): (0x00) Goto 0x017d
**************************************************************************
/ Print message "The rocks on the floor come to life and dance about for a while. Then, seemingly tired, they lie back down for a rest "
0x05c3 (0x0da3): (0x05) Print message (constant) 0x295
0x05c6 (0x0da6): (0x00) Goto 0x05bd
**************************************************************************
0x05c8 (0x0da8): (0x19) If var[0x0d] != (constant) 0x0d then Goto 0x0529
/ Print message "A lightning bolt smites you, litter bug! "
0x05cd (0x0dad): (0x05) Print message (constant) 0x2ab
0x05d0 (0x0db0): (0x00) Goto 0x01cd
**************************************************************************
0x05d3 (0x0db3): (0x01) Gosub 0x050a
0x05d6 (0x0db6): (0x09) Set var[0x2b] = var[0x14]
0x05d9 (0x0db9): (0x01) Gosub 0x0ab2
0x05dc (0x0dbc): (0x01) Gosub 0x0ef8
0x05df (0x0dbf): (0x18) If var[0x2b] == (constant) 0x1c then Goto 0x0e5f
0x05e4 (0x0dc4): (0x18) If var[0x0d] == (constant) 0x5d then Goto 0x061b
0x05e8 (0x0dc8): (0x18) If var[0x0d] == (constant) 0x20 then Goto 0x061b
0x05ec (0x0dcc): (0x18) If var[0x0d] == (constant) 0x44 then Goto 0x064a
0x05f0 (0x0dd0): (0x19) If var[0x14] != (constant) 0x1a then Goto 0x052f
0x05f5 (0x0dd5): (0x10) If var[0x11] == var[0x06] then Goto 0x052f
0x05fa (0x0dda): (0x06) Function - Random - Set var[0x04]=<random number>
0x05fd (0x0ddd): (0x1b) If var[0x04] > (constant) 0x1e then Goto 0x0606
/ Print message "Missed! The axe clatters to the ground "
0x0601 (0x0de1): (0x05) Print message (constant) 0x41
0x0603 (0x0de3): (0x00) Goto 0x052f
**************************************************************************
0x0606 (0x0de6): (0x08) Set var[0x04] = (constant) 0x42
0x0609 (0x0de9): (0x10) If var[0x11] == var[0x01] then Goto 0x0610
0x060d (0x0ded): (0x08) Set var[0x04] = (constant) 0x43
0x0610 (0x0df0): (0x04) Print message var[0x04]
0x0612 (0x0df2): (0x0b) Set var[0x11] -= var[0x01].
0x0615 (0x0df5): (0x09) Set var[0x0a] = var[0x01]
0x0618 (0x0df8): (0x00) Goto 0x052f
**************************************************************************
0x061b (0x0dfb): (0x11) If var[0x23] != var[0x01] then Goto 0x05f5
0x061f (0x0dff): (0x18) If var[0x14] == (constant) 0x0c then Goto 0x055d
0x0624 (0x0e04): (0x19) If var[0x14] != (constant) 0x1a then Goto 0x062d
/ Print message "The troll catches the axe, snorts 'Not even sharp!', and tosses it back. You just manage to catch it without getting cut "
0x0628 (0x0e08): (0x05) Print message (constant) 0x40
0x062a (0x0e0a): (0x00) Goto 0x017d
**************************************************************************
0x062d (0x0e0d): (0xa4) Set var[0x04] = list#4[var[0x14]] (list address 0x07b5)
0x0630 (0x0e10): (0x10) If var[0x04] == var[0x06] then Goto 0x0645
0x0634 (0x0e14): (0xe3) Set list#3[var[0x14]] = var[0x06] (list address 0x0860)
/ Print message "The troll takes the treasure and leaves, chortling "
0x0637 (0x0e17): (0x05) Print message (constant) 0x59
0x0639 (0x0e19): (0x08) Set var[0x23] = (constant) 0x02
0x063c (0x0e1c): (0x81) Set list#1[0x5d] = var[0x6]
0x063f (0x0e1f): (0x81) Set list#1[0x20] = var[0x6]
0x0642 (0x0e22): (0x00) Goto 0x017d
**************************************************************************
/ Print message "The troll snaps 'Worthless' and tosses it back "
0x0645 (0x0e25): (0x05) Print message (constant) 0x58
0x0647 (0x0e27): (0x00) Goto 0x017d
**************************************************************************
0x064a (0x0e2a): (0x19) If var[0x14] != (constant) 0x1a then Goto 0x052f
0x064f (0x0e2f): (0xa1) Set var[0x04] = list#1[var[0x0d]] (list address 0x07e0)
0x0652 (0x0e32): (0x11) If var[0x04] != var[0x06] then Goto 0x052f
/ Print message "It bounces off the dragon's scales. The dragon opens an eye and glares at you "
0x0657 (0x0e37): (0x05) Print message (constant) 0x28
0x0659 (0x0e39): (0x00) Goto 0x0529
**************************************************************************
0x065c (0x0e3c): (0x18) If var[0x14] == (constant) 0x41 then Goto 0x0b78
0x0661 (0x0e41): (0x18) If var[0x0d] == (constant) 0xc1 then Goto 0x06eb
0x0666 (0x0e46): (0x18) If var[0x0d] == (constant) 0xc2 then Goto 0x06f9
0x066b (0x0e4b): (0x19) If var[0x14] != (constant) 0x23 then Goto 0x0691
0x066f (0x0e4f): (0x18) If var[0x0d] == (constant) 0x04 then Goto 0x067a
0x0673 (0x0e53): (0x18) If var[0x0d] == (constant) 0x11 then Goto 0x067a
0x0677 (0x0e57): (0x00) Goto 0x01b9
**************************************************************************
0x067a (0x0e5a): (0xa3) Set var[0x04] = list#3[var[0x01]] (list address 0x0860)
0x067d (0x0e5d): (0x10) If var[0x04] == var[0x03] then Goto 0x0686
/ Print message "You have no keys, or hairpins "
0x0681 (0x0e61): (0x05) Print message (constant) 0x13
0x0683 (0x0e63): (0x00) Goto 0x017d
**************************************************************************
0x0686 (0x0e66): (0x81) Set list#1[0x4] = var[0x1]
0x0689 (0x0e69): (0x81) Set list#1[0x11] = var[0x1]
/ Print message "The grate is unlocked "
0x068c (0x0e6c): (0x05) Print message (constant) 0x11
0x068e (0x0e6e): (0x00) Goto 0x017d
**************************************************************************
0x0691 (0x0e71): (0x18) If var[0x14] == (constant) 0x2f then Goto 0x0699
0x0695 (0x0e75): (0x19) If var[0x14] != (constant) 0x39 then Goto 0x06bb
0x0699 (0x0e79): (0x19) If var[0x0d] != (constant) 0x28 then Goto 0x06bb
0x069d (0x0e7d): (0xa3) Set var[0x04] = list#3[var[0x01]] (list address 0x0860)
0x06a0 (0x0e80): (0x11) If var[0x04] != var[0x03] then Goto 0x0681
0x06a4 (0x0e84): (0x11) If var[0x08] != var[0x02] then Goto 0x06ad
/ Print message "The bear snaps dangerously, forcing you to back away to the far side of the room "
0x06a8 (0x0e88): (0x05) Print message (constant) 0x2f
0x06aa (0x0e8a): (0x00) Goto 0x017d
**************************************************************************
0x06ad (0x0e8d): (0x09) Set var[0x08] = var[0x06]
0x06b0 (0x0e90): (0x08) Set var[0x04] = (constant) 0x28
0x06b3 (0x0e93): (0x83) Set list#3[0x16] = var[0x4]
/ Print message "The chain clicks open and falls to the floor. The bear is free and stretches joyfully "
0x06b6 (0x0e96): (0x05) Print message (constant) 0x30
0x06b8 (0x0e98): (0x00) Goto 0x017d
**************************************************************************
0x06bb (0x0e9b): (0x19) If var[0x14] != (constant) 0x55 then Goto 0x01b9
0x06c0 (0x0ea0): (0x19) If var[0x0d] != (constant) 0x67 then Goto 0x01c1
0x06c5 (0x0ea5): (0xc1) Set var[0x04] = list#1[0x67]
0x06c8 (0x0ea8): (0x10) If var[0x04] == var[0x06] then Goto 0x06d1
/ Print message "It's already open "
0x06cc (0x0eac): (0x05) Print message (constant) 0x44
0x06ce (0x0eae): (0x00) Goto 0x017d
**************************************************************************
0x06d1 (0x0eb1): (0xc3) Set var[0x04] = list#3[0x12]
0x06d4 (0x0eb4): (0x10) If var[0x04] == var[0x03] then Goto 0x06dd
/ Print message "The clam won't open "
0x06d8 (0x0eb8): (0x05) Print message (constant) 0x29
0x06da (0x0eba): (0x00) Goto 0x017d
**************************************************************************
/ Print message "The clam opens and you realise that it is really an oyster. A gleaming pearl springs out and rolls away downhill out of sight. "
0x06dd (0x0ebd): (0x05) Print message (constant) 0x2a
0x06df (0x0ebf): (0x08) Set var[0x04] = (constant) 0x51
0x06e2 (0x0ec2): (0x83) Set list#3[0x13] = var[0x4]
0x06e5 (0x0ec5): (0x81) Set list#1[0x67] = var[0x1]
0x06e8 (0x0ec8): (0x00) Goto 0x017d
**************************************************************************
0x06eb (0x0ecb): (0x10) If var[0x2c] == var[0x01] then Goto 0x017d
/ Print message "You free a few elves and they unlock the rest. They all dance off, singing your praises "
0x06f0 (0x0ed0): (0x05) Print message (constant) 0x2b1
0x06f3 (0x0ed3): (0x09) Set var[0x2c] = var[0x01]
0x06f6 (0x0ed6): (0x00) Goto 0x017d
**************************************************************************
0x06f9 (0x0ed9): (0x10) If var[0x2d] == var[0x01] then Goto 0x017d
/ Print message "You free a few elves and they unlock the rest. They all dance off, singing your praises "
0x06fe (0x0ede): (0x05) Print message (constant) 0x2b1
0x0701 (0x0ee1): (0x09) Set var[0x2d] = var[0x01]
0x0704 (0x0ee4): (0x00) Goto 0x017d
**************************************************************************
0x0707 (0x0ee7): (0x09) Set var[0x2b] = var[0x02]
0x070a (0x0eea): (0x01) Gosub 0x0ab2
0x070d (0x0eed): (0x18) If var[0x2a] == (constant) 0xfe then Goto 0x01b9
0x0712 (0x0ef2): (0x09) Set var[0x2e] = var[0x01]
/ Print message "The lamp is on "
0x0715 (0x0ef5): (0x05) Print message (constant) 0x0e
0x0717 (0x0ef7): (0x00) Goto 0x017d
**************************************************************************
0x071a (0x0efa): (0x09) Set var[0x2b] = var[0x02]
0x071d (0x0efd): (0x01) Gosub 0x0ab2
0x0720 (0x0f00): (0x09) Set var[0x2e] = var[0x06]
/ Print message "The lamp is off "
0x0723 (0x0f03): (0x05) Print message (constant) 0x0f
0x0725 (0x0f05): (0x00) Goto 0x017d
**************************************************************************
0x0728 (0x0f08): (0x01) Gosub 0x050a
0x072b (0x0f0b): (0x08) Set var[0x2b] = (constant) 0x04
0x072e (0x0f0e): (0x11) If var[0x14] != var[0x2b] then Goto 0x01b5
0x0733 (0x0f13): (0x01) Gosub 0x0ab2
0x0736 (0x0f16): (0x1a) If var[0x0d] < (constant) 0x04 then Goto 0x074f
0x073a (0x0f1a): (0x18) If var[0x0d] == (constant) 0x46 then Goto 0x074f
0x073e (0x0f1e): (0x18) If var[0x0d] == (constant) 0x49 then Goto 0x074f
0x0742 (0x0f22): (0x18) If var[0x0d] == (constant) 0x47 then Goto 0x074f
0x0746 (0x0f26): (0x18) If var[0x0d] == (constant) 0x5a then Goto 0x0755
/ Print message "There's no liquid here to fill it with "
0x074a (0x0f2a): (0x05) Print message (constant) 0x45
0x074c (0x0f2c): (0x00) Goto 0x017d
**************************************************************************
0x074f (0x0f2f): (0x09) Set var[0x2f] = var[0x01]
0x0752 (0x0f32): (0x00) Goto 0x017d
**************************************************************************
0x0755 (0x0f35): (0x09) Set var[0x2f] = var[0x02]
0x0758 (0x0f38): (0x00) Goto 0x017d
**************************************************************************
0x075b (0x0f3b): (0x01) Gosub 0x050a
0x075e (0x0f3e): (0x08) Set var[0x2b] = (constant) 0x04
0x0761 (0x0f41): (0x11) If var[0x2b] != var[0x14] then Goto 0x01b5
0x0766 (0x0f46): (0x01) Gosub 0x0ab2
0x0769 (0x0f49): (0x10) If var[0x2f] == var[0x01] then Goto 0x0776
0x076d (0x0f4d): (0x10) If var[0x2f] == var[0x02] then Goto 0x07a9
/ Print message "Your bottle is already empty "
0x0771 (0x0f51): (0x05) Print message (constant) 0x46
0x0773 (0x0f53): (0x00) Goto 0x017d
**************************************************************************
0x0776 (0x0f56): (0x11) If var[0x2f] != var[0x01] then Goto 0x07ce
0x077a (0x0f5a): (0x19) If var[0x0d] != (constant) 0x5c then Goto 0x07a1
0x077e (0x0f5e): (0x10) If var[0x26] == var[0x06] then Goto 0x0790
0x0782 (0x0f62): (0x10) If var[0x26] == var[0x01] then Goto 0x0797
/ Print message "You have OVER-WATERED it! The beanstalk flails about and collapses, falling in a mass to the floor of the pit where it shrivels up. All that remains is a tiny plant whispering 'water, water' "
0x0786 (0x0f66): (0x05) Print message (constant) 0x4a
0x0788 (0x0f68): (0x09) Set var[0x26] = var[0x06]
0x078b (0x0f6b): (0x81) Set list#1[0x5c] = var[0x6]
0x078e (0x0f6e): (0x00) Goto 0x07a3
**************************************************************************
/ Print message "The plant bursts into incredible growth, reaching upwards into the air and throwing out enormous leaves. Eventually it stops, towering over your head and yelling 'WATER! WATER!' in your ear "
0x0790 (0x0f70): (0x05) Print message (constant) 0x48
0x0792 (0x0f72): (0x09) Set var[0x26] = var[0x01]
0x0795 (0x0f75): (0x00) Goto 0x07a3
**************************************************************************
/ Print message "The beanstalk grows even larger than before, almost filling the pit and stretching high into the air. The tip reaches into an opening in the wall above! "
0x0797 (0x0f77): (0x05) Print message (constant) 0x49
0x0799 (0x0f79): (0x09) Set var[0x26] = var[0x02]
0x079c (0x0f7c): (0x81) Set list#1[0x5c] = var[0x1]
0x079f (0x0f7f): (0x00) Goto 0x07a3
**************************************************************************
/ Print message "The water soaks away into the ground "
0x07a1 (0x0f81): (0x05) Print message (constant) 0x15
0x07a3 (0x0f83): (0x09) Set var[0x2f] = var[0x06]
0x07a6 (0x0f86): (0x00) Goto 0x017d
**************************************************************************
0x07a9 (0x0f89): (0x11) If var[0x2f] != var[0x02] then Goto 0x07ce
0x07ad (0x0f8d): (0x19) If var[0x0d] != (constant) 0x6b then Goto 0x07bb
/ Print message "The gate creaks open, dislodging a shower of rusty flakes "
0x07b1 (0x0f91): (0x05) Print message (constant) 0x4b
0x07b3 (0x0f93): (0x81) Set list#1[0x6b] = var[0x1]
0x07b6 (0x0f96): (0x81) Set list#1[0x47] = var[0x1]
0x07b9 (0x0f99): (0x00) Goto 0x07a3
**************************************************************************
0x07bb (0x0f9b): (0x19) If var[0x0d] != (constant) 0x5c then Goto 0x07c3
/ Print message "The plant shakes the oil from its leaves in fury "
0x07bf (0x0f9f): (0x05) Print message (constant) 0x4c
0x07c1 (0x0fa1): (0x00) Goto 0x07a3
**************************************************************************
/ Print message "The oil splashes on the ground "
0x07c3 (0x0fa3): (0x05) Print message (constant) 0x16
0x07c5 (0x0fa5): (0x00) Goto 0x07a3
**************************************************************************
0x07c7 (0x0fa7): (0xc3) Set var[0x04] = list#3[0x04]
0x07ca (0x0faa): (0x10) If var[0x04] == var[0x03] then Goto 0x07d3
/ Print message "You have none "
0x07ce (0x0fae): (0x05) Print message (constant) 0x47
0x07d0 (0x0fb0): (0x00) Goto 0x017d
**************************************************************************
0x07d3 (0x0fb3): (0x18) If var[0x14] == (constant) 0x1d then Goto 0x07e2
0x07d7 (0x0fb7): (0x19) If var[0x14] != (constant) 0x1c then Goto 0x01b5
0x07dc (0x0fbc): (0x11) If var[0x2f] != var[0x02] then Goto 0x07ce
0x07e0 (0x0fc0): (0x00) Goto 0x07a9
**************************************************************************
0x07e2 (0x0fc2): (0x11) If var[0x2f] != var[0x01] then Goto 0x07ce
0x07e6 (0x0fc6): (0x00) Goto 0x0776
**************************************************************************
0x07e8 (0x0fc8): (0x01) Gosub 0x0ef8
0x07eb (0x0fcb): (0x19) If var[0x14] != (constant) 0x2a then Goto 0x07ff
0x07ef (0x0fcf): (0xc3) Set var[0x04] = list#3[0x07]
0x07f2 (0x0fd2): (0x11) If var[0x04] != var[0x0d] then Goto 0x01c9
/ Print message "The bird is dead and its body vanishes "
0x07f7 (0x0fd7): (0x05) Print message (constant) 0x1a
0x07f9 (0x0fd9): (0x83) Set list#3[0x7] = var[0x6]
0x07fc (0x0fdc): (0x00) Goto 0x017d
**************************************************************************
0x07ff (0x0fdf): (0x19) If var[0x14] != (constant) 0x49 then Goto 0x0815
0x0803 (0x0fe3): (0x19) If var[0x0d] != (constant) 0x34 then Goto 0x01c9
0x0808 (0x0fe8): (0xa1) Set var[0x04] = list#1[var[0x0d]] (list address 0x07e0)
0x080b (0x0feb): (0x11) If var[0x04] != var[0x06] then Goto 0x01c9
/ Print message "No way! "
0x0810 (0x0ff0): (0x05) Print message (constant) 0x21
0x0812 (0x0ff2): (0x00) Goto 0x017d
**************************************************************************
0x0815 (0x0ff5): (0x19) If var[0x14] != (constant) 0x48 then Goto 0x0831
0x0819 (0x0ff9): (0x19) If var[0x0d] != (constant) 0x44 then Goto 0x01c9
0x081e (0x0ffe): (0xa1) Set var[0x04] = list#1[var[0x0d]] (list address 0x07e0)
0x0821 (0x1001): (0x11) If var[0x04] != var[0x06] then Goto 0x01c9
/ Print message "You attack the dragon with your bare hands and with an incredible display of martial arts prowess you win! Who would have thought it possible? "
0x0826 (0x1006): (0x05) Print message (constant) 0x26
0x0828 (0x1008): (0xe1) Set list#1[var[0x0d]] = var[0x01] (list address 0x07e0)
0x082b (0x100b): (0x83) Set list#3[0x17] = var[0xd]
0x082e (0x100e): (0x00) Goto 0x017d
**************************************************************************
0x0831 (0x1011): (0x19) If var[0x14] != (constant) 0x2f then Goto 0x0846
0x0835 (0x1015): (0xc3) Set var[0x04] = list#3[0x0c]
0x0838 (0x1018): (0x10) If var[0x04] == var[0x03] then Goto 0x0841
0x083c (0x101c): (0x11) If var[0x04] != var[0x0d] then Goto 0x01c9
/ Print message "The bear dodges, sadly, and you miss "
0x0841 (0x1021): (0x05) Print message (constant) 0x31
0x0843 (0x1023): (0x00) Goto 0x017d
**************************************************************************
0x0846 (0x1026): (0x19) If var[0x14] != (constant) 0x45 then Goto 0x0857
0x084a (0x102a): (0x10) If var[0x11] == var[0x06] then Goto 0x01c9
/ Print message "Dwarves are too agile for YOU to catch. You only succeed in getting out of breath "
0x084f (0x102f): (0x05) Print message (constant) 0x4e
0x0851 (0x1031): (0x09) Set var[0x0a] = var[0x01]
0x0854 (0x1034): (0x00) Goto 0x017d
**************************************************************************
0x0857 (0x1037): (0x11) If var[0x14] != var[0x06] then Goto 0x01b9
0x085c (0x103c): (0x18) If var[0x0d] == (constant) 0x34 then Goto 0x0808
0x0860 (0x1040): (0x18) If var[0x0d] == (constant) 0x44 then Goto 0x081e
0x0864 (0x1044): (0x11) If var[0x11] != var[0x06] then Goto 0x084f
0x0868 (0x1048): (0x00) Goto 0x01c9
**************************************************************************
0x086b (0x104b): (0x19) If var[0x14] != (constant) 0x37 then Goto 0x01b9
0x0870 (0x1050): (0xc3) Set var[0x04] = list#3[0x14]
0x0873 (0x1053): (0x11) If var[0x04] != var[0x03] then Goto 0x01c5
/ Print message "The main headline is 'Don't go West'. The lead story is about the success of the Dwarven King who has added the heads of another two elves to his collection. The editorial denounces the perverted ways of 'Elvies' and page 3 features a female dwarf whose long grey beard has been positioned ingeniously. The rest is adverts, mainly for Witt Construction Plc (dungeons a speciality) and Acorn Forestry (oaks take a long time to grow - order now for your grandchildren) "
0x0878 (0x1058): (0x05) Print message (constant) 0x4f
0x087a (0x105a): (0x00) Goto 0x017d
**************************************************************************
/ Print message "Your score is "
0x087d (0x105d): (0x05) Print message (constant) 0x50
0x087f (0x105f): (0x01) Gosub 0x0888
0x0881 (0x1061): (0x03) Print Number var[0x1c]
/ Print message "out of 1100\n "
0x0883 (0x1063): (0x05) Print message (constant) 0x51
0x0885 (0x1065): (0x00) Goto 0x017d
**************************************************************************
0x0888 (0x1068): (0x08) Set var[0x1c] = (constant) 0x1e
0x088b (0x106b): (0x09) Set var[0x04] = var[0x1b]
0x088e (0x106e): (0x0a) Set var[0x04] += var[0x04]
0x0891 (0x1071): (0x09) Set var[0x05] = var[0x04]
0x0894 (0x1074): (0x0a) Set var[0x05] += var[0x05]
0x0897 (0x1077): (0x0a) Set var[0x05] += var[0x05]
0x089a (0x107a): (0x0a) Set var[0x05] += var[0x04]
0x089d (0x107d): (0x0b) Set var[0x1c] -= var[0x05].
0x08a0 (0x1080): (0x11) If var[0x10] != var[0x01] then Goto 0x08aa
0x08a4 (0x1084): (0x08) Set var[0x04] = (constant) 0x1e
0x08a7 (0x1087): (0x0a) Set var[0x1c] += var[0x04]
0x08aa (0x108a): (0x11) If var[0x30] != var[0x06] then Goto 0x08b4
0x08ae (0x108e): (0x08) Set var[0x04] = (constant) 0x09
0x08b1 (0x1091): (0x0a) Set var[0x1c] += var[0x04]
0x08b4 (0x1094): (0x10) If var[0x1a] == var[0x06] then Goto 0x08be
0x08b8 (0x1098): (0x08) Set var[0x04] = (constant) 0x32
0x08bb (0x109b): (0x0a) Set var[0x1c] += var[0x04]
0x08be (0x109e): (0xc3) Set var[0x04] = list#3[0x14]
0x08c1 (0x10a1): (0x19) If var[0x04] != (constant) 0x4d then Goto 0x08cb
0x08c5 (0x10a5): (0x08) Set var[0x04] = (constant) 0x05
0x08c8 (0x10a8): (0x0a) Set var[0x1c] += var[0x04]
0x08cb (0x10ab): (0x0a) Set var[0x1c] += var[0x0b]
0x08ce (0x10ae): (0x0a) Set var[0x1c] += var[0x31]
0x08d1 (0x10b1): (0x09) Set var[0x04] = var[0x01]
0x08d4 (0x10b4): (0xa4) Set var[0x05] = list#4[var[0x04]] (list address 0x07b5)
0x08d7 (0x10b7): (0x10) If var[0x05] == var[0x06] then Goto 0x0904
0x08db (0x10bb): (0xa5) Set var[0x05] = list#5[var[0x04]] (list address 0x08b0)
0x08de (0x10be): (0x10) If var[0x05] == var[0x06] then Goto 0x0904
0x08e2 (0x10c2): (0x1b) If var[0x04] > (constant) 0x1c then Goto 0x08ec
0x08e6 (0x10c6): (0x08) Set var[0x32] = (constant) 0x05
0x08e9 (0x10c9): (0x0a) Set var[0x1c] += var[0x32]
0x08ec (0x10cc): (0xa3) Set var[0x05] = list#3[var[0x04]] (list address 0x0860)
0x08ef (0x10cf): (0x10) If var[0x05] == var[0x03] then Goto 0x08f7
0x08f3 (0x10d3): (0x19) If var[0x05] != (constant) 0x0e then Goto 0x0904
0x08f7 (0x10d7): (0x08) Set var[0x32] = (constant) 0x0a
0x08fa (0x10da): (0x1a) If var[0x04] < (constant) 0x1e then Goto 0x0901
0x08fe (0x10de): (0x08) Set var[0x32] = (constant) 0x32
0x0901 (0x10e1): (0x0a) Set var[0x1c] += var[0x32]
0x0904 (0x10e4): (0x0a) Set var[0x04] += var[0x01]
0x0907 (0x10e7): (0x1a) If var[0x04] < (constant) 0x21 then Goto 0x08d4
0x090b (0x10eb): (0x08) Set var[0x32] = (constant) 0x64
0x090e (0x10ee): (0x10) If var[0x28] == var[0x06] then Goto 0x0915
0x0912 (0x10f2): (0x0a) Set var[0x1c] += var[0x32]
0x0915 (0x10f5): (0x10) If var[0x2c] == var[0x06] then Goto 0x091c
0x0919 (0x10f9): (0x0a) Set var[0x1c] += var[0x32]
0x091c (0x10fc): (0x10) If var[0x2d] == var[0x06] then Goto 0x0923
0x0920 (0x1100): (0x0a) Set var[0x1c] += var[0x32]
0x0923 (0x1103): (0x10) If var[0x24] == var[0x06] then Goto 0x092a
0x0927 (0x1107): (0x0a) Set var[0x1c] += var[0x32]
0x092a (0x110a): (0x01) Gosub 0x0eba
0x092d (0x110d): (0x02) Return
**************************************************************************
/ Print message "Do you really want to stop?\n "
0x092e (0x110e): (0x05) Print message (constant) 0x53
0x0930 (0x1110): (0x07) Input - results in word1 var[0x13], word2 var[0x14], word3 var[0x15], count var[0x16]
0x0935 (0x1115): (0x01) Gosub 0x0c41
0x0938 (0x1118): (0x10) If var[0x1c] == var[0x02] then Goto 0x0930
0x093c (0x111c): (0x10) If var[0x1c] == var[0x06] then Goto 0x017d
0x0941 (0x1121): (0x09) Set var[0x30] = var[0x01]
0x0944 (0x1124): (0x00) Goto 0x0213
**************************************************************************
0x0947 (0x1127): (0x01) Gosub 0x0ef8
0x094a (0x112a): (0x13) If var[0x1a] > var[0x06] then Goto 0x0961
0x094e (0x112e): (0x19) If var[0x0d] != (constant) 0x0e then Goto 0x0958
0x0952 (0x1132): (0x08) Set var[0x0d] = (constant) 0x37
0x0955 (0x1135): (0x00) Goto 0x03ed
**************************************************************************
0x0958 (0x1138): (0x19) If var[0x0d] != (constant) 0x37 then Goto 0x0961
0x095c (0x113c): (0x08) Set var[0x0d] = (constant) 0x0e
0x095f (0x113f): (0x00) Goto 0x0955
**************************************************************************