TAPE1/A/CASE

Home » Personal collection » Acorn ADFS disks » Electron » Finished_programs.ADF » TAPE1/A/CASE

TAPE1/A/CASE

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 ADFS disks » Electron » Finished_programs.ADF
Filename:	TAPE1/A/CASE
Read OK:	✔
File size:	0196 bytes
Load address:	0B00
Exec address:	0B00

Duplicates

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

Personal collection » Acorn ADFS disks » Electron » Memlist_B.ADF » Library/CASE
Personal collection » Acorn ADFS disks » Electron » Memlist_C.ADF » Library/CASE
Personal collection » Acorn ADFS disks » Electron » Memlist_final.ADF » Library/CASE
Personal collection » Acorn ADFS disks » Electron » MTF_finished_programs.ADF » TAPE1/A/CASE
Personal collection » Acorn ADFS disks » Electron » Finished_programs.ADF » TAPE1/A/CASE
Personal collection » Acorn ADFS disks » Electron » Memlist.ADF » Library/CASE
Personal collection » Acorn hard disk » misc » memlist » Library/CASE
Personal collection » Acorn hard disk » zipped_disks » elk03 » finished/TAPE1/A/CASE
Personal collection » Acorn tapes » Commercial_Releases » box02_tape02a_c15_acorn_eu_utils.wav » CASE

File contents

    0REMLOCALINKEYLOMEM0)OFLINELOMEMASNeERRORATNGETiERRORBGETEVALPOSATN0WHEN:PLOTENDIFANDPLOTLOADPAGEPLOTLOADORASCLOADLOADLOADPAGEy.Bad CASEGETLOMEMnGETHIMEM0^EVALPOSATNATNLOADSTRING$(ASCPAGEREPORTSTEPLEN=ATNEVALINKEYASCPOSHWHEN"�E����,�����:����h�����L+����������� )����*0h��,�ȱ�����>�</No CASE��h�:�ȱ�"PAGEEASNERRORASNWHEN:PAGEGETASNPLOTLOADPAGEMODEPLOTGETLOMEMHIMEMGETHIMEM0STR$	INKEYLOMEMWHENINPUTLINELOMEMLINEHIMEMSTEP ZASNEVAL	hSTEPPAGETRACELCOSELSE
    1CALLPAGE+264:REMEXTxOPENININKEYINPUTOPENINXEVALORLOMEMORHIMEMORASN`HASNHTAB(HEVALPOSUNTILWHENPLOT	hLNhINTh(LSGNFN
STEP mASNLENqERRORPAGEINKEYINPUTLINETIMEEVALPOSPAGEPLOT0ENDTIMEPAGELOADPAGEREADEVALGCOLPAGEPAGEGCOLTIMEPOSPAGEPAGEREPORTGCOLPAGEGCOLPAGEPAGEDRAWLOADPOSPAGESTEPERRORABSOFLINEACSlABSCASEWHEN?OTHERWISECLGENDCASEGOSUBAND

��ꦒ0)ʆ��e���i�����0�:�������Ȅ�����y.Bad CASE��n��0^�����ė���=�����H�"�E����,�����:����h�����L+����������� )����*0h��,�ȱ����>�</No CASE��h�:�ȱ�"�E����:����������ӥ�0�	���膒��� Z��	h��L��
�֐+264:��x���X�������`H�H�H�����	h�h�h(L��
� m��q���膑����0��������摱������ȱ����ʆ�l�CASEWHEN?OTHERWISE�ENDCASE�
�

00000000  0d 00 00 fb f4 15 ea a6  92 30 29 ca 86 92 18 98  |.........0).....|
00000010  65 0b 85 99 a5 0c 69 00  85 9a a0 00 b1 99 30 14  |e.....i.......0.|
00000020  c9 3a f0 08 cd 1d 80 f0  03 c8 d0 f0 c8 84 97 c8  |.:..............|
00000030  c8 c8 d0 79 00 2e 42 61  64 20 43 41 53 45 00 a5  |...y..Bad CASE..|
00000040  92 10 6e a5 93 30 5e a0  00 b1 99 99 00 07 c8 c4  |..n..0^.........|
00000050  97 d0 f6 88 a9 3d 99 00  07 a0 04 a6 97 b1 0b 48  |.....=.........H|
00000060  c9 22 d0 04 45 98 85 98  c9 2c d0 04 a5 98 f0 13  |."..E....,......|
00000070  c9 3a d0 04 a5 98 f0 0b  68 9d 00 07 c8 e8 d0 dd  |.:......h.......|
00000080  4c 2b 98 ad 1d 80 9d 00  07 a9 07 85 1a a9 00 85  |L+..............|
00000090  19 85 1b 84 96 20 29 9b  a4 96 a5 2a 30 1d 68 c8  |..... )....*0.h.|
000000a0  c9 2c f0 b7 88 c8 b1 0b  cd 1d 80 d0 f8 f0 3e d0  |.,............>.|
000000b0  3c 00 2f 4e 6f 20 43 41  53 45 00 85 93 68 c9 3a  |<./No CASE...h.:|
000000c0  f0 16 c8 b1 0b c9 22 d0  04 45 98 85 98 c9 3a d0  |......"..E....:.|
000000d0  04 a5 98 f0 03 c8 d0 eb  f0 13 a5 92 10 d3 a5 93  |................|
000000e0  30 c3 10 09 a6 92 10 c9  e8 86 92 86 93 88 20 5a  |0............. Z|
000000f0  98 a0 09 68 88 d0 fc 4c  9b 8b 06 0d 00 01 98 d6  |...h...L........|
00000100  90 2b 32 36 34 3a f4 15  a2 1e 78 8e 02 02 a6 18  |.+264:....x.....|
00000110  e8 8e 03 02 58 a0 00 84  92 84 93 84 98 60 08 48  |....X........`.H|
00000120  98 48 8a 48 a0 00 b1 fd  c9 04 f0 09 68 aa 68 a8  |.H.H........h.h.|
00000130  68 28 4c 02 b4 a4 0a 88  20 6d 98 a9 71 85 90 a6  |h(L..... m..q...|
00000140  18 e8 86 91 a0 00 b1 90  f0 1b 30 e0 d1 0b d0 03  |..........0.....|
00000150  c8 d0 f3 a0 00 e6 90 d0  02 e6 91 b1 90 d0 f6 e6  |................|
00000160  90 e6 90 d0 df c8 b1 90  88 85 94 ca 86 95 6c 94  |..............l.|
00000170  00 43 41 53 45 00 07 57  48 45 4e 00 3f 4f 54 48  |.CASE..WHEN.?OTH|
00000180  45 52 57 49 53 45 00 da  45 4e 44 43 41 53 45 00  |ERWISE..ENDCASE.|
00000190  e4 80 06 0d ff 00                                 |......|
00000196

TAPE1/A/CASE.m0

TAPE1/A/CASE.m1

TAPE1/A/CASE.m2

TAPE1/A/CASE.m4

TAPE1/A/CASE.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .