Home » Personal collection » Acorn tapes » Commercial_Releases » box05_tape03b_acorn_white_magic_2_bbc.wav » INSTPROG
INSTPROG
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn tapes » Commercial_Releases » box05_tape03b_acorn_white_magic_2_bbc.wav |
Filename: | INSTPROG |
Read OK: | ✔ |
File size: | 1B75 bytes |
Load address: | 0E00 |
Exec address: | 8023 |
File contents
10*FX13 4 20MODE4:HIMEM=&3000:VDU23,1,0;0;0;0;:PLOT4,432,511:VDU5:PRINT"WHITE MAGIC 2":PLOT4,432,515:PRINT"WHITE MAGIC 2":VDU4:PRINTTAB(14,18);"Instructions":VDU28,0,31,39,20:*LOAD "INSTGRAPH" 3000 30FORl=0 TO 2 STEP 2:P%=&900:[OPT l:.Prt:LDA &408:STA &70:LDA &409:STA &71:LDA&40C:STA &72:LDA &40D:STA &73:LDA#0:STA&74:LDY#0 40.Goprt:LDA (&70),Y:STA(&72),Y:INY:CPY#24:BNE Goprt 50LDY#0:LDA&70:CLC:ADC#24:STA&70:LDA&71:ADC#0:STA&71:LDA&72:CLC:ADC#64:STA &72:LDA&73:ADC#1:STA&73:INC &74:LDA&74:CMP #3:BNE Goprt:RTS 60.int:STA&80:STX&81:STY&82:CMP#4:BNEno4:LDA#&AE:STA&FE07:LDA#119:STA&FE08:LDA#211:STA&FE09:LDX#0:LDY#0:.loop:INX:CPX#70:BNEloop:INY:CPY#7:BNEloop:LDA#&A6:STA&FE07:LDA#16:STA&FE08:LDA#17:STA&FE09:LDA&80:LDX&81:LDY&82:.no4:RTS 70]:NEXT:?&220=int MOD 256:?&221=int DIV 256:*FX14 4 80GOTO 180 90DEFPROCp(X%,Y%,A%):C%=&5800+(X%*8)+(Y%*320):B%=&3000+(A%*72):CALLPrt:ENDPROC 100DEFPROCg:FORL%=0 TO 36 STEP 3:PROCp(L%,6,47):NEXT:ENDPROC 110DEFPROCt($&B00):CLS:PRINT$&B00:ENDPROC 170DEFPROCspc:PRINTTAB(8,11);"Press SPACE to continue";:REPEAT UNTIL INKEY(-99):PROCg:ENDPROC 175DEFPROCwall(D%):FORL%=2 TO 34 STEP 8:PROCp(L%,6,D%):D%=D%+1:NEXT:ENDPROC 180FORL%=0 TO 36 STEP 3:FORK%=0 TO 12 STEP 3:PROCp(L%,K%,47):NEXT:NEXT 190PROCp(3,6,0):PROCp(13,6,8):PROCp(24,6,24):PROCp(34,6,16):PROCt("The four characters. The LEPRECHAUN, ENCHANTER, TITAN and WARRIOR respectively."):PROCspc 210PROCp(3,6,37):PROCp(13,6,41):PROCp(24,6,68):PROCp(34,6,64):PROCt("These are the characters weapons. The Leprechauns arrow, the Enchanters fireball, the Titans axe and the Warriors sword respectively."):PROCspc 220PROCp(13,6,45):PROCp(24,6,46):PROCt("These are doors. A key is needed to opena door. To open a door simply move against it."):PROCspc 230PROCp(18,6,49):PROCt("This is a key. Each key will open any one door. To take a key simply walk overit."):PROCspc 240PROCp(18,6,48):PROCt("This is food which will boost the characters health by 80 points. To take food just walk over it."):PROCspc 250PROCp(18,6,50):PROCt("This is a ghost. Ghosts can be killed bymissile fire or hand to hand combat. Ghosts come out of skeletons but can't take much damage."):PROCspc 260PROCp(18,6,54):PROCt("This is a guard. Guards can be killed bymissile fire or hand to hand combat. Guards come out of huts and are quite tough to kill."):PROCspc 270PROCp(18,6,58):PROCt("This is the trapdoor which leads down tothe next level. The trapdoor can only beopened when the master key and all of the treasure has been collected."):PROCspc 280PROCp(18,6,59):PROCt("This is a treasure chest. All of the treasure chests on a level must be collected before the trapdoor will open.To collect treasure just move over it."):PROCspc 290PROCp(18,6,60):PROCt("This is a cross of rejuvenation. When taken it will increase every characters health by 1000."):PROCspc 300PROCp(18,6,61):PROCt("This is a staff of speed. When taken by the character, it will enable the Enchanter, Titan and Warrior to run as fast as the Leprechaun. The effect will wear off before the next level."):PROCspc 310PROCp(18,6,62):PROCt("This is a magic orb which will reverse the effect of the staff of speed."):PROCspc 320PROCp(18,6,63):PROCt("This is an amulet of healing. When takenit will give the character in use a health of 4000."):PROCspc 360PROCp(13,6,85):PROCp(23,6,87):PROCt("These are skeletons. Ghosts will appear from skeletons. Skeletons can be destroyed by missiles of weapon strength4 or higher but not by hand to hand combat."):PROCspc 370PROCp(5,6,86):PROCp(18,6,128):PROCp(31,6,129):PROCt("These are spikes. Spikes will drain the characters health on contact."):PROCspc 380PROCp(18,6,88):PROCt("This is a guards hut. Guards will appearfrom here. Huts can be destroyed by missiles of weapon strength 7 or higher but not by hand to hand combat."):PROCspc 390D%=89:FORL%=3 TO 33 STEP 10:PROCp(L%,6,D%):D%=D%+1:NEXT:PROCt("These are passages which become narrowertowards one end. These passages can onlybe used from the wide end."):PROCspc 400D%=110:FORL%=3 TO 33 STEP 10:PROCp(L%,6,D%):D%=D%+1:NEXT:PROCt("These are sliders. Sliders will move in the direction of their arrow unless there is an obstruction. If the character blocks the path of a slider,") 410PRINT"it will drain his health.":PROCspc 420PROCp(18,6,93):PROCt("This is a stealer. Stealers will destroyall keys being carried on contact."):PROCspc 430PROCp(18,6,94):PROCt("This is a vortex. On contact, the left-most digit of the characters healthwill be moved right one place and the left-most digit will become 0. e.g. 2345 becomes 0245"):PROCspc 440PROCp(18,6,95):PROCt("This is a potion. To take a potion just walk over it."):PROCspc 450PROCp(18,6,96):PROCt("This is a magic shield. When taken, it will increase the characters armour value by 1 up to a maximum of 9."):PROCspc 460PROCp(18,6,97):PROCt("This is a magic sword. When taken, it will increase the characters weapon strength value by 1 up to a maximum of 9."):PROCspc 470PROCp(18,6,98):PROCt("This is a magic scroll. When taken, it will increase the characters magic valueby 1 up to a maximum of 9."):PROCspc 480PROCp(18,6,99):PROCt("This is a cask of beer. The Titan can push casks into any empty space."):PROCspc 490PROCp(18,6,100):PROCt("These are vines. Only the Warrior can cut her way through these."):PROCspc 500PROCp(18,6,101):PROCt("This is a magic pentagram. Only the Enchanter can cross this."):PROCspc 510PROCp(15,6,102):PROCp(22,6,103):PROCt("These are logs. Only the Leprechaun can climb over these."):PROCspc 520PROCp(18,6,104):PROCt("This is a time pill. When taken it will reset the timer to its initial value."):PROCspc 530PROCp(18,6,105):PROCt("This is a bomb. When touched it will explode, hurting the character and destroying whatever is directly north, south, east and west of it."):PROCspc 540PROCp(18,6,106):PROCt("This is an ammo box. When taken it will increase the number of weapons the character can fire by 1 up to a maximum of 3."):PROCspc 550PROCp(18,6,107):PROCt("This is a teleporter. When touched it will move the character to somewhere on the same level and will destroy itself."):PROCspc 560PROCp(18,6,108):PROCt("This is fungus. Fungus will grow into any empty space. Fungus can be walked through but will drain the characters health."):PROCspc 570PROCp(18,6,109):PROCt("This is a spellbook. When taken it will make the second-left most digit of the characters health equal the right-most digit and the left-most digit equal 0. e.g. 2345 becomes 0545"):PROCspc 580PROCp(18,6,114):PROCt("This is poisoned food. When taken it will reduce the characters health by 40."):PROCspc 590PROCp(18,6,115):PROCt("This is a cursed ring. When taken it will give the following effects :-"):PRINT'"Leprechaun - Armour value = 1"'"Enchanter - Weapon strength = 1"'"Warrior - Number of weapons = 1"'"Titan - Magic value = 1" 600PROCspc 610PROCp(18,6,118):PROCt("This is the master key. This must be taken to open the trap door."):PROCspc 630PROCp(16,6,130):PROCp(21,6,131):PROCt("These are sprung buffers. Sliders and missiles will bounce off these and return in the opposite direction."):PROCspc 640PROCp(18,6,132):PROCt("This is a golden crown. This is an item of treasure which doesn't need to be collected to finish the level."):PROCspc 660CLS:PRINT''"Want to see them again (Y/N) ?" 665IF INKEY(-69) THEN 190 670IF INKEY(-86) THEN 700 680GOTO 665 700*FX13 4 710MODE6:VDU23,1,0;0;0;0;:PRINTTAB(13,1);"WHITE MAGIC 2";TAB(6,10);"The game is now loading"'''''' 720CHAIN "MAGIC2GAME"
*FX13 4 ��4:�=&3000:�23,1,0;0;0;0;:�4,432,511:�5:�"WHITE MAGIC 2":�4,432,515:�"WHITE MAGIC 2":�4:�14,18);"Instructions":�28,0,31,39,20:*LOAD "INSTGRAPH" 3000 z�l=0 � 2 � 2:P%=&900:[OPT l:.Prt:LDA &408:STA &70:LDA &409:STA &71:LDA&40C:STA &72:LDA &40D:STA &73:LDA#0:STA&74:LDY#0 (6.Goprt:LDA (&70),Y:STA(&72),Y:INY:CPY#24:BNE Goprt 2�LDY#0:LDA&70:CLC:ADC#24:STA&70:LDA&71:ADC#0:STA&71:LDA&72:CLC:ADC#64:STA &72:LDA&73:ADC#1:STA&73:INC &74:LDA&74:CMP #3:BNE Goprt:RTS <�.int:STA&80:STX&81:STY&82:CMP#4:BNEno4:LDA#&AE:STA&FE07:LDA#119:STA&FE08:LDA#211:STA&FE09:LDX#0:LDY#0:.loop:INX:CPX#70:BNEloop:INY:CPY#7:BNEloop:LDA#&A6:STA&FE07:LDA#16:STA&FE08:LDA#17:STA&FE09:LDA&80:LDX&81:LDY&82:.no4:RTS F/]:�:?&220=int � 256:?&221=int � 256:*FX14 4 P � �tt@ ZB��p(X%,Y%,A%):C%=&5800+(X%*8)+(Y%*320):B%=&3000+(A%*72):�Prt:� d&��g:�L%=0 � 36 � 3:�p(L%,6,47):�:� n��t($&B00):�:�$&B00:� �<��spc:�8,11);"Press SPACE to continue";:� � �(-99):�g:� �5��wall(D%):�L%=2 � 34 � 8:�p(L%,6,D%):D%=D%+1:�:� �2�L%=0 � 36 � 3:�K%=0 � 12 � 3:�p(L%,K%,47):�:� ���p(3,6,0):�p(13,6,8):�p(24,6,24):�p(34,6,16):�t("The four characters. The LEPRECHAUN, ENCHANTER, TITAN and WARRIOR respectively."):�spc ���p(3,6,37):�p(13,6,41):�p(24,6,68):�p(34,6,64):�t("These are the characters weapons. The Leprechauns arrow, the Enchanters fireball, the Titans axe and the Warriors sword respectively."):�spc ܂�p(13,6,45):�p(24,6,46):�t("These are doors. A key is needed to opena door. To open a door simply move against it."):�spc �n�p(18,6,49):�t("This is a key. Each key will open any one door. To take a key simply walk overit."):�spc ��p(18,6,48):�t("This is food which will boost the characters health by 80 points. To take food just walk over it."):�spc ���p(18,6,50):�t("This is a ghost. Ghosts can be killed bymissile fire or hand to hand combat. Ghosts come out of skeletons but can't take much damage."):�spc ��p(18,6,54):�t("This is a guard. Guards can be killed bymissile fire or hand to hand combat. Guards come out of huts and are quite tough to kill."):�spc ��p(18,6,58):�t("This is the trapdoor which leads down tothe next level. The trapdoor can only beopened when the master key and all of the treasure has been collected."):�spc ��p(18,6,59):�t("This is a treasure chest. All of the treasure chests on a level must be collected before the trapdoor will open.To collect treasure just move over it."):�spc "z�p(18,6,60):�t("This is a cross of rejuvenation. When taken it will increase every characters health by 1000."):�spc ,��p(18,6,61):�t("This is a staff of speed. When taken by the character, it will enable the Enchanter, Titan and Warrior to run as fast as the Leprechaun. The effect will wear off before the next level."):�spc 6d�p(18,6,62):�t("This is a magic orb which will reverse the effect of the staff of speed."):�spc @z�p(18,6,63):�t("This is an amulet of healing. When takenit will give the character in use a health of 4000."):�spc h��p(13,6,85):�p(23,6,87):�t("These are skeletons. Ghosts will appear from skeletons. Skeletons can be destroyed by missiles of weapon strength4 or higher but not by hand to hand combat."):�spc ry�p(5,6,86):�p(18,6,128):�p(31,6,129):�t("These are spikes. Spikes will drain the characters health on contact."):�spc |��p(18,6,88):�t("This is a guards hut. Guards will appearfrom here. Huts can be destroyed by missiles of weapon strength 7 or higher but not by hand to hand combat."):�spc ��D%=89:�L%=3 � 33 � 10:�p(L%,6,D%):D%=D%+1:�:�t("These are passages which become narrowertowards one end. These passages can onlybe used from the wide end."):�spc ��D%=110:�L%=3 � 33 � 10:�p(L%,6,D%):D%=D%+1:�:�t("These are sliders. Sliders will move in the direction of their arrow unless there is an obstruction. If the character blocks the path of a slider,") �%�"it will drain his health.":�spc �e�p(18,6,93):�t("This is a stealer. Stealers will destroyall keys being carried on contact."):�spc ���p(18,6,94):�t("This is a vortex. On contact, the left-most digit of the characters healthwill be moved right one place and the left-most digit will become 0. e.g. 2345 becomes 0245"):�spc �P�p(18,6,95):�t("This is a potion. To take a potion just walk over it."):�spc �p(18,6,96):�t("This is a magic shield. When taken, it will increase the characters armour value by 1 up to a maximum of 9."):�spc ̕�p(18,6,97):�t("This is a magic sword. When taken, it will increase the characters weapon strength value by 1 up to a maximum of 9."):�spc օ�p(18,6,98):�t("This is a magic scroll. When taken, it will increase the characters magic valueby 1 up to a maximum of 9."):�spc �c�p(18,6,99):�t("This is a cask of beer. The Titan can push casks into any empty space."):�spc �^�p(18,6,100):�t("These are vines. Only the Warrior can cut her way through these."):�spc �]�p(18,6,101):�t("This is a magic pentagram. Only the Enchanter can cross this."):�spc �b�p(15,6,102):�p(22,6,103):�t("These are logs. Only the Leprechaun can climb over these."):�spc i�p(18,6,104):�t("This is a time pill. When taken it will reset the timer to its initial value."):�spc ��p(18,6,105):�t("This is a bomb. When touched it will explode, hurting the character and destroying whatever is directly north, south, east and west of it."):�spc ��p(18,6,106):�t("This is an ammo box. When taken it will increase the number of weapons the character can fire by 1 up to a maximum of 3."):�spc &��p(18,6,107):�t("This is a teleporter. When touched it will move the character to somewhere on the same level and will destroy itself."):�spc 0��p(18,6,108):�t("This is fungus. Fungus will grow into any empty space. Fungus can be walked through but will drain the characters health."):�spc :��p(18,6,109):�t("This is a spellbook. When taken it will make the second-left most digit of the characters health equal the right-most digit and the left-most digit equal 0. e.g. 2345 becomes 0545"):�spc Dl�p(18,6,114):�t("This is poisoned food. When taken it will reduce the characters health by 40."):�spc N��p(18,6,115):�t("This is a cursed ring. When taken it will give the following effects :-"):�'"Leprechaun - Armour value = 1"'"Enchanter - Weapon strength = 1"'"Warrior - Number of weapons = 1"'"Titan - Magic value = 1" X�spc b`�p(18,6,118):�t("This is the master key. This must be taken to open the trap door."):�spc v��p(16,6,130):�p(21,6,131):�t("These are sprung buffers. Sliders and missiles will bounce off these and return in the opposite direction."):�spc ���p(18,6,132):�t("This is a golden crown. This is an item of treasure which doesn't need to be collected to finish the level."):�spc �)�:�''"Want to see them again (Y/N) ?" �� �(-69) � �t~@ �� �(-86) � �t|B � � �tYB �*FX13 4 �T�6:�23,1,0;0;0;0;:�13,1);"WHITE MAGIC 2";�6,10);"The game is now loading"'''''' �� "MAGIC2GAME" �
00000000 0d 00 0a 0b 2a 46 58 31 33 20 34 0d 00 14 99 eb |....*FX13 4.....| 00000010 34 3a d3 3d 26 33 30 30 30 3a ef 32 33 2c 31 2c |4:.=&3000:.23,1,| 00000020 30 3b 30 3b 30 3b 30 3b 3a f0 34 2c 34 33 32 2c |0;0;0;0;:.4,432,| 00000030 35 31 31 3a ef 35 3a f1 22 57 48 49 54 45 20 4d |511:.5:."WHITE M| 00000040 41 47 49 43 20 32 22 3a f0 34 2c 34 33 32 2c 35 |AGIC 2":.4,432,5| 00000050 31 35 3a f1 22 57 48 49 54 45 20 4d 41 47 49 43 |15:."WHITE MAGIC| 00000060 20 32 22 3a ef 34 3a f1 8a 31 34 2c 31 38 29 3b | 2":.4:..14,18);| 00000070 22 49 6e 73 74 72 75 63 74 69 6f 6e 73 22 3a ef |"Instructions":.| 00000080 32 38 2c 30 2c 33 31 2c 33 39 2c 32 30 3a 2a 4c |28,0,31,39,20:*L| 00000090 4f 41 44 20 22 49 4e 53 54 47 52 41 50 48 22 20 |OAD "INSTGRAPH" | 000000a0 33 30 30 30 0d 00 1e 7a e3 6c 3d 30 20 b8 20 32 |3000...z.l=0 . 2| 000000b0 20 88 20 32 3a 50 25 3d 26 39 30 30 3a 5b 4f 50 | . 2:P%=&900:[OP| 000000c0 54 20 6c 3a 2e 50 72 74 3a 4c 44 41 20 26 34 30 |T l:.Prt:LDA &40| 000000d0 38 3a 53 54 41 20 26 37 30 3a 4c 44 41 20 26 34 |8:STA &70:LDA &4| 000000e0 30 39 3a 53 54 41 20 26 37 31 3a 4c 44 41 26 34 |09:STA &71:LDA&4| 000000f0 30 43 3a 53 54 41 20 26 37 32 3a 4c 44 41 20 26 |0C:STA &72:LDA &| 00000100 34 30 44 3a 53 54 41 20 26 37 33 3a 4c 44 41 23 |40D:STA &73:LDA#| 00000110 30 3a 53 54 41 26 37 34 3a 4c 44 59 23 30 0d 00 |0:STA&74:LDY#0..| 00000120 28 36 2e 47 6f 70 72 74 3a 4c 44 41 20 28 26 37 |(6.Goprt:LDA (&7| 00000130 30 29 2c 59 3a 53 54 41 28 26 37 32 29 2c 59 3a |0),Y:STA(&72),Y:| 00000140 49 4e 59 3a 43 50 59 23 32 34 3a 42 4e 45 20 47 |INY:CPY#24:BNE G| 00000150 6f 70 72 74 0d 00 32 88 4c 44 59 23 30 3a 4c 44 |oprt..2.LDY#0:LD| 00000160 41 26 37 30 3a 43 4c 43 3a 41 44 43 23 32 34 3a |A&70:CLC:ADC#24:| 00000170 53 54 41 26 37 30 3a 4c 44 41 26 37 31 3a 41 44 |STA&70:LDA&71:AD| 00000180 43 23 30 3a 53 54 41 26 37 31 3a 4c 44 41 26 37 |C#0:STA&71:LDA&7| 00000190 32 3a 43 4c 43 3a 41 44 43 23 36 34 3a 53 54 41 |2:CLC:ADC#64:STA| 000001a0 20 26 37 32 3a 4c 44 41 26 37 33 3a 41 44 43 23 | &72:LDA&73:ADC#| 000001b0 31 3a 53 54 41 26 37 33 3a 49 4e 43 20 26 37 34 |1:STA&73:INC &74| 000001c0 3a 4c 44 41 26 37 34 3a 43 4d 50 20 23 33 3a 42 |:LDA&74:CMP #3:B| 000001d0 4e 45 20 47 6f 70 72 74 3a 52 54 53 0d 00 3c e3 |NE Goprt:RTS..<.| 000001e0 2e 69 6e 74 3a 53 54 41 26 38 30 3a 53 54 58 26 |.int:STA&80:STX&| 000001f0 38 31 3a 53 54 59 26 38 32 3a 43 4d 50 23 34 3a |81:STY&82:CMP#4:| 00000200 42 4e 45 6e 6f 34 3a 4c 44 41 23 26 41 45 3a 53 |BNEno4:LDA#&AE:S| 00000210 54 41 26 46 45 30 37 3a 4c 44 41 23 31 31 39 3a |TA&FE07:LDA#119:| 00000220 53 54 41 26 46 45 30 38 3a 4c 44 41 23 32 31 31 |STA&FE08:LDA#211| 00000230 3a 53 54 41 26 46 45 30 39 3a 4c 44 58 23 30 3a |:STA&FE09:LDX#0:| 00000240 4c 44 59 23 30 3a 2e 6c 6f 6f 70 3a 49 4e 58 3a |LDY#0:.loop:INX:| 00000250 43 50 58 23 37 30 3a 42 4e 45 6c 6f 6f 70 3a 49 |CPX#70:BNEloop:I| 00000260 4e 59 3a 43 50 59 23 37 3a 42 4e 45 6c 6f 6f 70 |NY:CPY#7:BNEloop| 00000270 3a 4c 44 41 23 26 41 36 3a 53 54 41 26 46 45 30 |:LDA#&A6:STA&FE0| 00000280 37 3a 4c 44 41 23 31 36 3a 53 54 41 26 46 45 30 |7:LDA#16:STA&FE0| 00000290 38 3a 4c 44 41 23 31 37 3a 53 54 41 26 46 45 30 |8:LDA#17:STA&FE0| 000002a0 39 3a 4c 44 41 26 38 30 3a 4c 44 58 26 38 31 3a |9:LDA&80:LDX&81:| 000002b0 4c 44 59 26 38 32 3a 2e 6e 6f 34 3a 52 54 53 0d |LDY&82:.no4:RTS.| 000002c0 00 46 2f 5d 3a ed 3a 3f 26 32 32 30 3d 69 6e 74 |.F/]:.:?&220=int| 000002d0 20 83 20 32 35 36 3a 3f 26 32 32 31 3d 69 6e 74 | . 256:?&221=int| 000002e0 20 81 20 32 35 36 3a 2a 46 58 31 34 20 34 0d 00 | . 256:*FX14 4..| 000002f0 50 0a e5 20 8d 74 74 40 0d 00 5a 42 dd f2 70 28 |P.. .tt@..ZB..p(| 00000300 58 25 2c 59 25 2c 41 25 29 3a 43 25 3d 26 35 38 |X%,Y%,A%):C%=&58| 00000310 30 30 2b 28 58 25 2a 38 29 2b 28 59 25 2a 33 32 |00+(X%*8)+(Y%*32| 00000320 30 29 3a 42 25 3d 26 33 30 30 30 2b 28 41 25 2a |0):B%=&3000+(A%*| 00000330 37 32 29 3a d6 50 72 74 3a e1 0d 00 64 26 dd f2 |72):.Prt:...d&..| 00000340 67 3a e3 4c 25 3d 30 20 b8 20 33 36 20 88 20 33 |g:.L%=0 . 36 . 3| 00000350 3a f2 70 28 4c 25 2c 36 2c 34 37 29 3a ed 3a e1 |:.p(L%,6,47):.:.| 00000360 0d 00 6e 19 dd f2 74 28 24 26 42 30 30 29 3a db |..n...t($&B00):.| 00000370 3a f1 24 26 42 30 30 3a e1 0d 00 aa 3c dd f2 73 |:.$&B00:....<..s| 00000380 70 63 3a f1 8a 38 2c 31 31 29 3b 22 50 72 65 73 |pc:..8,11);"Pres| 00000390 73 20 53 50 41 43 45 20 74 6f 20 63 6f 6e 74 69 |s SPACE to conti| 000003a0 6e 75 65 22 3b 3a f5 20 fd 20 a6 28 2d 39 39 29 |nue";:. . .(-99)| 000003b0 3a f2 67 3a e1 0d 00 af 35 dd f2 77 61 6c 6c 28 |:.g:....5..wall(| 000003c0 44 25 29 3a e3 4c 25 3d 32 20 b8 20 33 34 20 88 |D%):.L%=2 . 34 .| 000003d0 20 38 3a f2 70 28 4c 25 2c 36 2c 44 25 29 3a 44 | 8:.p(L%,6,D%):D| 000003e0 25 3d 44 25 2b 31 3a ed 3a e1 0d 00 b4 32 e3 4c |%=D%+1:.:....2.L| 000003f0 25 3d 30 20 b8 20 33 36 20 88 20 33 3a e3 4b 25 |%=0 . 36 . 3:.K%| 00000400 3d 30 20 b8 20 31 32 20 88 20 33 3a f2 70 28 4c |=0 . 12 . 3:.p(L| 00000410 25 2c 4b 25 2c 34 37 29 3a ed 3a ed 0d 00 be 99 |%,K%,47):.:.....| 00000420 f2 70 28 33 2c 36 2c 30 29 3a f2 70 28 31 33 2c |.p(3,6,0):.p(13,| 00000430 36 2c 38 29 3a f2 70 28 32 34 2c 36 2c 32 34 29 |6,8):.p(24,6,24)| 00000440 3a f2 70 28 33 34 2c 36 2c 31 36 29 3a f2 74 28 |:.p(34,6,16):.t(| 00000450 22 54 68 65 20 66 6f 75 72 20 63 68 61 72 61 63 |"The four charac| 00000460 74 65 72 73 2e 20 54 68 65 20 4c 45 50 52 45 43 |ters. The LEPREC| 00000470 48 41 55 4e 2c 20 20 20 20 45 4e 43 48 41 4e 54 |HAUN, ENCHANT| 00000480 45 52 2c 20 54 49 54 41 4e 20 61 6e 64 20 57 41 |ER, TITAN and WA| 00000490 52 52 49 4f 52 20 20 20 20 20 20 20 20 20 20 20 |RRIOR | 000004a0 20 72 65 73 70 65 63 74 69 76 65 6c 79 2e 22 29 | respectively.")| 000004b0 3a f2 73 70 63 0d 00 d2 d2 f2 70 28 33 2c 36 2c |:.spc.....p(3,6,| 000004c0 33 37 29 3a f2 70 28 31 33 2c 36 2c 34 31 29 3a |37):.p(13,6,41):| 000004d0 f2 70 28 32 34 2c 36 2c 36 38 29 3a f2 70 28 33 |.p(24,6,68):.p(3| 000004e0 34 2c 36 2c 36 34 29 3a f2 74 28 22 54 68 65 73 |4,6,64):.t("Thes| 000004f0 65 20 61 72 65 20 74 68 65 20 63 68 61 72 61 63 |e are the charac| 00000500 74 65 72 73 20 77 65 61 70 6f 6e 73 2e 20 54 68 |ters weapons. Th| 00000510 65 20 20 20 4c 65 70 72 65 63 68 61 75 6e 73 20 |e Leprechauns | 00000520 61 72 72 6f 77 2c 20 74 68 65 20 45 6e 63 68 61 |arrow, the Encha| 00000530 6e 74 65 72 73 20 20 20 20 20 20 20 66 69 72 65 |nters fire| 00000540 62 61 6c 6c 2c 20 74 68 65 20 54 69 74 61 6e 73 |ball, the Titans| 00000550 20 61 78 65 20 61 6e 64 20 74 68 65 20 20 20 20 | axe and the | 00000560 20 20 20 20 57 61 72 72 69 6f 72 73 20 73 77 6f | Warriors swo| 00000570 72 64 20 72 65 73 70 65 63 74 69 76 65 6c 79 2e |rd respectively.| 00000580 22 29 3a f2 73 70 63 0d 00 dc 82 f2 70 28 31 33 |"):.spc.....p(13| 00000590 2c 36 2c 34 35 29 3a f2 70 28 32 34 2c 36 2c 34 |,6,45):.p(24,6,4| 000005a0 36 29 3a f2 74 28 22 54 68 65 73 65 20 61 72 65 |6):.t("These are| 000005b0 20 64 6f 6f 72 73 2e 20 41 20 6b 65 79 20 69 73 | doors. A key is| 000005c0 20 6e 65 65 64 65 64 20 74 6f 20 6f 70 65 6e 61 | needed to opena| 000005d0 20 64 6f 6f 72 2e 20 54 6f 20 6f 70 65 6e 20 61 | door. To open a| 000005e0 20 64 6f 6f 72 20 73 69 6d 70 6c 79 20 6d 6f 76 | door simply mov| 000005f0 65 20 20 20 20 20 20 61 67 61 69 6e 73 74 20 69 |e against i| 00000600 74 2e 22 29 3a f2 73 70 63 0d 00 e6 6e f2 70 28 |t."):.spc...n.p(| 00000610 31 38 2c 36 2c 34 39 29 3a f2 74 28 22 54 68 69 |18,6,49):.t("Thi| 00000620 73 20 69 73 20 61 20 6b 65 79 2e 20 45 61 63 68 |s is a key. Each| 00000630 20 6b 65 79 20 77 69 6c 6c 20 6f 70 65 6e 20 61 | key will open a| 00000640 6e 79 20 20 20 6f 6e 65 20 64 6f 6f 72 2e 20 54 |ny one door. T| 00000650 6f 20 74 61 6b 65 20 61 20 6b 65 79 20 73 69 6d |o take a key sim| 00000660 70 6c 79 20 77 61 6c 6b 20 6f 76 65 72 69 74 2e |ply walk overit.| 00000670 22 29 3a f2 73 70 63 0d 00 f0 82 f2 70 28 31 38 |"):.spc.....p(18| 00000680 2c 36 2c 34 38 29 3a f2 74 28 22 54 68 69 73 20 |,6,48):.t("This | 00000690 69 73 20 66 6f 6f 64 20 77 68 69 63 68 20 77 69 |is food which wi| 000006a0 6c 6c 20 62 6f 6f 73 74 20 74 68 65 20 20 20 20 |ll boost the | 000006b0 20 20 20 63 68 61 72 61 63 74 65 72 73 20 68 65 | characters he| 000006c0 61 6c 74 68 20 62 79 20 38 30 20 70 6f 69 6e 74 |alth by 80 point| 000006d0 73 2e 20 54 6f 20 74 61 6b 65 20 66 6f 6f 64 20 |s. To take food | 000006e0 6a 75 73 74 20 77 61 6c 6b 20 6f 76 65 72 20 69 |just walk over i| 000006f0 74 2e 22 29 3a f2 73 70 63 0d 00 fa a4 f2 70 28 |t."):.spc.....p(| 00000700 31 38 2c 36 2c 35 30 29 3a f2 74 28 22 54 68 69 |18,6,50):.t("Thi| 00000710 73 20 69 73 20 61 20 67 68 6f 73 74 2e 20 47 68 |s is a ghost. Gh| 00000720 6f 73 74 73 20 63 61 6e 20 62 65 20 6b 69 6c 6c |osts can be kill| 00000730 65 64 20 62 79 6d 69 73 73 69 6c 65 20 66 69 72 |ed bymissile fir| 00000740 65 20 6f 72 20 68 61 6e 64 20 74 6f 20 68 61 6e |e or hand to han| 00000750 64 20 63 6f 6d 62 61 74 2e 20 20 20 20 47 68 6f |d combat. Gho| 00000760 73 74 73 20 63 6f 6d 65 20 6f 75 74 20 6f 66 20 |sts come out of | 00000770 73 6b 65 6c 65 74 6f 6e 73 20 62 75 74 20 63 61 |skeletons but ca| 00000780 6e 27 74 20 20 74 61 6b 65 20 6d 75 63 68 20 64 |n't take much d| 00000790 61 6d 61 67 65 2e 22 29 3a f2 73 70 63 0d 01 04 |amage."):.spc...| 000007a0 a1 f2 70 28 31 38 2c 36 2c 35 34 29 3a f2 74 28 |..p(18,6,54):.t(| 000007b0 22 54 68 69 73 20 69 73 20 61 20 67 75 61 72 64 |"This is a guard| 000007c0 2e 20 47 75 61 72 64 73 20 63 61 6e 20 62 65 20 |. Guards can be | 000007d0 6b 69 6c 6c 65 64 20 62 79 6d 69 73 73 69 6c 65 |killed bymissile| 000007e0 20 66 69 72 65 20 6f 72 20 68 61 6e 64 20 74 6f | fire or hand to| 000007f0 20 68 61 6e 64 20 63 6f 6d 62 61 74 2e 20 20 20 | hand combat. | 00000800 20 47 75 61 72 64 73 20 63 6f 6d 65 20 6f 75 74 | Guards come out| 00000810 20 6f 66 20 68 75 74 73 20 61 6e 64 20 61 72 65 | of huts and are| 00000820 20 71 75 69 74 65 20 20 20 74 6f 75 67 68 20 74 | quite tough t| 00000830 6f 20 6b 69 6c 6c 2e 22 29 3a f2 73 70 63 0d 01 |o kill."):.spc..| 00000840 0e b3 f2 70 28 31 38 2c 36 2c 35 38 29 3a f2 74 |...p(18,6,58):.t| 00000850 28 22 54 68 69 73 20 69 73 20 74 68 65 20 74 72 |("This is the tr| 00000860 61 70 64 6f 6f 72 20 77 68 69 63 68 20 6c 65 61 |apdoor which lea| 00000870 64 73 20 64 6f 77 6e 20 74 6f 74 68 65 20 6e 65 |ds down tothe ne| 00000880 78 74 20 6c 65 76 65 6c 2e 20 54 68 65 20 74 72 |xt level. The tr| 00000890 61 70 64 6f 6f 72 20 63 61 6e 20 6f 6e 6c 79 20 |apdoor can only | 000008a0 62 65 6f 70 65 6e 65 64 20 77 68 65 6e 20 74 68 |beopened when th| 000008b0 65 20 6d 61 73 74 65 72 20 6b 65 79 20 61 6e 64 |e master key and| 000008c0 20 61 6c 6c 20 6f 66 20 20 20 74 68 65 20 74 72 | all of the tr| 000008d0 65 61 73 75 72 65 20 68 61 73 20 62 65 65 6e 20 |easure has been | 000008e0 63 6f 6c 6c 65 63 74 65 64 2e 22 29 3a f2 73 70 |collected."):.sp| 000008f0 63 0d 01 18 b9 f2 70 28 31 38 2c 36 2c 35 39 29 |c.....p(18,6,59)| 00000900 3a f2 74 28 22 54 68 69 73 20 69 73 20 61 20 74 |:.t("This is a t| 00000910 72 65 61 73 75 72 65 20 63 68 65 73 74 2e 20 41 |reasure chest. A| 00000920 6c 6c 20 6f 66 20 74 68 65 20 20 20 20 74 72 65 |ll of the tre| 00000930 61 73 75 72 65 20 63 68 65 73 74 73 20 6f 6e 20 |asure chests on | 00000940 61 20 6c 65 76 65 6c 20 6d 75 73 74 20 62 65 20 |a level must be | 00000950 20 20 20 20 20 63 6f 6c 6c 65 63 74 65 64 20 62 | collected b| 00000960 65 66 6f 72 65 20 74 68 65 20 74 72 61 70 64 6f |efore the trapdo| 00000970 6f 72 20 77 69 6c 6c 20 6f 70 65 6e 2e 54 6f 20 |or will open.To | 00000980 63 6f 6c 6c 65 63 74 20 74 72 65 61 73 75 72 65 |collect treasure| 00000990 20 6a 75 73 74 20 6d 6f 76 65 20 6f 76 65 72 20 | just move over | 000009a0 69 74 2e 22 29 3a f2 73 70 63 0d 01 22 7a f2 70 |it."):.spc.."z.p| 000009b0 28 31 38 2c 36 2c 36 30 29 3a f2 74 28 22 54 68 |(18,6,60):.t("Th| 000009c0 69 73 20 69 73 20 61 20 63 72 6f 73 73 20 6f 66 |is is a cross of| 000009d0 20 72 65 6a 75 76 65 6e 61 74 69 6f 6e 2e 20 57 | rejuvenation. W| 000009e0 68 65 6e 20 20 20 74 61 6b 65 6e 20 69 74 20 77 |hen taken it w| 000009f0 69 6c 6c 20 69 6e 63 72 65 61 73 65 20 65 76 65 |ill increase eve| 00000a00 72 79 20 63 68 61 72 61 63 74 65 72 73 20 68 65 |ry characters he| 00000a10 61 6c 74 68 20 62 79 20 31 30 30 30 2e 22 29 3a |alth by 1000."):| 00000a20 f2 73 70 63 0d 01 2c da f2 70 28 31 38 2c 36 2c |.spc..,..p(18,6,| 00000a30 36 31 29 3a f2 74 28 22 54 68 69 73 20 69 73 20 |61):.t("This is | 00000a40 61 20 73 74 61 66 66 20 6f 66 20 73 70 65 65 64 |a staff of speed| 00000a50 2e 20 57 68 65 6e 20 74 61 6b 65 6e 20 62 79 20 |. When taken by | 00000a60 74 68 65 20 63 68 61 72 61 63 74 65 72 2c 20 69 |the character, i| 00000a70 74 20 77 69 6c 6c 20 65 6e 61 62 6c 65 20 74 68 |t will enable th| 00000a80 65 20 20 20 20 20 20 20 45 6e 63 68 61 6e 74 65 |e Enchante| 00000a90 72 2c 20 54 69 74 61 6e 20 61 6e 64 20 57 61 72 |r, Titan and War| 00000aa0 72 69 6f 72 20 74 6f 20 72 75 6e 20 61 73 20 20 |rior to run as | 00000ab0 66 61 73 74 20 61 73 20 74 68 65 20 4c 65 70 72 |fast as the Lepr| 00000ac0 65 63 68 61 75 6e 2e 20 54 68 65 20 65 66 66 65 |echaun. The effe| 00000ad0 63 74 20 77 69 6c 6c 20 77 65 61 72 20 6f 66 66 |ct will wear off| 00000ae0 20 62 65 66 6f 72 65 20 74 68 65 20 6e 65 78 74 | before the next| 00000af0 20 6c 65 76 65 6c 2e 22 29 3a f2 73 70 63 0d 01 | level."):.spc..| 00000b00 36 64 f2 70 28 31 38 2c 36 2c 36 32 29 3a f2 74 |6d.p(18,6,62):.t| 00000b10 28 22 54 68 69 73 20 69 73 20 61 20 6d 61 67 69 |("This is a magi| 00000b20 63 20 6f 72 62 20 77 68 69 63 68 20 77 69 6c 6c |c orb which will| 00000b30 20 72 65 76 65 72 73 65 20 20 74 68 65 20 65 66 | reverse the ef| 00000b40 66 65 63 74 20 6f 66 20 74 68 65 20 73 74 61 66 |fect of the staf| 00000b50 66 20 6f 66 20 73 70 65 65 64 2e 22 29 3a f2 73 |f of speed."):.s| 00000b60 70 63 0d 01 40 7a f2 70 28 31 38 2c 36 2c 36 33 |pc..@z.p(18,6,63| 00000b70 29 3a f2 74 28 22 54 68 69 73 20 69 73 20 61 6e |):.t("This is an| 00000b80 20 61 6d 75 6c 65 74 20 6f 66 20 68 65 61 6c 69 | amulet of heali| 00000b90 6e 67 2e 20 57 68 65 6e 20 74 61 6b 65 6e 69 74 |ng. When takenit| 00000ba0 20 77 69 6c 6c 20 67 69 76 65 20 74 68 65 20 63 | will give the c| 00000bb0 68 61 72 61 63 74 65 72 20 69 6e 20 75 73 65 20 |haracter in use | 00000bc0 61 20 20 20 20 20 68 65 61 6c 74 68 20 6f 66 20 |a health of | 00000bd0 34 30 30 30 2e 22 29 3a f2 73 70 63 0d 01 68 ce |4000."):.spc..h.| 00000be0 f2 70 28 31 33 2c 36 2c 38 35 29 3a f2 70 28 32 |.p(13,6,85):.p(2| 00000bf0 33 2c 36 2c 38 37 29 3a f2 74 28 22 54 68 65 73 |3,6,87):.t("Thes| 00000c00 65 20 61 72 65 20 73 6b 65 6c 65 74 6f 6e 73 2e |e are skeletons.| 00000c10 20 47 68 6f 73 74 73 20 77 69 6c 6c 20 61 70 70 | Ghosts will app| 00000c20 65 61 72 20 66 72 6f 6d 20 73 6b 65 6c 65 74 6f |ear from skeleto| 00000c30 6e 73 2e 20 53 6b 65 6c 65 74 6f 6e 73 20 63 61 |ns. Skeletons ca| 00000c40 6e 20 62 65 20 20 20 20 20 20 20 20 64 65 73 74 |n be dest| 00000c50 72 6f 79 65 64 20 62 79 20 6d 69 73 73 69 6c 65 |royed by missile| 00000c60 73 20 6f 66 20 77 65 61 70 6f 6e 20 73 74 72 65 |s of weapon stre| 00000c70 6e 67 74 68 34 20 6f 72 20 68 69 67 68 65 72 20 |ngth4 or higher | 00000c80 62 75 74 20 6e 6f 74 20 62 79 20 68 61 6e 64 20 |but not by hand | 00000c90 74 6f 20 68 61 6e 64 20 20 20 20 20 63 6f 6d 62 |to hand comb| 00000ca0 61 74 2e 22 29 3a f2 73 70 63 0d 01 72 79 f2 70 |at."):.spc..ry.p| 00000cb0 28 35 2c 36 2c 38 36 29 3a f2 70 28 31 38 2c 36 |(5,6,86):.p(18,6| 00000cc0 2c 31 32 38 29 3a f2 70 28 33 31 2c 36 2c 31 32 |,128):.p(31,6,12| 00000cd0 39 29 3a f2 74 28 22 54 68 65 73 65 20 61 72 65 |9):.t("These are| 00000ce0 20 73 70 69 6b 65 73 2e 20 53 70 69 6b 65 73 20 | spikes. Spikes | 00000cf0 77 69 6c 6c 20 64 72 61 69 6e 20 74 68 65 20 63 |will drain the c| 00000d00 68 61 72 61 63 74 65 72 73 20 68 65 61 6c 74 68 |haracters health| 00000d10 20 6f 6e 20 63 6f 6e 74 61 63 74 2e 22 29 3a f2 | on contact."):.| 00000d20 73 70 63 0d 01 7c b2 f2 70 28 31 38 2c 36 2c 38 |spc..|..p(18,6,8| 00000d30 38 29 3a f2 74 28 22 54 68 69 73 20 69 73 20 61 |8):.t("This is a| 00000d40 20 67 75 61 72 64 73 20 68 75 74 2e 20 47 75 61 | guards hut. Gua| 00000d50 72 64 73 20 77 69 6c 6c 20 61 70 70 65 61 72 66 |rds will appearf| 00000d60 72 6f 6d 20 68 65 72 65 2e 20 48 75 74 73 20 63 |rom here. Huts c| 00000d70 61 6e 20 62 65 20 64 65 73 74 72 6f 79 65 64 20 |an be destroyed | 00000d80 62 79 20 20 20 20 20 6d 69 73 73 69 6c 65 73 20 |by missiles | 00000d90 6f 66 20 77 65 61 70 6f 6e 20 73 74 72 65 6e 67 |of weapon streng| 00000da0 74 68 20 37 20 6f 72 20 68 69 67 68 65 72 20 62 |th 7 or higher b| 00000db0 75 74 20 6e 6f 74 20 62 79 20 68 61 6e 64 20 74 |ut not by hand t| 00000dc0 6f 20 68 61 6e 64 20 63 6f 6d 62 61 74 2e 22 29 |o hand combat.")| 00000dd0 3a f2 73 70 63 0d 01 86 a5 44 25 3d 38 39 3a e3 |:.spc....D%=89:.| 00000de0 4c 25 3d 33 20 b8 20 33 33 20 88 20 31 30 3a f2 |L%=3 . 33 . 10:.| 00000df0 70 28 4c 25 2c 36 2c 44 25 29 3a 44 25 3d 44 25 |p(L%,6,D%):D%=D%| 00000e00 2b 31 3a ed 3a f2 74 28 22 54 68 65 73 65 20 61 |+1:.:.t("These a| 00000e10 72 65 20 70 61 73 73 61 67 65 73 20 77 68 69 63 |re passages whic| 00000e20 68 20 62 65 63 6f 6d 65 20 6e 61 72 72 6f 77 65 |h become narrowe| 00000e30 72 74 6f 77 61 72 64 73 20 6f 6e 65 20 65 6e 64 |rtowards one end| 00000e40 2e 20 54 68 65 73 65 20 70 61 73 73 61 67 65 73 |. These passages| 00000e50 20 63 61 6e 20 6f 6e 6c 79 62 65 20 75 73 65 64 | can onlybe used| 00000e60 20 66 72 6f 6d 20 74 68 65 20 77 69 64 65 20 65 | from the wide e| 00000e70 6e 64 2e 22 29 3a f2 73 70 63 0d 01 90 d5 44 25 |nd."):.spc....D%| 00000e80 3d 31 31 30 3a e3 4c 25 3d 33 20 b8 20 33 33 20 |=110:.L%=3 . 33 | 00000e90 88 20 31 30 3a f2 70 28 4c 25 2c 36 2c 44 25 29 |. 10:.p(L%,6,D%)| 00000ea0 3a 44 25 3d 44 25 2b 31 3a ed 3a f2 74 28 22 54 |:D%=D%+1:.:.t("T| 00000eb0 68 65 73 65 20 61 72 65 20 73 6c 69 64 65 72 73 |hese are sliders| 00000ec0 2e 20 53 6c 69 64 65 72 73 20 77 69 6c 6c 20 6d |. Sliders will m| 00000ed0 6f 76 65 20 69 6e 20 74 68 65 20 64 69 72 65 63 |ove in the direc| 00000ee0 74 69 6f 6e 20 6f 66 20 74 68 65 69 72 20 61 72 |tion of their ar| 00000ef0 72 6f 77 20 75 6e 6c 65 73 73 20 20 20 20 20 74 |row unless t| 00000f00 68 65 72 65 20 69 73 20 61 6e 20 6f 62 73 74 72 |here is an obstr| 00000f10 75 63 74 69 6f 6e 2e 20 49 66 20 74 68 65 20 20 |uction. If the | 00000f20 20 20 20 20 20 20 20 63 68 61 72 61 63 74 65 72 | character| 00000f30 20 62 6c 6f 63 6b 73 20 74 68 65 20 70 61 74 68 | blocks the path| 00000f40 20 6f 66 20 61 20 73 6c 69 64 65 72 2c 22 29 0d | of a slider,").| 00000f50 01 9a 25 f1 22 69 74 20 77 69 6c 6c 20 64 72 61 |..%."it will dra| 00000f60 69 6e 20 68 69 73 20 68 65 61 6c 74 68 2e 22 3a |in his health.":| 00000f70 f2 73 70 63 0d 01 a4 65 f2 70 28 31 38 2c 36 2c |.spc...e.p(18,6,| 00000f80 39 33 29 3a f2 74 28 22 54 68 69 73 20 69 73 20 |93):.t("This is | 00000f90 61 20 73 74 65 61 6c 65 72 2e 20 53 74 65 61 6c |a stealer. Steal| 00000fa0 65 72 73 20 77 69 6c 6c 20 64 65 73 74 72 6f 79 |ers will destroy| 00000fb0 61 6c 6c 20 6b 65 79 73 20 62 65 69 6e 67 20 63 |all keys being c| 00000fc0 61 72 72 69 65 64 20 6f 6e 20 63 6f 6e 74 61 63 |arried on contac| 00000fd0 74 2e 22 29 3a f2 73 70 63 0d 01 ae d1 f2 70 28 |t."):.spc.....p(| 00000fe0 31 38 2c 36 2c 39 34 29 3a f2 74 28 22 54 68 69 |18,6,94):.t("Thi| 00000ff0 73 20 69 73 20 61 20 76 6f 72 74 65 78 2e 20 4f |s is a vortex. O| 00001000 6e 20 63 6f 6e 74 61 63 74 2c 20 74 68 65 20 20 |n contact, the | 00001010 20 20 20 20 20 6c 65 66 74 2d 6d 6f 73 74 20 64 | left-most d| 00001020 69 67 69 74 20 6f 66 20 74 68 65 20 63 68 61 72 |igit of the char| 00001030 61 63 74 65 72 73 20 68 65 61 6c 74 68 77 69 6c |acters healthwil| 00001040 6c 20 62 65 20 6d 6f 76 65 64 20 72 69 67 68 74 |l be moved right| 00001050 20 6f 6e 65 20 70 6c 61 63 65 20 61 6e 64 20 74 | one place and t| 00001060 68 65 20 20 20 6c 65 66 74 2d 6d 6f 73 74 20 64 |he left-most d| 00001070 69 67 69 74 20 77 69 6c 6c 20 62 65 63 6f 6d 65 |igit will become| 00001080 20 30 2e 20 20 20 20 20 20 20 20 20 20 65 2e 67 | 0. e.g| 00001090 2e 20 32 33 34 35 20 62 65 63 6f 6d 65 73 20 30 |. 2345 becomes 0| 000010a0 32 34 35 22 29 3a f2 73 70 63 0d 01 b8 50 f2 70 |245"):.spc...P.p| 000010b0 28 31 38 2c 36 2c 39 35 29 3a f2 74 28 22 54 68 |(18,6,95):.t("Th| 000010c0 69 73 20 69 73 20 61 20 70 6f 74 69 6f 6e 2e 20 |is is a potion. | 000010d0 54 6f 20 74 61 6b 65 20 61 20 70 6f 74 69 6f 6e |To take a potion| 000010e0 20 6a 75 73 74 20 77 61 6c 6b 20 6f 76 65 72 20 | just walk over | 000010f0 69 74 2e 22 29 3a f2 73 70 63 0d 01 c2 8b f2 70 |it."):.spc.....p| 00001100 28 31 38 2c 36 2c 39 36 29 3a f2 74 28 22 54 68 |(18,6,96):.t("Th| 00001110 69 73 20 69 73 20 61 20 6d 61 67 69 63 20 73 68 |is is a magic sh| 00001120 69 65 6c 64 2e 20 57 68 65 6e 20 74 61 6b 65 6e |ield. When taken| 00001130 2c 20 69 74 20 20 77 69 6c 6c 20 69 6e 63 72 65 |, it will incre| 00001140 61 73 65 20 74 68 65 20 63 68 61 72 61 63 74 65 |ase the characte| 00001150 72 73 20 61 72 6d 6f 75 72 20 20 20 20 20 76 61 |rs armour va| 00001160 6c 75 65 20 62 79 20 31 20 75 70 20 74 6f 20 61 |lue by 1 up to a| 00001170 20 6d 61 78 69 6d 75 6d 20 6f 66 20 39 2e 22 29 | maximum of 9.")| 00001180 3a f2 73 70 63 0d 01 cc 95 f2 70 28 31 38 2c 36 |:.spc.....p(18,6| 00001190 2c 39 37 29 3a f2 74 28 22 54 68 69 73 20 69 73 |,97):.t("This is| 000011a0 20 61 20 6d 61 67 69 63 20 73 77 6f 72 64 2e 20 | a magic sword. | 000011b0 57 68 65 6e 20 74 61 6b 65 6e 2c 20 69 74 20 20 |When taken, it | 000011c0 20 77 69 6c 6c 20 69 6e 63 72 65 61 73 65 20 74 | will increase t| 000011d0 68 65 20 63 68 61 72 61 63 74 65 72 73 20 77 65 |he characters we| 000011e0 61 70 6f 6e 20 20 20 20 20 73 74 72 65 6e 67 74 |apon strengt| 000011f0 68 20 76 61 6c 75 65 20 62 79 20 31 20 75 70 20 |h value by 1 up | 00001200 74 6f 20 61 20 6d 61 78 69 6d 75 6d 20 6f 66 20 |to a maximum of | 00001210 20 39 2e 22 29 3a f2 73 70 63 0d 01 d6 85 f2 70 | 9."):.spc.....p| 00001220 28 31 38 2c 36 2c 39 38 29 3a f2 74 28 22 54 68 |(18,6,98):.t("Th| 00001230 69 73 20 69 73 20 61 20 6d 61 67 69 63 20 73 63 |is is a magic sc| 00001240 72 6f 6c 6c 2e 20 57 68 65 6e 20 74 61 6b 65 6e |roll. When taken| 00001250 2c 20 69 74 20 20 77 69 6c 6c 20 69 6e 63 72 65 |, it will incre| 00001260 61 73 65 20 74 68 65 20 63 68 61 72 61 63 74 65 |ase the characte| 00001270 72 73 20 6d 61 67 69 63 20 76 61 6c 75 65 62 79 |rs magic valueby| 00001280 20 31 20 75 70 20 74 6f 20 61 20 6d 61 78 69 6d | 1 up to a maxim| 00001290 75 6d 20 6f 66 20 39 2e 22 29 3a f2 73 70 63 0d |um of 9."):.spc.| 000012a0 01 e0 63 f2 70 28 31 38 2c 36 2c 39 39 29 3a f2 |..c.p(18,6,99):.| 000012b0 74 28 22 54 68 69 73 20 69 73 20 61 20 63 61 73 |t("This is a cas| 000012c0 6b 20 6f 66 20 62 65 65 72 2e 20 54 68 65 20 54 |k of beer. The T| 000012d0 69 74 61 6e 20 63 61 6e 20 20 20 70 75 73 68 20 |itan can push | 000012e0 63 61 73 6b 73 20 69 6e 74 6f 20 61 6e 79 20 65 |casks into any e| 000012f0 6d 70 74 79 20 73 70 61 63 65 2e 22 29 3a f2 73 |mpty space."):.s| 00001300 70 63 0d 01 ea 5e f2 70 28 31 38 2c 36 2c 31 30 |pc...^.p(18,6,10| 00001310 30 29 3a f2 74 28 22 54 68 65 73 65 20 61 72 65 |0):.t("These are| 00001320 20 76 69 6e 65 73 2e 20 4f 6e 6c 79 20 74 68 65 | vines. Only the| 00001330 20 57 61 72 72 69 6f 72 20 63 61 6e 20 20 20 63 | Warrior can c| 00001340 75 74 20 68 65 72 20 77 61 79 20 74 68 72 6f 75 |ut her way throu| 00001350 67 68 20 74 68 65 73 65 2e 22 29 3a f2 73 70 63 |gh these."):.spc| 00001360 0d 01 f4 5d f2 70 28 31 38 2c 36 2c 31 30 31 29 |...].p(18,6,101)| 00001370 3a f2 74 28 22 54 68 69 73 20 69 73 20 61 20 6d |:.t("This is a m| 00001380 61 67 69 63 20 70 65 6e 74 61 67 72 61 6d 2e 20 |agic pentagram. | 00001390 4f 6e 6c 79 20 74 68 65 20 20 20 20 20 45 6e 63 |Only the Enc| 000013a0 68 61 6e 74 65 72 20 63 61 6e 20 63 72 6f 73 73 |hanter can cross| 000013b0 20 74 68 69 73 2e 22 29 3a f2 73 70 63 0d 01 fe | this."):.spc...| 000013c0 62 f2 70 28 31 35 2c 36 2c 31 30 32 29 3a f2 70 |b.p(15,6,102):.p| 000013d0 28 32 32 2c 36 2c 31 30 33 29 3a f2 74 28 22 54 |(22,6,103):.t("T| 000013e0 68 65 73 65 20 61 72 65 20 6c 6f 67 73 2e 20 4f |hese are logs. O| 000013f0 6e 6c 79 20 74 68 65 20 4c 65 70 72 65 63 68 61 |nly the Leprecha| 00001400 75 6e 20 63 61 6e 20 63 6c 69 6d 62 20 6f 76 65 |un can climb ove| 00001410 72 20 74 68 65 73 65 2e 22 29 3a f2 73 70 63 0d |r these."):.spc.| 00001420 02 08 69 f2 70 28 31 38 2c 36 2c 31 30 34 29 3a |..i.p(18,6,104):| 00001430 f2 74 28 22 54 68 69 73 20 69 73 20 61 20 74 69 |.t("This is a ti| 00001440 6d 65 20 70 69 6c 6c 2e 20 57 68 65 6e 20 74 61 |me pill. When ta| 00001450 6b 65 6e 20 69 74 20 77 69 6c 6c 20 72 65 73 65 |ken it will rese| 00001460 74 20 74 68 65 20 74 69 6d 65 72 20 74 6f 20 69 |t the timer to i| 00001470 74 73 20 69 6e 69 74 69 61 6c 20 76 61 6c 75 65 |ts initial value| 00001480 2e 22 29 3a f2 73 70 63 0d 02 12 af f2 70 28 31 |."):.spc.....p(1| 00001490 38 2c 36 2c 31 30 35 29 3a f2 74 28 22 54 68 69 |8,6,105):.t("Thi| 000014a0 73 20 69 73 20 61 20 62 6f 6d 62 2e 20 57 68 65 |s is a bomb. Whe| 000014b0 6e 20 74 6f 75 63 68 65 64 20 69 74 20 77 69 6c |n touched it wil| 000014c0 6c 20 20 20 20 65 78 70 6c 6f 64 65 2c 20 68 75 |l explode, hu| 000014d0 72 74 69 6e 67 20 74 68 65 20 63 68 61 72 61 63 |rting the charac| 000014e0 74 65 72 20 61 6e 64 20 20 20 20 20 20 64 65 73 |ter and des| 000014f0 74 72 6f 79 69 6e 67 20 77 68 61 74 65 76 65 72 |troying whatever| 00001500 20 69 73 20 64 69 72 65 63 74 6c 79 20 6e 6f 72 | is directly nor| 00001510 74 68 2c 20 20 73 6f 75 74 68 2c 20 65 61 73 74 |th, south, east| 00001520 20 61 6e 64 20 77 65 73 74 20 6f 66 20 69 74 2e | and west of it.| 00001530 22 29 3a f2 73 70 63 0d 02 1c 99 f2 70 28 31 38 |"):.spc.....p(18| 00001540 2c 36 2c 31 30 36 29 3a f2 74 28 22 54 68 69 73 |,6,106):.t("This| 00001550 20 69 73 20 61 6e 20 61 6d 6d 6f 20 62 6f 78 2e | is an ammo box.| 00001560 20 57 68 65 6e 20 74 61 6b 65 6e 20 69 74 20 77 | When taken it w| 00001570 69 6c 6c 20 69 6e 63 72 65 61 73 65 20 74 68 65 |ill increase the| 00001580 20 6e 75 6d 62 65 72 20 6f 66 20 77 65 61 70 6f | number of weapo| 00001590 6e 73 20 74 68 65 20 20 20 20 20 20 63 68 61 72 |ns the char| 000015a0 61 63 74 65 72 20 63 61 6e 20 66 69 72 65 20 62 |acter can fire b| 000015b0 79 20 31 20 75 70 20 74 6f 20 61 20 6d 61 78 69 |y 1 up to a maxi| 000015c0 6d 75 6d 20 6f 66 20 33 2e 22 29 3a f2 73 70 63 |mum of 3."):.spc| 000015d0 0d 02 26 93 f2 70 28 31 38 2c 36 2c 31 30 37 29 |..&..p(18,6,107)| 000015e0 3a f2 74 28 22 54 68 69 73 20 69 73 20 61 20 74 |:.t("This is a t| 000015f0 65 6c 65 70 6f 72 74 65 72 2e 20 57 68 65 6e 20 |eleporter. When | 00001600 74 6f 75 63 68 65 64 20 69 74 20 20 20 77 69 6c |touched it wil| 00001610 6c 20 6d 6f 76 65 20 74 68 65 20 63 68 61 72 61 |l move the chara| 00001620 63 74 65 72 20 74 6f 20 73 6f 6d 65 77 68 65 72 |cter to somewher| 00001630 65 20 6f 6e 20 74 68 65 20 73 61 6d 65 20 6c 65 |e on the same le| 00001640 76 65 6c 20 61 6e 64 20 77 69 6c 6c 20 64 65 73 |vel and will des| 00001650 74 72 6f 79 20 69 74 73 65 6c 66 2e 22 29 3a f2 |troy itself."):.| 00001660 73 70 63 0d 02 30 9b f2 70 28 31 38 2c 36 2c 31 |spc..0..p(18,6,1| 00001670 30 38 29 3a f2 74 28 22 54 68 69 73 20 69 73 20 |08):.t("This is | 00001680 66 75 6e 67 75 73 2e 20 46 75 6e 67 75 73 20 77 |fungus. Fungus w| 00001690 69 6c 6c 20 67 72 6f 77 20 69 6e 74 6f 20 20 20 |ill grow into | 000016a0 61 6e 79 20 65 6d 70 74 79 20 73 70 61 63 65 2e |any empty space.| 000016b0 20 46 75 6e 67 75 73 20 63 61 6e 20 62 65 20 77 | Fungus can be w| 000016c0 61 6c 6b 65 64 20 20 20 74 68 72 6f 75 67 68 20 |alked through | 000016d0 62 75 74 20 77 69 6c 6c 20 64 72 61 69 6e 20 74 |but will drain t| 000016e0 68 65 20 63 68 61 72 61 63 74 65 72 73 20 20 20 |he characters | 000016f0 68 65 61 6c 74 68 2e 22 29 3a f2 73 70 63 0d 02 |health."):.spc..| 00001700 3a d2 f2 70 28 31 38 2c 36 2c 31 30 39 29 3a f2 |:..p(18,6,109):.| 00001710 74 28 22 54 68 69 73 20 69 73 20 61 20 73 70 65 |t("This is a spe| 00001720 6c 6c 62 6f 6f 6b 2e 20 57 68 65 6e 20 74 61 6b |llbook. When tak| 00001730 65 6e 20 69 74 20 77 69 6c 6c 20 6d 61 6b 65 20 |en it will make | 00001740 74 68 65 20 73 65 63 6f 6e 64 2d 6c 65 66 74 20 |the second-left | 00001750 6d 6f 73 74 20 64 69 67 69 74 20 6f 66 20 74 68 |most digit of th| 00001760 65 20 20 63 68 61 72 61 63 74 65 72 73 20 68 65 |e characters he| 00001770 61 6c 74 68 20 65 71 75 61 6c 20 74 68 65 20 72 |alth equal the r| 00001780 69 67 68 74 2d 6d 6f 73 74 20 20 64 69 67 69 74 |ight-most digit| 00001790 20 61 6e 64 20 74 68 65 20 6c 65 66 74 2d 6d 6f | and the left-mo| 000017a0 73 74 20 64 69 67 69 74 20 65 71 75 61 6c 20 30 |st digit equal 0| 000017b0 2e 20 20 65 2e 67 2e 20 32 33 34 35 20 62 65 63 |. e.g. 2345 bec| 000017c0 6f 6d 65 73 20 30 35 34 35 22 29 3a f2 73 70 63 |omes 0545"):.spc| 000017d0 0d 02 44 6c f2 70 28 31 38 2c 36 2c 31 31 34 29 |..Dl.p(18,6,114)| 000017e0 3a f2 74 28 22 54 68 69 73 20 69 73 20 70 6f 69 |:.t("This is poi| 000017f0 73 6f 6e 65 64 20 66 6f 6f 64 2e 20 57 68 65 6e |soned food. When| 00001800 20 74 61 6b 65 6e 20 69 74 20 20 20 20 77 69 6c | taken it wil| 00001810 6c 20 72 65 64 75 63 65 20 74 68 65 20 63 68 61 |l reduce the cha| 00001820 72 61 63 74 65 72 73 20 68 65 61 6c 74 68 20 62 |racters health b| 00001830 79 20 34 30 2e 22 29 3a f2 73 70 63 0d 02 4e e1 |y 40."):.spc..N.| 00001840 f2 70 28 31 38 2c 36 2c 31 31 35 29 3a f2 74 28 |.p(18,6,115):.t(| 00001850 22 54 68 69 73 20 69 73 20 61 20 63 75 72 73 65 |"This is a curse| 00001860 64 20 72 69 6e 67 2e 20 57 68 65 6e 20 74 61 6b |d ring. When tak| 00001870 65 6e 20 69 74 20 20 20 20 77 69 6c 6c 20 67 69 |en it will gi| 00001880 76 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 |ve the following| 00001890 20 65 66 66 65 63 74 73 20 3a 2d 22 29 3a f1 27 | effects :-"):.'| 000018a0 22 4c 65 70 72 65 63 68 61 75 6e 20 2d 20 41 72 |"Leprechaun - Ar| 000018b0 6d 6f 75 72 20 76 61 6c 75 65 20 3d 20 31 22 27 |mour value = 1"'| 000018c0 22 45 6e 63 68 61 6e 74 65 72 20 2d 20 57 65 61 |"Enchanter - Wea| 000018d0 70 6f 6e 20 73 74 72 65 6e 67 74 68 20 3d 20 31 |pon strength = 1| 000018e0 22 27 22 57 61 72 72 69 6f 72 20 2d 20 4e 75 6d |"'"Warrior - Num| 000018f0 62 65 72 20 6f 66 20 77 65 61 70 6f 6e 73 20 3d |ber of weapons =| 00001900 20 31 22 27 22 54 69 74 61 6e 20 2d 20 4d 61 67 | 1"'"Titan - Mag| 00001910 69 63 20 76 61 6c 75 65 20 3d 20 31 22 0d 02 58 |ic value = 1"..X| 00001920 08 f2 73 70 63 0d 02 62 60 f2 70 28 31 38 2c 36 |..spc..b`.p(18,6| 00001930 2c 31 31 38 29 3a f2 74 28 22 54 68 69 73 20 69 |,118):.t("This i| 00001940 73 20 74 68 65 20 6d 61 73 74 65 72 20 6b 65 79 |s the master key| 00001950 2e 20 54 68 69 73 20 6d 75 73 74 20 62 65 20 20 |. This must be | 00001960 20 20 74 61 6b 65 6e 20 74 6f 20 6f 70 65 6e 20 | taken to open | 00001970 74 68 65 20 74 72 61 70 20 64 6f 6f 72 2e 22 29 |the trap door.")| 00001980 3a f2 73 70 63 0d 02 76 9a f2 70 28 31 36 2c 36 |:.spc..v..p(16,6| 00001990 2c 31 33 30 29 3a f2 70 28 32 31 2c 36 2c 31 33 |,130):.p(21,6,13| 000019a0 31 29 3a f2 74 28 22 54 68 65 73 65 20 61 72 65 |1):.t("These are| 000019b0 20 73 70 72 75 6e 67 20 62 75 66 66 65 72 73 2e | sprung buffers.| 000019c0 20 53 6c 69 64 65 72 73 20 61 6e 64 20 20 20 6d | Sliders and m| 000019d0 69 73 73 69 6c 65 73 20 77 69 6c 6c 20 62 6f 75 |issiles will bou| 000019e0 6e 63 65 20 6f 66 66 20 74 68 65 73 65 20 61 6e |nce off these an| 000019f0 64 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 6e |d return in| 00001a00 20 74 68 65 20 6f 70 70 6f 73 69 74 65 20 64 69 | the opposite di| 00001a10 72 65 63 74 69 6f 6e 2e 22 29 3a f2 73 70 63 0d |rection."):.spc.| 00001a20 02 80 8a f2 70 28 31 38 2c 36 2c 31 33 32 29 3a |....p(18,6,132):| 00001a30 f2 74 28 22 54 68 69 73 20 69 73 20 61 20 67 6f |.t("This is a go| 00001a40 6c 64 65 6e 20 63 72 6f 77 6e 2e 20 54 68 69 73 |lden crown. This| 00001a50 20 69 73 20 61 6e 20 69 74 65 6d 20 6f 66 20 74 | is an item of t| 00001a60 72 65 61 73 75 72 65 20 77 68 69 63 68 20 64 6f |reasure which do| 00001a70 65 73 6e 27 74 20 6e 65 65 64 20 74 6f 20 62 65 |esn't need to be| 00001a80 20 20 20 20 63 6f 6c 6c 65 63 74 65 64 20 74 6f | collected to| 00001a90 20 66 69 6e 69 73 68 20 74 68 65 20 6c 65 76 65 | finish the leve| 00001aa0 6c 2e 22 29 3a f2 73 70 63 0d 02 94 29 db 3a f1 |l."):.spc...).:.| 00001ab0 27 27 22 57 61 6e 74 20 74 6f 20 73 65 65 20 74 |''"Want to see t| 00001ac0 68 65 6d 20 61 67 61 69 6e 20 28 59 2f 4e 29 20 |hem again (Y/N) | 00001ad0 3f 22 0d 02 99 13 e7 20 a6 28 2d 36 39 29 20 8c |?"..... .(-69) .| 00001ae0 20 8d 74 7e 40 0d 02 9e 13 e7 20 a6 28 2d 38 36 | .t~@..... .(-86| 00001af0 29 20 8c 20 8d 74 7c 42 0d 02 a8 0a e5 20 8d 74 |) . .t|B..... .t| 00001b00 59 42 0d 02 bc 0b 2a 46 58 31 33 20 34 0d 02 c6 |YB....*FX13 4...| 00001b10 54 eb 36 3a ef 32 33 2c 31 2c 30 3b 30 3b 30 3b |T.6:.23,1,0;0;0;| 00001b20 30 3b 3a f1 8a 31 33 2c 31 29 3b 22 57 48 49 54 |0;:..13,1);"WHIT| 00001b30 45 20 4d 41 47 49 43 20 32 22 3b 8a 36 2c 31 30 |E MAGIC 2";.6,10| 00001b40 29 3b 22 54 68 65 20 67 61 6d 65 20 69 73 20 6e |);"The game is n| 00001b50 6f 77 20 6c 6f 61 64 69 6e 67 22 27 27 27 27 27 |ow loading"'''''| 00001b60 27 0d 02 d0 12 d7 20 22 4d 41 47 49 43 32 47 41 |'..... "MAGIC2GA| 00001b70 4d 45 22 0d ff |ME"..| 00001b75