Home » Personal collection » Commodore disks » disk40b4_autostereo.d64 » ewave
ewave
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 » Commodore disks » disk40b4_autostereo.d64 |
| Filename: | ewave |
| Read OK: | ✔ |
| File size: | 00F5 bytes |
| Load address: | 0801 |
| Exec address: | 0000 |
File contents
5 REM ELECTRONIC WAVEFORM
7 :
10 FORN=0 TO 11:PRINTN
20 READ H:D=8300/H:O=0
30 FOR BYTE=0 TO 512:B=0
40 FOR BIT=0 TO 7:B=B*2
50 O=O+1:IF O>D THEN O=O-D:B=B+1
60 NEXT:POKE $B800+512*N+BYTE,B
70 NEXT:NEXT
100 DATA 880,938,987,1046,1108,1175,1245,1318,1397,1480,1568,1661
� ELECTRONIC WAVEFORM ! : 2 �N�0 � 11:�N G � H:D�8300�H:O�0 ^ � BYTE�0 � 512:B�0 t( � BIT�0 � 7:B�B�2 �2 O�O�1:� O�D � O�O�D:B�B�1 �< �:� $B800�512�N�BYTE,B �F �:� �d � 880,938,987,1046,1108,1175,1245,1318,1397,1480,1568,1661
[HE@. electronic waveform@!HG@:@2HJ@.n.0 . 11:.n@gHT@. h:d.8300.h:o.0@.H.@. byte.0 . 512:b.0@TH(@. bit.0 . 7:b.b.2@.H2@o.o.1:. o.d . o.o.d:b.b.1@.H<@.:. $b800.512.n.byte,b@.Hf@.:.@.HD@. 880,938,987,1046,1108,1175,1245,1318,1397,1480,1568,1661@@@
00000000 1b 08 05 00 8f 20 45 4c 45 43 54 52 4f 4e 49 43 |..... ELECTRONIC| 00000010 20 57 41 56 45 46 4f 52 4d 00 21 08 07 00 3a 00 | WAVEFORM.!...:.| 00000020 32 08 0a 00 81 4e b2 30 20 a4 20 31 31 3a 99 4e |2....N.0 . 11:.N| 00000030 00 47 08 14 00 87 20 48 3a 44 b2 38 33 30 30 ad |.G.... H:D.8300.| 00000040 48 3a 4f b2 30 00 5e 08 1e 00 81 20 42 59 54 45 |H:O.0.^.... BYTE| 00000050 b2 30 20 a4 20 35 31 32 3a 42 b2 30 00 74 08 28 |.0 . 512:B.0.t.(| 00000060 00 81 20 42 49 54 b2 30 20 a4 20 37 3a 42 b2 42 |.. BIT.0 . 7:B.B| 00000070 ac 32 00 92 08 32 00 4f b2 4f aa 31 3a 8b 20 4f |.2...2.O.O.1:. O| 00000080 b1 44 20 a7 20 4f b2 4f ab 44 3a 42 b2 42 aa 31 |.D . O.O.D:B.B.1| 00000090 00 ad 08 3c 00 82 3a 97 20 24 42 38 30 30 aa 35 |...<..:. $B800.5| 000000a0 31 32 ac 4e aa 42 59 54 45 2c 42 00 b5 08 46 00 |12.N.BYTE,B...F.| 000000b0 82 3a 82 00 f4 08 64 00 83 20 38 38 30 2c 39 33 |.:....d.. 880,93| 000000c0 38 2c 39 38 37 2c 31 30 34 36 2c 31 31 30 38 2c |8,987,1046,1108,| 000000d0 31 31 37 35 2c 31 32 34 35 2c 31 33 31 38 2c 31 |1175,1245,1318,1| 000000e0 33 39 37 2c 31 34 38 30 2c 31 35 36 38 2c 31 36 |397,1480,1568,16| 000000f0 36 31 00 00 00 |61...| 000000f5
.