� SuperCal
 � by Mike Jackson
 � (c) The Micro User
(, � I$(75),V(75),S$(75),A(75),T(75),TL(3)
2
 � � �agh
< *FX4,1
F �23,1,0;0;0;0;:*FX225,240
P0 �:�0,2)�145;�39,�172);�0,21)�145;�39,�172)
Z CP$="N":P=0:D$="`":*FX6,0
d' G=0:N=1:L=3:LL=3:@%=&20209:�t:�key
n �
x � �key
� �0,L-P)�130;"] "
�c �0,23)�130;"^keys(])";�132;"OR";�130;"Return (Edit)";�132;"OR";�130;"fKey";�132;�136;"?";�137
� K=�
�+ �(K>135�K<140)�nl � � K=13 �add � �red
� �
�
 � �nl
�! �K=136 L=P+3 � �K=137 L=P+20
� �(K=139 � L-P>3)L=L-1
� �(K=138 � L-P<20)L=L+1
�- �1,LL-P)"  ";�0,L-P)�130;"] ":LL=L:�key
� �
� � �add
�4 �0,23)�130;�17,23)�136;�132;"]";�137;�157;�131

: �1,23)" +/-* or space:R";�23,23)�16," "):膊23,23)S$

< �S$=""��(S$="+"�S$="-"�S$="*"�S$="/")S$(L)=S$ �S$(L)=""

: �1,23)"Label or space:R";�23,23)�16," "):膊23,23)I$

" �I$>"" I$(L)=�I$,5)

,9 �1,23)"    Value or 0:R";�23,23)�16," "):�23,23)V$

6 �V$,1)="-"V$=�V$,�V$-1)

@ �V$>"" V(L)=�V$

J �1,23)�156;�3,23)�36," ")

T � TL(N)<L TL(N)=L

^ � T(L)=1 T(L)=0

h R$=�I$(L),1):� R$="%" �pnt

r
 �line

|3 R$=�I$(L+1),1):� R$="%" L=L+1:�pnt:�line:L=L-1

�	 �ans

� �

� � �line

� �0,L-P)�40," ")

�) � T(L)=1 �4,L-P)�133;�7,L-P)I$(L):�

�$ �4,L-P)�131;S$(L);�7,L-P)I$(L)

� � V(L)>0 �13,L-P)V(L)

� �

� � �ans

� � X=L � TL(N)

�' � T(X)=0 A(X)=�A � A(X)=A(X-1):�lk

� �23,X-P)�17," ")

� �T(X)=0 C=134 � C=133
 �24,X-P)�C
 �A(X)<>0�25,X-P)A(X)
 �:�key
& �
0	 � �A
:O � S$(X)=""� =V(X) ��S$(X)="/"�V(X)=0 =0 � N$=�(A(X-1))+S$(X)+�(V(X)):=� N$
D � �red
N � K=128 �hlp
X � K=240 �total
b � K=247 �prntr
l � K=244 �ins
v � K=245 �del
� � K=248 �dout
� � K=249 �din
� � K=129 �qc
� � K=130 V(L)=A:�line:�ans
�C �(K=131� D$="`")D$="U":@%=&0000:�t ��K=131 D$="`":@%=&20209:�t
� �(K>240 � K<244)�np
� � K=246 �copy
�	 �key
� �
�
 � �total
�. L$="Subtotal Label:R":�ip:� IN$=""�7:�key
�  I$(L)=IN$:� L>TL(N) TL(N)=L
� T(L)=1
 �line:�ans
 �

 � �ip
 @ �0,23)�130;L$;�17,23)�136;�132;"]";�137;�157;�131;�16," ")
* �23,23)IN$
4  �1,23)�156:�3,23)�36," ")
> �
H
 ��ins
R �(TL(N)+1)-P>20 �7:�
\ TL(N)=TL(N)+1
f �X=TL(N) � L+1 �-1
p  I$(X)=I$(X-1):S$(X)=S$(X-1)
z T(X)=T(X-1):V(X)=V(X-1)
� �
�$ I$(L)="":V(L)=0:T(L)=0:S$(L)=""
�$ OL=L:� L=L � TL(N):�line:�:L=OL
� � G=1 G=0:�
�	 �ans
� �
�
 ��del
� �X=L � TL(N)-1
�8 S$(X)=S$(X+1):I$(X)=I$(X+1):V(X)=V(X+1):T(X)=T(X+1)
� �
�4 S$(TL(N))="":I$(TL(N))="":T(TL(N))=0:V(TL(N))=0
�' �(TL(N)>4 � TL(N)>=L)TL(N)=TL(N)-1
�$ OL=L:� L=L � TL(N):�line:�:L=OL
 �0,(TL(N)+1)-P)�40," ")
	 �ans
 �
$ ��copy
.* � CP$="N" M$=I$(L):VM=�M:CP$="Y":�t:�
8# �(I$(L)>"" � V(L)>0)� G=1:�ins
B  I$(L)=M$:V(L)=VM:M$="":VM=0
L CP$="N":�t
V
 �line
` � L>TL(N) TL(N)=L
j	 �ans
t �
~	 � �M
� � T(L)=1 =A(L) �=V(L)
�	 ��np
�/ �(K=241 � N>1)L=3:P=0:N=1 � � K=241 �key:�
�2 �(K=242 � N<>2)L=21:P=18:N=2 � � K=242 �key:�
�2 �(K=243 � N<>3)L=41:P=38:N=3 � � K=243 �key:�
� LL=L:�:�t
�. �0,2)�145;�39,�172);�0,21)�145;�39,�172)
�# OL=L:�L=L � TL(N):�line:�:L=OL
�	 �ans
� �
� ��t:@%=&0000
� � X=0 � 1
Q �0,X)�141;�129;"SuperCal";�18);�132;"D:";D$;�3;�133;"C:";CP$;�4;�131;"P:";N

 �:� D$="`" @%=&20209
 �

 � �prntr
(
 �2,21
2 �X=P+3 � TL(N)
<. �(S$(X)=""�I$(X)=""�V(X)=0�A(X)=0)�:�DPE
FO � V(X)=0 �5)S$(X);�8)I$(X);�30)A(X)� �5)S$(X);�8)I$(X);�15)V(X);�30)A(X)
P �:�6,3:�key
Z �
d � �dout
n$ L$=�2," ")+"File to save:R":�ip
x Z=� IN$
� �X=3 � 75
�# �#Z,S$(X),I$(X),V(X),T(X),A(X)
� �
� �#Z,TL(1),TL(2),TL(3)
�
 �#Z:�key
