Home » Personal collection » Acorn ADFS disks » Electron » MTF_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 » MTF_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