Home » Personal collection » Commodore disks » disk35b_commodore_world_8.d64 » disk doctor 64

disk doctor 64

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 » disk35b_commodore_world_8.d64
Filename: disk doctor 64
Read OK:
File size: 16F6 bytes
Load address: 0801
Exec address: 0000
File contents
     0 DN=8:REM DEVICE #
     2 POKE53280,11:POKE53281,0:DIMA$,I,S$,T$,CC,B,SS,E$,J,TE,A:GOTO78
     4 GETA$:IFA$>""THENPRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>                                       <home>";:CC=293:RETURN
     6 IFA$=""THEN252
     8 RETURN
    10 IFI<0THENI=280+I:IFI>255THENI=I-40
    12 IFI>255THENI=I-INT(I/40)*40
    14 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>"SPC(10)PEEK(SS+I)"<cursor left>   ":PRINT"<cursor down>"SPC(10)I"<cursor left>   "
    16 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>VALUE:     ":PRINT"<cursor down>POSITION:"
    18 FORJ=1TO2:POKEI+SS,(PEEK(I+SS)+128)AND255:FORD=0TO1:NEXTD,J
    20 GOSUB4:IFA$=""THEN18
    22 IFPFTHEN66
    24 IFA$="<cursor right>"THENI=(I+1)AND255:GOTO10
    26 IFA$="<cursor left>"THENI=(I-1)AND255:GOTO10
    28 IFA$="<cursor up>"THENI=I-40:GOTO10
    30 IFA$="<cursor down>"THENI=I+40:GOTO10
    32 IFA$="<home>"THENI=0:GOTO10
    34 IFA$="N"THENT$=STR$(PEEK(SS)):S$=STR$(PEEK(SS+1)):GOTO128
    36 IFA$="J"THENT$=STR$(PEEK(SS+I)):S$=STR$(PEEK(SS+I+1)):GOTO128
    38 IFA$="Q"THENPRINT#15,"I0":RUN
    40 IFA$="+"THENS$=STR$(VAL(S$)+1):GOTO128
    42 IFA$="-"THENS$=STR$((VAL(S$)-1)*SGN(VAL(S$))):GOTO128
    44 IFA$="R"THEN174
    46 IFA$="B"THEN116
    48 IFA$="T"THENPRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":GOSUB218:PRINT"<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":GOSUB218:GOTO64
    50 IFA$=CHR$(3)THEN74
    52 IFA$<>"@"THEN10
    54 IFI<0THENI=280+I:IFI>255THENI=I-40
    56 IFI>255THENI=I-INT(I/40)*40
    58 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>"SPC(10)PEEK(SS+I)"<cursor left>   ":PRINT"<cursor down>"SPC(10)I"<cursor left>   "
    60 POKE198,0:PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>NEW VALUE: ";:INPUT#9,B$:PRINT
    62 PRINT"<cursor up>"SPC(20)"               ":B=VAL(B$):GOTO166
    64 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>   🭾RESS [🭻🭶🭰╭🭻╱] TO END TEXT MODE":PF=1:GETA$:GOTO10
    66 IFA$=CHR$(13)THENPF=0:PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":GOSUB202:GOTO10
    68 IFA$=""THEN20
    70 B=ASC(A$):GOTO168
    72 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":GOSUB202:GOTO10
    74 PRINT#15,"I0":PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":IFPEEK(788)=52THENPOKE788,49
    76 END:RUN
    78 A=828:TEM=A:REM FILEREAD
    80 POKE210,INT(A/256):POKE209,A-256*PEEK(210):POKE211,0
    82 PRINT"<reverse on>"CHR$(34)CHR$(34)CHR$(20)"<rev off>B <reverse on>🭺▚ <rev off>@ <reverse on>▁▚Y<rev off>🮃D<reverse on>🭴🭾🮂<rev off>🭼<reverse on>🭼▚"
    84 IFPEEK(788)=49THENPOKE788,52:REM STOP KEY DISABLE
    86 PRINT"<text mode><light green>";
    88 SS=1024+120:I=0:B=0:J=0
    90 A$="":E$="":T$="":S$=""
    92 PRINT"<clr><light green><cursor down><cursor down><cursor down>🭾LEASE PUT THE ♥╮🭸╯ 🭷╮♥╯ IN DRIVE 0."
    94 PRINT"<cursor down><cursor down>🭵OU SHOULD USE THE 🭷🭽♥ '╳' COMMAND TO"
    96 PRINT"UPDATE THE 🭲♠╲ ON THE DISK WHEN DONE."
    98 PRINT"<cursor down><cursor down>╱OTE: 🭷ISK DEVICE IS"DN"<cursor left>.<cursor down><cursor down>"
   100 PRINT"<cursor down><cursor down><reverse on>🭾RESS ♠╱🭵 ╯🭶🭵 TO CONTINUE"
   102 GOSUB4:IFA$=""THEN102
   104 GOSUB10021:IFA$=CHR$(3)THEN74
   106 OPEN1,DN,2,"0:   ,S,R":INPUT#15,E$:IFE$="62"THENCLOSE1:GOTO114
   108 IFE$>"64"THENINPUT#1,E$:PRINT"<clr><cursor down><cursor down><cursor down><cursor down><cursor down>"E$"  ON DRIVE 0"
   110 IFE$="21"THENGOSUB184
   112 PRINT#15,"I0"
   114 OPEN2,DN,2,"#2":PRINT"<clr>"
   116 GOSUB192
   118 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>      🭰🭻♠🭸╯   "MID$(STR$(VAL(T$)),2)" "
   120 PRINT"      ♥🭶🭸🭰🭽🭻  "MID$(STR$(VAL(S$)),2)" <cursor up><cursor up>
   122 PRINT"╮NPUT 🭰🭻♠🭸╯:  ";:INPUT#9,T$:PRINT:IFT$=CHR$(160)THEN74
   124 PRINT"<cursor up>     ":PRINT"╮NPUT ♥🭶🭸🭰🭽🭻: ";:INPUT#9,S$:PRINT:IFS$=CHR$(160)THEN74
   126 PRINT"<cursor up>     ":T$=MID$(STR$(VAL(T$)),2):S$=MID$(STR$(VAL(S$)),2)
   128 IFVAL(T$)=0THEN116
   130 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>                                       "
   132 PRINT"                                       "
   134 PRINT"                                       "
   136 PRINT#15,"U1:2,0,"T$","S$:REM CH2 DR0
   138 INPUT#15,E1$,E2$,E3$,E4$:IFE1$="00"THEN156
   140 GOSUB192:E2$=" 🭷╮♥╯ 🭶🭻🭻🭽🭻 #"+E1$+","+E2$
   142 PRINT"<home><cursor down><cursor down>":FORI=1TOLEN(E2$):PRINT"▂";:NEXT:PRINT:PRINT"<reverse on>"E2$
   144 FORI=1TOLEN(E2$):PRINT"▔";:NEXT:PRINT
   146 PRINT"IN 🭰🭻♠🭸╯"VAL(E3$)"<cursor left>, ♥🭶🭸🭰🭽🭻"VAL(E4$):IFE1$="66"THEN118
   148 PRINT"TRY AGAIN? (CR/N OR Y)"
   150 GETA$:IFA$=""THEN150
   152 IFA$="Y"THEN136
   154 PRINT#15,"I0":RUN
   156 GOSUB192:PRINT#15,"B-P:2,0":REM CH2 POS1
   158 SYSTEM
   160 I=0
   162 PRINT:POKE198,0
   164 GOTO10
   166 IFB>255ORASC(B$)=160THEN174
   168 POKESS+I,B:
   170 PRINT#15,"B-P:2,"STR$(I):PRINT#2,CHR$(B);
   172 I=I+1:GOTO164
   174 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><reverse on>♠🭻🭶 🭵🭽╭ ♥╭🭻🭶 (N OR Y)"
   176 GETA$:J=-(A$="Y")-2*(A$="N")-3*(A$=CHR$(3)):ONJGOTO178,72,74:GOTO176
   178 PRINT#15,"M-W"Z$CHR$(19)CHR$(2)CHR$(PEEK(SS))CHR$(PEEK(SS+1))
   180 PRINT#15,"U2:2,0,"T$","S$
   182 PRINT#15,"I0":RUN
   184 PRINT"<cursor down><cursor down>NO DISK IN DRIVE 0
   186 PRINT"<cursor down>PLACE DISK IN DRIVE 0, PRESS ANY KEY
   188 GETA$:IFA$=""THEN188
   190 RETURN
   192 PRINT"<home><cursor up>┌🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹┐ ┌🭹🭹🭹🭹🭹🭹🭹🭹┐┌🭹🭹🭹🭹🭹🭹🭹🭹🭹┐";
   194 PRINT"│🭷ISK 🭷OCTOR 64.0│ │🭰🭻♠🭸╯:"RIGHT$("  "+T$,2)"││♥🭶🭸🭰🭽🭻:"RIGHT$("  "+S$,2)"│";
   196 PRINT"┴🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹┴🭹┴🭹🭹🭹🭹🭹🭹🭹🭹┴┴🭹🭹🭹🭹🭹🭹🭹🭹🭹┴";
   198 FORI=1TO8:PRINT"                                ";:NEXT
   200 PRINT"┌🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹🭹┘"
   202 PRINT"PRESS [@] - 🭸HANGE BYTE UNDER CURSOR  "
   204 PRINT"      [╱] - 🭱O TO <reverse on>╱<rev off>EXT BLOCK OF FILE  "
   206 PRINT"      [╰] - <reverse on>╰<rev off>UMP TO LINK UNDER CURSOR "
   208 PRINT"      [●] - <reverse on>●<rev off>UIT                      "
   210 PRINT"      [🭻] - <reverse on>🭻<rev off>EWRITE CURRENT BLOCK     "
   212 PRINT"      [🭲] - ╱EW <reverse on>🭲<rev off>LOCK                 "
   214 PRINT"      [🭰] - ♠DD <reverse on>🭰<rev off>EXT STRING           "
   216 PRINT"  [+]/[-] - ♥CAN FORWARD/BACKWARD     "
   218 FORD=1TO5:PRINT"                                        ";:NEXT
   220 FORD=217TO242:POKED,PEEK(D)OR128:NEXT:PRINT"<home>";
   222 RETURN
   224 CV=1:CM$="🭱ET ♥🭵♥🭻🭶♥, THE ULTIMATE PROGRAM MANIPULATION SYSTEM, AT ":REM"<lf><clr>
   226 CM$=CM$+"YOUR LOCAL DEALER. ╮T ADDS OVER 1100 NEW":REM"<lf><clr>
   228 CM$=CM$+" EDITING AND DISK FUNCTIONS. ♥PEND LESS TIME CORRECTING YOUR "
   230 CM$=CM$+"MISTAKES AND MORE TIME PROGRAMMING.   ":REM"<lf><clr>
   232 CM$=CM$+"♠ 🭸OMMODORE 64 WITHOUT ♥🭵♥🭻🭶♥ IS ONLY A 🭸OMMODORE 63.5!"
   234 RETURN:<home>
   236 CV=2:CM$="**╱🭶○** FROM ♥🭽🭼╮🭷╭♥ ╮╱🭰🭶🭻╱♠🭰╮🭽╱♠🭼...                        "
   238 CM$=CM$+"♥🭽🭼╮🭷🭶♣, THE PERSONAL DATA FILER.      ":REM"<lf><clr>
   240 CM$=CM$+"♥TORE NOTES, RECORDS, RECIPES, ETC. ON ELECTRONIC INDEX CARDS. "
   242 CM$=CM$+"   🭴UNDREDS OF USES AROUND THE HOME ":REM"<lf><clr>
   244 CM$=CM$+"AND OFFICE. ♥EE IT AT YOUR LOCAL DEALER."
   246 RETURN:<home>
   248 CV=2:CM$="🭰HIS PROGRAM HAS BEEN RELEASED TO PUBLIC DOMAIN COURTESY OF "
   250 CM$=CM$+"♥OLIDUS ╮NTERNATIONAL 🭸ORPORATION":RETURN:"<lf><clr>
   252 IFCC=0THENGOSUB248
   254 IFCC>550THENCC=0:ONCVGOSUB236,224
   256 CC=CC+1:IFCC>292THENRETURN:"<lf><clr>
   258 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>";
   260 CP=INT(CC)
   262 IFCP<39THENPRINTSPC(39-CP)LEFT$(CM$,CP)"<home>";:RETURN:"<lf><clr>
   264 PRINTLEFT$(LEFT$(MID$(CM$,CP-38),39)+"                                      ",39)"<home>"
   266 RETURN
 10000 "<lf><clr><text mode><yellow>
 10020 "<del><del><del><del><del><del><del>🭾ROGRAM: ""<del>🭷ISK 🭷OCTOR 64"
 10021 GOTO10123:"<del><del><del><del><del><del><del><del><del><del><del><del><del><del><del><del><del><del><del><del>
 10025 "<del><del><del><del><del><del><del>
 10030 "<del><del><del><del><del><del><del>♠UTHOR: 🭷ON 🭼EKEI
 10035 "<del><del><del><del><del><del><del>
 10036 "<del><del><del><del><del><del><del>
 10040 "<del><del><del><del><del><del><del>🭰HIS PROGRAM IS PROVIDED COURTESY OF:
 10045 "<del><del><del><del><del><del><del>
 10050 "<del><del><del><del><del><del><del>   ♥OLIDUS ╮NTERNATIONAL 🭸ORPORATION
 10060 "<del><del><del><del><del><del><del>    ♥UITE #5, 144 ○EST 15TH ♥TREET
 10070 "<del><del><del><del><del><del><del>         ╱ORTH ╳ANCOUVER, 🭲.🭸.
 10075 "<del><del><del><del><del><del><del>         🭾HONE: (604)984-0477
 10080 "<del><del><del><del><del><del><del>
 10090 "<del><del><del><del><del><del><del>🭰O GET THE ╲♠♣╮╲╭╲ USE OUT OF YOUR NEW
 10100 "<del><del><del><del><del><del><del>🭸OMMODORE-64 COMPUTER AND YOUR DISK
 10110 "<del><del><del><del><del><del><del>DRIVE, WE RECOMMEND USING:
 10123 Z$=CHR$(0):REM"<lf><cursor up>                        <cursor up>
 10124 OPEN15,DN,15:REM"<lf><cursor up>                        <cursor up>
 10125 OPEN9,0:REM"<lf><cursor up>                        <cursor up>
 10126 RETURN:REM"<lf><cursor up>                        <cursor up>
 10130 "<del><del><del><del><del><del><del><lf><white>             *** ♥🭵♥🭻🭶♥ ***
 10135 "<del><del><del><del><del><del><del>
 10140 "<del><del><del><del><del><del><del>  ""<del>🭰HE ╭LTIMATE 🭾ROGRAM ╲ANIPULATION
 10150 "<del><del><del><del><del><del><del>  ♥YSTEM FOR 🭸OMMODORE ╲ICROCOMPUTERS."
 10170 "<del><del><del><del><del><del><del><lf><yellow>╱OW AVAILABLE AT YOUR 🭸OMMODORE DEALER.<white>

