Home » Personal collection » Commodore disks » disk30a2_loadstar_131.d64 » b.hires skeleton

b.hires skeleton

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 » disk30a2_loadstar_131.d64
Filename: b.hires skeleton
Read OK:
File size: 030A bytes
Load address: 0801
Exec address: 0000
File contents
     8 DV=PEEK(186):IFDV<8THENDV=8
    10 POKE53281,0:POKE53280,0:PRINT"<clr><text mode><shift disable>":GOSUB60000
    20 POKE43,1:POKE44,16:POKE4096,0
    30 PRINT"<home><cursor down><cursor down><cursor down><black>LOAD"CHR$(34)"HIRES SKELETON"CHR$(34)","DV
    40 PRINT"<cursor down><cursor down><cursor down><cursor down>RUN<home>"
    50 POKE631,13:POKE632,13:POKE198,2:END
 10000 DV=PEEK(186):N$="B.HIRES SKELETON":OPEN15,DV,15,"S0:"+N$:CLOSE15
 10010 SAVEN$,DV:END
 60000 PRINT"<clr>":Z$=" <reverse on><medium gray>                                      ":POKE214,10:PRINT
 60010 PRINT" <light gray><reverse on>🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃🮃":FORI=0TO9:PRINTZ$:NEXT
 60020 PRINT" <dark gray><reverse on>▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃▃<medium gray><home>"
 60030 Z$(0)="🭴╮-🭻🭶♥ ♥╯🭶🭼🭶🭰🭽╱":Z$(1)="BY ╯NEES 🭸ALHOON
 60040 Z$(2)="(🭸) 1995 BY ♥OFTDISK 🭾UBLISHING"+CHR$(13)
 60050 Z$(3)="🭰HIS PROGRAM IS THE COPYRIGHTED WORK
 60060 Z$(4)="OF ♥🭽🭺🭰🭷╮♥╯ 🭾╭🭲🭼╮♥🭴╮╱🭱.  â•®T IS NOT"
 60070 Z$(5)="SHAREWARE OR IN THE PUBLIC DOMAIN."
 60080 Z$(6)="🭰O SUBSCRIBE CALL 1-800-594-3370."
 60090 POKE214,12:PRINT
 60100 FORI=0TO6:PRINTTAB(20-(LEN(Z$(I))/2))"<reverse on>"Z$(I):NEXT:RETURN

