Home » Personal collection » Acorn tapes » Commercial_Releases » box03_tape11a_acorn_cheat_it_again_joe_2.wav » Paperboy-O

Paperboy-O

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 » box03_tape11a_acorn_cheat_it_again_joe_2.wav
Filename: Paperboy-O
Read OK:
File size: 03A2 bytes
Load address: 1900
Exec address: 1900
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10REM Paperboy cheat
   20REM Electron tape version
   30MODE1:VDU19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0,17,1:PRINT'"Paperboy cheat":COLOUR2:PRINT"��������������"
   40PROCmc
   50PROCask("Infinite lives",inl)
   60PROCask("Infinite papers",inp)
   70PROCask("Immortal",imm)
   80COLOUR3:PRINT'"OK ";:COLOUR2:PRINT;"- ";:COLOUR3:PRINT;"Insert ";:COLOUR2:PRINT;"Paperboy ";:COLOUR3:PRINT;"cassette and press"'"     play ...."'
   90COLOUR2:CALL&1800
  100DEFPROCmc
  110FORI%=0TO 2 STEP2
  120P%=&1800
  130[OPTI%
  140LDY#load DIV 256:LDX#load MOD 256
  150JSR&FFF7
  160LDA#&14:STA&1A00:LDA#&18:STA&1A01
  170JMP&1960
  180LDA#&60:STA&5007:JSR&5000
  190JSRimm
  200JSRinl
  210JSRinp
  220JMP&5017
  230.imm
  240LDA#&4C:STA&2690
  250LDA#&EC:STA&2691
  260LDA#&16:STA&2692
  270RTS
  280.inl
  290LDA#&EA:STA&273D:STA&273E:STA&273F
  300RTS
  310.inp
  320LDA#&EA:STA&2487:STA&2488
  330LDA#5:STA&270F                   
  340RTS
  350.load
  360]:$P%="LOAD PAPER 1900"
  370NEXTI%
  380ENDPROC
  390DEFPROCask(A$,A%)
  400COLOUR3:PRINT;A$;SPC(26-LENA$);:COLOUR2:PRINT;" (Y/N) ";:COLOUR3:PRINT;": ";:COLOUR2:A$=GET$:IFA$="Y" THEN PRINT;"Yes" ELSE PRINT;"No":?A%=&60
  410ENDPROC