� �
� � �din
�$ L$=�2," ")+"File to load:R":�ip
� Z=� IN$
� � Z=0 �key:�
� �X=3 � 75
�# �#Z,S$(X),I$(X),V(X),T(X),A(X)
� �
 �#Z,TL(1),TL(2),TL(3)
 �#Z:K=241:N=2:�np
 �
"
 � �lk
,< OL=L:�L=X+1 � 70:� I$(L)=I$(X) V(L)=A(X):� L-P<21 �line
66 R$=�I$(L+1),1):� R$="%" L=L+1:�pnt:� L-P<21 �line
@ �:L=OL
J �
T � �qc:�0,23)�39," ")
^& �0,22)�130;"Print MiniCal?(Y/N)"
h Q=�:� D$="`" @%=&20209
rR �1,22)"+100% or E(e):R ";�17,22)�136;�132;"]";�137;�157;�131;�21,23)�130;"="
|
 A$="0":�
�+ �23,22)V$:P$=V$:�(V$="E"�V$="e")��dBF
�2 C$=�V$,1):�(C$)>48 �7:�23,22)�16," "):�tFF
�Y �V$,"%")S$=�V$,1):V$=�V$,�V$-1):V=�V$*�A$/100:V$=S$+�(V):� S$="*"A$=�(V):A=V:� �tnF
� A$=A$+V$:A=�A$:A$=�(A)
�, �23,23)�130;A;�10," ");�23,22)�20," ")
�* �(Q=89�Q=121)�2,21:�P$;�13)"=";A:�6,3
�: �(V$="E"�V$="e"):�1,22)�156;�37," ");�17,23)�21," ")
�# �A$,1)="-"A$=�A$,�A$-1):A=�A$
� �key:�
� � �agh
� �7,6,3:K=241:N=4:�np:�
� � �pnt
� N$=�I$(L),� I$(L)-1)
 PS=� N$:V(L)=V(L-1)*PS/100
 �
 � �hlp
& �:�0,4):��DvG
0 �X=0 � 12
:	 � A$
D3 �X<10 �0,X+4)�129;"      f";X;�9,X+4);�131;A$
N3 �X>9 �0,X+4)�129;"SHIFT f";X-9;�9,X+4)�131;A$
X �:�
b+ �130;"New Page to return to SuperCal"
l# �:K=�:�(K>240�K<244):N=4:�np:�
vE � Subtotals,Page1,Page2,Page3,Insert,Delete,Copy,Print,Save,Load
�3 � Quick Calculator, Transfer QC result,Decimal
�

