Home » Personal collection » Acorn tapes » Commercial_Releases » box04_tape13a_acorn_acornsoft_hits_vol_1.wav » MONSTERS
MONSTERS
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 » box04_tape13a_acorn_acornsoft_hits_vol_1.wav |
| Filename: | MONSTERS |
| Read OK: | ✔ |
| File size: | 0A60 bytes |
| Load address: | 1900 |
| Exec address: | 1900 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » acornsoft » acornsoft_tapes_Monsters_Monsters_E.uef » MONSTERS
- AEW website » superior_blue_ribbon » superior_blue_ribbon_Monsters-SRR_E_Monsters-SRR_E.uef » MONSTERS
- Personal collection » Acorn tapes » Commercial_Releases » box04_tape13a_acorn_acornsoft_hits_vol_1.wav » MONSTERS
File contents
10REM ... Monsters ... V1
20
30REM Copyright (C) Acornsoft 1983
40
45IFINKEY-256<>1 PRINT"This game is only suitable for an Acorn Electron":END
50MODE4
60FORI%=0TO&600STEP2
70VDUI%!TOP;
80NEXT
90DIM BL% 8
100ENVELOPE1,10,-1,-1,0,2,2,1,120,0,0,-120,120,120
110ENVELOPE2,2,0,0,0,1,1,1,120,-120,-120,-120,120,0
120ENVELOPE3,2,-1,-1,-1,255,255,255,120,0,0,-120,120,120
130ENVELOPE4,3,0,0,0,1,1,1,120,-5,-5,-10,120,90
140CHAR%=224
150PROCDEFINE("GameOvr")
160*/MONSTR2
170END
180
190DEFPROCDEFINE(A$)FORI%=1TOLENA$:PROCCHAR(ASC(MID$(A$,I%,1))):NEXT:ENDPROC
200DEFPROCCHAR(C%)?BL%=C%:X%=BL%:Y%=BL%DIV256:A%=10:CALL&FFF1:FORK%=1TO5STEP4:VDU23,CHAR%:FORJ%=0TO7:VDUBL%?(K%+J%DIV2):NEXT:CHAR%=CHAR%+1:NEXT:ENDPROC
� ... Monsters ... V1
"� Copyright (C) Acornsoft 1983
(
-C�-256<>1 �"This game is only suitable for an Acorn Electron":�
2�4
<�I%=0�&600�2
F�I%!�P;
P�
Z� BL% 8
d,�1,10,-1,-1,0,2,2,1,120,0,0,-120,120,120
n-�2,2,0,0,0,1,1,1,120,-120,-120,-120,120,0
x2�3,2,-1,-1,-1,255,255,255,120,0,0,-120,120,120
�)�4,3,0,0,0,1,1,1,120,-5,-5,-10,120,90
�
CHAR%=224
��DEFINE("GameOvr")
�
*/MONSTR2
��
�
�1��DEFINE(A$)�I%=1��A$:�CHAR(�(�A$,I%,1))):�:�
�s��CHAR(C%)?BL%=C%:X%=BL%:Y%=BL%�256:A%=10:�&FFF1:�K%=1�5�4:�23,CHAR%:�J%=0�7:�BL%?(K%+J%�2):�:CHAR%=CHAR%+1:�:�
� ��� � � ��� �� ��� �� ��� � ����� ��� �� ����� �� ����� �� ����� �� ����� � � ��� ��� �� � ����� ��� �� ����� �� ��� ��� ��� �� ����� �� ��� �� ����� �� �� ���� ��� ������ ���� ��� ������
���������������������� �����
���� �� ������������� �
������� ��� ����� ������ �
�� �������� ���� ������ �
��
���� ��� ������ ���� ��� ������
���������������������� �����
���� �� ������������� �
������� ��� ����� ������ �
�� �������� ���� ������ �
��
�ccwwkk�
�kkcccc �
� <<ff�
�ffff<<