Home » Personal collection » Acorn ADFS disks » Electron » Play_it_again_Sam_8_9.ADF » Sam8/Quest/NEXT

Sam8/Quest/NEXT

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 ADFS disks » Electron » Play_it_again_Sam_8_9.ADF
Filename: Sam8/Quest/NEXT
Read OK:
File size: 0496 bytes
Load address: 1900
Exec address: 1D02
File contents
   10REM (c) TONY OAKDEN 
   20REM FOR SUPERIOR SOFTWARE 1988
   30MODE1
   35VDU23,1,0;0;0;0;
   40PRINTTAB(0,31)
   50?&282=&A8:?&FE07=&A8
   60?&FE03=&2C:?&FE02=0
   70VDU28,3,30,16,28
   80VDU19,1,2;0;0;:VDU19,3,5;0;0;:VDU23;8202;0;0;0;:*LOAD QUESTO 56C0
   90PRINT:PRINT
  100PRINT"By Tony Oakden";
  101T%=TIME:*FX15,0
  102REPEATUNTILTIME>T%+800 ORINKEY(10)<>-1
  120VDU24,0;32;1279;831;
  130COLOUR1
  140*RUN QUEST1

� (c) TONY OAKDEN 
 � FOR SUPERIOR SOFTWARE 1988
