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<<