DN�8:� DEVICE #N�53280,11:�53281,0:�A$,I,S$,T$,CC,B,SS,E$,J,TE,A:�78��A$:�A$�""��"                                       ";:CC�293:���A$�""�252���
�I�0�I�280�I:�I�255�I�I�40��I�255�I�I��(I�40)�408	�""�10)�(SS�I)"�   ":�""�10)I"�   "n	�"VALUE:     ":�"POSITION:"�	�J�1�2:�I�SS,(�(I�SS)�128)�255:�D�0�1:�D,J�	�4:�A$�""�18�	�PF�66�	�A$�""�I�(I�1)�255:�10�	�A$�"�"�I�(I�1)�255:�10
�A$�"�"�I�I�40:�10
�A$�""�I�I�40:�103
 �A$�""�I�0:�10^
"�A$�"N"�T$��(�(SS)):S$��(�(SS�1)):�128�
$�A$�"J"�T$��(�(SS�I)):S$��(�(SS�I�1)):�128�
&�A$�"Q"��15,"I0":��
(�A$�"+"�S$��(�(S$)�1):�128�
*�A$�"-"�S$��((�(S$)�1)��(�(S$))):�128�
,�A$�"R"�174
.�A$�"B"�116G0�A$�"T"��"":�218:�"":�218:�64W2�A$��(3)�74g4�A$��"@"�10�6�I�0�I�280�I:�I�255�I�I�40�8�I�255�I�I��(I�40)�40�:�""�10)�(SS�I)"�   ":�""�10)I"�   "<�198,0:�"NEW VALUE: ";:�9,B$:�A>�"�"�20)"               ":B��(B$):�166�@�"   �RESS [������] TO END TEXT MODE":PF�1:�A$:�10�B�A$��(13)�PF�0:�"":�202:�10�D�A$�""�20�FB��(A$):�168�H�"":�202:�10'
J�15,"I0":�"":��(788)�52��788,49/
L�:�J
NA�828:TEM�A:� FILEREADu
P�210,�(A�256):�209,A�256��(210):�211,0�
R�""�(34)�(34)�(20)"�B ƿ �@ ��Y��D�з��̿"�
T��(788)�49��788,52:� STOP KEY DISABLE�
V�"�";�
XSS�1024�120:I�0:B�0:J�0ZA$�"":E$�"":T$�"":S$�""G\�"���LEASE PUT THE ���� ���� IN DRIVE 0."v^�"�OU SHOULD USE THE ��� '�' COMMAND TO"�`�"UPDATE THE �� ON THE DISK WHEN DONE."�b�"�OTE: �ISK DEVICE IS"DN"�."�d�"�RESS ��� ��� TO CONTINUE"�f�4:�A$�""�102h�10021:�A$��(3)�74Fj�1,DN,2,"0:���,S,R":�15,E$:�E$�"62"��1:�114sl�E$�"64"��1,E$:�"�"E$"  ON DRIVE 0"�n�E$�"21"��184�p�15,"I0"�r�2,DN,2,"#2":�"�"�t�192�v�"      ����   "�(�(�(T$)),2)"�"x�"      ������  "�(�(�(S$)),2)"���@z�"�NPUT ����:  ";:�9,T$:�:�T$��(160)�74w|�"�     ":�"�NPUT ������: ";:�9,S$:�:�S$��(160)�74�~�"�     ":T$��(�(�(T$)),2):S$��(�(�(S$)),2)����(T$)�0�116���"                                       "*��"                                       "Y��"                                       "|��15,"U1:2,0,"T$","S$:� CH2 DR0���15,E1$,E2$,E3$,E4$:�E1$�"00"�156���192:E2$�" ���� ����� #"�E1$�","�E2$���"":�I�1��(E2$):�"�";:�:�:�""E2$��I�1��(E2$):�"�";:�:�C��"IN ����"�(E3$)"�, ������"�(E4$):�E1$�"66"�118a��"TRY AGAIN? (CR/N OR Y)"t��A$:�A$�""�150���A$�"Y"�136���15,"I0":����192:�15,"B-P:2,0":� CH2 POS1���TEM��I�0���:�198,0���10���B�255��(B$)�160�174��SS�I,B:��15,"B-P:2,"�(I):�2,�(B);.�I�I�1:�164d��"��� ��� ���� (N OR Y)"���A$:J��(A$�"Y")�2�(A$�"N")�3�(A$��(3)):�J�178,72,74:�176���15,"M-W"Z$�(19)�(2)�(�(SS))�(�(SS�1))���15,"U2:2,0,"T$","S$���15,"I0":���"NO DISK IN DRIVE 0;��"PLACE DISK IN DRIVE 0, PRESS ANY KEYN��A$:�A$�""�188T�����"������������������� ���������������������";���"��ISK �OCTOR 64.0� �����:"�("  "�T$,2)"��������:"�("  "�S$,2)"�";��"����������������������������������������";3��I�1�8:�"                                ";:�d��"�����������������������������������������"���"PRESS [@] - �HANGE BYTE UNDER CURSOR  "���"      [�] - �O TO ΒEXT BLOCK OF FILE  "���"      [�] - ʒUMP TO LINK UNDER CURSOR ""��"      [�] - ђUIT                      "R��"      [�] - ҒEWRITE CURRENT BLOCK     "���"      [�] - �EW ’LOCK                 "���"      [�] - �DD ԒEXT STRING           "���"  [+]/[-] - �CAN FORWARD/BACKWARD     "��D�1�5:�"                                        ";:�=��D�217�242:�D,�(D)�128:�:�"";C����CV�1:CM$�"�ET ������, THE ULTIMATE PROGRAM MANIPULATION SYSTEM, AT ":�"����CM$�CM$�"YOUR LOCAL DEALER. �T ADDS OVER 1100 NEW":�"���CM$�CM$�" EDITING AND DISK FUNCTIONS. �PEND LESS TIME CORRECTING YOUR "S�CM$�CM$�"MISTAKES AND MORE TIME PROGRAMMING.   ":�"����CM$�CM$�"� �OMMODORE 64 WITHOUT ������ IS ONLY A �OMMODORE 63.5!"���:��CV�2:CM$�"**���** FROM ������� �����������...                        ")�CM$�CM$�"�������, THE PERSONAL DATA FILER.      ":�"��w�CM$�CM$�"�TORE NOTES, RECORDS, RECIPES, ETC. ON ELECTRONIC INDEX CARDS. "��CM$�CM$�"   �UNDREDS OF USES AROUND THE HOME ":�"����CM$�CM$�"AND OFFICE. �EE IT AT YOUR LOCAL DEALER."���::�CV�2:CM$�"�HIS PROGRAM HAS BEEN RELEASED TO PUBLIC DOMAIN COURTESY OF "p�CM$�CM$�"�OLIDUS �NTERNATIONAL �ORPORATION":�:"����CC�0��248���CC�550�CC�0:�CV�236,224�CC�CC�1:�CC�292��:"����"";�CP��(CC)�CP�39���39�CP)�(CM$,CP)"";:�:"��V��(�(�(CM$,CP�38),39)�"                                      ",39)""\
�f'"����$'"�ROGRAM: ""�ISK �OCTOR 64"�%'�10123:"�)'"�.'"�UTHOR: �ON �EKEI�3'"�4'"&8'"�HIS PROGRAM IS PROVIDED COURTESY OF:3='"dB'"   �OLIDUS �NTERNATIONAL �ORPORATION�L'"    �UITE #5, 144 �EST 15TH �TREET�V'"         �ORTH �ANCOUVER, �.�.�['"         �HONE: (604)984-0477�`'"(j'"�O GET THE ������ USE OUT OF YOUR NEWXt'"�OMMODORE-64 COMPUTER AND YOUR DISK~'"DRIVE, WE RECOMMEND USING:��'Z$��(0):�"�����������������������������'�15,DN,15:�"�����������������������������'�9,0:�"��������������������������� �'�:�"���������������������������J�'"�             *** ������ ***W�'"��'"  ""�HE �LTIMATE �ROGRAM �ANIPULATION��'"  �YSTEM FOR �OMMODORE �ICROCOMPUTERS."��'"���OW AVAILABLE AT YOUR �OMMODORE DEALER.
UH@@dn.8:. device #@nHB@.53280,11:.53281,0:.a$,i,s$,t$,cc,b,ss,e$,j,te,a:.78@.HD@.a$:.a$."".."SQQQQQQQQQQQQQQQQQQQQQQQQ                                       S";:cc.293:.@.HF@.a$."".252@.HH@.@.HJ@.i.0.i.280.i:.i.255.i.i.40@.HL@.i.255.i.i..(i.40).40@8IN@."SQQQQQQQQQQQQQQQQQQQQ".10).(ss.i)".   ":."Q".10)i".   "@NIP@."SQQQQQQQQQQQQQQQQQQQQvalue:     ":."Qposition:"@.IR@.j.1.2:.i.ss,(.(i.ss).128).255:.d.0.1:.d,j@.IT@.4:.a$."".18@.IV@.pf.66@.IX@.a$."]".i.(i.1).255:.10@.IZ@.a$.".".i.(i.1).255:.10@HJ£@.a$.".".i.i.40:.10@.J.@.a$."Q".i.i.40:.10@3J @.a$."S".i.0:.10@.J"@.a$."n".t$..(.(ss)):s$..(.(ss.1)):.128@.J$@.a$."j".t$..(.(ss.i)):s$..(.(ss.i.1)):.128@.J&@.a$."q"..15,"i0":.@.J(@.a$."+".s$..(.(s$).1):.128@.J*@.a$."-".s$..((.(s$).1)..(.(s$))):.128@.J,@.a$."r".174@MK.@.a$."b".116@gK0@.a$."t".."SQQQQQQQQQQ":.218:."QQQQQQQQQQQQQ":.218:.64@wK2@.a$..(3).74@GK4@.a$.."@".10@.K6@.i.0.i.280.i:.i.255.i.i.40@.K8@.i.255.i.i..(i.40).40@.K:@."SQQQQQQQQQQQQQQQQQQQQ".10).(ss.i)".   ":."Q".10)i".   "@VL<@.198,0:."SQQQQQQQQQQQQQQQQQQQQnew value: ";:.9,b$:.@aL>@.".".20)"               ":b..(b$):.166@.L@@."SQQQQQQQQQQQQQQQ   .ress [......] to end text mode":pf.1:.a$:.10@.Lb@.a$..(13).pf.0:."SQQQQQQQQQQ":.202:.10@.Ld@.a$."".20@.Lf@b..(a$):.168@.Lh@."SQQQQQQQQQQ":.202:.10@'Mj@.15,"i0":."SQQQQQQQQQQQQQQQQQQQQ":..(788).52..788,49@/Ml@.:.@jMn@a.828:tem.a:. fileread@UMp@.210,.(a.256):.209,a.256..(210):.211,0@.Mr@."R".(34).(34).(20)".b R.. .@ R..y..dR.....R.."@.Mt@..(788).49..788,52:. stop key disable@.Mv@."N.";@.Mx@ss.1024.120:i.0:b.0:j.0@VNz@a$."":e$."":t$."":s$.""@gN£@."..QQQ.lease put the .... .... in drive 0."@VN.@."QQ.ou should use the ... '.' command to"@.N.@."update the ... on the disk when done."@.NB@."QQ.ote: .isk device is"dn"..QQ"@.ND@."QQR.ress ... ... to continue"@.NF@.4:.a$."".102@VOH@.10021:.a$..(3).74@fOJ@.1,dn,2,"0:...,s,r":.15,e$:.e$."62"..1:.114@SOL@.e$."64"..1,e$:.".QQQQQ"e$"  on drive 0"@.ON@.e$."21"..184@.OP@.15,"i0"@.OR@.2,dn,2,"#2":."."@.OT@.192@.OV@."SQQQQQQQQQQQQQQQQQQQQ      .....   ".(.(.(t$)),2)"."@SPX@."      ......  ".(.(.(s$)),2)"...@@PZ@.".nput .....:  ";:.9,t$:.:.t$..(160).74@WP.@.".     ":.".nput ......: ";:.9,s$:.:.s$..(160).74@.P.@.".     ":t$..(.(.(t$)),2):s$..(.(.(s$)),2)@.P.@..(t$).0.116@.P.@."SQQQQQQQQQQQQQQQQQQQ                                       "@*Q.@."                                       "@yQ.@."                                       "@.Q.@.15,"u1:2,0,"t$","s$:. ch2 dr0@.Q.@.15,e1$,e2$,e3$,e4$:.e1$."00".156@.Q.@.192:e2$." .... ..... #".e1$.",".e2$@.Q.@."SQQ":.i.1..(e2$):.".";:.:.:."R"e2$@NR.@.i.1..(e2$):.".";:.:.@cR.@."in .....".(e3$)"., ......".(e4$):.e1$."66".118@AR.@."try again? (cr/n or y)"@TR.@.a$:.a$."".150@.R.@.a$."y".136@.R.@.15,"i0":.@.R.@.192:.15,"b-p:2,0":. ch2 pos1@.R.@.tem@.R.@i.0@.R.@.:.198,0@.R.@.10@.R.@.b.255..(b$).160.174@AS.@.ss.i,b:@.S.@.15,"b-p:2,".(i):.2,.(b);@.S.@i.i.1:.164@DS.@."SQQQQQQQQQQQQQQQQQQQQQQQR... ... .... (n or y)"@.S.@.a$:j..(a$."y").2.(a$."n").3.(a$..(3)):.j.178,72,74:.176@.S.@.15,"m-w"z$.(19).(2).(.(ss)).(.(ss.1))@.S.@.15,"u2:2,0,"t$","s$@.S.@.15,"i0":.@OT.@."QQno disk in drive 0@;T.@."Qplace disk in drive 0, press any key@nT.@.a$:.a$."".188@tT.@.@.T.@."S................... .....................";@.T.@."..isk .octor 64.0. ......:".("  ".t$,2)"........:".("  ".s$,2)".";@AU.@."........................................";@3U.@.i.1.8:."                                ";:.@DU.@."........................................."@.U.@."press [@] - .hange byte under cursor  "@.U.@."      [.] - .o to R..ext block of file  "@.U.@."      [.] - R..ump to link under cursor "@"V.@."      [.] - R..uit                      "@rV.@."      [.] - R..ewrite current block     "@.V.@."      [.] - .ew R..lock                 "@.V.@."      [.] - .dd R..ext string           "@.V.@."  [+]/[-] - .can forward/backward     "@ZW.@.d.1.5:."                                        ";:.@=W.@.d.217.242:.d,.(d).128:.:."S";@cW.@.@.W.@cv.1:cm$.".et ......, the ultimate program manipulation system, at ":."..@.W.@cm$.cm$."your local dealer. .t adds over 1100 new":."..@YX.@cm$.cm$." editing and disk functions. .pend less time correcting your "@sX.@cm$.cm$."mistakes and more time programming.   ":."..@.X.@cm$.cm$.". .ommodore 64 without ...... is only a .ommodore 63.5!"@.X.@.:S@.X.@cv.2:cm$."**...** from ....... ................                        "@)Y.@cm$.cm$."......., the personal data filer.      ":."..@WY.@cm$.cm$.".tore notes, records, recipes, etc. on electronic index cards. "@.Y.@cm$.cm$."   .undreds of uses around the home ":."..@.Y.@cm$.cm$."and office. .ee it at your local dealer."@.Y.@.:S@:Z.@cv.2:cm$.".his program has been released to public domain courtesy of "@PZ.@cm$.cm$.".olidus .nternational .orporation":.:"..@.Z.@.cc.0..248@.Z.@.cc.550.cc.0:.cv.236,224@.Z@Acc.cc.1:.cc.292..:"..@.ZBA."SQQQQQQQQQQQQQQQQQQQQQQQQ";@.ZDAcp..(cc)@L[FA.cp.39...39.cp).(cm$,cp)"S";:.:"..@v[HA..(.(.(cm$,cp.38),39)."                                      ",39)"S"@£[JA.@F[P'"..N.@.[$'"TTTTTTT.rogram: ""T.isk .octor 64"@.[%'.10123:"TTTTTTTTTTTTTTTTTTTT@.[)'"TTTTTTT@.[.'"TTTTTTT.uthor: .on .ekei@.[3'"TTTTTTT@.[4'"TTTTTTT@&£8'"TTTTTTT.his program is provided courtesy of:@3£='"TTTTTTT@D£b'"TTTTTTT   .olidus .nternational .orporation@.£l'"TTTTTTT    .uite #5, 144 .est 15th .treet@.£v'"TTTTTTT         .orth .ancouver, ....@.£['"TTTTTTT         .hone: (604)984-0477@.£.'"TTTTTTT@(]J'"TTTTTTT.o get the ....... use out of your new@x]T'"TTTTTTT.ommodore-64 computer and your disk@.].'"TTTTTTTdrive, we recommend using:@.].'z$..(0):."...........................@.].'.15,dn,15:."...........................@.].'.9,0:."...........................@ ..'.:."...........................@j..'"TTTTTTT.E             *** ...... ***@w..'"TTTTTTT@...'"TTTTTTT  ""T.he .ltimate .rogram .anipulation@...'"TTTTTTT  .ystem for .ommodore .icrocomputers."@...'"TTTTTTT...ow available at your .ommodore dealer.E@@@
00000000  15 08 00 00 44 4e b2 38  3a 8f 20 44 45 56 49 43  |....DN.8:. DEVIC|
00000010  45 20 23 00 4e 08 02 00  97 35 33 32 38 30 2c 31  |E #.N....53280,1|
00000020  31 3a 97 35 33 32 38 31  2c 30 3a 86 41 24 2c 49  |1:.53281,0:.A$,I|
00000030  2c 53 24 2c 54 24 2c 43  43 2c 42 2c 53 53 2c 45  |,S$,T$,CC,B,SS,E|
00000040  24 2c 4a 2c 54 45 2c 41  3a 89 37 38 00 ac 08 04  |$,J,TE,A:.78....|
00000050  00 a1 41 24 3a 8b 41 24  b1 22 22 a7 99 22 13 11  |..A$:.A$."".."..|
00000060  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000070  11 11 11 11 11 11 11 20  20 20 20 20 20 20 20 20  |.......         |
00000080  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000090  20 20 20 20 20 20 20 20  20 20 20 20 20 20 13 22  |              ."|
000000a0  3b 3a 43 43 b2 32 39 33  3a 8e 00 bb 08 06 00 8b  |;:CC.293:.......|
000000b0  41 24 b2 22 22 a7 32 35  32 00 c1 08 08 00 8e 00  |A$."".252.......|
000000c0  e0 08 0a 00 8b 49 b3 30  a7 49 b2 32 38 30 aa 49  |.....I.0.I.280.I|
000000d0  3a 8b 49 b1 32 35 35 a7  49 b2 49 ab 34 30 00 fa  |:.I.255.I.I.40..|
000000e0  08 0c 00 8b 49 b1 32 35  35 a7 49 b2 49 ab b5 28  |....I.255.I.I..(|
000000f0  49 ad 34 30 29 ac 34 30  00 38 09 0e 00 99 22 13  |I.40).40.8....".|
00000100  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000110  11 11 11 11 22 a6 31 30  29 c2 28 53 53 aa 49 29  |....".10).(SS.I)|
00000120  22 9d 20 20 20 22 3a 99  22 11 22 a6 31 30 29 49  |".   ":.".".10)I|
00000130  22 9d 20 20 20 22 00 6e  09 10 00 99 22 13 11 11  |".   ".n...."...|
00000140  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000150  11 11 56 41 4c 55 45 3a  20 20 20 20 20 22 3a 99  |..VALUE:     ":.|
00000160  22 11 50 4f 53 49 54 49  4f 4e 3a 22 00 9d 09 12  |".POSITION:"....|
00000170  00 81 4a b2 31 a4 32 3a  97 49 aa 53 53 2c 28 c2  |..J.1.2:.I.SS,(.|
00000180  28 49 aa 53 53 29 aa 31  32 38 29 af 32 35 35 3a  |(I.SS).128).255:|
00000190  81 44 b2 30 a4 31 3a 82  44 2c 4a 00 ae 09 14 00  |.D.0.1:.D,J.....|
000001a0  8d 34 3a 8b 41 24 b2 22  22 a7 31 38 00 b9 09 16  |.4:.A$."".18....|
000001b0  00 8b 50 46 a7 36 36 00  d5 09 18 00 8b 41 24 b2  |..PF.66......A$.|
000001c0  22 1d 22 a7 49 b2 28 49  aa 31 29 af 32 35 35 3a  |".".I.(I.1).255:|
000001d0  89 31 30 00 f1 09 1a 00  8b 41 24 b2 22 9d 22 a7  |.10......A$.".".|
000001e0  49 b2 28 49 ab 31 29 af  32 35 35 3a 89 31 30 00  |I.(I.1).255:.10.|
000001f0  08 0a 1c 00 8b 41 24 b2  22 91 22 a7 49 b2 49 ab  |.....A$.".".I.I.|
00000200  34 30 3a 89 31 30 00 1f  0a 1e 00 8b 41 24 b2 22  |40:.10......A$."|
00000210  11 22 a7 49 b2 49 aa 34  30 3a 89 31 30 00 33 0a  |.".I.I.40:.10.3.|
00000220  20 00 8b 41 24 b2 22 13  22 a7 49 b2 30 3a 89 31  | ..A$.".".I.0:.1|
00000230  30 00 5e 0a 22 00 8b 41  24 b2 22 4e 22 a7 54 24  |0.^."..A$."N".T$|
00000240  b2 c4 28 c2 28 53 53 29  29 3a 53 24 b2 c4 28 c2  |..(.(SS)):S$..(.|
00000250  28 53 53 aa 31 29 29 3a  89 31 32 38 00 8d 0a 24  |(SS.1)):.128...$|
00000260  00 8b 41 24 b2 22 4a 22  a7 54 24 b2 c4 28 c2 28  |..A$."J".T$..(.(|
00000270  53 53 aa 49 29 29 3a 53  24 b2 c4 28 c2 28 53 53  |SS.I)):S$..(.(SS|
00000280  aa 49 aa 31 29 29 3a 89  31 32 38 00 a4 0a 26 00  |.I.1)):.128...&.|
00000290  8b 41 24 b2 22 51 22 a7  98 31 35 2c 22 49 30 22  |.A$."Q"..15,"I0"|
000002a0  3a 8a 00 c3 0a 28 00 8b  41 24 b2 22 2b 22 a7 53  |:....(..A$."+".S|
000002b0  24 b2 c4 28 c5 28 53 24  29 aa 31 29 3a 89 31 32  |$..(.(S$).1):.12|
000002c0  38 00 ed 0a 2a 00 8b 41  24 b2 22 2d 22 a7 53 24  |8...*..A$."-".S$|
000002d0  b2 c4 28 28 c5 28 53 24  29 ab 31 29 ac b4 28 c5  |..((.(S$).1)..(.|
000002e0  28 53 24 29 29 29 3a 89  31 32 38 00 fd 0a 2c 00  |(S$))):.128...,.|
000002f0  8b 41 24 b2 22 52 22 a7  31 37 34 00 0d 0b 2e 00  |.A$."R".174.....|
00000300  8b 41 24 b2 22 42 22 a7  31 31 36 00 47 0b 30 00  |.A$."B".116.G.0.|
00000310  8b 41 24 b2 22 54 22 a7  99 22 13 11 11 11 11 11  |.A$."T".."......|
00000320  11 11 11 11 11 22 3a 8d  32 31 38 3a 99 22 11 11  |.....":.218:."..|
00000330  11 11 11 11 11 11 11 11  11 11 11 22 3a 8d 32 31  |...........":.21|
00000340  38 3a 89 36 34 00 57 0b  32 00 8b 41 24 b2 c7 28  |8:.64.W.2..A$..(|
00000350  33 29 a7 37 34 00 67 0b  34 00 8b 41 24 b3 b1 22  |3).74.g.4..A$.."|
00000360  40 22 a7 31 30 00 86 0b  36 00 8b 49 b3 30 a7 49  |@".10...6..I.0.I|
00000370  b2 32 38 30 aa 49 3a 8b  49 b1 32 35 35 a7 49 b2  |.280.I:.I.255.I.|
00000380  49 ab 34 30 00 a0 0b 38  00 8b 49 b1 32 35 35 a7  |I.40...8..I.255.|
00000390  49 b2 49 ab b5 28 49 ad  34 30 29 ac 34 30 00 de  |I.I..(I.40).40..|
000003a0  0b 3a 00 99 22 13 11 11  11 11 11 11 11 11 11 11  |.:.."...........|
000003b0  11 11 11 11 11 11 11 11  11 11 22 a6 31 30 29 c2  |..........".10).|
000003c0  28 53 53 aa 49 29 22 9d  20 20 20 22 3a 99 22 11  |(SS.I)".   ":.".|
000003d0  22 a6 31 30 29 49 22 9d  20 20 20 22 00 16 0c 3c  |".10)I".   "...<|
000003e0  00 97 31 39 38 2c 30 3a  99 22 13 11 11 11 11 11  |..198,0:."......|
000003f0  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 4e  |...............N|
00000400  45 57 20 56 41 4c 55 45  3a 20 22 3b 3a 84 39 2c  |EW VALUE: ";:.9,|
00000410  42 24 3a 99 00 41 0c 3e  00 99 22 91 22 a6 32 30  |B$:..A.>..".".20|
00000420  29 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |)"              |
00000430  20 22 3a 42 b2 c5 28 42  24 29 3a 89 31 36 36 00  | ":B..(B$):.166.|
00000440  88 0c 40 00 99 22 13 11  11 11 11 11 11 11 11 11  |..@.."..........|
00000450  11 11 11 11 11 11 20 20  20 d0 52 45 53 53 20 5b  |......   .RESS [|
00000460  d2 c5 d4 d5 d2 ce 5d 20  54 4f 20 45 4e 44 20 54  |......] TO END T|
00000470  45 58 54 20 4d 4f 44 45  22 3a 50 46 b2 31 3a a1  |EXT MODE":PF.1:.|
00000480  41 24 3a 89 31 30 00 b3  0c 42 00 8b 41 24 b2 c7  |A$:.10...B..A$..|
00000490  28 31 33 29 a7 50 46 b2  30 3a 99 22 13 11 11 11  |(13).PF.0:."....|
000004a0  11 11 11 11 11 11 11 22  3a 8d 32 30 32 3a 89 31  |.......":.202:.1|
000004b0  30 00 c1 0c 44 00 8b 41  24 b2 22 22 a7 32 30 00  |0...D..A$."".20.|
000004c0  d2 0c 46 00 42 b2 c6 28  41 24 29 3a 89 31 36 38  |..F.B..(A$):.168|
000004d0  00 ee 0c 48 00 99 22 13  11 11 11 11 11 11 11 11  |...H..".........|
000004e0  11 11 22 3a 8d 32 30 32  3a 89 31 30 00 27 0d 4a  |..":.202:.10.'.J|
000004f0  00 98 31 35 2c 22 49 30  22 3a 99 22 13 11 11 11  |..15,"I0":."....|
00000500  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000510  11 22 3a 8b c2 28 37 38  38 29 b2 35 32 a7 97 37  |.":..(788).52..7|
00000520  38 38 2c 34 39 00 2f 0d  4c 00 80 3a 8a 00 4a 0d  |88,49./.L..:..J.|
00000530  4e 00 41 b2 38 32 38 3a  54 45 4d b2 41 3a 8f 20  |N.A.828:TEM.A:. |
00000540  46 49 4c 45 52 45 41 44  00 75 0d 50 00 97 32 31  |FILEREAD.u.P..21|
00000550  30 2c b5 28 41 ad 32 35  36 29 3a 97 32 30 39 2c  |0,.(A.256):.209,|
00000560  41 ab 32 35 36 ac c2 28  32 31 30 29 3a 97 32 31  |A.256..(210):.21|
00000570  31 2c 30 00 a9 0d 52 00  99 22 12 22 c7 28 33 34  |1,0...R..".".(34|
00000580  29 c7 28 33 34 29 c7 28  32 30 29 22 92 42 20 12  |).(34).(20)".B .|
00000590  c6 bf 20 92 40 20 12 a4  bf 59 92 b8 44 12 c8 d0  |.. .@ ...Y..D...|
000005a0  b7 92 cc 12 cc bf 22 00  d3 0d 54 00 8b c2 28 37  |......"...T...(7|
000005b0  38 38 29 b2 34 39 a7 97  37 38 38 2c 35 32 3a 8f  |88).49..788,52:.|
000005c0  20 53 54 4f 50 20 4b 45  59 20 44 49 53 41 42 4c  | STOP KEY DISABL|
000005d0  45 00 de 0d 56 00 99 22  0e 99 22 3b 00 fa 0d 58  |E...V.."..";...X|
000005e0  00 53 53 b2 31 30 32 34  aa 31 32 30 3a 49 b2 30  |.SS.1024.120:I.0|
000005f0  3a 42 b2 30 3a 4a b2 30  00 16 0e 5a 00 41 24 b2  |:B.0:J.0...Z.A$.|
00000600  22 22 3a 45 24 b2 22 22  3a 54 24 b2 22 22 3a 53  |"":E$."":T$."":S|
00000610  24 b2 22 22 00 47 0e 5c  00 99 22 93 99 11 11 11  |$."".G.\..".....|
00000620  d0 4c 45 41 53 45 20 50  55 54 20 54 48 45 20 d3  |.LEASE PUT THE .|
00000630  c9 c3 cb 20 c4 c9 d3 cb  20 49 4e 20 44 52 49 56  |... .... IN DRIV|
00000640  45 20 30 2e 22 00 76 0e  5e 00 99 22 11 11 d9 4f  |E 0.".v.^.."...O|
00000650  55 20 53 48 4f 55 4c 44  20 55 53 45 20 54 48 45  |U SHOULD USE THE|
00000660  20 c4 cf d3 20 27 d6 27  20 43 4f 4d 4d 41 4e 44  | ... '.' COMMAND|
00000670  20 54 4f 22 00 a3 0e 60  00 99 22 55 50 44 41 54  | TO"...`.."UPDAT|
00000680  45 20 54 48 45 20 c2 c1  cd 20 4f 4e 20 54 48 45  |E THE ... ON THE|
00000690  20 44 49 53 4b 20 57 48  45 4e 20 44 4f 4e 45 2e  | DISK WHEN DONE.|
000006a0  22 00 c9 0e 62 00 99 22  11 11 ce 4f 54 45 3a 20  |"...b.."...OTE: |
000006b0  c4 49 53 4b 20 44 45 56  49 43 45 20 49 53 22 44  |.ISK DEVICE IS"D|
000006c0  4e 22 9d 2e 11 11 22 00  ed 0e 64 00 99 22 11 11  |N"...."...d.."..|
000006d0  12 d0 52 45 53 53 20 c1  ce d9 20 cb c5 d9 20 54  |..RESS ... ... T|
000006e0  4f 20 43 4f 4e 54 49 4e  55 45 22 00 ff 0e 66 00  |O CONTINUE"...f.|
000006f0  8d 34 3a 8b 41 24 b2 22  22 a7 31 30 32 00 16 0f  |.4:.A$."".102...|
00000700  68 00 8d 31 30 30 32 31  3a 8b 41 24 b2 c7 28 33  |h..10021:.A$..(3|
00000710  29 a7 37 34 00 46 0f 6a  00 9f 31 2c 44 4e 2c 32  |).74.F.j..1,DN,2|
00000720  2c 22 30 3a a0 a0 a0 2c  53 2c 52 22 3a 84 31 35  |,"0:...,S,R":.15|
00000730  2c 45 24 3a 8b 45 24 b2  22 36 32 22 a7 a0 31 3a  |,E$:.E$."62"..1:|
00000740  89 31 31 34 00 73 0f 6c  00 8b 45 24 b1 22 36 34  |.114.s.l..E$."64|
00000750  22 a7 84 31 2c 45 24 3a  99 22 93 11 11 11 11 11  |"..1,E$:."......|
00000760  22 45 24 22 20 20 4f 4e  20 44 52 49 56 45 20 30  |"E$"  ON DRIVE 0|
00000770  22 00 85 0f 6e 00 8b 45  24 b2 22 32 31 22 a7 8d  |"...n..E$."21"..|
00000780  31 38 34 00 92 0f 70 00  98 31 35 2c 22 49 30 22  |184...p..15,"I0"|
00000790  00 a8 0f 72 00 9f 32 2c  44 4e 2c 32 2c 22 23 32  |...r..2,DN,2,"#2|
000007a0  22 3a 99 22 93 22 00 b1  0f 74 00 8d 31 39 32 00  |":."."...t..192.|
000007b0  ec 0f 76 00 99 22 13 11  11 11 11 11 11 11 11 11  |..v.."..........|
000007c0  11 11 11 11 11 11 11 11  11 11 11 20 20 20 20 20  |...........     |
000007d0  20 d4 d2 c1 c3 cb 20 20  20 22 ca 28 c4 28 c5 28  | .....   ".(.(.(|
000007e0  54 24 29 29 2c 32 29 22  a0 22 00 13 10 78 00 99  |T$)),2)"."...x..|
000007f0  22 20 20 20 20 20 20 d3  c5 c3 d4 cf d2 20 20 22  |"      ......  "|
00000800  ca 28 c4 28 c5 28 53 24  29 29 2c 32 29 22 a0 91  |.(.(.(S$)),2)"..|
00000810  91 00 40 10 7a 00 99 22  c9 4e 50 55 54 20 d4 d2  |..@.z..".NPUT ..|
00000820  c1 c3 cb 3a 20 20 22 3b  3a 84 39 2c 54 24 3a 99  |...:  ";:.9,T$:.|
00000830  3a 8b 54 24 b2 c7 28 31  36 30 29 a7 37 34 00 77  |:.T$..(160).74.w|
00000840  10 7c 00 99 22 91 20 20  20 20 20 22 3a 99 22 c9  |.|..".     ":.".|
00000850  4e 50 55 54 20 d3 c5 c3  d4 cf d2 3a 20 22 3b 3a  |NPUT ......: ";:|
00000860  84 39 2c 53 24 3a 99 3a  8b 53 24 b2 c7 28 31 36  |.9,S$:.:.S$..(16|
00000870  30 29 a7 37 34 00 a7 10  7e 00 99 22 91 20 20 20  |0).74...~..".   |
00000880  20 20 22 3a 54 24 b2 ca  28 c4 28 c5 28 54 24 29  |  ":T$..(.(.(T$)|
00000890  29 2c 32 29 3a 53 24 b2  ca 28 c4 28 c5 28 53 24  |),2):S$..(.(.(S$|
000008a0  29 29 2c 32 29 00 b8 10  80 00 8b c5 28 54 24 29  |)),2).......(T$)|
000008b0  b2 30 a7 31 31 36 00 fb  10 82 00 99 22 13 11 11  |.0.116......"...|
000008c0  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000008d0  11 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000008e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008f0  20 20 20 20 20 20 20 20  22 00 2a 11 84 00 99 22  |        ".*...."|
00000900  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000920  20 20 20 20 20 20 20 22  00 59 11 86 00 99 22 20  |       ".Y...." |
00000930  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000950  20 20 20 20 20 20 22 00  7c 11 88 00 98 31 35 2c  |      ".|....15,|
00000960  22 55 31 3a 32 2c 30 2c  22 54 24 22 2c 22 53 24  |"U1:2,0,"T$","S$|
00000970  3a 8f 20 43 48 32 20 44  52 30 00 a2 11 8a 00 84  |:. CH2 DR0......|
00000980  31 35 2c 45 31 24 2c 45  32 24 2c 45 33 24 2c 45  |15,E1$,E2$,E3$,E|
00000990  34 24 3a 8b 45 31 24 b2  22 30 30 22 a7 31 35 36  |4$:.E1$."00".156|
000009a0  00 cb 11 8c 00 8d 31 39  32 3a 45 32 24 b2 22 20  |......192:E2$." |
000009b0  c4 c9 d3 cb 20 c5 d2 d2  cf d2 20 23 22 aa 45 31  |.... ..... #".E1|
000009c0  24 aa 22 2c 22 aa 45 32  24 00 f4 11 8e 00 99 22  |$.",".E2$......"|
000009d0  13 11 11 22 3a 81 49 b2  31 a4 c3 28 45 32 24 29  |...":.I.1..(E2$)|
000009e0  3a 99 22 af 22 3b 3a 82  3a 99 3a 99 22 12 22 45  |:.".";:.:.:."."E|
000009f0  32 24 00 0e 12 90 00 81  49 b2 31 a4 c3 28 45 32  |2$......I.1..(E2|
00000a00  24 29 3a 99 22 a3 22 3b  3a 82 3a 99 00 43 12 92  |$):.".";:.:..C..|
00000a10  00 99 22 49 4e 20 d4 d2  c1 c3 cb 22 c5 28 45 33  |.."IN .....".(E3|
00000a20  24 29 22 9d 2c 20 d3 c5  c3 d4 cf d2 22 c5 28 45  |$)"., ......".(E|
00000a30  34 24 29 3a 8b 45 31 24  b2 22 36 36 22 a7 31 31  |4$):.E1$."66".11|
00000a40  38 00 61 12 94 00 99 22  54 52 59 20 41 47 41 49  |8.a...."TRY AGAI|
00000a50  4e 3f 20 28 43 52 2f 4e  20 4f 52 20 59 29 22 00  |N? (CR/N OR Y)".|
00000a60  74 12 96 00 a1 41 24 3a  8b 41 24 b2 22 22 a7 31  |t....A$:.A$."".1|
00000a70  35 30 00 84 12 98 00 8b  41 24 b2 22 59 22 a7 31  |50......A$."Y".1|
00000a80  33 36 00 93 12 9a 00 98  31 35 2c 22 49 30 22 3a  |36......15,"I0":|
00000a90  8a 00 b5 12 9c 00 8d 31  39 32 3a 98 31 35 2c 22  |.......192:.15,"|
00000aa0  42 2d 50 3a 32 2c 30 22  3a 8f 20 43 48 32 20 50  |B-P:2,0":. CH2 P|
00000ab0  4f 53 31 00 be 12 9e 00  9e 54 45 4d 00 c6 12 a0  |OS1......TEM....|
00000ac0  00 49 b2 30 00 d3 12 a2  00 99 3a 97 31 39 38 2c  |.I.0......:.198,|
00000ad0  30 00 db 12 a4 00 89 31  30 00 f4 12 a6 00 8b 42  |0......10......B|
00000ae0  b1 32 35 35 b0 c6 28 42  24 29 b2 31 36 30 a7 31  |.255..(B$).160.1|
00000af0  37 34 00 01 13 a8 00 97  53 53 aa 49 2c 42 3a 00  |74......SS.I,B:.|
00000b00  1f 13 aa 00 98 31 35 2c  22 42 2d 50 3a 32 2c 22  |.....15,"B-P:2,"|
00000b10  c4 28 49 29 3a 98 32 2c  c7 28 42 29 3b 00 2e 13  |.(I):.2,.(B);...|
00000b20  ac 00 49 b2 49 aa 31 3a  89 31 36 34 00 64 13 ae  |..I.I.1:.164.d..|
00000b30  00 99 22 13 11 11 11 11  11 11 11 11 11 11 11 11  |..".............|
00000b40  11 11 11 11 11 11 11 11  11 11 11 12 c1 d2 c5 20  |............... |
00000b50  d9 cf d5 20 d3 d5 d2 c5  20 28 4e 20 4f 52 20 59  |... .... (N OR Y|
00000b60  29 22 00 a1 13 b0 00 a1  41 24 3a 4a b2 ab 28 41  |)"......A$:J..(A|
00000b70  24 b2 22 59 22 29 ab 32  ac 28 41 24 b2 22 4e 22  |$."Y").2.(A$."N"|
00000b80  29 ab 33 ac 28 41 24 b2  c7 28 33 29 29 3a 91 4a  |).3.(A$..(3)):.J|
00000b90  89 31 37 38 2c 37 32 2c  37 34 3a 89 31 37 36 00  |.178,72,74:.176.|
00000ba0  cc 13 b2 00 98 31 35 2c  22 4d 2d 57 22 5a 24 c7  |.....15,"M-W"Z$.|
00000bb0  28 31 39 29 c7 28 32 29  c7 28 c2 28 53 53 29 29  |(19).(2).(.(SS))|
00000bc0  c7 28 c2 28 53 53 aa 31  29 29 00 e5 13 b4 00 98  |.(.(SS.1))......|
00000bd0  31 35 2c 22 55 32 3a 32  2c 30 2c 22 54 24 22 2c  |15,"U2:2,0,"T$",|
00000be0  22 53 24 00 f4 13 b6 00  98 31 35 2c 22 49 30 22  |"S$......15,"I0"|
00000bf0  3a 8a 00 0f 14 b8 00 99  22 11 11 4e 4f 20 44 49  |:......."..NO DI|
00000c00  53 4b 20 49 4e 20 44 52  49 56 45 20 30 00 3b 14  |SK IN DRIVE 0.;.|
00000c10  ba 00 99 22 11 50 4c 41  43 45 20 44 49 53 4b 20  |...".PLACE DISK |
00000c20  49 4e 20 44 52 49 56 45  20 30 2c 20 50 52 45 53  |IN DRIVE 0, PRES|
00000c30  53 20 41 4e 59 20 4b 45  59 00 4e 14 bc 00 a1 41  |S ANY KEY.N....A|
00000c40  24 3a 8b 41 24 b2 22 22  a7 31 38 38 00 54 14 be  |$:.A$."".188.T..|
00000c50  00 8e 00 87 14 c0 00 99  22 13 91 b0 c0 c0 c0 c0  |........".......|
00000c60  c0 c0 c0 c0 c0 c0 c0 c0  c0 c0 c0 c0 ae 20 b0 c0  |............. ..|
00000c70  c0 c0 c0 c0 c0 c0 c0 ae  b0 c0 c0 c0 c0 c0 c0 c0  |................|
00000c80  c0 c0 ae 22 3b 00 d0 14  c2 00 99 22 dd c4 49 53  |...";......"..IS|
00000c90  4b 20 c4 4f 43 54 4f 52  20 36 34 2e 30 dd 20 dd  |K .OCTOR 64.0. .|
00000ca0  d4 d2 c1 c3 cb 3a 22 c9  28 22 20 20 22 aa 54 24  |.....:".("  ".T$|
00000cb0  2c 32 29 22 dd dd d3 c5  c3 d4 cf d2 3a 22 c9 28  |,2)"........:".(|
00000cc0  22 20 20 22 aa 53 24 2c  32 29 22 dd 22 3b 00 01  |"  ".S$,2)".";..|
00000cd0  15 c4 00 99 22 b1 c0 c0  c0 c0 c0 c0 c0 c0 c0 c0  |...."...........|
00000ce0  c0 c0 c0 c0 c0 c0 b1 c0  b1 c0 c0 c0 c0 c0 c0 c0  |................|
00000cf0  c0 b1 b1 c0 c0 c0 c0 c0  c0 c0 c0 c0 b1 22 3b 00  |.............";.|
00000d00  33 15 c6 00 81 49 b2 31  a4 38 3a 99 22 20 20 20  |3....I.1.8:."   |
00000d10  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000d20  20 20 20 20 20 20 20 20  20 20 20 20 20 22 3b 3a  |             ";:|
00000d30  82 00 64 15 c8 00 99 22  b0 c0 c0 c0 c0 c0 c0 c0  |..d...."........|
00000d40  c0 c0 c0 c0 c0 c0 c0 c0  c0 c0 c0 c0 c0 c0 c0 c0  |................|
*
00000d60  bd 22 00 92 15 ca 00 99  22 50 52 45 53 53 20 5b  |."......"PRESS [|
00000d70  40 5d 20 2d 20 c3 48 41  4e 47 45 20 42 59 54 45  |@] - .HANGE BYTE|
00000d80  20 55 4e 44 45 52 20 43  55 52 53 4f 52 20 20 22  | UNDER CURSOR  "|
00000d90  00 c2 15 cc 00 99 22 20  20 20 20 20 20 5b ce 5d  |......"      [.]|
00000da0  20 2d 20 c7 4f 20 54 4f  20 12 ce 92 45 58 54 20  | - .O TO ...EXT |
00000db0  42 4c 4f 43 4b 20 4f 46  20 46 49 4c 45 20 20 22  |BLOCK OF FILE  "|
00000dc0  00 f2 15 ce 00 99 22 20  20 20 20 20 20 5b ca 5d  |......"      [.]|
00000dd0  20 2d 20 12 ca 92 55 4d  50 20 54 4f 20 4c 49 4e  | - ...UMP TO LIN|
00000de0  4b 20 55 4e 44 45 52 20  43 55 52 53 4f 52 20 22  |K UNDER CURSOR "|
00000df0  00 22 16 d0 00 99 22 20  20 20 20 20 20 5b d1 5d  |."...."      [.]|
00000e00  20 2d 20 12 d1 92 55 49  54 20 20 20 20 20 20 20  | - ...UIT       |
00000e10  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00000e20  00 52 16 d2 00 99 22 20  20 20 20 20 20 5b d2 5d  |.R...."      [.]|
00000e30  20 2d 20 12 d2 92 45 57  52 49 54 45 20 43 55 52  | - ...EWRITE CUR|
00000e40  52 45 4e 54 20 42 4c 4f  43 4b 20 20 20 20 20 22  |RENT BLOCK     "|
00000e50  00 82 16 d4 00 99 22 20  20 20 20 20 20 5b c2 5d  |......"      [.]|
00000e60  20 2d 20 ce 45 57 20 12  c2 92 4c 4f 43 4b 20 20  | - .EW ...LOCK  |
00000e70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00000e80  00 b2 16 d6 00 99 22 20  20 20 20 20 20 5b d4 5d  |......"      [.]|
00000e90  20 2d 20 c1 44 44 20 12  d4 92 45 58 54 20 53 54  | - .DD ...EXT ST|
00000ea0  52 49 4e 47 20 20 20 20  20 20 20 20 20 20 20 22  |RING           "|
00000eb0  00 e0 16 d8 00 99 22 20  20 5b 2b 5d 2f 5b 2d 5d  |......"  [+]/[-]|
00000ec0  20 2d 20 d3 43 41 4e 20  46 4f 52 57 41 52 44 2f  | - .CAN FORWARD/|
00000ed0  42 41 43 4b 57 41 52 44  20 20 20 20 20 22 00 1a  |BACKWARD     "..|
00000ee0  17 da 00 81 44 b2 31 a4  35 3a 99 22 20 20 20 20  |....D.1.5:."    |
00000ef0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000f10  20 20 20 20 22 3b 3a 82  00 3d 17 dc 00 81 44 b2  |    ";:..=....D.|
00000f20  32 31 37 a4 32 34 32 3a  97 44 2c c2 28 44 29 b0  |217.242:.D,.(D).|
00000f30  31 32 38 3a 82 3a 99 22  13 22 3b 00 43 17 de 00  |128:.:.".";.C...|
00000f40  8e 00 91 17 e0 00 43 56  b2 31 3a 43 4d 24 b2 22  |......CV.1:CM$."|
00000f50  c7 45 54 20 d3 d9 d3 d2  c5 d3 2c 20 54 48 45 20  |.ET ......, THE |
00000f60  55 4c 54 49 4d 41 54 45  20 50 52 4f 47 52 41 4d  |ULTIMATE PROGRAM|
00000f70  20 4d 41 4e 49 50 55 4c  41 54 49 4f 4e 20 53 59  | MANIPULATION SY|
00000f80  53 54 45 4d 2c 20 41 54  20 22 3a 8f 22 8d 93 00  |STEM, AT ":."...|
00000f90  cd 17 e2 00 43 4d 24 b2  43 4d 24 aa 22 59 4f 55  |....CM$.CM$."YOU|
00000fa0  52 20 4c 4f 43 41 4c 20  44 45 41 4c 45 52 2e 20  |R LOCAL DEALER. |
00000fb0  c9 54 20 41 44 44 53 20  4f 56 45 52 20 31 31 30  |.T ADDS OVER 110|
00000fc0  30 20 4e 45 57 22 3a 8f  22 8d 93 00 19 18 e4 00  |0 NEW":.".......|
00000fd0  43 4d 24 b2 43 4d 24 aa  22 20 45 44 49 54 49 4e  |CM$.CM$." EDITIN|
00000fe0  47 20 41 4e 44 20 44 49  53 4b 20 46 55 4e 43 54  |G AND DISK FUNCT|
00000ff0  49 4f 4e 53 2e 20 d3 50  45 4e 44 20 4c 45 53 53  |IONS. .PEND LESS|
00001000  20 54 49 4d 45 20 43 4f  52 52 45 43 54 49 4e 47  | TIME CORRECTING|
00001010  20 59 4f 55 52 20 22 00  53 18 e6 00 43 4d 24 b2  | YOUR ".S...CM$.|
00001020  43 4d 24 aa 22 4d 49 53  54 41 4b 45 53 20 41 4e  |CM$."MISTAKES AN|
00001030  44 20 4d 4f 52 45 20 54  49 4d 45 20 50 52 4f 47  |D MORE TIME PROG|
00001040  52 41 4d 4d 49 4e 47 2e  20 20 20 22 3a 8f 22 8d  |RAMMING.   ":.".|
00001050  93 00 99 18 e8 00 43 4d  24 b2 43 4d 24 aa 22 c1  |......CM$.CM$.".|
00001060  20 c3 4f 4d 4d 4f 44 4f  52 45 20 36 34 20 57 49  | .OMMODORE 64 WI|
00001070  54 48 4f 55 54 20 d3 d9  d3 d2 c5 d3 20 49 53 20  |THOUT ...... IS |
00001080  4f 4e 4c 59 20 41 20 c3  4f 4d 4d 4f 44 4f 52 45  |ONLY A .OMMODORE|
00001090  20 36 33 2e 35 21 22 00  a1 18 ea 00 8e 3a 13 00  | 63.5!"......:..|
000010a0  ee 18 ec 00 43 56 b2 32  3a 43 4d 24 b2 22 2a 2a  |....CV.2:CM$."**|
000010b0  ce c5 d7 2a 2a 20 46 52  4f 4d 20 d3 cf cc c9 c4  |...** FROM .....|
000010c0  d5 d3 20 c9 ce d4 c5 d2  ce c1 d4 c9 cf ce c1 cc  |.. .............|
000010d0  2e 2e 2e 20 20 20 20 20  20 20 20 20 20 20 20 20  |...             |
000010e0  20 20 20 20 20 20 20 20  20 20 20 22 00 29 19 ee  |           ".)..|
000010f0  00 43 4d 24 b2 43 4d 24  aa 22 d3 cf cc c9 c4 c5  |.CM$.CM$."......|
00001100  d8 2c 20 54 48 45 20 50  45 52 53 4f 4e 41 4c 20  |., THE PERSONAL |
00001110  44 41 54 41 20 46 49 4c  45 52 2e 20 20 20 20 20  |DATA FILER.     |
00001120  20 22 3a 8f 22 8d 93 00  77 19 f0 00 43 4d 24 b2  | ":."...w...CM$.|
00001130  43 4d 24 aa 22 d3 54 4f  52 45 20 4e 4f 54 45 53  |CM$.".TORE NOTES|
00001140  2c 20 52 45 43 4f 52 44  53 2c 20 52 45 43 49 50  |, RECORDS, RECIP|
00001150  45 53 2c 20 45 54 43 2e  20 4f 4e 20 45 4c 45 43  |ES, ETC. ON ELEC|
00001160  54 52 4f 4e 49 43 20 49  4e 44 45 58 20 43 41 52  |TRONIC INDEX CAR|
00001170  44 53 2e 20 22 00 af 19  f2 00 43 4d 24 b2 43 4d  |DS. ".....CM$.CM|
00001180  24 aa 22 20 20 20 c8 55  4e 44 52 45 44 53 20 4f  |$."   .UNDREDS O|
00001190  46 20 55 53 45 53 20 41  52 4f 55 4e 44 20 54 48  |F USES AROUND TH|
000011a0  45 20 48 4f 4d 45 20 22  3a 8f 22 8d 93 00 e6 19  |E HOME ":.".....|
000011b0  f4 00 43 4d 24 b2 43 4d  24 aa 22 41 4e 44 20 4f  |..CM$.CM$."AND O|
000011c0  46 46 49 43 45 2e 20 d3  45 45 20 49 54 20 41 54  |FFICE. .EE IT AT|
000011d0  20 59 4f 55 52 20 4c 4f  43 41 4c 20 44 45 41 4c  | YOUR LOCAL DEAL|
000011e0  45 52 2e 22 00 ee 19 f6  00 8e 3a 13 00 3a 1a f8  |ER."......:..:..|
000011f0  00 43 56 b2 32 3a 43 4d  24 b2 22 d4 48 49 53 20  |.CV.2:CM$.".HIS |
00001200  50 52 4f 47 52 41 4d 20  48 41 53 20 42 45 45 4e  |PROGRAM HAS BEEN|
00001210  20 52 45 4c 45 41 53 45  44 20 54 4f 20 50 55 42  | RELEASED TO PUB|
00001220  4c 49 43 20 44 4f 4d 41  49 4e 20 43 4f 55 52 54  |LIC DOMAIN COURT|
00001230  45 53 59 20 4f 46 20 22  00 70 1a fa 00 43 4d 24  |ESY OF ".p...CM$|
00001240  b2 43 4d 24 aa 22 d3 4f  4c 49 44 55 53 20 c9 4e  |.CM$.".OLIDUS .N|
00001250  54 45 52 4e 41 54 49 4f  4e 41 4c 20 c3 4f 52 50  |TERNATIONAL .ORP|
00001260  4f 52 41 54 49 4f 4e 22  3a 8e 3a 22 8d 93 00 7f  |ORATION":.:"....|
00001270  1a fc 00 8b 43 43 b2 30  a7 8d 32 34 38 00 9c 1a  |....CC.0..248...|
00001280  fe 00 8b 43 43 b1 35 35  30 a7 43 43 b2 30 3a 91  |...CC.550.CC.0:.|
00001290  43 56 8d 32 33 36 2c 32  32 34 00 b6 1a 00 01 43  |CV.236,224.....C|
000012a0  43 b2 43 43 aa 31 3a 8b  43 43 b1 32 39 32 a7 8e  |C.CC.1:.CC.292..|
000012b0  3a 22 8d 93 00 d8 1a 02  01 99 22 13 11 11 11 11  |:"........".....|
000012c0  11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000012d0  11 11 11 11 22 3b 00 e5  1a 04 01 43 50 b2 b5 28  |....";.....CP..(|
000012e0  43 43 29 00 0c 1b 06 01  8b 43 50 b3 33 39 a7 99  |CC)......CP.39..|
000012f0  a6 33 39 ab 43 50 29 c8  28 43 4d 24 2c 43 50 29  |.39.CP).(CM$,CP)|
00001300  22 13 22 3b 3a 8e 3a 22  8d 93 00 56 1b 08 01 99  |".";:.:"...V....|
00001310  c8 28 c8 28 ca 28 43 4d  24 2c 43 50 ab 33 38 29  |.(.(.(CM$,CP.38)|
00001320  2c 33 39 29 aa 22 20 20  20 20 20 20 20 20 20 20  |,39)."          |
00001330  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001340  20 20 20 20 20 20 20 20  20 20 20 20 22 2c 33 39  |            ",39|
00001350  29 22 13 22 00 5c 1b 0a  01 8e 00 66 1b 10 27 22  |)".".\.....f..'"|
00001360  8d 93 0e 9e 00 8e 1b 24  27 22 14 14 14 14 14 14  |.......$'"......|
00001370  14 d0 52 4f 47 52 41 4d  3a 20 22 22 14 c4 49 53  |..ROGRAM: ""..IS|
00001380  4b 20 c4 4f 43 54 4f 52  20 36 34 22 00 af 1b 25  |K .OCTOR 64"...%|
00001390  27 89 31 30 31 32 33 3a  22 14 14 14 14 14 14 14  |'.10123:".......|
000013a0  14 14 14 14 14 14 14 14  14 14 14 14 14 00 bc 1b  |................|
000013b0  29 27 22 14 14 14 14 14  14 14 00 da 1b 2e 27 22  |)'"...........'"|
000013c0  14 14 14 14 14 14 14 c1  55 54 48 4f 52 3a 20 c4  |........UTHOR: .|
000013d0  4f 4e 20 cc 45 4b 45 49  00 e7 1b 33 27 22 14 14  |ON .EKEI...3'"..|
000013e0  14 14 14 14 14 00 f4 1b  34 27 22 14 14 14 14 14  |........4'".....|
000013f0  14 14 00 26 1c 38 27 22  14 14 14 14 14 14 14 d4  |...&.8'"........|
00001400  48 49 53 20 50 52 4f 47  52 41 4d 20 49 53 20 50  |HIS PROGRAM IS P|
00001410  52 4f 56 49 44 45 44 20  43 4f 55 52 54 45 53 59  |ROVIDED COURTESY|
00001420  20 4f 46 3a 00 33 1c 3d  27 22 14 14 14 14 14 14  | OF:.3.='"......|
00001430  14 00 64 1c 42 27 22 14  14 14 14 14 14 14 20 20  |..d.B'".......  |
00001440  20 d3 4f 4c 49 44 55 53  20 c9 4e 54 45 52 4e 41  | .OLIDUS .NTERNA|
00001450  54 49 4f 4e 41 4c 20 c3  4f 52 50 4f 52 41 54 49  |TIONAL .ORPORATI|
00001460  4f 4e 00 93 1c 4c 27 22  14 14 14 14 14 14 14 20  |ON...L'"....... |
00001470  20 20 20 d3 55 49 54 45  20 23 35 2c 20 31 34 34  |   .UITE #5, 144|
00001480  20 d7 45 53 54 20 31 35  54 48 20 d3 54 52 45 45  | .EST 15TH .TREE|
00001490  54 00 be 1c 56 27 22 14  14 14 14 14 14 14 20 20  |T...V'".......  |
000014a0  20 20 20 20 20 20 20 ce  4f 52 54 48 20 d6 41 4e  |       .ORTH .AN|
000014b0  43 4f 55 56 45 52 2c 20  c2 2e c3 2e 00 e8 1c 5b  |COUVER, .......[|
000014c0  27 22 14 14 14 14 14 14  14 20 20 20 20 20 20 20  |'".......       |
000014d0  20 20 d0 48 4f 4e 45 3a  20 28 36 30 34 29 39 38  |  .HONE: (604)98|
000014e0  34 2d 30 34 37 37 00 f5  1c 60 27 22 14 14 14 14  |4-0477...`'"....|
000014f0  14 14 14 00 28 1d 6a 27  22 14 14 14 14 14 14 14  |....(.j'".......|
00001500  d4 4f 20 47 45 54 20 54  48 45 20 cd c1 d8 c9 cd  |.O GET THE .....|
00001510  d5 cd 20 55 53 45 20 4f  55 54 20 4f 46 20 59 4f  |.. USE OUT OF YO|
00001520  55 52 20 4e 45 57 00 58  1d 74 27 22 14 14 14 14  |UR NEW.X.t'"....|
00001530  14 14 14 c3 4f 4d 4d 4f  44 4f 52 45 2d 36 34 20  |....OMMODORE-64 |
00001540  43 4f 4d 50 55 54 45 52  20 41 4e 44 20 59 4f 55  |COMPUTER AND YOU|
00001550  52 20 44 49 53 4b 00 7f  1d 7e 27 22 14 14 14 14  |R DISK...~'"....|
00001560  14 14 14 44 52 49 56 45  2c 20 57 45 20 52 45 43  |...DRIVE, WE REC|
00001570  4f 4d 4d 45 4e 44 20 55  53 49 4e 47 3a 00 a9 1d  |OMMEND USING:...|
00001580  8b 27 5a 24 b2 c7 28 30  29 3a 8f 22 8d 91 a0 a0  |.'Z$..(0):."....|
00001590  a0 a0 a0 a0 a0 a0 a0 a0  a0 a0 a0 a0 a0 a0 a0 a0  |................|
000015a0  a0 a0 a0 a0 a0 a0 91 00  d5 1d 8c 27 9f 31 35 2c  |...........'.15,|
000015b0  44 4e 2c 31 35 3a 8f 22  8d 91 a0 a0 a0 a0 a0 a0  |DN,15:."........|
000015c0  a0 a0 a0 a0 a0 a0 a0 a0  a0 a0 a0 a0 a0 a0 a0 a0  |................|
000015d0  a0 a0 91 00 fc 1d 8d 27  9f 39 2c 30 3a 8f 22 8d  |.......'.9,0:.".|
000015e0  91 a0 a0 a0 a0 a0 a0 a0  a0 a0 a0 a0 a0 a0 a0 a0  |................|
000015f0  a0 a0 a0 a0 a0 a0 a0 a0  a0 91 00 20 1e 8e 27 8e  |........... ..'.|
00001600  3a 8f 22 8d 91 a0 a0 a0  a0 a0 a0 a0 a0 a0 a0 a0  |:.".............|
00001610  a0 a0 a0 a0 a0 a0 a0 a0  a0 a0 a0 a0 a0 91 00 4a  |...............J|
00001620  1e 92 27 22 14 14 14 14  14 14 14 8d 05 20 20 20  |..'".........   |
00001630  20 20 20 20 20 20 20 20  20 20 2a 2a 2a 20 d3 d9  |          *** ..|
00001640  d3 d2 c5 d3 20 2a 2a 2a  00 57 1e 97 27 22 14 14  |.... ***.W..'"..|
00001650  14 14 14 14 14 00 8a 1e  9c 27 22 14 14 14 14 14  |.........'".....|
00001660  14 14 20 20 22 22 14 d4  48 45 20 d5 4c 54 49 4d  |..  ""..HE .LTIM|
00001670  41 54 45 20 d0 52 4f 47  52 41 4d 20 cd 41 4e 49  |ATE .ROGRAM .ANI|
00001680  50 55 4c 41 54 49 4f 4e  00 be 1e a6 27 22 14 14  |PULATION....'"..|
00001690  14 14 14 14 14 20 20 d3  59 53 54 45 4d 20 46 4f  |.....  .YSTEM FO|
000016a0  52 20 c3 4f 4d 4d 4f 44  4f 52 45 20 cd 49 43 52  |R .OMMODORE .ICR|
000016b0  4f 43 4f 4d 50 55 54 45  52 53 2e 22 00 f5 1e ba  |OCOMPUTERS."....|
000016c0  27 22 14 14 14 14 14 14  14 8d 9e ce 4f 57 20 41  |'"..........OW A|
000016d0  56 41 49 4c 41 42 4c 45  20 41 54 20 59 4f 55 52  |VAILABLE AT YOUR|
000016e0  20 c3 4f 4d 4d 4f 44 4f  52 45 20 44 45 41 4c 45  | .OMMODORE DEALE|
000016f0  52 2e 05 00 00 00                                 |R.....|
000016f6