00000000  0d 00 0a 0f 20 f4 20 53  75 70 65 72 43 61 6c 0d  |.... . SuperCal.|
00000010  00 14 16 20 f4 20 62 79  20 4d 69 6b 65 20 4a 61  |... . by Mike Ja|
00000020  63 6b 73 6f 6e 0d 00 1e  19 20 f4 20 28 63 29 20  |ckson.... . (c) |
00000030  54 68 65 20 4d 69 63 72  6f 20 55 73 65 72 0d 00  |The Micro User..|
00000040  28 2c 20 de 20 49 24 28  37 35 29 2c 56 28 37 35  |(, . I$(75),V(75|
00000050  29 2c 53 24 28 37 35 29  2c 41 28 37 35 29 2c 54  |),S$(75),A(75),T|
00000060  28 37 35 29 2c 54 4c 28  33 29 0d 00 32 0d 20 ee  |(75),TL(3)..2. .|
00000070  20 85 20 f2 61 67 68 0d  00 3c 0b 20 2a 46 58 34  | . .agh..<. *FX4|
00000080  2c 31 0d 00 46 1e 20 ef  32 33 2c 31 2c 30 3b 30  |,1..F. .23,1,0;0|
00000090  3b 30 3b 30 3b 3a 2a 46  58 32 32 35 2c 32 34 30  |;0;0;:*FX225,240|
000000a0  0d 00 50 30 20 db 3a f1  8a 30 2c 32 29 bd 31 34  |..P0 .:..0,2).14|
000000b0  35 3b c4 33 39 2c bd 31  37 32 29 3b 8a 30 2c 32  |5;.39,.172);.0,2|
000000c0  31 29 bd 31 34 35 3b c4  33 39 2c bd 31 37 32 29  |1).145;.39,.172)|
000000d0  0d 00 5a 1e 20 43 50 24  3d 22 4e 22 3a 50 3d 30  |..Z. CP$="N":P=0|
000000e0  3a 44 24 3d 22 60 22 3a  2a 46 58 36 2c 30 0d 00  |:D$="`":*FX6,0..|
000000f0  64 27 20 47 3d 30 3a 4e  3d 31 3a 4c 3d 33 3a 4c  |d' G=0:N=1:L=3:L|
00000100  4c 3d 33 3a 40 25 3d 26  32 30 32 30 39 3a f2 74  |L=3:@%=&20209:.t|
00000110  3a f2 6b 65 79 0d 00 6e  06 20 e0 0d 00 78 0b 20  |:.key..n. ...x. |
00000120  dd 20 f2 6b 65 79 0d 00  82 16 20 f1 8a 30 2c 4c  |. .key.... ..0,L|
00000130  2d 50 29 bd 31 33 30 3b  22 5d 20 22 0d 00 8c 63  |-P).130;"] "...c|
00000140  20 f1 8a 30 2c 32 33 29  bd 31 33 30 3b 22 5e 6b  | ..0,23).130;"^k|
00000150  65 79 73 28 5d 29 22 3b  bd 31 33 32 3b 22 4f 52  |eys(])";.132;"OR|
00000160  22 3b bd 31 33 30 3b 22  52 65 74 75 72 6e 20 28  |";.130;"Return (|
00000170  45 64 69 74 29 22 3b bd  31 33 32 3b 22 4f 52 22  |Edit)";.132;"OR"|
00000180  3b bd 31 33 30 3b 22 66  4b 65 79 22 3b bd 31 33  |;.130;"fKey";.13|
00000190  32 3b bd 31 33 36 3b 22  3f 22 3b bd 31 33 37 0d  |2;.136;"?";.137.|
000001a0  00 96 08 20 4b 3d a5 0d  00 a0 2b 20 e7 28 4b 3e  |... K=....+ .(K>|
000001b0  31 33 35 80 4b 3c 31 34  30 29 f2 6e 6c 20 8b 20  |135.K<140).nl . |
000001c0  e7 20 4b 3d 31 33 20 f2  61 64 64 20 8b 20 f2 72  |. K=13 .add . .r|
000001d0  65 64 0d 00 aa 06 20 e1  0d 00 b4 0a 20 dd 20 f2  |ed.... ..... . .|
000001e0  6e 6c 0d 00 be 21 20 e7  4b 3d 31 33 36 20 4c 3d  |nl...! .K=136 L=|
000001f0  50 2b 33 20 8b 20 e7 4b  3d 31 33 37 20 4c 3d 50  |P+3 . .K=137 L=P|
00000200  2b 32 30 0d 00 c8 1a 20  e7 28 4b 3d 31 33 39 20  |+20.... .(K=139 |
00000210  80 20 4c 2d 50 3e 33 29  4c 3d 4c 2d 31 0d 00 d2  |. L-P>3)L=L-1...|
00000220  1b 20 e7 28 4b 3d 31 33  38 20 80 20 4c 2d 50 3c  |. .(K=138 . L-P<|
00000230  32 30 29 4c 3d 4c 2b 31  0d 00 dc 2d 20 f1 8a 31  |20)L=L+1...- ..1|
00000240  2c 4c 4c 2d 50 29 22 20  20 22 3b 8a 30 2c 4c 2d  |,LL-P)"  ";.0,L-|
00000250  50 29 bd 31 33 30 3b 22  5d 20 22 3a 4c 4c 3d 4c  |P).130;"] ":LL=L|
00000260  3a f2 6b 65 79 0d 00 e6  06 20 e1 0d 00 f0 0b 20  |:.key.... ..... |
00000270  dd 20 f2 61 64 64 0d 00  fa 34 20 f1 8a 30 2c 32  |. .add...4 ..0,2|
00000280  33 29 bd 31 33 30 3b 8a  31 37 2c 32 33 29 bd 31  |3).130;.17,23).1|
00000290  33 36 3b bd 31 33 32 3b  22 5d 22 3b bd 31 33 37  |36;.132;"]";.137|
000002a0  3b bd 31 35 37 3b bd 31  33 31 0d 01 04 3a 20 f1  |;.157;.131...: .|
000002b0  8a 31 2c 32 33 29 22 20  2b 2f 2d 2a 20 6f 72 20  |.1,23)" +/-* or |
000002c0  73 70 61 63 65 3a 52 22  3b 8a 32 33 2c 32 33 29  |space:R";.23,23)|
000002d0  c4 31 36 2c 22 20 22 29  3a e8 86 8a 32 33 2c 32  |.16," "):...23,2|
000002e0  33 29 53 24 0d 01 0e 3c  20 e7 53 24 3d 22 22 8b  |3)S$...< .S$="".|
000002f0  e7 28 53 24 3d 22 2b 22  84 53 24 3d 22 2d 22 84  |.(S$="+".S$="-".|
00000300  53 24 3d 22 2a 22 84 53  24 3d 22 2f 22 29 53 24  |S$="*".S$="/")S$|
00000310  28 4c 29 3d 53 24 20 8b  53 24 28 4c 29 3d 22 22  |(L)=S$ .S$(L)=""|
00000320  0d 01 18 3a 20 f1 8a 31  2c 32 33 29 22 4c 61 62  |...: ..1,23)"Lab|
00000330  65 6c 20 6f 72 20 73 70  61 63 65 3a 52 22 3b 8a  |el or space:R";.|
00000340  32 33 2c 32 33 29 c4 31  36 2c 22 20 22 29 3a e8  |23,23).16," "):.|
00000350  86 8a 32 33 2c 32 33 29  49 24 0d 01 22 18 20 e7  |..23,23)I$..". .|
00000360  49 24 3e 22 22 20 49 24  28 4c 29 3d c0 49 24 2c  |I$>"" I$(L)=.I$,|
00000370  35 29 0d 01 2c 39 20 f1  8a 31 2c 32 33 29 22 20  |5)..,9 ..1,23)" |
00000380  20 20 20 56 61 6c 75 65  20 6f 72 20 30 3a 52 22  |   Value or 0:R"|
00000390  3b 8a 32 33 2c 32 33 29  c4 31 36 2c 22 20 22 29  |;.23,23).16," ")|
000003a0  3a e8 8a 32 33 2c 32 33  29 56 24 0d 01 36 1d 20  |:..23,23)V$..6. |
000003b0  e7 c0 56 24 2c 31 29 3d  22 2d 22 56 24 3d c2 56  |..V$,1)="-"V$=.V|
000003c0  24 2c a9 56 24 2d 31 29  0d 01 40 14 20 e7 56 24  |$,.V$-1)..@. .V$|
000003d0  3e 22 22 20 56 28 4c 29  3d bb 56 24 0d 01 4a 1f  |>"" V(L)=.V$..J.|
000003e0  20 f1 8a 31 2c 32 33 29  bd 31 35 36 3b 8a 33 2c  | ..1,23).156;.3,|
000003f0  32 33 29 c4 33 36 2c 22  20 22 29 0d 01 54 16 20  |23).36," ")..T. |
00000400  e7 20 54 4c 28 4e 29 3c  4c 20 54 4c 28 4e 29 3d  |. TL(N)<L TL(N)=|
00000410  4c 0d 01 5e 14 20 e7 20  54 28 4c 29 3d 31 20 54  |L..^. . T(L)=1 T|
00000420  28 4c 29 3d 30 0d 01 68  1f 20 52 24 3d c2 49 24  |(L)=0..h. R$=.I$|
00000430  28 4c 29 2c 31 29 3a e7  20 52 24 3d 22 25 22 20  |(L),1):. R$="%" |
00000440  f2 70 6e 74 0d 01 72 0a  20 f2 6c 69 6e 65 0d 01  |.pnt..r. .line..|
00000450  7c 33 20 52 24 3d c2 49  24 28 4c 2b 31 29 2c 31  ||3 R$=.I$(L+1),1|
00000460  29 3a e7 20 52 24 3d 22  25 22 20 4c 3d 4c 2b 31  |):. R$="%" L=L+1|
00000470  3a f2 70 6e 74 3a f2 6c  69 6e 65 3a 4c 3d 4c 2d  |:.pnt:.line:L=L-|
00000480  31 0d 01 86 09 20 f2 61  6e 73 0d 01 90 06 20 e1  |1.... .ans.... .|
00000490  0d 01 9a 0c 20 dd 20 f2  6c 69 6e 65 0d 01 a4 15  |.... . .line....|
000004a0  20 f1 8a 30 2c 4c 2d 50  29 c4 34 30 2c 22 20 22  | ..0,L-P).40," "|
000004b0  29 0d 01 ae 29 20 e7 20  54 28 4c 29 3d 31 20 f1  |)...) . T(L)=1 .|
000004c0  8a 34 2c 4c 2d 50 29 bd  31 33 33 3b 8a 37 2c 4c  |.4,L-P).133;.7,L|
000004d0  2d 50 29 49 24 28 4c 29  3a e1 0d 01 b8 24 20 f1  |-P)I$(L):....$ .|
000004e0  8a 34 2c 4c 2d 50 29 bd  31 33 31 3b 53 24 28 4c  |.4,L-P).131;S$(L|
000004f0  29 3b 8a 37 2c 4c 2d 50  29 49 24 28 4c 29 0d 01  |);.7,L-P)I$(L)..|
00000500  c2 1b 20 e7 20 56 28 4c  29 3e 30 20 f1 8a 31 33  |.. . V(L)>0 ..13|
00000510  2c 4c 2d 50 29 56 28 4c  29 0d 01 cc 06 20 e1 0d  |,L-P)V(L).... ..|
00000520  01 d6 0b 20 dd 20 f2 61  6e 73 0d 01 e0 12 20 e3  |... . .ans.... .|
00000530  20 58 3d 4c 20 b8 20 54  4c 28 4e 29 0d 01 ea 27  | X=L . TL(N)...'|
00000540  20 e7 20 54 28 58 29 3d  30 20 41 28 58 29 3d a4  | . T(X)=0 A(X)=.|
00000550  41 20 8b 20 41 28 58 29  3d 41 28 58 2d 31 29 3a  |A . A(X)=A(X-1):|
00000560  f2 6c 6b 0d 01 f4 16 20  f1 8a 32 33 2c 58 2d 50  |.lk.... ..23,X-P|
00000570  29 c4 31 37 2c 22 20 22  29 0d 01 fe 1a 20 e7 54  |).17," ").... .T|
00000580  28 58 29 3d 30 20 43 3d  31 33 34 20 8b 20 43 3d  |(X)=0 C=134 . C=|
00000590  31 33 33 0d 02 08 10 20  f1 8a 32 34 2c 58 2d 50  |133.... ..24,X-P|
000005a0  29 bd 43 0d 02 12 1a 20  e7 41 28 58 29 3c 3e 30  |).C.... .A(X)<>0|
000005b0  f1 8a 32 35 2c 58 2d 50  29 41 28 58 29 0d 02 1c  |..25,X-P)A(X)...|
000005c0  0b 20 ed 3a f2 6b 65 79  0d 02 26 06 20 e1 0d 02  |. .:.key..&. ...|
000005d0  30 09 20 dd 20 a4 41 0d  02 3a 4f 20 e7 20 53 24  |0. . .A..:O . S$|
000005e0  28 58 29 3d 22 22 8c 20  3d 56 28 58 29 20 8b e7  |(X)="". =V(X) ..|
000005f0  53 24 28 58 29 3d 22 2f  22 80 56 28 58 29 3d 30  |S$(X)="/".V(X)=0|
00000600  20 3d 30 20 8b 20 4e 24  3d c3 28 41 28 58 2d 31  | =0 . N$=.(A(X-1|
00000610  29 29 2b 53 24 28 58 29  2b c3 28 56 28 58 29 29  |))+S$(X)+.(V(X))|
00000620  3a 3d a0 20 4e 24 0d 02  44 0b 20 dd 20 f2 72 65  |:=. N$..D. . .re|
00000630  64 0d 02 4e 11 20 e7 20  4b 3d 31 32 38 20 f2 68  |d..N. . K=128 .h|
00000640  6c 70 0d 02 58 13 20 e7  20 4b 3d 32 34 30 20 f2  |lp..X. . K=240 .|
00000650  74 6f 74 61 6c 0d 02 62  13 20 e7 20 4b 3d 32 34  |total..b. . K=24|
00000660  37 20 f2 70 72 6e 74 72  0d 02 6c 11 20 e7 20 4b  |7 .prntr..l. . K|
00000670  3d 32 34 34 20 f2 69 6e  73 0d 02 76 11 20 e7 20  |=244 .ins..v. . |
00000680  4b 3d 32 34 35 20 f2 64  65 6c 0d 02 80 12 20 e7  |K=245 .del.... .|
00000690  20 4b 3d 32 34 38 20 f2  64 6f 75 74 0d 02 8a 11  | K=248 .dout....|
000006a0  20 e7 20 4b 3d 32 34 39  20 f2 64 69 6e 0d 02 94  | . K=249 .din...|
000006b0  10 20 e7 20 4b 3d 31 32  39 20 f2 71 63 0d 02 9e  |. . K=129 .qc...|
000006c0  1e 20 e7 20 4b 3d 31 33  30 20 56 28 4c 29 3d 41  |. . K=130 V(L)=A|
000006d0  3a f2 6c 69 6e 65 3a f2  61 6e 73 0d 02 a8 43 20  |:.line:.ans...C |
000006e0  e7 28 4b 3d 31 33 31 80  20 44 24 3d 22 60 22 29  |.(K=131. D$="`")|
000006f0  44 24 3d 22 55 22 3a 40  25 3d 26 30 30 30 30 3a  |D$="U":@%=&0000:|
00000700  f2 74 20 8b e7 4b 3d 31  33 31 20 44 24 3d 22 60  |.t ..K=131 D$="`|
00000710  22 3a 40 25 3d 26 32 30  32 30 39 3a f2 74 0d 02  |":@%=&20209:.t..|
00000720  b2 18 20 e7 28 4b 3e 32  34 30 20 80 20 4b 3c 32  |.. .(K>240 . K<2|
00000730  34 34 29 f2 6e 70 0d 02  bc 12 20 e7 20 4b 3d 32  |44).np.... . K=2|
00000740  34 36 20 f2 63 6f 70 79  0d 02 c6 09 20 f2 6b 65  |46 .copy.... .ke|
00000750  79 0d 02 d0 06 20 e1 0d  02 da 0d 20 dd 20 f2 74  |y.... ..... . .t|
00000760  6f 74 61 6c 0d 02 e4 2e  20 4c 24 3d 22 53 75 62  |otal.... L$="Sub|
00000770  74 6f 74 61 6c 20 4c 61  62 65 6c 3a 52 22 3a f2  |total Label:R":.|
00000780  69 70 3a e7 20 49 4e 24  3d 22 22 ef 37 3a f2 6b  |ip:. IN$="".7:.k|
00000790  65 79 0d 02 ee 20 20 49  24 28 4c 29 3d 49 4e 24  |ey...  I$(L)=IN$|
000007a0  3a e7 20 4c 3e 54 4c 28  4e 29 20 54 4c 28 4e 29  |:. L>TL(N) TL(N)|
000007b0  3d 4c 0d 02 f8 0b 20 54  28 4c 29 3d 31 0d 03 02  |=L.... T(L)=1...|
000007c0  0f 20 f2 6c 69 6e 65 3a  f2 61 6e 73 0d 03 0c 06  |. .line:.ans....|
000007d0  20 e1 0d 03 16 0a 20 dd  20 f2 69 70 0d 03 20 40  | ..... . .ip.. @|
000007e0  20 f1 8a 30 2c 32 33 29  bd 31 33 30 3b 4c 24 3b  | ..0,23).130;L$;|
000007f0  8a 31 37 2c 32 33 29 bd  31 33 36 3b bd 31 33 32  |.17,23).136;.132|
00000800  3b 22 5d 22 3b bd 31 33  37 3b bd 31 35 37 3b bd  |;"]";.137;.157;.|
00000810  31 33 31 3b c4 31 36 2c  22 20 22 29 0d 03 2a 10  |131;.16," ")..*.|
00000820  20 e8 8a 32 33 2c 32 33  29 49 4e 24 0d 03 34 20  | ..23,23)IN$..4 |
00000830  20 f1 8a 31 2c 32 33 29  bd 31 35 36 3a f1 8a 33  | ..1,23).156:..3|
00000840  2c 32 33 29 c4 33 36 2c  22 20 22 29 0d 03 3e 06  |,23).36," ")..>.|
00000850  20 e1 0d 03 48 0a 20 dd  f2 69 6e 73 0d 03 52 19  | ...H. ..ins..R.|
00000860  20 e7 28 54 4c 28 4e 29  2b 31 29 2d 50 3e 32 30  | .(TL(N)+1)-P>20|
00000870  20 ef 37 3a e1 0d 03 5c  12 20 54 4c 28 4e 29 3d  | .7:...\. TL(N)=|
00000880  54 4c 28 4e 29 2b 31 0d  03 66 17 20 e3 58 3d 54  |TL(N)+1..f. .X=T|
00000890  4c 28 4e 29 20 b8 20 4c  2b 31 20 88 2d 31 0d 03  |L(N) . L+1 .-1..|
000008a0  70 20 20 49 24 28 58 29  3d 49 24 28 58 2d 31 29  |p  I$(X)=I$(X-1)|
000008b0  3a 53 24 28 58 29 3d 53  24 28 58 2d 31 29 0d 03  |:S$(X)=S$(X-1)..|
000008c0  7a 1c 20 54 28 58 29 3d  54 28 58 2d 31 29 3a 56  |z. T(X)=T(X-1):V|
000008d0  28 58 29 3d 56 28 58 2d  31 29 0d 03 84 06 20 ed  |(X)=V(X-1).... .|
000008e0  0d 03 8e 24 20 49 24 28  4c 29 3d 22 22 3a 56 28  |...$ I$(L)="":V(|
000008f0  4c 29 3d 30 3a 54 28 4c  29 3d 30 3a 53 24 28 4c  |L)=0:T(L)=0:S$(L|
00000900  29 3d 22 22 0d 03 98 24  20 4f 4c 3d 4c 3a e3 20  |)=""...$ OL=L:. |
00000910  4c 3d 4c 20 b8 20 54 4c  28 4e 29 3a f2 6c 69 6e  |L=L . TL(N):.lin|
00000920  65 3a ed 3a 4c 3d 4f 4c  0d 03 a2 10 20 e7 20 47  |e:.:L=OL.... . G|
00000930  3d 31 20 47 3d 30 3a e1  0d 03 ac 09 20 f2 61 6e  |=1 G=0:..... .an|
00000940  73 0d 03 b6 06 20 e1 0d  03 c0 0a 20 dd f2 64 65  |s.... ..... ..de|
00000950  6c 0d 03 ca 13 20 e3 58  3d 4c 20 b8 20 54 4c 28  |l.... .X=L . TL(|
00000960  4e 29 2d 31 0d 03 d4 38  20 53 24 28 58 29 3d 53  |N)-1...8 S$(X)=S|
00000970  24 28 58 2b 31 29 3a 49  24 28 58 29 3d 49 24 28  |$(X+1):I$(X)=I$(|
00000980  58 2b 31 29 3a 56 28 58  29 3d 56 28 58 2b 31 29  |X+1):V(X)=V(X+1)|
00000990  3a 54 28 58 29 3d 54 28  58 2b 31 29 0d 03 de 06  |:T(X)=T(X+1)....|
000009a0  20 ed 0d 03 e8 34 20 53  24 28 54 4c 28 4e 29 29  | ....4 S$(TL(N))|
000009b0  3d 22 22 3a 49 24 28 54  4c 28 4e 29 29 3d 22 22  |="":I$(TL(N))=""|
000009c0  3a 54 28 54 4c 28 4e 29  29 3d 30 3a 56 28 54 4c  |:T(TL(N))=0:V(TL|
000009d0  28 4e 29 29 3d 30 0d 03  f2 27 20 e7 28 54 4c 28  |(N))=0...' .(TL(|
000009e0  4e 29 3e 34 20 80 20 54  4c 28 4e 29 3e 3d 4c 29  |N)>4 . TL(N)>=L)|
000009f0  54 4c 28 4e 29 3d 54 4c  28 4e 29 2d 31 0d 03 fc  |TL(N)=TL(N)-1...|
00000a00  24 20 4f 4c 3d 4c 3a e3  20 4c 3d 4c 20 b8 20 54  |$ OL=L:. L=L . T|
00000a10  4c 28 4e 29 3a f2 6c 69  6e 65 3a ed 3a 4c 3d 4f  |L(N):.line:.:L=O|
00000a20  4c 0d 04 06 1d 20 f1 8a  30 2c 28 54 4c 28 4e 29  |L.... ..0,(TL(N)|
00000a30  2b 31 29 2d 50 29 c4 34  30 2c 22 20 22 29 0d 04  |+1)-P).40," ")..|
00000a40  10 09 20 f2 61 6e 73 0d  04 1a 06 20 e1 0d 04 24  |.. .ans.... ...$|
00000a50  0b 20 dd f2 63 6f 70 79  0d 04 2e 2a 20 e7 20 43  |. ..copy...* . C|
00000a60  50 24 3d 22 4e 22 20 4d  24 3d 49 24 28 4c 29 3a  |P$="N" M$=I$(L):|
00000a70  56 4d 3d a4 4d 3a 43 50  24 3d 22 59 22 3a f2 74  |VM=.M:CP$="Y":.t|
00000a80  3a e1 0d 04 38 23 20 e7  28 49 24 28 4c 29 3e 22  |:...8# .(I$(L)>"|
00000a90  22 20 84 20 56 28 4c 29  3e 30 29 8c 20 47 3d 31  |" . V(L)>0). G=1|
00000aa0  3a f2 69 6e 73 0d 04 42  20 20 49 24 28 4c 29 3d  |:.ins..B  I$(L)=|
00000ab0  4d 24 3a 56 28 4c 29 3d  56 4d 3a 4d 24 3d 22 22  |M$:V(L)=VM:M$=""|
00000ac0  3a 56 4d 3d 30 0d 04 4c  0f 20 43 50 24 3d 22 4e  |:VM=0..L. CP$="N|
00000ad0  22 3a f2 74 0d 04 56 0a  20 f2 6c 69 6e 65 0d 04  |":.t..V. .line..|
00000ae0  60 16 20 e7 20 4c 3e 54  4c 28 4e 29 20 54 4c 28  |`. . L>TL(N) TL(|
00000af0  4e 29 3d 4c 0d 04 6a 09  20 f2 61 6e 73 0d 04 74  |N)=L..j. .ans..t|
00000b00  06 20 e1 0d 04 7e 09 20  dd 20 a4 4d 0d 04 88 1a  |. ...~. . .M....|
00000b10  20 e7 20 54 28 4c 29 3d  31 20 3d 41 28 4c 29 20  | . T(L)=1 =A(L) |
00000b20  8b 3d 56 28 4c 29 0d 04  92 09 20 dd f2 6e 70 0d  |.=V(L).... ..np.|
00000b30  04 9c 2f 20 e7 28 4b 3d  32 34 31 20 80 20 4e 3e  |../ .(K=241 . N>|
00000b40  31 29 4c 3d 33 3a 50 3d  30 3a 4e 3d 31 20 8b 20  |1)L=3:P=0:N=1 . |
00000b50  e7 20 4b 3d 32 34 31 20  f2 6b 65 79 3a e1 0d 04  |. K=241 .key:...|
00000b60  a6 32 20 e7 28 4b 3d 32  34 32 20 80 20 4e 3c 3e  |.2 .(K=242 . N<>|
00000b70  32 29 4c 3d 32 31 3a 50  3d 31 38 3a 4e 3d 32 20  |2)L=21:P=18:N=2 |
00000b80  8b 20 e7 20 4b 3d 32 34  32 20 f2 6b 65 79 3a e1  |. . K=242 .key:.|
00000b90  0d 04 b0 32 20 e7 28 4b  3d 32 34 33 20 80 20 4e  |...2 .(K=243 . N|
00000ba0  3c 3e 33 29 4c 3d 34 31  3a 50 3d 33 38 3a 4e 3d  |<>3)L=41:P=38:N=|
00000bb0  33 20 8b 20 e7 20 4b 3d  32 34 33 20 f2 6b 65 79  |3 . . K=243 .key|
00000bc0  3a e1 0d 04 ba 0e 20 4c  4c 3d 4c 3a db 3a f2 74  |:..... LL=L:.:.t|
00000bd0  0d 04 c4 2e 20 f1 8a 30  2c 32 29 bd 31 34 35 3b  |.... ..0,2).145;|
00000be0  c4 33 39 2c bd 31 37 32  29 3b 8a 30 2c 32 31 29  |.39,.172);.0,21)|
00000bf0  bd 31 34 35 3b c4 33 39  2c bd 31 37 32 29 0d 04  |.145;.39,.172)..|
00000c00  ce 23 20 4f 4c 3d 4c 3a  e3 4c 3d 4c 20 b8 20 54  |.# OL=L:.L=L . T|
00000c10  4c 28 4e 29 3a f2 6c 69  6e 65 3a ed 3a 4c 3d 4f  |L(N):.line:.:L=O|
00000c20  4c 0d 04 d8 09 20 f2 61  6e 73 0d 04 e2 06 20 e1  |L.... .ans.... .|
00000c30  0d 04 ec 11 20 dd f2 74  3a 40 25 3d 26 30 30 30  |.... ..t:@%=&000|
00000c40  30 0d 04 f6 0e 20 e3 20  58 3d 30 20 b8 20 31 0d  |0.... . X=0 . 1.|
00000c50  05 00 51 20 f1 8a 30 2c  58 29 bd 31 34 31 3b bd  |..Q ..0,X).141;.|
00000c60  31 32 39 3b 22 53 75 70  65 72 43 61 6c 22 3b 8a  |129;"SuperCal";.|
00000c70  31 38 29 3b bd 31 33 32  3b 22 44 3a 22 3b 44 24  |18);.132;"D:";D$|
00000c80  3b 89 33 3b bd 31 33 33  3b 22 43 3a 22 3b 43 50  |;.3;.133;"C:";CP|
00000c90  24 3b 89 34 3b bd 31 33  31 3b 22 50 3a 22 3b 4e  |$;.4;.131;"P:";N|
00000ca0  0d 05 0a 19 20 ed 3a e7  20 44 24 3d 22 60 22 20  |.... .:. D$="`" |
00000cb0  40 25 3d 26 32 30 32 30  39 0d 05 14 06 20 e1 0d  |@%=&20209.... ..|
00000cc0  05 1e 0d 20 dd 20 f2 70  72 6e 74 72 0d 05 28 0a  |... . .prntr..(.|
00000cd0  20 ef 32 2c 32 31 0d 05  32 13 20 e3 58 3d 50 2b  | .2,21..2. .X=P+|
00000ce0  33 20 b8 20 54 4c 28 4e  29 0d 05 3c 2e 20 e7 28  |3 . TL(N)..<. .(|
00000cf0  53 24 28 58 29 3d 22 22  80 49 24 28 58 29 3d 22  |S$(X)="".I$(X)="|
00000d00  22 80 56 28 58 29 3d 30  80 41 28 58 29 3d 30 29  |".V(X)=0.A(X)=0)|
00000d10  f1 3a e5 8d 44 50 45 0d  05 46 4f 20 e7 20 56 28  |.:..DPE..FO . V(|
00000d20  58 29 3d 30 20 f1 8a 35  29 53 24 28 58 29 3b 8a  |X)=0 ..5)S$(X);.|
00000d30  38 29 49 24 28 58 29 3b  8a 33 30 29 41 28 58 29  |8)I$(X);.30)A(X)|
00000d40  8b 20 f1 8a 35 29 53 24  28 58 29 3b 8a 38 29 49  |. ..5)S$(X);.8)I|
00000d50  24 28 58 29 3b 8a 31 35  29 56 28 58 29 3b 8a 33  |$(X);.15)V(X);.3|
00000d60  30 29 41 28 58 29 0d 05  50 10 20 ed 3a ef 36 2c  |0)A(X)..P. .:.6,|
00000d70  33 3a f2 6b 65 79 0d 05  5a 06 20 e1 0d 05 64 0c  |3:.key..Z. ...d.|
00000d80  20 dd 20 f2 64 6f 75 74  0d 05 6e 24 20 4c 24 3d  | . .dout..n$ L$=|
00000d90  c4 32 2c 22 20 22 29 2b  22 46 69 6c 65 20 74 6f  |.2," ")+"File to|
00000da0  20 73 61 76 65 3a 52 22  3a f2 69 70 0d 05 78 0c  | save:R":.ip..x.|
00000db0  20 5a 3d ae 20 49 4e 24  0d 05 82 0e 20 e3 58 3d  | Z=. IN$.... .X=|
00000dc0  33 20 b8 20 37 35 0d 05  8c 23 20 f1 23 5a 2c 53  |3 . 75...# .#Z,S|
00000dd0  24 28 58 29 2c 49 24 28  58 29 2c 56 28 58 29 2c  |$(X),I$(X),V(X),|
00000de0  54 28 58 29 2c 41 28 58  29 0d 05 96 06 20 ed 0d  |T(X),A(X).... ..|
00000df0  05 a0 1a 20 f1 23 5a 2c  54 4c 28 31 29 2c 54 4c  |... .#Z,TL(1),TL|
00000e00  28 32 29 2c 54 4c 28 33  29 0d 05 aa 0d 20 d9 23  |(2),TL(3).... .#|
00000e10  5a 3a f2 6b 65 79 0d 05  b4 06 20 e1 0d 05 be 0b  |Z:.key.... .....|
00000e20  20 dd 20 f2 64 69 6e 0d  05 c8 24 20 4c 24 3d c4  | . .din...$ L$=.|
00000e30  32 2c 22 20 22 29 2b 22  46 69 6c 65 20 74 6f 20  |2," ")+"File to |
00000e40  6c 6f 61 64 3a 52 22 3a  f2 69 70 0d 05 d2 0c 20  |load:R":.ip.... |
00000e50  5a 3d ad 20 49 4e 24 0d  05 dc 11 20 e7 20 5a 3d  |Z=. IN$.... . Z=|
00000e60  30 20 f2 6b 65 79 3a e1  0d 05 e6 0e 20 e3 58 3d  |0 .key:..... .X=|
00000e70  33 20 b8 20 37 35 0d 05  f0 23 20 e8 23 5a 2c 53  |3 . 75...# .#Z,S|
00000e80  24 28 58 29 2c 49 24 28  58 29 2c 56 28 58 29 2c  |$(X),I$(X),V(X),|
00000e90  54 28 58 29 2c 41 28 58  29 0d 05 fa 06 20 ed 0d  |T(X),A(X).... ..|
00000ea0  06 04 1a 20 e8 23 5a 2c  54 4c 28 31 29 2c 54 4c  |... .#Z,TL(1),TL|
00000eb0  28 32 29 2c 54 4c 28 33  29 0d 06 0e 16 20 d9 23  |(2),TL(3).... .#|
00000ec0  5a 3a 4b 3d 32 34 31 3a  4e 3d 32 3a f2 6e 70 0d  |Z:K=241:N=2:.np.|
00000ed0  06 18 06 20 e1 0d 06 22  0a 20 dd 20 f2 6c 6b 0d  |... ...". . .lk.|
00000ee0  06 2c 3c 20 4f 4c 3d 4c  3a e3 4c 3d 58 2b 31 20  |.,< OL=L:.L=X+1 |
00000ef0  b8 20 37 30 3a e7 20 49  24 28 4c 29 3d 49 24 28  |. 70:. I$(L)=I$(|
00000f00  58 29 20 56 28 4c 29 3d  41 28 58 29 3a e7 20 4c  |X) V(L)=A(X):. L|
00000f10  2d 50 3c 32 31 20 f2 6c  69 6e 65 0d 06 36 36 20  |-P<21 .line..66 |
00000f20  52 24 3d c2 49 24 28 4c  2b 31 29 2c 31 29 3a e7  |R$=.I$(L+1),1):.|
00000f30  20 52 24 3d 22 25 22 20  4c 3d 4c 2b 31 3a f2 70  | R$="%" L=L+1:.p|
00000f40  6e 74 3a e7 20 4c 2d 50  3c 32 31 20 f2 6c 69 6e  |nt:. L-P<21 .lin|
00000f50  65 0d 06 40 0b 20 ed 3a  4c 3d 4f 4c 0d 06 4a 06  |e..@. .:L=OL..J.|
00000f60  20 e1 0d 06 54 1a 20 dd  20 f2 71 63 3a f1 8a 30  | ...T. . .qc:..0|
00000f70  2c 32 33 29 c4 33 39 2c  22 20 22 29 0d 06 5e 26  |,23).39," ")..^&|
00000f80  20 f1 8a 30 2c 32 32 29  bd 31 33 30 3b 22 50 72  | ..0,22).130;"Pr|
00000f90  69 6e 74 20 4d 69 6e 69  43 61 6c 3f 28 59 2f 4e  |int MiniCal?(Y/N|
00000fa0  29 22 0d 06 68 1b 20 51  3d a5 3a e7 20 44 24 3d  |)"..h. Q=.:. D$=|
00000fb0  22 60 22 20 40 25 3d 26  32 30 32 30 39 0d 06 72  |"`" @%=&20209..r|
00000fc0  52 20 f1 8a 31 2c 32 32  29 22 2b 31 30 30 25 20  |R ..1,22)"+100% |
00000fd0  6f 72 20 45 28 65 29 3a  52 20 22 3b 8a 31 37 2c  |or E(e):R ";.17,|
00000fe0  32 32 29 bd 31 33 36 3b  bd 31 33 32 3b 22 5d 22  |22).136;.132;"]"|
00000ff0  3b bd 31 33 37 3b bd 31  35 37 3b bd 31 33 31 3b  |;.137;.157;.131;|
00001000  8a 32 31 2c 32 33 29 bd  31 33 30 3b 22 3d 22 0d  |.21,23).130;"=".|
00001010  06 7c 0d 20 41 24 3d 22  30 22 3a f5 0d 06 86 2b  |.|. A$="0":....+|
00001020  20 e8 8a 32 33 2c 32 32  29 56 24 3a 50 24 3d 56  | ..23,22)V$:P$=V|
00001030  24 3a e7 28 56 24 3d 22  45 22 84 56 24 3d 22 65  |$:.(V$="E".V$="e|
00001040  22 29 8c 8d 64 42 46 0d  06 90 32 20 43 24 3d c0  |")..dBF...2 C$=.|
00001050  56 24 2c 31 29 3a e7 97  28 43 24 29 3e 34 38 20  |V$,1):..(C$)>48 |
00001060  ef 37 3a f1 8a 32 33 2c  32 32 29 c4 31 36 2c 22  |.7:..23,22).16,"|
00001070  20 22 29 3a e5 8d 74 46  46 0d 06 9a 59 20 e7 a7  | "):..tFF...Y ..|
00001080  56 24 2c 22 25 22 29 53  24 3d c0 56 24 2c 31 29  |V$,"%")S$=.V$,1)|
00001090  3a 56 24 3d c2 56 24 2c  a9 56 24 2d 31 29 3a 56  |:V$=.V$,.V$-1):V|
000010a0  3d bb 56 24 2a bb 41 24  2f 31 30 30 3a 56 24 3d  |=.V$*.A$/100:V$=|
000010b0  53 24 2b c3 28 56 29 3a  e7 20 53 24 3d 22 2a 22  |S$+.(V):. S$="*"|
000010c0  41 24 3d c3 28 56 29 3a  41 3d 56 3a e5 20 8d 74  |A$=.(V):A=V:. .t|
000010d0  6e 46 0d 06 a4 1b 20 41  24 3d 41 24 2b 56 24 3a  |nF.... A$=A$+V$:|
000010e0  41 3d a0 41 24 3a 41 24  3d c3 28 41 29 0d 06 ae  |A=.A$:A$=.(A)...|
000010f0  2c 20 f1 8a 32 33 2c 32  33 29 bd 31 33 30 3b 41  |, ..23,23).130;A|
00001100  3b c4 31 30 2c 22 20 22  29 3b 8a 32 33 2c 32 32  |;.10," ");.23,22|
00001110  29 c4 32 30 2c 22 20 22  29 0d 06 b8 2a 20 e7 28  |).20," ")...* .(|
00001120  51 3d 38 39 84 51 3d 31  32 31 29 ef 32 2c 32 31  |Q=89.Q=121).2,21|
00001130  3a f1 50 24 3b 8a 31 33  29 22 3d 22 3b 41 3a ef  |:.P$;.13)"=";A:.|
00001140  36 2c 33 0d 06 c2 3a 20  fd 28 56 24 3d 22 45 22  |6,3...: .(V$="E"|
00001150  84 56 24 3d 22 65 22 29  3a f1 8a 31 2c 32 32 29  |.V$="e"):..1,22)|
00001160  bd 31 35 36 3b c4 33 37  2c 22 20 22 29 3b 8a 31  |.156;.37," ");.1|
00001170  37 2c 32 33 29 c4 32 31  2c 22 20 22 29 0d 06 cc  |7,23).21," ")...|
00001180  23 20 e7 c0 41 24 2c 31  29 3d 22 2d 22 41 24 3d  |# ..A$,1)="-"A$=|
00001190  c2 41 24 2c a9 41 24 2d  31 29 3a 41 3d a0 41 24  |.A$,.A$-1):A=.A$|
000011a0  0d 06 d6 0b 20 f2 6b 65  79 3a e1 0d 06 e0 0b 20  |.... .key:..... |
000011b0  dd 20 f2 61 67 68 0d 06  ea 1b 20 ef 37 2c 36 2c  |. .agh.... .7,6,|
000011c0  33 3a 4b 3d 32 34 31 3a  4e 3d 34 3a f2 6e 70 3a  |3:K=241:N=4:.np:|
000011d0  e1 0d 06 f4 0b 20 dd 20  f2 70 6e 74 0d 06 fe 19  |..... . .pnt....|
000011e0  20 4e 24 3d c0 49 24 28  4c 29 2c a9 20 49 24 28  | N$=.I$(L),. I$(|
000011f0  4c 29 2d 31 29 0d 07 08  1f 20 50 53 3d bb 20 4e  |L)-1).... PS=. N|
00001200  24 3a 56 28 4c 29 3d 56  28 4c 2d 31 29 2a 50 53  |$:V(L)=V(L-1)*PS|
00001210  2f 31 30 30 0d 07 12 06  20 e1 0d 07 1c 0b 20 dd  |/100.... ..... .|
00001220  20 f2 68 6c 70 0d 07 26  13 20 db 3a f1 8a 30 2c  | .hlp..&. .:..0,|
00001230  34 29 3a f7 8d 44 76 47  0d 07 30 0e 20 e3 58 3d  |4):..DvG..0. .X=|
00001240  30 20 b8 20 31 32 0d 07  3a 09 20 f3 20 41 24 0d  |0 . 12..:. . A$.|
00001250  07 44 33 20 e7 58 3c 31  30 20 f1 8a 30 2c 58 2b  |.D3 .X<10 ..0,X+|
00001260  34 29 bd 31 32 39 3b 22  20 20 20 20 20 20 66 22  |4).129;"      f"|
00001270  3b 58 3b 8a 39 2c 58 2b  34 29 3b bd 31 33 31 3b  |;X;.9,X+4);.131;|
00001280  41 24 0d 07 4e 33 20 e7  58 3e 39 20 f1 8a 30 2c  |A$..N3 .X>9 ..0,|
00001290  58 2b 34 29 bd 31 32 39  3b 22 53 48 49 46 54 20  |X+4).129;"SHIFT |
000012a0  66 22 3b 58 2d 39 3b 8a  39 2c 58 2b 34 29 bd 31  |f";X-9;.9,X+4).1|
000012b0  33 31 3b 41 24 0d 07 58  08 20 ed 3a f1 0d 07 62  |31;A$..X. .:...b|
000012c0  2b 20 f1 bd 31 33 30 3b  22 4e 65 77 20 50 61 67  |+ ..130;"New Pag|
000012d0  65 20 74 6f 20 72 65 74  75 72 6e 20 74 6f 20 53  |e to return to S|
000012e0  75 70 65 72 43 61 6c 22  0d 07 6c 23 20 f5 3a 4b  |uperCal"..l# .:K|
000012f0  3d a5 3a fd 28 4b 3e 32  34 30 80 4b 3c 32 34 34  |=.:.(K>240.K<244|
00001300  29 3a 4e 3d 34 3a f2 6e  70 3a e1 0d 07 76 45 20  |):N=4:.np:...vE |
00001310  dc 20 53 75 62 74 6f 74  61 6c 73 2c 50 61 67 65  |. Subtotals,Page|
00001320  31 2c 50 61 67 65 32 2c  50 61 67 65 33 2c 49 6e  |1,Page2,Page3,In|
00001330  73 65 72 74 2c 44 65 6c  65 74 65 2c 43 6f 70 79  |sert,Delete,Copy|
00001340  2c 50 72 69 6e 74 2c 53  61 76 65 2c 4c 6f 61 64  |,Print,Save,Load|
00001350  0d 07 80 33 20 dc 20 51  75 69 63 6b 20 43 61 6c  |...3 . Quick Cal|
00001360  63 75 6c 61 74 6f 72 2c  20 54 72 61 6e 73 66 65  |culator, Transfe|
00001370  72 20 51 43 20 72 65 73  75 6c 74 2c 44 65 63 69  |r QC result,Deci|
00001380  6d 61 6c 0d ff                                    |mal..|
00001385