Home » Personal collection » Commodore tapes » Commodore_16 » drawer_br_tape07b_c16_d90_ages_b.wav » home-made graphi
home-made graphi
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 tapes » Commodore_16 » drawer_br_tape07b_c16_d90_ages_b.wav |
| Filename: | home-made graphi |
| Read OK: | ✔ |
| File size: | 00FA bytes |
| Load address: | 1001 |
| Exec address: | 0000 |
File contents
5 C=1
10 COLOR 0,1
20 COLOR 1,2
30 GRAPHIC 1,1
40 A=RND (1)*20+10
50 FOR L=0 TO 3000 STEP A
60 GOTO 1000:BOX 1,L,L,220,130,100
70 NEXT L
80 FOR L=1 TO 2000:NEXT L
90 GRAPHIC 0,1
1000 Q=1:W=1:E=30:R=1:T=1:Y=0
1005 BOX Q,W,E,R,T,Y
1008 W=W+1:T=T+1:C=C+1:IF C>15 THEN C=1
1009 COLOR 1,C,3:GOTO 1005
C�1 � 0,1 � 1,2 ' � 1,1 9( A�� (1)�20�10 N2 � L�0 � 3000 � A m< � 1000:� 1,L,L,220,130,100 uF � L �P � L�1 � 2000:� L �Z � 0,1 ��Q�1:W�1:E�30:R�1:T�1:Y�0 ��� Q,W,E,R,T,Y ��W�W�1:T�T�1:C�C�1:� C�15 � C�1 ��� 1,C,3:� 1005
IPE@c.1@SPJ@. 0,1@]PT@. 1,2@'P.@. 1,1@9P(@a.. (1).20.10@nP2@. l.0 . 3000 . a@MP<@. 1000:. 1,l,l,220,130,100@UPf@. l@.Pp@. l.1 . 2000:. l@.Pz@. 0,1@.P.Cq.1:w.1:e.30:r.1:t.1:y.0@.P.C. q,w,e,r,t,y@.P.Cw.w.1:t.t.1:c.c.1:. c.15 . c.1@.P.C. 1,c,3:. 1005@@@
00000000 09 10 05 00 43 b2 31 00 13 10 0a 00 e7 20 30 2c |....C.1...... 0,| 00000010 31 00 1d 10 14 00 e7 20 31 2c 32 00 27 10 1e 00 |1...... 1,2.'...| 00000020 de 20 31 2c 31 00 39 10 28 00 41 b2 bb 20 28 31 |. 1,1.9.(.A.. (1| 00000030 29 ac 32 30 aa 31 30 00 4e 10 32 00 81 20 4c b2 |).20.10.N.2.. L.| 00000040 30 20 a4 20 33 30 30 30 20 a9 20 41 00 6d 10 3c |0 . 3000 . A.m.<| 00000050 00 89 20 31 30 30 30 3a e1 20 31 2c 4c 2c 4c 2c |.. 1000:. 1,L,L,| 00000060 32 32 30 2c 31 33 30 2c 31 30 30 00 75 10 46 00 |220,130,100.u.F.| 00000070 82 20 4c 00 8a 10 50 00 81 20 4c b2 31 20 a4 20 |. L...P.. L.1 . | 00000080 32 30 30 30 3a 82 20 4c 00 94 10 5a 00 de 20 30 |2000:. L...Z.. 0| 00000090 2c 31 00 b1 10 e8 03 51 b2 31 3a 57 b2 31 3a 45 |,1.....Q.1:W.1:E| 000000a0 b2 33 30 3a 52 b2 31 3a 54 b2 31 3a 59 b2 30 00 |.30:R.1:T.1:Y.0.| 000000b0 c3 10 ed 03 e1 20 51 2c 57 2c 45 2c 52 2c 54 2c |..... Q,W,E,R,T,| 000000c0 59 00 e6 10 f0 03 57 b2 57 aa 31 3a 54 b2 54 aa |Y.....W.W.1:T.T.| 000000d0 31 3a 43 b2 43 aa 31 3a 8b 20 43 b1 31 35 20 a7 |1:C.C.1:. C.15 .| 000000e0 20 43 b2 31 00 f9 10 f1 03 e7 20 31 2c 43 2c 33 | C.1...... 1,C,3| 000000f0 3a 89 20 31 30 30 35 00 00 00 |:. 1005...| 000000fa
.