Home » Personal collection » Acorn tapes » Commercial_Releases » box02_tape07a_acorn_eu_arcade_game_creator.wav » MENU

MENU

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 » box02_tape07a_acorn_eu_arcade_game_creator.wav
Filename: MENU
Read OK:
File size: 039E bytes
Load address: 2000
Exec address: 1900
Duplicates

There are 2 duplicate copies of this file in the archive:

File contents
   10 REM Arcade Games Creator
   20 REM (C) Electron User
   30*LO.CC 900
   40DIM n$(20),f$(20)
   50 MODE1
   60VDU19,2,4,0,0,0
   70VDU19,3,3,0,0,0
   80 COLOUR131:CLS
   90 COLOUR0:PRINTTAB(10,1);:PROCdh("Arcade Games Creator")
  100FOR I%=0 TO 15:READ n$(I%),f$(I%)
  110COLOUR1:PRINT TAB(9,5+I%);CHR$(65+I%);")"
  120COLOUR2:PRINT TAB(13,5+I%);n$(I%)
  130NEXT
  140COLOUR0
  150PRINT TAB(9,24);:PROCdh("Select program (A-P) ?")
  160A=GET-65
  161IF A<0 OR A>15 THEN 160
  180MODE4
  190PRINT'':PROCdh("Loading "+n$(A))
  200PRINT'':PROCdh("Filename = "+f$(A))
  210PRINT'''
  220CHAINf$(A)
  230 
  240END
  250DEF PROCdh(a$)
  260?&70=&0:?&71=&A:$&A00=a$:CALL&95B
  270ENDPROC
  280DATA Data Maker,2_PROG1
  290DATA Simple Print 1,2_PROG2
  300DATA Simple Print 2,2_PROG3
  310DATA Screen Address,2_PROG4
  320DATA Foreground Print 1,3_PROG1
  321DATA Foreground Print 2,3_PROG3
  322DATA Foreground Print 3,3_PROG5
  330DATA Background Print 1,3_PROG2
  350DATA Backgrpund Print 2,3_PROG4
  370DATA Maps 1,4_PROG1
  380DATA Maps 2,4_PROG2
  390DATA Scrolling Map,5_PROG1
  400DATA Score 1,6_PROG1
  410DATA Score 2,6_PROG2
  420DATA Score 3,6_PROG3
  430DATA Sprite Editor,EDITOR

 � Arcade Games Creator
 � (C) Electron User
*LO.CC 900
(� n$(20),f$(20)
2 �1
<�19,2,4,0,0,0
F�19,3,3,0,0,0
P �131:�
Z, �0:�10,1);:�dh("Arcade Games Creator")
d� I%=0 � 15:� n$(I%),f$(I%)
n�1:� �9,5+I%);�(65+I%);")"
x�2:� �13,5+I%);n$(I%)
��
��0
�+� �9,24);:�dh("Select program (A-P) ?")
�
A=�-65
�� A<0 � A>15 � �t`@
��4
��'':�dh("Loading "+n$(A))
� �'':�dh("Filename = "+f$(A))
��'''
�
�f$(A)
� 
��
�
� �dh(a$)
"?&70=&0:?&71=&A:$&A00=a$:�&95B
�
� Data Maker,2_PROG1
"� Simple Print 1,2_PROG2
,� Simple Print 2,2_PROG3
6� Screen Address,2_PROG4
@ � Foreground Print 1,3_PROG1
A � Foreground Print 2,3_PROG3
B � Foreground Print 3,3_PROG5
J � Background Print 1,3_PROG2
^ � Backgrpund Print 2,3_PROG4
r� Maps 1,4_PROG1
|� Maps 2,4_PROG2
�� Scrolling Map,5_PROG1
�� Score 1,6_PROG1
�� Score 2,6_PROG2
�� Score 3,6_PROG3
�� Sprite Editor,EDITOR
�
00000000  0d 00 0a 1b 20 f4 20 41  72 63 61 64 65 20 47 61  |.... . Arcade Ga|
00000010  6d 65 73 20 43 72 65 61  74 6f 72 0d 00 14 18 20  |mes Creator.... |
00000020  f4 20 28 43 29 20 45 6c  65 63 74 72 6f 6e 20 55  |. (C) Electron U|
00000030  73 65 72 0d 00 1e 0e 2a  4c 4f 2e 43 43 20 39 30  |ser....*LO.CC 90|
00000040  30 0d 00 28 13 de 20 6e  24 28 32 30 29 2c 66 24  |0..(.. n$(20),f$|
00000050  28 32 30 29 0d 00 32 07  20 eb 31 0d 00 3c 11 ef  |(20)..2. .1..<..|
00000060  31 39 2c 32 2c 34 2c 30  2c 30 2c 30 0d 00 46 11  |19,2,4,0,0,0..F.|
00000070  ef 31 39 2c 33 2c 33 2c  30 2c 30 2c 30 0d 00 50  |.19,3,3,0,0,0..P|
00000080  0b 20 fb 31 33 31 3a db  0d 00 5a 2c 20 fb 30 3a  |. .131:...Z, .0:|
00000090  f1 8a 31 30 2c 31 29 3b  3a f2 64 68 28 22 41 72  |..10,1);:.dh("Ar|
000000a0  63 61 64 65 20 47 61 6d  65 73 20 43 72 65 61 74  |cade Games Creat|
000000b0  6f 72 22 29 0d 00 64 1f  e3 20 49 25 3d 30 20 b8  |or")..d.. I%=0 .|
000000c0  20 31 35 3a f3 20 6e 24  28 49 25 29 2c 66 24 28  | 15:. n$(I%),f$(|
000000d0  49 25 29 0d 00 6e 1e fb  31 3a f1 20 8a 39 2c 35  |I%)..n..1:. .9,5|
000000e0  2b 49 25 29 3b bd 28 36  35 2b 49 25 29 3b 22 29  |+I%);.(65+I%);")|
000000f0  22 0d 00 78 19 fb 32 3a  f1 20 8a 31 33 2c 35 2b  |"..x..2:. .13,5+|
00000100  49 25 29 3b 6e 24 28 49  25 29 0d 00 82 05 ed 0d  |I%);n$(I%)......|
00000110  00 8c 06 fb 30 0d 00 96  2b f1 20 8a 39 2c 32 34  |....0...+. .9,24|
00000120  29 3b 3a f2 64 68 28 22  53 65 6c 65 63 74 20 70  |);:.dh("Select p|
00000130  72 6f 67 72 61 6d 20 28  41 2d 50 29 20 3f 22 29  |rogram (A-P) ?")|
00000140  0d 00 a0 0a 41 3d a5 2d  36 35 0d 00 a1 17 e7 20  |....A=.-65..... |
00000150  41 3c 30 20 84 20 41 3e  31 35 20 8c 20 8d 74 60  |A<0 . A>15 . .t`|
00000160  40 0d 00 b4 06 eb 34 0d  00 be 1d f1 27 27 3a f2  |@.....4.....'':.|
00000170  64 68 28 22 4c 6f 61 64  69 6e 67 20 22 2b 6e 24  |dh("Loading "+n$|
00000180  28 41 29 29 0d 00 c8 20  f1 27 27 3a f2 64 68 28  |(A))... .'':.dh(|
00000190  22 46 69 6c 65 6e 61 6d  65 20 3d 20 22 2b 66 24  |"Filename = "+f$|
000001a0  28 41 29 29 0d 00 d2 08  f1 27 27 27 0d 00 dc 0a  |(A)).....'''....|
000001b0  d7 66 24 28 41 29 0d 00  e6 05 20 0d 00 f0 05 e0  |.f$(A).... .....|
000001c0  0d 00 fa 0d dd 20 f2 64  68 28 61 24 29 0d 01 04  |..... .dh(a$)...|
000001d0  22 3f 26 37 30 3d 26 30  3a 3f 26 37 31 3d 26 41  |"?&70=&0:?&71=&A|
000001e0  3a 24 26 41 30 30 3d 61  24 3a d6 26 39 35 42 0d  |:$&A00=a$:.&95B.|
000001f0  01 0e 05 e1 0d 01 18 18  dc 20 44 61 74 61 20 4d  |......... Data M|
00000200  61 6b 65 72 2c 32 5f 50  52 4f 47 31 0d 01 22 1c  |aker,2_PROG1..".|
00000210  dc 20 53 69 6d 70 6c 65  20 50 72 69 6e 74 20 31  |. Simple Print 1|
00000220  2c 32 5f 50 52 4f 47 32  0d 01 2c 1c dc 20 53 69  |,2_PROG2..,.. Si|
00000230  6d 70 6c 65 20 50 72 69  6e 74 20 32 2c 32 5f 50  |mple Print 2,2_P|
00000240  52 4f 47 33 0d 01 36 1c  dc 20 53 63 72 65 65 6e  |ROG3..6.. Screen|
00000250  20 41 64 64 72 65 73 73  2c 32 5f 50 52 4f 47 34  | Address,2_PROG4|
00000260  0d 01 40 20 dc 20 46 6f  72 65 67 72 6f 75 6e 64  |..@ . Foreground|
00000270  20 50 72 69 6e 74 20 31  2c 33 5f 50 52 4f 47 31  | Print 1,3_PROG1|
00000280  0d 01 41 20 dc 20 46 6f  72 65 67 72 6f 75 6e 64  |..A . Foreground|
00000290  20 50 72 69 6e 74 20 32  2c 33 5f 50 52 4f 47 33  | Print 2,3_PROG3|
000002a0  0d 01 42 20 dc 20 46 6f  72 65 67 72 6f 75 6e 64  |..B . Foreground|
000002b0  20 50 72 69 6e 74 20 33  2c 33 5f 50 52 4f 47 35  | Print 3,3_PROG5|
000002c0  0d 01 4a 20 dc 20 42 61  63 6b 67 72 6f 75 6e 64  |..J . Background|
000002d0  20 50 72 69 6e 74 20 31  2c 33 5f 50 52 4f 47 32  | Print 1,3_PROG2|
000002e0  0d 01 5e 20 dc 20 42 61  63 6b 67 72 70 75 6e 64  |..^ . Backgrpund|
000002f0  20 50 72 69 6e 74 20 32  2c 33 5f 50 52 4f 47 34  | Print 2,3_PROG4|
00000300  0d 01 72 14 dc 20 4d 61  70 73 20 31 2c 34 5f 50  |..r.. Maps 1,4_P|
00000310  52 4f 47 31 0d 01 7c 14  dc 20 4d 61 70 73 20 32  |ROG1..|.. Maps 2|
00000320  2c 34 5f 50 52 4f 47 32  0d 01 86 1b dc 20 53 63  |,4_PROG2..... Sc|
00000330  72 6f 6c 6c 69 6e 67 20  4d 61 70 2c 35 5f 50 52  |rolling Map,5_PR|
00000340  4f 47 31 0d 01 90 15 dc  20 53 63 6f 72 65 20 31  |OG1..... Score 1|
00000350  2c 36 5f 50 52 4f 47 31  0d 01 9a 15 dc 20 53 63  |,6_PROG1..... Sc|
00000360  6f 72 65 20 32 2c 36 5f  50 52 4f 47 32 0d 01 a4  |ore 2,6_PROG2...|
00000370  15 dc 20 53 63 6f 72 65  20 33 2c 36 5f 50 52 4f  |.. Score 3,6_PRO|
00000380  47 33 0d 01 ae 1a dc 20  53 70 72 69 74 65 20 45  |G3..... Sprite E|
00000390  64 69 74 6f 72 2c 45 44  49 54 4f 52 0d ff        |ditor,EDITOR..|
0000039e
MENU.m0
MENU.m1
MENU.m2
MENU.m4
MENU.m5