�1
#�23,1,0;0;0;0;
(�0,31)
2?&282=&A8:?&FE07=&A8
<?&FE03=&2C:?&FE02=0
F�28,3,30,16,28
P?�19,1,2;0;0;:�19,3,5;0;0;:�23;8202;0;0;0;:*LOAD QUESTO 56C0
Z�:�
d�"By Tony Oakden";
eT%=�:*FX15,0
f���>T%+800 ��(10)<>-1
x�24,0;32;1279;831;
��1
�*RUN QUEST1
�S
��0,31)
��28,1,27,14,23
�*FX210,1
�*RUN QUEST1
�6;
�*RUN QUEST1
�U�A%=1 �t~@
�*L.HEADERE
�GPR$=�(19-��PR$,19))�2," ")+PR$:$&1A72=PR$:?(&1A72+�PR$)=&20:*OPT1,2
�	�dH@
�
*L.HEADER
��7:$&1968=S$+"00:*RUN"
�@PR$=�(21-��PR$,21))�2," ")+PR$:$&1ABD=PR$:$&1AE5=PR$:*OPT1,2
�	*TAPE
�*FX 138,0,13
�BF%=&7B80:X%=BF%:Y%=BF%�256
�[�A%=1� $BF%="*SAVE "+TN$+" FF1900+229":�&FFF7 � $BF%="*SAVE "+TN$+" FF1900+1A0":�&FFF7 
�	*DISC
*OPT1,2
�A%=2�A%=5
�(200+100*A%)
,� BBC FILES
6*LOAD QUEST 1900
@	*TAPE
J*FX 138,0,13
K	�&C00
T*SAVE QUEST 1900+496 1D02
U	�&C0D
^	*DISC
h*LOAD QUESTO 1900
r	*TAPE
|*FX 138,0,13
�$*SAVE QUESTO 1900+2100 5800 5800
�	*DISC
��e��f��d�B���� ����� ������� ��L��L��c�d�g�d�'��e��f��c`PAGE=&1900
OLD
ONERRORRUN
*FX200,2
RUN
BASIC
O
00000000  0d 00 0a 16 f4 20 28 63  29 20 54 4f 4e 59 20 4f  |..... (c) TONY O|
00000010  41 4b 44 45 4e 20 0d 00  14 20 f4 20 46 4f 52 20  |AKDEN ... . FOR |
00000020  53 55 50 45 52 49 4f 52  20 53 4f 46 54 57 41 52  |SUPERIOR SOFTWAR|
00000030  45 20 31 39 38 38 0d 00  1e 06 eb 31 0d 00 23 12  |E 1988.....1..#.|
00000040  ef 32 33 2c 31 2c 30 3b  30 3b 30 3b 30 3b 0d 00  |.23,1,0;0;0;0;..|
00000050  28 0b f1 8a 30 2c 33 31  29 0d 00 32 18 3f 26 32  |(...0,31)..2.?&2|
00000060  38 32 3d 26 41 38 3a 3f  26 46 45 30 37 3d 26 41  |82=&A8:?&FE07=&A|
00000070  38 0d 00 3c 17 3f 26 46  45 30 33 3d 26 32 43 3a  |8..<.?&FE03=&2C:|
00000080  3f 26 46 45 30 32 3d 30  0d 00 46 12 ef 32 38 2c  |?&FE02=0..F..28,|
00000090  33 2c 33 30 2c 31 36 2c  32 38 0d 00 50 3f ef 31  |3,30,16,28..P?.1|
000000a0  39 2c 31 2c 32 3b 30 3b  30 3b 3a ef 31 39 2c 33  |9,1,2;0;0;:.19,3|
000000b0  2c 35 3b 30 3b 30 3b 3a  ef 32 33 3b 38 32 30 32  |,5;0;0;:.23;8202|
000000c0  3b 30 3b 30 3b 30 3b 3a  2a 4c 4f 41 44 20 51 55  |;0;0;0;:*LOAD QU|
000000d0  45 53 54 4f 20 35 36 43  30 0d 00 5a 07 f1 3a f1  |ESTO 56C0..Z..:.|
000000e0  0d 00 64 16 f1 22 42 79  20 54 6f 6e 79 20 4f 61  |..d.."By Tony Oa|
000000f0  6b 64 65 6e 22 3b 0d 00  65 10 54 25 3d 91 3a 2a  |kden";..e.T%=.:*|
00000100  46 58 31 35 2c 30 0d 00  66 19 f5 fd 91 3e 54 25  |FX15,0..f....>T%|
00000110  2b 38 30 30 20 84 a6 28  31 30 29 3c 3e 2d 31 0d  |+800 ..(10)<>-1.|
00000120  00 78 16 ef 32 34 2c 30  3b 33 32 3b 31 32 37 39  |.x..24,0;32;1279|
00000130  3b 38 33 31 3b 0d 00 82  06 fb 31 0d 00 8c 0f 2a  |;831;.....1....*|
00000140  52 55 4e 20 51 55 45 53  54 31 0d ff 53 0d 00 96  |RUN QUEST1..S...|
00000150  0b f1 8a 30 2c 33 31 29  0d 00 9b 12 ef 32 38 2c  |...0,31).....28,|
00000160  31 2c 32 37 2c 31 34 2c  32 33 0d 00 d2 0c 2a 46  |1,27,14,23....*F|
00000170  58 32 31 30 2c 31 0d 00  dc 0f 2a 52 55 4e 20 51  |X210,1....*RUN Q|
00000180  55 45 53 54 31 0d ff 36  3b 0d 00 dc 0f 2a 52 55  |UEST1..6;....*RU|
00000190  4e 20 51 55 45 53 54 31  0d ff 55 0f e7 41 25 3d  |N QUEST1..U..A%=|
000001a0  31 20 e5 8d 74 7e 40 0d  00 ac 0e 2a 4c 2e 48 45  |1 ..t~@....*L.HE|
000001b0  41 44 45 52 45 0d 00 ae  47 50 52 24 3d c4 28 31  |ADERE...GPR$=.(1|
000001c0  39 2d a9 c0 50 52 24 2c  31 39 29 29 81 32 2c 22  |9-..PR$,19)).2,"|
000001d0  20 22 29 2b 50 52 24 3a  24 26 31 41 37 32 3d 50  | ")+PR$:$&1A72=P|
000001e0  52 24 3a 3f 28 26 31 41  37 32 2b a9 50 52 24 29  |R$:?(&1A72+.PR$)|
000001f0  3d 26 32 30 3a 2a 4f 50  54 31 2c 32 0d 00 af 09  |=&20:*OPT1,2....|
00000200  e5 8d 64 48 40 0d 00 be  0d 2a 4c 2e 48 45 41 44  |..dH@....*L.HEAD|
00000210  45 52 0d 00 bf 1a eb 37  3a 24 26 31 39 36 38 3d  |ER.....7:$&1968=|
00000220  53 24 2b 22 30 30 3a 2a  52 55 4e 22 0d 00 c0 40  |S$+"00:*RUN"...@|
00000230  50 52 24 3d c4 28 32 31  2d a9 c0 50 52 24 2c 32  |PR$=.(21-..PR$,2|
00000240  31 29 29 81 32 2c 22 20  22 29 2b 50 52 24 3a 24  |1)).2," ")+PR$:$|
00000250  26 31 41 42 44 3d 50 52  24 3a 24 26 31 41 45 35  |&1ABD=PR$:$&1AE5|
00000260  3d 50 52 24 3a 2a 4f 50  54 31 2c 32 0d 00 c8 09  |=PR$:*OPT1,2....|
00000270  2a 54 41 50 45 0d 00 cd  10 2a 46 58 20 31 33 38  |*TAPE....*FX 138|
00000280  2c 30 2c 31 33 0d 00 d2  1f 42 46 25 3d 26 37 42  |,0,13....BF%=&7B|
00000290  38 30 3a 58 25 3d 42 46  25 3a 59 25 3d 42 46 25  |80:X%=BF%:Y%=BF%|
000002a0  81 32 35 36 0d 00 dc 5b  e7 41 25 3d 31 8c 20 24  |.256...[.A%=1. $|
000002b0  42 46 25 3d 22 2a 53 41  56 45 20 22 2b 54 4e 24  |BF%="*SAVE "+TN$|
000002c0  2b 22 20 46 46 31 39 30  30 2b 32 32 39 22 3a d6  |+" FF1900+229":.|
000002d0  26 46 46 46 37 20 8b 20  24 42 46 25 3d 22 2a 53  |&FFF7 . $BF%="*S|
000002e0  41 56 45 20 22 2b 54 4e  24 2b 22 20 46 46 31 39  |AVE "+TN$+" FF19|
000002f0  30 30 2b 31 41 30 22 3a  d6 26 46 46 46 37 20 0d  |00+1A0":.&FFF7 .|
00000300  00 e6 09 2a 44 49 53 43  0d 01 0e 0b 2a 4f 50 54  |...*DISC....*OPT|
00000310  31 2c 32 0d 01 0f 0e e7  41 25 3d 32 8c 41 25 3d  |1,2.....A%=2.A%=|
00000320  35 0d 01 10 11 e5 28 32  30 30 2b 31 30 30 2a 41  |5.....(200+100*A|
00000330  25 29 0d 01 2c 0f f4 20  42 42 43 20 46 49 4c 45  |%)..,.. BBC FILE|
00000340  53 0d 01 36 14 2a 4c 4f  41 44 20 51 55 45 53 54  |S..6.*LOAD QUEST|
00000350  20 31 39 30 30 0d 01 40  09 2a 54 41 50 45 0d 01  | 1900..@.*TAPE..|
00000360  4a 10 2a 46 58 20 31 33  38 2c 30 2c 31 33 0d 01  |J.*FX 138,0,13..|
00000370  4b 09 d6 26 43 30 30 0d  01 54 1d 2a 53 41 56 45  |K..&C00..T.*SAVE|
00000380  20 51 55 45 53 54 20 31  39 30 30 2b 34 39 36 20  | QUEST 1900+496 |
00000390  31 44 30 32 0d 01 55 09  d6 26 43 30 44 0d 01 5e  |1D02..U..&C0D..^|
000003a0  09 2a 44 49 53 43 0d 01  68 15 2a 4c 4f 41 44 20  |.*DISC..h.*LOAD |
000003b0  51 55 45 53 54 4f 20 31  39 30 30 0d 01 72 09 2a  |QUESTO 1900..r.*|
000003c0  54 41 50 45 0d 01 7c 10  2a 46 58 20 31 33 38 2c  |TAPE..|.*FX 138,|
000003d0  30 2c 31 33 0d 01 86 24  2a 53 41 56 45 20 51 55  |0,13...$*SAVE QU|
000003e0  45 53 54 4f 20 31 39 30  30 2b 32 31 30 30 20 35  |ESTO 1900+2100 5|
000003f0  38 30 30 20 35 38 30 30  0d 01 90 09 2a 44 49 53  |800 5800....*DIS|
00000400  43 0d ad 10 02 8d 65 1d  ad 11 02 8d 66 1d a9 00  |C.....e.....f...|
00000410  8d 64 1d a9 42 8d 10 02  a9 1d 8d 11 02 a9 15 20  |.d..B.......... |
00000420  ee ff a9 81 a2 00 a0 ff  20 f4 ff e0 00 f0 10 a9  |........ .......|
00000430  b4 a2 19 a0 00 20 f4 ff  a2 8f a0 1d 4c f7 ff 4c  |..... ......L..L|
00000440  00 80 8e 63 1d ae 64 1d  bd 67 1d ee 64 1d e0 27  |...c..d..g..d..'|
00000450  d0 0c ae 65 1d 8e 10 02  ae 66 1d 8e 11 02 ae 63  |...e.....f.....c|
00000460  1d 18 60 00 00 00 00 50  41 47 45 3d 26 31 39 30  |..`....PAGE=&190|
00000470  30 0d 4f 4c 44 0d 4f 4e  45 52 52 4f 52 52 55 4e  |0.OLD.ONERRORRUN|
00000480  0d 2a 46 58 32 30 30 2c  32 0d 52 55 4e 06 0d 42  |.*FX200,2.RUN..B|
00000490  41 53 49 43 0d 4f                                 |ASIC.O|
00000496
Sam8/Quest/NEXT.m0
Sam8/Quest/NEXT.m1
Sam8/Quest/NEXT.m2
Sam8/Quest/NEXT.m4
Sam8/Quest/NEXT.m5