DV��(186):�DV�8�DV�8>
�53281,0:�53280,0:�"�":�60000W�43,1:�44,16:�4096,0��"�LOAD"�(34)"HIRES SKELETON"�(34)","DV�(�"RUN"�2�631,13:�632,13:�198,2:��'DV��(186):N$�"B.HIRES SKELETON":�15,DV,15,"S0:"�N$:�15�'�N$,DV:�>	`�"�":Z$�" �                                      ":�214,10:�|	j�" ���������������������������������������":�I�0�9:�Z$:��	t�" ����������������������������������������"�	~�Z$(0)�"��-��� ��������":Z$(1)�"BY �NEES �ALHOON
��Z$(2)�"(�) 1995 BY �OFTDISK �UBLISHING"��(13)E
��Z$(3)�"�HIS PROGRAM IS THE COPYRIGHTED WORKt
��Z$(4)�"OF �������� ����������.  �T IS NOT"�
��Z$(5)�"SHAREWARE OR IN THE PUBLIC DOMAIN."�
��Z$(6)�"�O SUBSCRIBE CALL 1-800-594-3370."�
��214,12:�	��I�0�6:��20�(�(Z$(I))�2))""Z$(I):�:�
ZHH@dv..(186):.dv.8.dv.8@>HJ@.53281,0:.53280,0:.".NH":.60000@wHT@.43,1:.44,16:.4096,0@.H.@."SQQQ.load".(34)"hires skeleton".(34)","dv@.H(@."QQQQrunS"@.H2@.631,13:.632,13:.198,2:.@.HP'dv..(186):n$."b.hires skeleton":.15,dv,15,"s0:".n$:.15@.HZ'.n$,dv:.@>I...".":z$." R.                                      ":.214,10:.@.IJ.." .R......................................":.i.0.9:.z$:.@.IT.." .R.......................................S"@.I..z$(0)."..-... ........":z$(1)."by .nees .alhoon@UJ..z$(2)."(.) 1995 by .oftdisk .ublishing"..(13)@eJ..z$(3).".his program is the copyrighted work@TJ..z$(4)."of ........ ...........  .t is not"@.J..z$(5)."shareware or in the public domain."@.J..z$(6).".o subscribe call 1-800-594-3370."@.J...214,12:.@IK...i.0.6:..20.(.(z$(i)).2))"R"z$(i):.:.@@@
00000000  1a 08 08 00 44 56 b2 c2  28 31 38 36 29 3a 8b 44  |....DV..(186):.D|
00000010  56 b3 38 a7 44 56 b2 38  00 3e 08 0a 00 97 35 33  |V.8.DV.8.>....53|
00000020  32 38 31 2c 30 3a 97 35  33 32 38 30 2c 30 3a 99  |281,0:.53280,0:.|
00000030  22 93 0e 08 22 3a 8d 36  30 30 30 30 00 57 08 14  |"...":.60000.W..|
00000040  00 97 34 33 2c 31 3a 97  34 34 2c 31 36 3a 97 34  |..43,1:.44,16:.4|
00000050  30 39 36 2c 30 00 87 08  1e 00 99 22 13 11 11 11  |096,0......"....|
00000060  90 4c 4f 41 44 22 c7 28  33 34 29 22 48 49 52 45  |.LOAD".(34)"HIRE|
00000070  53 20 53 4b 45 4c 45 54  4f 4e 22 c7 28 33 34 29  |S SKELETON".(34)|
00000080  22 2c 22 44 56 00 97 08  28 00 99 22 11 11 11 11  |","DV...(.."....|
00000090  52 55 4e 13 22 00 b4 08  32 00 97 36 33 31 2c 31  |RUN."...2..631,1|
000000a0  33 3a 97 36 33 32 2c 31  33 3a 97 31 39 38 2c 32  |3:.632,13:.198,2|
000000b0  3a 80 00 ef 08 10 27 44  56 b2 c2 28 31 38 36 29  |:.....'DV..(186)|
000000c0  3a 4e 24 b2 22 42 2e 48  49 52 45 53 20 53 4b 45  |:N$."B.HIRES SKE|
000000d0  4c 45 54 4f 4e 22 3a 9f  31 35 2c 44 56 2c 31 35  |LETON":.15,DV,15|
000000e0  2c 22 53 30 3a 22 aa 4e  24 3a a0 31 35 00 fc 08  |,"S0:".N$:.15...|
000000f0  1a 27 94 4e 24 2c 44 56  3a 80 00 3e 09 60 ea 99  |.'.N$,DV:..>.`..|
00000100  22 93 22 3a 5a 24 b2 22  20 12 98 20 20 20 20 20  |".":Z$." ..     |
00000110  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000130  20 22 3a 97 32 31 34 2c  31 30 3a 99 00 7c 09 6a  | ":.214,10:..|.j|
00000140  ea 99 22 20 9b 12 b8 b8  b8 b8 b8 b8 b8 b8 b8 b8  |.." ............|
00000150  b8 b8 b8 b8 b8 b8 b8 b8  b8 b8 b8 b8 b8 b8 b8 b8  |................|
00000160  b8 b8 b8 b8 b8 b8 b8 b8  b8 b8 b8 b8 22 3a 81 49  |............":.I|
00000170  b2 30 a4 39 3a 99 5a 24  3a 82 00 af 09 74 ea 99  |.0.9:.Z$:....t..|
00000180  22 20 97 12 b9 b9 b9 b9  b9 b9 b9 b9 b9 b9 b9 b9  |" ..............|
00000190  b9 b9 b9 b9 b9 b9 b9 b9  b9 b9 b9 b9 b9 b9 b9 b9  |................|
000001a0  b9 b9 b9 b9 b9 b9 b9 b9  b9 b9 98 13 22 00 e3 09  |............"...|
000001b0  7e ea 5a 24 28 30 29 b2  22 c8 c9 2d d2 c5 d3 20  |~.Z$(0)."..-... |
000001c0  d3 cb c5 cc c5 d4 cf ce  22 3a 5a 24 28 31 29 b2  |........":Z$(1).|
000001d0  22 42 59 20 cb 4e 45 45  53 20 c3 41 4c 48 4f 4f  |"BY .NEES .ALHOO|
000001e0  4e 00 15 0a 88 ea 5a 24  28 32 29 b2 22 28 c3 29  |N.....Z$(2)."(.)|
000001f0  20 31 39 39 35 20 42 59  20 d3 4f 46 54 44 49 53  | 1995 BY .OFTDIS|
00000200  4b 20 d0 55 42 4c 49 53  48 49 4e 47 22 aa c7 28  |K .UBLISHING"..(|
00000210  31 33 29 00 45 0a 92 ea  5a 24 28 33 29 b2 22 d4  |13).E...Z$(3).".|
00000220  48 49 53 20 50 52 4f 47  52 41 4d 20 49 53 20 54  |HIS PROGRAM IS T|
00000230  48 45 20 43 4f 50 59 52  49 47 48 54 45 44 20 57  |HE COPYRIGHTED W|
00000240  4f 52 4b 00 74 0a 9c ea  5a 24 28 34 29 b2 22 4f  |ORK.t...Z$(4)."O|
00000250  46 20 d3 cf c6 d4 c4 c9  d3 cb 20 d0 d5 c2 cc c9  |F ........ .....|
00000260  d3 c8 c9 ce c7 2e 20 20  c9 54 20 49 53 20 4e 4f  |......  .T IS NO|
00000270  54 22 00 a3 0a a6 ea 5a  24 28 35 29 b2 22 53 48  |T".....Z$(5)."SH|
00000280  41 52 45 57 41 52 45 20  4f 52 20 49 4e 20 54 48  |AREWARE OR IN TH|
00000290  45 20 50 55 42 4c 49 43  20 44 4f 4d 41 49 4e 2e  |E PUBLIC DOMAIN.|
000002a0  22 00 d1 0a b0 ea 5a 24  28 36 29 b2 22 d4 4f 20  |".....Z$(6).".O |
000002b0  53 55 42 53 43 52 49 42  45 20 43 41 4c 4c 20 31  |SUBSCRIBE CALL 1|
000002c0  2d 38 30 30 2d 35 39 34  2d 33 33 37 30 2e 22 00  |-800-594-3370.".|
000002d0  df 0a ba ea 97 32 31 34  2c 31 32 3a 99 00 09 0b  |.....214,12:....|
000002e0  c4 ea 81 49 b2 30 a4 36  3a 99 a3 32 30 ab 28 c3  |...I.0.6:..20.(.|
000002f0  28 5a 24 28 49 29 29 ad  32 29 29 22 12 22 5a 24  |(Z$(I)).2))"."Z$|
00000300  28 49 29 3a 82 3a 8e 00  00 00                    |(I):.:....|
0000030a