� Paperboy cheat
� Electron tape version
\�1:�19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0,17,1:�'"Paperboy cheat":�2:�"��������������"
(�mc
2�ask("Infinite lives",inl)
<�ask("Infinite papers",inp)
F�ask("Immortal",imm)
Ph�3:�'"OK ";:�2:�;"- ";:�3:�;"Insert ";:�2:�;"Paperboy ";:�3:�;"cassette and press"'"     play ...."'
Z
�2:�&1800
d��mc
n�I%=0� 2 �2
xP%=&1800
�
[OPTI%
�!LDY#load � 256:LDX#load � 256
�JSR&FFF7
�%LDA#&14:STA&1A00:LDA#&18:STA&1A01
�JMP&1960
�LDA#&60:STA&5007:JSR&5000
�
JSRimm
�
JSRinl
�
JSRinp
�JMP&5017
�.imm
�LDA#&4C:STA&2690
�LDA#&EC:STA&2691
LDA#&16:STA&2692
RTS
.inl
"&LDA#&EA:STA&273D:STA&273E:STA&273F
,RTS
6.inp
@LDA#&EA:STA&2487:STA&2488
J%LDA#5:STA&270F                   
TRTS
^	.load
h]:$P%="LOAD PAPER 1900"
r�I%
|�
���ask(A$,A%)
�\�3:�;A$;�(26-�A$);:�2:�;" (Y/N) ";:�3:�;": ";:�2:A$=�:�A$="Y" � �;"Yes" � �;"No":?A%=&60
��
�
00000000  0d 00 0a 14 f4 20 50 61  70 65 72 62 6f 79 20 63  |..... Paperboy c|
00000010  68 65 61 74 0d 00 14 1b  f4 20 45 6c 65 63 74 72  |heat..... Electr|
00000020  6f 6e 20 74 61 70 65 20  76 65 72 73 69 6f 6e 0d  |on tape version.|
00000030  00 1e 5c eb 31 3a ef 31  39 2c 33 2c 36 2c 30 2c  |..\.1:.19,3,6,0,|
00000040  30 2c 30 2c 32 33 2c 32  33 30 2c 30 2c 26 46 46  |0,0,23,230,0,&FF|
00000050  2c 30 2c 26 46 46 2c 30  2c 30 2c 30 2c 30 2c 31  |,0,&FF,0,0,0,0,1|
00000060  37 2c 31 3a f1 27 22 50  61 70 65 72 62 6f 79 20  |7,1:.'"Paperboy |
00000070  63 68 65 61 74 22 3a fb  32 3a f1 22 86 86 86 86  |cheat":.2:."....|
00000080  86 86 86 86 86 86 86 86  86 86 22 0d 00 28 07 f2  |.........."..(..|
00000090  6d 63 0d 00 32 1e f2 61  73 6b 28 22 49 6e 66 69  |mc..2..ask("Infi|
000000a0  6e 69 74 65 20 6c 69 76  65 73 22 2c 69 6e 6c 29  |nite lives",inl)|
000000b0  0d 00 3c 1f f2 61 73 6b  28 22 49 6e 66 69 6e 69  |..<..ask("Infini|
000000c0  74 65 20 70 61 70 65 72  73 22 2c 69 6e 70 29 0d  |te papers",inp).|
000000d0  00 46 18 f2 61 73 6b 28  22 49 6d 6d 6f 72 74 61  |.F..ask("Immorta|
000000e0  6c 22 2c 69 6d 6d 29 0d  00 50 68 fb 33 3a f1 27  |l",imm)..Ph.3:.'|
000000f0  22 4f 4b 20 22 3b 3a fb  32 3a f1 3b 22 2d 20 22  |"OK ";:.2:.;"- "|
00000100  3b 3a fb 33 3a f1 3b 22  49 6e 73 65 72 74 20 22  |;:.3:.;"Insert "|
00000110  3b 3a fb 32 3a f1 3b 22  50 61 70 65 72 62 6f 79  |;:.2:.;"Paperboy|
00000120  20 22 3b 3a fb 33 3a f1  3b 22 63 61 73 73 65 74  | ";:.3:.;"casset|
00000130  74 65 20 61 6e 64 20 70  72 65 73 73 22 27 22 20  |te and press"'" |
00000140  20 20 20 20 70 6c 61 79  20 2e 2e 2e 2e 22 27 0d  |    play ...."'.|
00000150  00 5a 0d fb 32 3a d6 26  31 38 30 30 0d 00 64 08  |.Z..2:.&1800..d.|
00000160  dd f2 6d 63 0d 00 6e 0f  e3 49 25 3d 30 b8 20 32  |..mc..n..I%=0. 2|
00000170  20 88 32 0d 00 78 0c 50  25 3d 26 31 38 30 30 0d  | .2..x.P%=&1800.|
00000180  00 82 0a 5b 4f 50 54 49  25 0d 00 8c 21 4c 44 59  |...[OPTI%...!LDY|
00000190  23 6c 6f 61 64 20 81 20  32 35 36 3a 4c 44 58 23  |#load . 256:LDX#|
000001a0  6c 6f 61 64 20 83 20 32  35 36 0d 00 96 0c 4a 53  |load . 256....JS|
000001b0  52 26 46 46 46 37 0d 00  a0 25 4c 44 41 23 26 31  |R&FFF7...%LDA#&1|
000001c0  34 3a 53 54 41 26 31 41  30 30 3a 4c 44 41 23 26  |4:STA&1A00:LDA#&|
000001d0  31 38 3a 53 54 41 26 31  41 30 31 0d 00 aa 0c 4a  |18:STA&1A01....J|
000001e0  4d 50 26 31 39 36 30 0d  00 b4 1d 4c 44 41 23 26  |MP&1960....LDA#&|
000001f0  36 30 3a 53 54 41 26 35  30 30 37 3a 4a 53 52 26  |60:STA&5007:JSR&|
00000200  35 30 30 30 0d 00 be 0a  4a 53 52 69 6d 6d 0d 00  |5000....JSRimm..|
00000210  c8 0a 4a 53 52 69 6e 6c  0d 00 d2 0a 4a 53 52 69  |..JSRinl....JSRi|
00000220  6e 70 0d 00 dc 0c 4a 4d  50 26 35 30 31 37 0d 00  |np....JMP&5017..|
00000230  e6 08 2e 69 6d 6d 0d 00  f0 14 4c 44 41 23 26 34  |...imm....LDA#&4|
00000240  43 3a 53 54 41 26 32 36  39 30 0d 00 fa 14 4c 44  |C:STA&2690....LD|
00000250  41 23 26 45 43 3a 53 54  41 26 32 36 39 31 0d 01  |A#&EC:STA&2691..|
00000260  04 14 4c 44 41 23 26 31  36 3a 53 54 41 26 32 36  |..LDA#&16:STA&26|
00000270  39 32 0d 01 0e 07 52 54  53 0d 01 18 08 2e 69 6e  |92....RTS.....in|
00000280  6c 0d 01 22 26 4c 44 41  23 26 45 41 3a 53 54 41  |l.."&LDA#&EA:STA|
00000290  26 32 37 33 44 3a 53 54  41 26 32 37 33 45 3a 53  |&273D:STA&273E:S|
000002a0  54 41 26 32 37 33 46 0d  01 2c 07 52 54 53 0d 01  |TA&273F..,.RTS..|
000002b0  36 08 2e 69 6e 70 0d 01  40 1d 4c 44 41 23 26 45  |6..inp..@.LDA#&E|
000002c0  41 3a 53 54 41 26 32 34  38 37 3a 53 54 41 26 32  |A:STA&2487:STA&2|
000002d0  34 38 38 0d 01 4a 25 4c  44 41 23 35 3a 53 54 41  |488..J%LDA#5:STA|
000002e0  26 32 37 30 46 20 20 20  20 20 20 20 20 20 20 20  |&270F           |
000002f0  20 20 20 20 20 20 20 20  0d 01 54 07 52 54 53 0d  |        ..T.RTS.|
00000300  01 5e 09 2e 6c 6f 61 64  0d 01 68 1b 5d 3a 24 50  |.^..load..h.]:$P|
00000310  25 3d 22 4c 4f 41 44 20  50 41 50 45 52 20 31 39  |%="LOAD PAPER 19|
00000320  30 30 22 0d 01 72 07 ed  49 25 0d 01 7c 05 e1 0d  |00"..r..I%..|...|
00000330  01 86 10 dd f2 61 73 6b  28 41 24 2c 41 25 29 0d  |.....ask(A$,A%).|
00000340  01 90 5c fb 33 3a f1 3b  41 24 3b 89 28 32 36 2d  |..\.3:.;A$;.(26-|
00000350  a9 41 24 29 3b 3a fb 32  3a f1 3b 22 20 28 59 2f  |.A$);:.2:.;" (Y/|
00000360  4e 29 20 22 3b 3a fb 33  3a f1 3b 22 3a 20 22 3b  |N) ";:.3:.;": ";|
00000370  3a fb 32 3a 41 24 3d be  3a e7 41 24 3d 22 59 22  |:.2:A$=.:.A$="Y"|
00000380  20 8c 20 f1 3b 22 59 65  73 22 20 8b 20 f1 3b 22  | . .;"Yes" . .;"|
00000390  4e 6f 22 3a 3f 41 25 3d  26 36 30 0d 01 9a 05 e1  |No":?A%=&60.....|
000003a0  0d ff                                             |..|
000003a2
Paperboy-O.m0
Paperboy-O.m1
Paperboy-O.m2
Paperboy-O.m4
Paperboy-O.m5