Home » Personal collection » Commodore disks » disk50a2_progs1.d64 » commodore disp

commodore disp

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 » disk50a2_progs1.d64
Filename: commodore disp
Read OK:
File size: 0308 bytes
Load address: 0801
Exec address: 0000
Duplicates

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

File contents
    10 VC=53248:POKE53280,0:POKE53281,0:POKEVC+27,20
    20 PRINT"<green><clr>";:FORR=0TO110:PRINT"COMMODORE";
    30 NEXT:POKEVC+21,0:POKEVC+23,255
    40 POKEVC+29,255:POKEVC+16,0
    50 POKEVC+28,255:POKEVC+37,2
    60 POKEVC+38,0:POKEVC+40,6
    70 POKEVC+41,6:POKEVC+42,6
    80 POKEVC+43,6:POKEVC+2,25
    90 POKEVC+4,100:POKEVC+6,175
   100 POKEVC+8,250:FORRE=0TO62
   110 READDA:POKE12352+RE,DA:NEXT
   120 POKE2041,193:POKE2042,193
   130 POKE2043,193:POKE2044,193:POKEVC+21,255:POKE2023,3
   140 FORVE=0TO255
   150 POKEVC+3,VE:POKEVC+5,255-VE
   160 POKEVC+7,VE:POKEVC+9,255-VE:NEXT:POKEVC+27,255-PEEK(VC+27)
   170 FORVE=255 TO 0 STEP -1
   180 POKEVC+3,VE:POKEVC+5,255-VE
   190 POKEVC+7,VE:POKEVC+9,255-VE:NEXT:POKEVC+27,255-PEEK(VC+27):GOTO140
   200 DATA 0,0,0,0,170,0,10,170,0
   210 DATA 42,170,0,170,168,170,170,0,170
   220 DATA 168,0,168,160,0,168,160,0,160
   230 DATA 160,0,160,160,0,0,160,0,0
   240 DATA 160,0,80,160,0,80,160,0,84
   250 DATA 168,0,84,170,0,85,170,168,85
   260 DATA 42,170,0,10,170,0,0,170,0

