Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape34b_acorn_eu_1992_may.wav » Example
Example
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 » Electron_User » Electron_User_tape34b_acorn_eu_1992_may.wav |
Filename: | Example |
Read OK: | ✔ |
File size: | 04CF bytes |
Load address: | FFFF1A00 |
Exec address: | FFFF8023 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » mu » mu_5_25_discs_Micro_User_10_03_D-MU10_03.ssd » EXAMPLE
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape34a_acorn_eu_1992_may.wav » Example
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape34b_acorn_eu_1992_may.wav » Example
File contents
10REM"�EXAMPLE 20*L.EXdata 2000 30MODE5:VDU23;8202;0;0;0;19,3,4;0; 40HIMEM=&2000 50*L.EXpic 60GCOL0,131 70VDU24,496;496;780;652;:CLG:VDU26 80GCOL0,128 90VDU24,508;504;770;644;:CLG:VDU26 100PROCC 110 120REM"�==DRAW Ist Frame in 130 140PROCA(&6780,&2000) 150 160RESTORE360 170 180REM"�==LOOP=================== 190REPEAT 200READF%:IFF%=-1GOTO260 210mem%=F%*&100+&1F00 220READN% 230FORU%=1TON% 240PROCA(&6780,mem%) 250NEXT 260UNTILF%=-1 270RESTORE500:GOTO190 280REM"�========================= 290 300REM"�==DRAW FRAME 310DEFPROCA(X%,Y%) 320A%=0:FORJ%=1TO4:FORI%=0TO60STEP4:X%!(I%+A%)=Y%!I%:NEXT:A%=A%+&140:Y%=Y%+&40:NEXT 330ENDPROC 340 350REM"�==DATA 360DATA1,6,2,1,3,1,4,1 370DATA5,1,6,1,7,1,8,1 380DATA9,1,10,10 390DATA11,5,10,5,11,5,10,1 400DATA11,1,12,1,13,1,14,1 410DATA13,1,12,1,11,1,12,1,13,1,14,1,15,1,16,1,17,1 420DATA18,1,19,1,20,1,21,1,22,1,23,1 430DATA23,5,24,1,25,1,26,1 440DATA27,1,28,1,29,1,30,1 450DATA31,1,32,1,33,1,34,1,35,1 460DATA36,1,37,1,38,5 470DATA39,2,40,2,41,2,42,2,43,2,44,2 480DATA45,2,46,2,47,2,48,2 490DATA49,2,50,2,51,4 500DATA52,2,53,2,54,2,55,2 510DATA52,2,55,2,52,2,53,2 520DATA55,2,54,2,52,2,53,2 530DATA54,2,55,2,53,2,52,2 540DATA-1,-1 550DEFPROCC 560VDU19,2,1;0; 570GCOL3,129 580VDU24,456;464;820;684;:CLG 590*FX15 600G=INKEY(200) 610A%=632:B%=640 620GCOL3,1 630FORH%=1TO20 640MOVEA%,464:PLOT1,0,220 650MOVEB%,464:PLOT1,0,220 660FORT=1TO190:NEXT 670A%=A%-8:B%=B%+8 680NEXT 690VDU19,2,3;0; 700ENDPROC
�"�EXAMPLE *L.EXdata 2000 �5:�23;8202;0;0;0;19,3,4;0; (�=&2000 2*L.EXpic < �0,131 F�24,496;496;780;652;:�:�26 P �0,128 Z�24,508;504;770;644;:�:�26 d�C n x�"�==DRAW Ist Frame in � ��A(&6780,&2000) � � ��DhA � � �"�==LOOP=================== �� ��F%:�F%=-1�TDA �mem%=F%*&100+&1F00 ��N% ��U%=1�N% ��A(&6780,mem%) �� �F%=-1 ��dtA:�t~@ �"�========================= " ,�"�==DRAW FRAME 6��A(X%,Y%) @EA%=0:�J%=1�4:�I%=0�60�4:X%!(I%+A%)=Y%!I%:�:A%=A%+&140:Y%=Y%+&40:� J� T ^ �"�==DATA h�1,6,2,1,3,1,4,1 r�5,1,6,1,7,1,8,1 |�9,1,10,10 ��11,5,10,5,11,5,10,1 ��11,1,12,1,13,1,14,1 �1�13,1,12,1,11,1,12,1,13,1,14,1,15,1,16,1,17,1 �"�18,1,19,1,20,1,21,1,22,1,23,1 ��23,5,24,1,25,1,26,1 ��27,1,28,1,29,1,30,1 ��31,1,32,1,33,1,34,1,35,1 ��36,1,37,1,38,5 �"�39,2,40,2,41,2,42,2,43,2,44,2 ��45,2,46,2,47,2,48,2 ��49,2,50,2,51,4 ��52,2,53,2,54,2,55,2 ��52,2,55,2,52,2,53,2 �55,2,54,2,52,2,53,2 �54,2,55,2,53,2,52,2 �-1,-1 &��C 0�19,2,1;0; : �3,129 D�24,456;464;820;684;:� N *FX15 XG=�(200) bA%=632:B%=640 l�3,1 v�H%=1�20 ��A%,464:�1,0,220 ��B%,464:�1,0,220 ��T=1�190:� �A%=A%-8:B%=B%+8 �� ��19,2,3;0; �� �
00000000 0d 00 0a 0e f4 22 83 45 58 41 4d 50 4c 45 0d 00 |.....".EXAMPLE..| 00000010 14 12 2a 4c 2e 45 58 64 61 74 61 20 32 30 30 30 |..*L.EXdata 2000| 00000020 0d 00 1e 1f eb 35 3a ef 32 33 3b 38 32 30 32 3b |.....5:.23;8202;| 00000030 30 3b 30 3b 30 3b 31 39 2c 33 2c 34 3b 30 3b 0d |0;0;0;19,3,4;0;.| 00000040 00 28 0b d3 3d 26 32 30 30 30 0d 00 32 0c 2a 4c |.(..=&2000..2.*L| 00000050 2e 45 58 70 69 63 0d 00 3c 0a e6 30 2c 31 33 31 |.EXpic..<..0,131| 00000060 0d 00 46 1e ef 32 34 2c 34 39 36 3b 34 39 36 3b |..F..24,496;496;| 00000070 37 38 30 3b 36 35 32 3b 3a da 3a ef 32 36 0d 00 |780;652;:.:.26..| 00000080 50 0a e6 30 2c 31 32 38 0d 00 5a 1e ef 32 34 2c |P..0,128..Z..24,| 00000090 35 30 38 3b 35 30 34 3b 37 37 30 3b 36 34 34 3b |508;504;770;644;| 000000a0 3a da 3a ef 32 36 0d 00 64 06 f2 43 0d 00 6e 05 |:.:.26..d..C..n.| 000000b0 20 0d 00 78 1a f4 22 82 3d 3d 44 52 41 57 20 49 | ..x..".==DRAW I| 000000c0 73 74 20 46 72 61 6d 65 20 69 6e 0d 00 82 05 20 |st Frame in.... | 000000d0 0d 00 8c 13 f2 41 28 26 36 37 38 30 2c 26 32 30 |.....A(&6780,&20| 000000e0 30 30 29 0d 00 96 05 20 0d 00 a0 09 f7 8d 44 68 |00).... ......Dh| 000000f0 41 0d 00 aa 05 20 0d 00 b4 20 f4 22 81 3d 3d 4c |A.... ... .".==L| 00000100 4f 4f 50 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d |OOP=============| 00000110 3d 3d 3d 3d 3d 3d 0d 00 be 05 f5 0d 00 c8 13 f3 |======..........| 00000120 46 25 3a e7 46 25 3d 2d 31 e5 8d 54 44 41 0d 00 |F%:.F%=-1..TDA..| 00000130 d2 16 6d 65 6d 25 3d 46 25 2a 26 31 30 30 2b 26 |..mem%=F%*&100+&| 00000140 31 46 30 30 0d 00 dc 07 f3 4e 25 0d 00 e6 0c e3 |1F00.....N%.....| 00000150 55 25 3d 31 b8 4e 25 0d 00 f0 12 f2 41 28 26 36 |U%=1.N%.....A(&6| 00000160 37 38 30 2c 6d 65 6d 25 29 0d 00 fa 05 ed 0d 01 |780,mem%).......| 00000170 04 0a fd 46 25 3d 2d 31 0d 01 0e 0f f7 8d 64 74 |...F%=-1......dt| 00000180 41 3a e5 8d 74 7e 40 0d 01 18 20 f4 22 81 3d 3d |A:..t~@... .".==| 00000190 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d |================| 000001a0 3d 3d 3d 3d 3d 3d 3d 0d 01 22 05 20 0d 01 2c 13 |=======..". ..,.| 000001b0 f4 22 85 3d 3d 44 52 41 57 20 46 52 41 4d 45 0d |.".==DRAW FRAME.| 000001c0 01 36 0e dd f2 41 28 58 25 2c 59 25 29 0d 01 40 |.6...A(X%,Y%)..@| 000001d0 45 41 25 3d 30 3a e3 4a 25 3d 31 b8 34 3a e3 49 |EA%=0:.J%=1.4:.I| 000001e0 25 3d 30 b8 36 30 88 34 3a 58 25 21 28 49 25 2b |%=0.60.4:X%!(I%+| 000001f0 41 25 29 3d 59 25 21 49 25 3a ed 3a 41 25 3d 41 |A%)=Y%!I%:.:A%=A| 00000200 25 2b 26 31 34 30 3a 59 25 3d 59 25 2b 26 34 30 |%+&140:Y%=Y%+&40| 00000210 3a ed 0d 01 4a 05 e1 0d 01 54 05 20 0d 01 5e 0d |:...J....T. ..^.| 00000220 f4 22 83 3d 3d 44 41 54 41 0d 01 68 14 dc 31 2c |.".==DATA..h..1,| 00000230 36 2c 32 2c 31 2c 33 2c 31 2c 34 2c 31 0d 01 72 |6,2,1,3,1,4,1..r| 00000240 14 dc 35 2c 31 2c 36 2c 31 2c 37 2c 31 2c 38 2c |..5,1,6,1,7,1,8,| 00000250 31 0d 01 7c 0e dc 39 2c 31 2c 31 30 2c 31 30 0d |1..|..9,1,10,10.| 00000260 01 86 18 dc 31 31 2c 35 2c 31 30 2c 35 2c 31 31 |....11,5,10,5,11| 00000270 2c 35 2c 31 30 2c 31 0d 01 90 18 dc 31 31 2c 31 |,5,10,1.....11,1| 00000280 2c 31 32 2c 31 2c 31 33 2c 31 2c 31 34 2c 31 0d |,12,1,13,1,14,1.| 00000290 01 9a 31 dc 31 33 2c 31 2c 31 32 2c 31 2c 31 31 |..1.13,1,12,1,11| 000002a0 2c 31 2c 31 32 2c 31 2c 31 33 2c 31 2c 31 34 2c |,1,12,1,13,1,14,| 000002b0 31 2c 31 35 2c 31 2c 31 36 2c 31 2c 31 37 2c 31 |1,15,1,16,1,17,1| 000002c0 0d 01 a4 22 dc 31 38 2c 31 2c 31 39 2c 31 2c 32 |...".18,1,19,1,2| 000002d0 30 2c 31 2c 32 31 2c 31 2c 32 32 2c 31 2c 32 33 |0,1,21,1,22,1,23| 000002e0 2c 31 0d 01 ae 18 dc 32 33 2c 35 2c 32 34 2c 31 |,1.....23,5,24,1| 000002f0 2c 32 35 2c 31 2c 32 36 2c 31 0d 01 b8 18 dc 32 |,25,1,26,1.....2| 00000300 37 2c 31 2c 32 38 2c 31 2c 32 39 2c 31 2c 33 30 |7,1,28,1,29,1,30| 00000310 2c 31 0d 01 c2 1d dc 33 31 2c 31 2c 33 32 2c 31 |,1.....31,1,32,1| 00000320 2c 33 33 2c 31 2c 33 34 2c 31 2c 33 35 2c 31 0d |,33,1,34,1,35,1.| 00000330 01 cc 13 dc 33 36 2c 31 2c 33 37 2c 31 2c 33 38 |....36,1,37,1,38| 00000340 2c 35 0d 01 d6 22 dc 33 39 2c 32 2c 34 30 2c 32 |,5...".39,2,40,2| 00000350 2c 34 31 2c 32 2c 34 32 2c 32 2c 34 33 2c 32 2c |,41,2,42,2,43,2,| 00000360 34 34 2c 32 0d 01 e0 18 dc 34 35 2c 32 2c 34 36 |44,2.....45,2,46| 00000370 2c 32 2c 34 37 2c 32 2c 34 38 2c 32 0d 01 ea 13 |,2,47,2,48,2....| 00000380 dc 34 39 2c 32 2c 35 30 2c 32 2c 35 31 2c 34 0d |.49,2,50,2,51,4.| 00000390 01 f4 18 dc 35 32 2c 32 2c 35 33 2c 32 2c 35 34 |....52,2,53,2,54| 000003a0 2c 32 2c 35 35 2c 32 0d 01 fe 18 dc 35 32 2c 32 |,2,55,2.....52,2| 000003b0 2c 35 35 2c 32 2c 35 32 2c 32 2c 35 33 2c 32 0d |,55,2,52,2,53,2.| 000003c0 02 08 18 dc 35 35 2c 32 2c 35 34 2c 32 2c 35 32 |....55,2,54,2,52| 000003d0 2c 32 2c 35 33 2c 32 0d 02 12 18 dc 35 34 2c 32 |,2,53,2.....54,2| 000003e0 2c 35 35 2c 32 2c 35 33 2c 32 2c 35 32 2c 32 0d |,55,2,53,2,52,2.| 000003f0 02 1c 0a dc 2d 31 2c 2d 31 0d 02 26 07 dd f2 43 |....-1,-1..&...C| 00000400 0d 02 30 0e ef 31 39 2c 32 2c 31 3b 30 3b 0d 02 |..0..19,2,1;0;..| 00000410 3a 0a e6 33 2c 31 32 39 0d 02 44 1a ef 32 34 2c |:..3,129..D..24,| 00000420 34 35 36 3b 34 36 34 3b 38 32 30 3b 36 38 34 3b |456;464;820;684;| 00000430 3a da 0d 02 4e 09 2a 46 58 31 35 0d 02 58 0c 47 |:...N.*FX15..X.G| 00000440 3d a6 28 32 30 30 29 0d 02 62 11 41 25 3d 36 33 |=.(200)..b.A%=63| 00000450 32 3a 42 25 3d 36 34 30 0d 02 6c 08 e6 33 2c 31 |2:B%=640..l..3,1| 00000460 0d 02 76 0c e3 48 25 3d 31 b8 32 30 0d 02 80 14 |..v..H%=1.20....| 00000470 ec 41 25 2c 34 36 34 3a f0 31 2c 30 2c 32 32 30 |.A%,464:.1,0,220| 00000480 0d 02 8a 14 ec 42 25 2c 34 36 34 3a f0 31 2c 30 |.....B%,464:.1,0| 00000490 2c 32 32 30 0d 02 94 0e e3 54 3d 31 b8 31 39 30 |,220.....T=1.190| 000004a0 3a ed 0d 02 9e 13 41 25 3d 41 25 2d 38 3a 42 25 |:.....A%=A%-8:B%| 000004b0 3d 42 25 2b 38 0d 02 a8 05 ed 0d 02 b2 0e ef 31 |=B%+8..........1| 000004c0 39 2c 32 2c 33 3b 30 3b 0d 02 bc 05 e1 0d ff |9,2,3;0;.......| 000004cf