Home » Recent acquisitions » Acorn tapes » tape047c_acorn_computer_hits_2.wav » JBJ
JBJ
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 » Recent acquisitions » Acorn tapes » tape047c_acorn_computer_hits_2.wav |
| Filename: | JBJ |
| Read OK: | ✔ |
| File size: | 01FF bytes |
| Load address: | 1900 |
| Exec address: | 1900 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- Recent acquisitions » Acorn tapes » tape047d_acorn_computer_hits_2.wav » JBJ
- Recent acquisitions » Acorn tapes » tape047c_acorn_computer_hits_2.wav » JBJ
- AEW website » english » english_tapes_Jet-Boot-Jack_JetBootJack_E.uef » JBJ
File contents
0REM 10ONERRORRUN 20*FX200 30MODE1:*T. 40COLOUR2:COLOUR129:PRINT'''SPC80:PROCDB(12,3,"JET-BOOT JACK"):COLOUR3:COLOUR128::COLOUR3 50PRINTTAB(8,2)"English Software presents" 55REM 60VDU28,14,9,28,7:PAGE=&1800:CHAIN"" 70END 80DEFPROCDB(X,Y,A$) 90LOCALS%:FORS%=1TOLEN(A$):?&80=ASC(MID$(A$,S%)):A%=10:X%=&80:Y%=0:CALL&FFF1:VDU23,255,?&81,?&81,?&82,?&82,?&83,?&83,?&84,?&84:PRINTTAB(X+S%,Y)CHR$255:VDU23,255,?&85,?&85,?&86,?&86,?&87,?&87,?&88,?&88:PRINTTAB(X+S%,Y+1)CHR$255:NEXT:ENDPROC
� � *FX200 �1:*T. (9�2:�129:�'''�80:�DB(12,3,"JET-BOOT JACK"):�3:�128::�3 2(�8,2)"English Software presents" 7 � < �28,14,9,28,7:�=&1800:�"" F� P��DB(X,Y,A$) Z��S%:�S%=1��(A$):?&80=�(�A$,S%)):A%=10:X%=&80:Y%=0:�&FFF1:�23,255,?&81,?&81,?&82,?&82,?&83,?&83,?&84,?&84:�X+S%,Y)�255:�23,255,?&85,?&85,?&86,?&86,?&87,?&87,?&88,?&88:�X+S%,Y+1)�255:�:� ��OT JACKKT JACKT JACK�:� � l �87,?&88,?&88:�X+S%,Y+1)�255:�:� � l �87,?&88,?&88:�X+S%,Y+1)�255:�:� � l �?&88,?&8
00000000 0d 00 00 0a f4 0c 15 0c 15 20 0d 00 0a 07 ee 85 |......... ......| 00000010 f9 0d 00 14 0a 2a 46 58 32 30 30 0d 00 1e 0a eb |.....*FX200.....| 00000020 31 3a 2a 54 2e 0d 00 28 39 fb 32 3a fb 31 32 39 |1:*T...(9.2:.129| 00000030 3a f1 27 27 27 89 38 30 3a f2 44 42 28 31 32 2c |:.'''.80:.DB(12,| 00000040 33 2c 22 4a 45 54 2d 42 4f 4f 54 20 4a 41 43 4b |3,"JET-BOOT JACK| 00000050 22 29 3a fb 33 3a fb 31 32 38 3a 3a fb 33 0d 00 |"):.3:.128::.3..| 00000060 32 28 f1 8a 38 2c 32 29 22 45 6e 67 6c 69 73 68 |2(..8,2)"English| 00000070 20 53 6f 66 74 77 61 72 65 20 70 72 65 73 65 6e | Software presen| 00000080 74 73 22 20 20 20 0d 00 37 09 f4 0c 15 20 20 0d |ts" ..7.... .| 00000090 00 3c 1d ef 32 38 2c 31 34 2c 39 2c 32 38 2c 37 |.<..28,14,9,28,7| 000000a0 3a d0 3d 26 31 38 30 30 3a d7 22 22 0d 00 46 05 |:.=&1800:.""..F.| 000000b0 e0 0d 00 50 10 dd f2 44 42 28 58 2c 59 2c 41 24 |...P...DB(X,Y,A$| 000000c0 29 0d 00 5a be ea 53 25 3a e3 53 25 3d 31 b8 a9 |)..Z..S%:.S%=1..| 000000d0 28 41 24 29 3a 3f 26 38 30 3d 97 28 c1 41 24 2c |(A$):?&80=.(.A$,| 000000e0 53 25 29 29 3a 41 25 3d 31 30 3a 58 25 3d 26 38 |S%)):A%=10:X%=&8| 000000f0 30 3a 59 25 3d 30 3a d6 26 46 46 46 31 3a ef 32 |0:Y%=0:.&FFF1:.2| 00000100 33 2c 32 35 35 2c 3f 26 38 31 2c 3f 26 38 31 2c |3,255,?&81,?&81,| 00000110 3f 26 38 32 2c 3f 26 38 32 2c 3f 26 38 33 2c 3f |?&82,?&82,?&83,?| 00000120 26 38 33 2c 3f 26 38 34 2c 3f 26 38 34 3a f1 8a |&83,?&84,?&84:..| 00000130 58 2b 53 25 2c 59 29 bd 32 35 35 3a ef 32 33 2c |X+S%,Y).255:.23,| 00000140 32 35 35 2c 3f 26 38 35 2c 3f 26 38 35 2c 3f 26 |255,?&85,?&85,?&| 00000150 38 36 2c 3f 26 38 36 2c 3f 26 38 37 2c 3f 26 38 |86,?&86,?&87,?&8| 00000160 37 2c 3f 26 38 38 2c 3f 26 38 38 3a f1 8a 58 2b |7,?&88,?&88:..X+| 00000170 53 25 2c 59 2b 31 29 bd 32 35 35 3a ed 3a e1 0d |S%,Y+1).255:.:..| 00000180 ff ed 4f 54 20 4a 41 43 4b 4b 54 20 4a 41 43 4b |..OT JACKKT JACK| 00000190 54 20 4a 41 43 4b ed 3a e1 0d 01 9a 08 20 6c 00 |T JACK.:..... l.| 000001a0 7f 0d ff 38 37 2c 3f 26 38 38 2c 3f 26 38 38 3a |...87,?&88,?&88:| 000001b0 f1 8a 58 2b 53 25 2c 59 2b 31 29 bd 32 35 35 3a |..X+S%,Y+1).255:| 000001c0 ed 3a e1 0d 01 9a 08 20 6c 00 7f 0d ff 38 37 2c |.:..... l....87,| 000001d0 3f 26 38 38 2c 3f 26 38 38 3a f1 8a 58 2b 53 25 |?&88,?&88:..X+S%| 000001e0 2c 59 2b 31 29 bd 32 35 35 3a ed 3a e1 0d 01 9a |,Y+1).255:.:....| 000001f0 08 20 6c 00 7f 0d ff 3f 26 38 38 2c 3f 26 38 |. l....?&88,?&8| 000001ff
.