*
VC�53248:�53280,0:�53281,0:�VC�27,20L�"�";:�R�0�110:�"COMMODORE";f�:�VC�21,0:�VC�23,255~(�VC�29,255:�VC�16,0�2�VC�28,255:�VC�37,2�<�VC�38,0:�VC�40,6�F�VC�41,6:�VC�42,6�P�VC�43,6:�VC�2,25�Z�VC�4,100:�VC�6,175	d�VC�8,250:�RE�0�62	n�DA:�12352�RE,DA:�6	x�2041,193:�2042,193a	��2043,193:�2044,193:�VC�21,255:�2023,3o	��VE�0�255�	��VC�3,VE:�VC�5,255�VE�	��VC�7,VE:�VC�9,255�VE:�:�VC�27,255��(VC�27)�	��VE�255 � 0 � �1�	��VC�3,VE:�VC�5,255�VE
��VC�7,VE:�VC�9,255�VE:�:�VC�27,255��(VC�27):�140:
�� 0,0,0,0,170,0,10,170,0_
�� 42,170,0,170,168,170,170,0,170�
�� 168,0,168,160,0,168,160,0,160�
�� 160,0,160,160,0,0,160,0,0�
�� 160,0,80,160,0,80,160,0,84�
�� 168,0,84,170,0,85,170,168,85� 42,170,0,10,170,0,0,170,0
*HJ@vc.53248:.53280,0:.53281,0:.vc.27,20@lHT@."..";:.r.0.110:."commodore";@FH.@.:.vc.21,0:.vc.23,255@.H(@.vc.29,255:.vc.16,0@.H2@.vc.28,255:.vc.37,2@.H<@.vc.38,0:.vc.40,6@.Hf@.vc.41,6:.vc.42,6@.Hp@.vc.43,6:.vc.2,25@.Hz@.vc.4,100:.vc.6,175@GID@.vc.8,250:.re.0.62@.IN@.da:.12352.re,da:.@6IX@.2041,193:.2042,193@AI.@.2043,193:.2044,193:.vc.21,255:.2023,3@OI.@.ve.0.255@.I.@.vc.3,ve:.vc.5,255.ve@.I.@.vc.7,ve:.vc.9,255.ve:.:.vc.27,255..(vc.27)@.I.@.ve.255 . 0 . .1@.I.@.vc.3,ve:.vc.5,255.ve@]J.@.vc.7,ve:.vc.9,255.ve:.:.vc.27,255..(vc.27):.140@:J.@. 0,0,0,0,170,0,10,170,0@.J.@. 42,170,0,170,168,170,170,0,170@.J.@. 168,0,168,160,0,168,160,0,160@.J.@. 160,0,160,160,0,0,160,0,0@.J.@. 160,0,80,160,0,80,160,0,84@.J.@. 168,0,84,170,0,85,170,168,85@GKDA. 42,170,0,10,170,0,0,170,0@@@
00000000  2a 08 0a 00 56 43 b2 35  33 32 34 38 3a 97 35 33  |*...VC.53248:.53|
00000010  32 38 30 2c 30 3a 97 35  33 32 38 31 2c 30 3a 97  |280,0:.53281,0:.|
00000020  56 43 aa 32 37 2c 32 30  00 4c 08 14 00 99 22 1e  |VC.27,20.L....".|
00000030  93 22 3b 3a 81 52 b2 30  a4 31 31 30 3a 99 22 43  |.";:.R.0.110:."C|
00000040  4f 4d 4d 4f 44 4f 52 45  22 3b 00 66 08 1e 00 82  |OMMODORE";.f....|
00000050  3a 97 56 43 aa 32 31 2c  30 3a 97 56 43 aa 32 33  |:.VC.21,0:.VC.23|
00000060  2c 32 35 35 00 7e 08 28  00 97 56 43 aa 32 39 2c  |,255.~.(..VC.29,|
00000070  32 35 35 3a 97 56 43 aa  31 36 2c 30 00 96 08 32  |255:.VC.16,0...2|
00000080  00 97 56 43 aa 32 38 2c  32 35 35 3a 97 56 43 aa  |..VC.28,255:.VC.|
00000090  33 37 2c 32 00 ac 08 3c  00 97 56 43 aa 33 38 2c  |37,2...<..VC.38,|
000000a0  30 3a 97 56 43 aa 34 30  2c 36 00 c2 08 46 00 97  |0:.VC.40,6...F..|
000000b0  56 43 aa 34 31 2c 36 3a  97 56 43 aa 34 32 2c 36  |VC.41,6:.VC.42,6|
000000c0  00 d8 08 50 00 97 56 43  aa 34 33 2c 36 3a 97 56  |...P..VC.43,6:.V|
000000d0  43 aa 32 2c 32 35 00 f0  08 5a 00 97 56 43 aa 34  |C.2,25...Z..VC.4|
000000e0  2c 31 30 30 3a 97 56 43  aa 36 2c 31 37 35 00 07  |,100:.VC.6,175..|
000000f0  09 64 00 97 56 43 aa 38  2c 32 35 30 3a 81 52 45  |.d..VC.8,250:.RE|
00000100  b2 30 a4 36 32 00 1e 09  6e 00 87 44 41 3a 97 31  |.0.62...n..DA:.1|
00000110  32 33 35 32 aa 52 45 2c  44 41 3a 82 00 36 09 78  |2352.RE,DA:..6.x|
00000120  00 97 32 30 34 31 2c 31  39 33 3a 97 32 30 34 32  |..2041,193:.2042|
00000130  2c 31 39 33 00 61 09 82  00 97 32 30 34 33 2c 31  |,193.a....2043,1|
00000140  39 33 3a 97 32 30 34 34  2c 31 39 33 3a 97 56 43  |93:.2044,193:.VC|
00000150  aa 32 31 2c 32 35 35 3a  97 32 30 32 33 2c 33 00  |.21,255:.2023,3.|
00000160  6f 09 8c 00 81 56 45 b2  30 a4 32 35 35 00 89 09  |o....VE.0.255...|
00000170  96 00 97 56 43 aa 33 2c  56 45 3a 97 56 43 aa 35  |...VC.3,VE:.VC.5|
00000180  2c 32 35 35 ab 56 45 00  b9 09 a0 00 97 56 43 aa  |,255.VE......VC.|
00000190  37 2c 56 45 3a 97 56 43  aa 39 2c 32 35 35 ab 56  |7,VE:.VC.9,255.V|
000001a0  45 3a 82 3a 97 56 43 aa  32 37 2c 32 35 35 ab c2  |E:.:.VC.27,255..|
000001b0  28 56 43 aa 32 37 29 00  ce 09 aa 00 81 56 45 b2  |(VC.27)......VE.|
000001c0  32 35 35 20 a4 20 30 20  a9 20 ab 31 00 e8 09 b4  |255 . 0 . .1....|
000001d0  00 97 56 43 aa 33 2c 56  45 3a 97 56 43 aa 35 2c  |..VC.3,VE:.VC.5,|
000001e0  32 35 35 ab 56 45 00 1d  0a be 00 97 56 43 aa 37  |255.VE......VC.7|
000001f0  2c 56 45 3a 97 56 43 aa  39 2c 32 35 35 ab 56 45  |,VE:.VC.9,255.VE|
00000200  3a 82 3a 97 56 43 aa 32  37 2c 32 35 35 ab c2 28  |:.:.VC.27,255..(|
00000210  56 43 aa 32 37 29 3a 89  31 34 30 00 3a 0a c8 00  |VC.27):.140.:...|
00000220  83 20 30 2c 30 2c 30 2c  30 2c 31 37 30 2c 30 2c  |. 0,0,0,0,170,0,|
00000230  31 30 2c 31 37 30 2c 30  00 5f 0a d2 00 83 20 34  |10,170,0._.... 4|
00000240  32 2c 31 37 30 2c 30 2c  31 37 30 2c 31 36 38 2c  |2,170,0,170,168,|
00000250  31 37 30 2c 31 37 30 2c  30 2c 31 37 30 00 83 0a  |170,170,0,170...|
00000260  dc 00 83 20 31 36 38 2c  30 2c 31 36 38 2c 31 36  |... 168,0,168,16|
00000270  30 2c 30 2c 31 36 38 2c  31 36 30 2c 30 2c 31 36  |0,0,168,160,0,16|
00000280  30 00 a3 0a e6 00 83 20  31 36 30 2c 30 2c 31 36  |0...... 160,0,16|
00000290  30 2c 31 36 30 2c 30 2c  30 2c 31 36 30 2c 30 2c  |0,160,0,0,160,0,|
000002a0  30 00 c4 0a f0 00 83 20  31 36 30 2c 30 2c 38 30  |0...... 160,0,80|
000002b0  2c 31 36 30 2c 30 2c 38  30 2c 31 36 30 2c 30 2c  |,160,0,80,160,0,|
000002c0  38 34 00 e7 0a fa 00 83  20 31 36 38 2c 30 2c 38  |84...... 168,0,8|
000002d0  34 2c 31 37 30 2c 30 2c  38 35 2c 31 37 30 2c 31  |4,170,0,85,170,1|
000002e0  36 38 2c 38 35 00 07 0b  04 01 83 20 34 32 2c 31  |68,85...... 42,1|
000002f0  37 30 2c 30 2c 31 30 2c  31 37 30 2c 30 2c 30 2c  |70,0,10,170,0,0,|
00000300  31 37 30 2c 30 00 00 00                           |170,0...|
00000308