� POCKET SUNDIAL
� by Arthur Harvey
� (c) The Micro User
(� � �error
2�1
<
�title
F� �start
P�dial:�hours
Z�months:�frame
d�800,350:�"Print? (Y/N):"
n�key
x1� G$="Y" �4,1:�800,350:�"Print? (Y/N):":�dump
�	�:� �
�:
�� �title
��29,500;0;19,3,6;0;
��0,129:�0,3:�
�L=.8:M=500:N$="N"
��dial:�28,0,31,8,0
�
�131:�1:�
�.�0,8)"A POCKET SUNDIAL. by ArthurHarvey."
�D�'"A curious Sundial,but when assembled it does show the time !"
��600,900:�600,920
��0,2:Y=0
�� X=600 � -100 �-2

�85,X,900+Y:Y=20-Y:�

�'"Press any key..."


�key:�

":

,� �start:�22,1

6.�0,8)"For use near Latitude (23.5-90) :"L

@� L<23.5 � L>90 �7:�TvA

J*�0,12)"Which hemisphere ? (N/S)":N$=�

T&� �"NS",N$)=0 �7:�"N or S ?":�DJA

^L=�(L):M=150

h�22,0,29,M;0;:�5:�

r:

|� �dial

�$� 300*�L>300 H=300/�L � H=300/�L

�X=H*�L:b=700-(500*L/1.5)

��24,-M;0;1.6*X;800;

��triangle(.41)

��circle(h,x,y,-1)

��triangle(-.41)

��circle(h,x,y,1)

�� K=1 � 8:k=�(K*15)

�x=X-X*�k:�x,0:�7,x,800

��

��26,29,M;0;:H=H+30:�

��draw:�draw:H=H+30

��triangle(.45):�x,y
�triangle(-.45):�21,x,y
�
:
&� �hours:�4,1
0�-M,150:�" a.m.:"
:�-M,90:�" p.m.:"
D�-64,b+12:�"12 >"
N� K=2�8:k=�(K*15):x=X-X*�k
X�K<3�x-24,150 � �x-8,150
b�;12-K:�x-8,90:�;K
l�:�
v:
�� �months:�
�H=H+70:S=.05:� K=1 � 17
�� D,M$:� N$="S" D=-D-S
��triangle(D):�x,y:� M$
�� K=8 H=H-150:S=.2
��:�
�:
�� �frame:�26
�(�0,0:�0,1023:�1279,1023:�1279,0:�0,0
��0,900:�640,900
��640,905:�21,900,905
��21,900,895:�21,640,895
��640,1023:�21,640,0
�800,700:�"POCKET SUNDIAL"
�800,450:�"For Latitude"
�800,400:�;�(L);"deg. ";N$
 �50,935:�"Sun line."
*�
4:
>� �triangle(D):h=H/�D
Hx=h*�(L-D):y=h*�(L-D)+b
R�
\:
f� �circle(R,Xc,Yc,P)
pCt=�(L+.41*P)
zSt=�(L+.41*P)
�
Cp=1:Sp=0
��Xc-R*Ct,Yc-R*St
�� A=1 � 18
�CA=Cp*.985-Sp*.174
�SA=Sp*.985+Cp*.174
�x=Xc-R*(Ct*CA-St*SA)
�y=Yc-R*(St*CA+Ct*SA)
��Xc,Yc:�86+P,x,y
�Cp=CA:Sp=SA:�:�
�:
�� �draw:�0,b
�� K=1 � 4:� J=1 � 2
�� D,M$:� N$="S" D=-D
�triangle(D):�x,y:�

�85,0,b:�
H=H-30:�triangle(-.45)
$�x,y:�triangle(.45)
.
�87,x,y:�
8:
B� �dump
L*GIMAGE EPS V&EF
V�
`:
j� �key:*FX15
t
�7:G$=�:�
~:
�� �error:�3:�=17�DF@
��:�" at line ";�:�
�:
�A�-.41, ,-.4,JAN,-.3,FEB,-.13,MAR,.08,APR,.26,MAY,.38,JUN,.41,
�I�.41, ,.4, ,.31,JUL,.14,AUG,-.06,SEP,-.25,OCT,-.38, ,-.41,NOV,-.6,DEC
�

00000000  0d 00 0a 14 f4 20 50 4f  43 4b 45 54 20 53 55 4e  |..... POCKET SUN|
00000010  44 49 41 4c 0d 00 14 16  f4 20 62 79 20 41 72 74  |DIAL..... by Art|
00000020  68 75 72 20 48 61 72 76  65 79 0d 00 1e 18 f4 20  |hur Harvey..... |
00000030  28 63 29 20 54 68 65 20  4d 69 63 72 6f 20 55 73  |(c) The Micro Us|
00000040  65 72 0d 00 28 0e ee 20  85 20 f2 65 72 72 6f 72  |er..(.. . .error|
00000050  0d 00 32 06 eb 31 0d 00  3c 0a f2 74 69 74 6c 65  |..2..1..<..title|
00000060  0d 00 46 0c f5 20 f2 73  74 61 72 74 0d 00 50 10  |..F.. .start..P.|
00000070  f2 64 69 61 6c 3a f2 68  6f 75 72 73 0d 00 5a 12  |.dial:.hours..Z.|
00000080  f2 6d 6f 6e 74 68 73 3a  f2 66 72 61 6d 65 0d 00  |.months:.frame..|
00000090  64 1d ec 38 30 30 2c 33  35 30 3a f1 22 50 72 69  |d..800,350:."Pri|
000000a0  6e 74 3f 20 28 59 2f 4e  29 3a 22 0d 00 6e 08 f2  |nt? (Y/N):"..n..|
000000b0  6b 65 79 0d 00 78 31 e7  20 47 24 3d 22 59 22 20  |key..x1. G$="Y" |
000000c0  e6 34 2c 31 3a ec 38 30  30 2c 33 35 30 3a f1 22  |.4,1:.800,350:."|
000000d0  50 72 69 6e 74 3f 20 28  59 2f 4e 29 3a 22 3a f2  |Print? (Y/N):":.|
000000e0  64 75 6d 70 0d 00 82 09  f7 3a fd 20 a3 0d 00 8c  |dump.....:. ....|
000000f0  05 3a 0d 00 96 0c dd 20  f2 74 69 74 6c 65 0d 00  |.:..... .title..|
00000100  a0 17 ef 32 39 2c 35 30  30 3b 30 3b 31 39 2c 33  |...29,500;0;19,3|
00000110  2c 36 3b 30 3b 0d 00 aa  11 e6 30 2c 31 32 39 3a  |,6;0;.....0,129:|
00000120  e6 30 2c 33 3a da 0d 00  b4 15 4c 3d 2e 38 3a 4d  |.0,3:.....L=.8:M|
00000130  3d 35 30 30 3a 4e 24 3d  22 4e 22 0d 00 be 16 f2  |=500:N$="N".....|
00000140  64 69 61 6c 3a ef 32 38  2c 30 2c 33 31 2c 38 2c  |dial:.28,0,31,8,|
00000150  30 0d 00 c8 0d fb 31 33  31 3a fb 31 3a db 0d 00  |0.....131:.1:...|
00000160  d2 2e f1 8a 30 2c 38 29  22 41 20 50 4f 43 4b 45  |....0,8)"A POCKE|
00000170  54 20 53 55 4e 44 49 41  4c 2e 20 62 79 20 41 72  |T SUNDIAL. by Ar|
00000180  74 68 75 72 48 61 72 76  65 79 2e 22 0d 00 dc 44  |thurHarvey."...D|
00000190  f1 27 22 41 20 63 75 72  69 6f 75 73 20 53 75 6e  |.'"A curious Sun|
000001a0  64 69 61 6c 2c 62 75 74  20 77 68 65 6e 20 61 73  |dial,but when as|
000001b0  73 65 6d 62 6c 65 64 20  69 74 20 64 6f 65 73 20  |sembled it does |
000001c0  73 68 6f 77 20 74 68 65  20 74 69 6d 65 20 21 22  |show the time !"|
000001d0  0d 00 e6 15 ec 36 30 30  2c 39 30 30 3a df 36 30  |.....600,900:.60|
000001e0  30 2c 39 32 30 0d 00 f0  0c e6 30 2c 32 3a 59 3d  |0,920.....0,2:Y=|
000001f0  30 0d 00 fa 16 e3 20 58  3d 36 30 30 20 b8 20 2d  |0..... X=600 . -|
00000200  31 30 30 20 88 2d 32 0d  01 04 18 f0 38 35 2c 58  |100 .-2.....85,X|
00000210  2c 39 30 30 2b 59 3a 59  3d 32 30 2d 59 3a ed 0d  |,900+Y:Y=20-Y:..|
00000220  01 0e 18 f1 27 22 50 72  65 73 73 20 61 6e 79 20  |....'"Press any |
00000230  6b 65 79 2e 2e 2e 22 0d  01 18 0a f2 6b 65 79 3a  |key...".....key:|
00000240  e1 0d 01 22 05 3a 0d 01  2c 12 dd 20 f2 73 74 61  |...".:..,.. .sta|
00000250  72 74 3a ef 32 32 2c 31  0d 01 36 2e e8 8a 30 2c  |rt:.22,1..6...0,|
00000260  38 29 22 46 6f 72 20 75  73 65 20 6e 65 61 72 20  |8)"For use near |
00000270  4c 61 74 69 74 75 64 65  20 28 32 33 2e 35 2d 39  |Latitude (23.5-9|
00000280  30 29 20 3a 22 4c 0d 01  40 1c e7 20 4c 3c 32 33  |0) :"L..@.. L<23|
00000290  2e 35 20 84 20 4c 3e 39  30 20 ef 37 3a e5 8d 54  |.5 . L>90 .7:..T|
000002a0  76 41 0d 01 4a 2a f1 8a  30 2c 31 32 29 22 57 68  |vA..J*..0,12)"Wh|
000002b0  69 63 68 20 68 65 6d 69  73 70 68 65 72 65 20 3f  |ich hemisphere ?|
000002c0  20 28 4e 2f 53 29 22 3a  4e 24 3d be 0d 01 54 26  | (N/S)":N$=...T&|
000002d0  e7 20 a7 22 4e 53 22 2c  4e 24 29 3d 30 20 ef 37  |. ."NS",N$)=0 .7|
000002e0  3a f1 22 4e 20 6f 72 20  53 20 3f 22 3a e5 8d 44  |:."N or S ?":..D|
000002f0  4a 41 0d 01 5e 10 4c 3d  b2 28 4c 29 3a 4d 3d 31  |JA..^.L=.(L):M=1|
00000300  35 30 0d 01 68 16 ef 32  32 2c 30 2c 32 39 2c 4d  |50..h..22,0,29,M|
00000310  3b 30 3b 3a ef 35 3a e1  0d 01 72 05 3a 0d 01 7c  |;0;:.5:...r.:..||
00000320  0b dd 20 f2 64 69 61 6c  0d 01 86 24 e7 20 33 30  |.. .dial...$. 30|
00000330  30 2a b7 4c 3e 33 30 30  20 48 3d 33 30 30 2f b5  |0*.L>300 H=300/.|
00000340  4c 20 8b 20 48 3d 33 30  30 2f 9b 4c 0d 01 90 1c  |L . H=300/.L....|
00000350  58 3d 48 2a 9b 4c 3a 62  3d 37 30 30 2d 28 35 30  |X=H*.L:b=700-(50|
00000360  30 2a 4c 2f 31 2e 35 29  0d 01 9a 17 ef 32 34 2c  |0*L/1.5).....24,|
00000370  2d 4d 3b 30 3b 31 2e 36  2a 58 3b 38 30 30 3b 0d  |-M;0;1.6*X;800;.|
00000380  01 a4 12 f2 74 72 69 61  6e 67 6c 65 28 2e 34 31  |....triangle(.41|
00000390  29 0d 01 ae 15 f2 63 69  72 63 6c 65 28 68 2c 78  |).....circle(h,x|
000003a0  2c 79 2c 2d 31 29 0d 01  b8 13 f2 74 72 69 61 6e  |,y,-1).....trian|
000003b0  67 6c 65 28 2d 2e 34 31  29 0d 01 c2 14 f2 63 69  |gle(-.41).....ci|
000003c0  72 63 6c 65 28 68 2c 78  2c 79 2c 31 29 0d 01 cc  |rcle(h,x,y,1)...|
000003d0  17 e3 20 4b 3d 31 20 b8  20 38 3a 6b 3d b2 28 4b  |.. K=1 . 8:k=.(K|
000003e0  2a 31 35 29 0d 01 d6 1a  78 3d 58 2d 58 2a 9b 6b  |*15)....x=X-X*.k|
000003f0  3a ec 78 2c 30 3a f0 37  2c 78 2c 38 30 30 0d 01  |:.x,0:.7,x,800..|
00000400  e0 05 ed 0d 01 ea 18 ef  32 36 2c 32 39 2c 4d 3b  |........26,29,M;|
00000410  30 3b 3a 48 3d 48 2b 33  30 3a f7 0d 01 f4 16 f2  |0;:H=H+30:......|
00000420  64 72 61 77 3a f2 64 72  61 77 3a 48 3d 48 2b 33  |draw:.draw:H=H+3|
00000430  30 0d 01 fe 17 f2 74 72  69 61 6e 67 6c 65 28 2e  |0.....triangle(.|
00000440  34 35 29 3a ec 78 2c 79  0d 02 08 1b f2 74 72 69  |45):.x,y.....tri|
00000450  61 6e 67 6c 65 28 2d 2e  34 35 29 3a f0 32 31 2c  |angle(-.45):.21,|
00000460  78 2c 79 0d 02 12 05 e1  0d 02 1c 05 3a 0d 02 26  |x,y.........:..&|
00000470  11 dd 20 f2 68 6f 75 72  73 3a e6 34 2c 31 0d 02  |.. .hours:.4,1..|
00000480  30 15 ec 2d 4d 2c 31 35  30 3a f1 22 20 61 2e 6d  |0..-M,150:." a.m|
00000490  2e 3a 22 0d 02 3a 14 ec  2d 4d 2c 39 30 3a f1 22  |.:"..:..-M,90:."|
000004a0  20 70 2e 6d 2e 3a 22 0d  02 44 15 ec 2d 36 34 2c  | p.m.:"..D..-64,|
000004b0  62 2b 31 32 3a f1 22 31  32 20 3e 22 0d 02 4e 1e  |b+12:."12 >"..N.|
000004c0  e3 20 4b 3d 32 b8 38 3a  6b 3d b2 28 4b 2a 31 35  |. K=2.8:k=.(K*15|
000004d0  29 3a 78 3d 58 2d 58 2a  9b 6b 0d 02 58 1c e7 4b  |):x=X-X*.k..X..K|
000004e0  3c 33 ec 78 2d 32 34 2c  31 35 30 20 8b 20 ec 78  |<3.x-24,150 . .x|
000004f0  2d 38 2c 31 35 30 0d 02  62 16 f1 3b 31 32 2d 4b  |-8,150..b..;12-K|
00000500  3a ec 78 2d 38 2c 39 30  3a f1 3b 4b 0d 02 6c 07  |:.x-8,90:.;K..l.|
00000510  ed 3a e1 0d 02 76 05 3a  0d 02 80 0f dd 20 f2 6d  |.:...v.:..... .m|
00000520  6f 6e 74 68 73 3a f7 0d  02 8a 1b 48 3d 48 2b 37  |onths:.....H=H+7|
00000530  30 3a 53 3d 2e 30 35 3a  e3 20 4b 3d 31 20 b8 20  |0:S=.05:. K=1 . |
00000540  31 37 0d 02 94 1a f3 20  44 2c 4d 24 3a e7 20 4e  |17..... D,M$:. N|
00000550  24 3d 22 53 22 20 44 3d  2d 44 2d 53 0d 02 9e 1a  |$="S" D=-D-S....|
00000560  f2 74 72 69 61 6e 67 6c  65 28 44 29 3a ec 78 2c  |.triangle(D):.x,|
00000570  79 3a f1 20 4d 24 0d 02  a8 16 e7 20 4b 3d 38 20  |y:. M$..... K=8 |
00000580  48 3d 48 2d 31 35 30 3a  53 3d 2e 32 0d 02 b2 07  |H=H-150:S=.2....|
00000590  ed 3a e1 0d 02 bc 05 3a  0d 02 c6 10 dd 20 f2 66  |.:.....:..... .f|
000005a0  72 61 6d 65 3a ef 32 36  0d 02 d0 28 ec 30 2c 30  |rame:.26...(.0,0|
000005b0  3a df 30 2c 31 30 32 33  3a df 31 32 37 39 2c 31  |:.0,1023:.1279,1|
000005c0  30 32 33 3a df 31 32 37  39 2c 30 3a df 30 2c 30  |023:.1279,0:.0,0|
000005d0  0d 02 da 13 ec 30 2c 39  30 30 3a df 36 34 30 2c  |.....0,900:.640,|
000005e0  39 30 30 0d 02 e4 18 ec  36 34 30 2c 39 30 35 3a  |900.....640,905:|
000005f0  f0 32 31 2c 39 30 30 2c  39 30 35 0d 02 ee 1b f0  |.21,900,905.....|
00000600  32 31 2c 39 30 30 2c 38  39 35 3a f0 32 31 2c 36  |21,900,895:.21,6|
00000610  34 30 2c 38 39 35 0d 02  f8 17 ec 36 34 30 2c 31  |40,895.....640,1|
00000620  30 32 33 3a f0 32 31 2c  36 34 30 2c 30 0d 03 02  |023:.21,640,0...|
00000630  1e ec 38 30 30 2c 37 30  30 3a f1 22 50 4f 43 4b  |..800,700:."POCK|
00000640  45 54 20 53 55 4e 44 49  41 4c 22 0d 03 0c 1c ec  |ET SUNDIAL".....|
00000650  38 30 30 2c 34 35 30 3a  f1 22 46 6f 72 20 4c 61  |800,450:."For La|
00000660  74 69 74 75 64 65 22 0d  03 16 1e ec 38 30 30 2c  |titude".....800,|
00000670  34 30 30 3a f1 3b 9d 28  4c 29 3b 22 64 65 67 2e  |400:.;.(L);"deg.|
00000680  20 22 3b 4e 24 0d 03 20  18 ec 35 30 2c 39 33 35  | ";N$.. ..50,935|
00000690  3a f1 22 53 75 6e 20 6c  69 6e 65 2e 22 0d 03 2a  |:."Sun line."..*|
000006a0  05 e1 0d 03 34 05 3a 0d  03 3e 19 dd 20 f2 74 72  |....4.:..>.. .tr|
000006b0  69 61 6e 67 6c 65 28 44  29 3a 68 3d 48 2f 9b 44  |iangle(D):h=H/.D|
000006c0  0d 03 48 1b 78 3d 68 2a  9b 28 4c 2d 44 29 3a 79  |..H.x=h*.(L-D):y|
000006d0  3d 68 2a b5 28 4c 2d 44  29 2b 62 0d 03 52 05 e1  |=h*.(L-D)+b..R..|
000006e0  0d 03 5c 05 3a 0d 03 66  18 dd 20 f2 63 69 72 63  |..\.:..f.. .circ|
000006f0  6c 65 28 52 2c 58 63 2c  59 63 2c 50 29 0d 03 70  |le(R,Xc,Yc,P)..p|
00000700  11 43 74 3d 9b 28 4c 2b  2e 34 31 2a 50 29 0d 03  |.Ct=.(L+.41*P)..|
00000710  7a 11 53 74 3d b5 28 4c  2b 2e 34 31 2a 50 29 0d  |z.St=.(L+.41*P).|
00000720  03 84 0d 43 70 3d 31 3a  53 70 3d 30 0d 03 8e 14  |...Cp=1:Sp=0....|
00000730  ec 58 63 2d 52 2a 43 74  2c 59 63 2d 52 2a 53 74  |.Xc-R*Ct,Yc-R*St|
00000740  0d 03 98 0e e3 20 41 3d  31 20 b8 20 31 38 0d 03  |..... A=1 . 18..|
00000750  a2 16 43 41 3d 43 70 2a  2e 39 38 35 2d 53 70 2a  |..CA=Cp*.985-Sp*|
00000760  2e 31 37 34 0d 03 ac 16  53 41 3d 53 70 2a 2e 39  |.174....SA=Sp*.9|
00000770  38 35 2b 43 70 2a 2e 31  37 34 0d 03 b6 18 78 3d  |85+Cp*.174....x=|
00000780  58 63 2d 52 2a 28 43 74  2a 43 41 2d 53 74 2a 53  |Xc-R*(Ct*CA-St*S|
00000790  41 29 0d 03 c0 18 79 3d  59 63 2d 52 2a 28 53 74  |A)....y=Yc-R*(St|
000007a0  2a 43 41 2b 43 74 2a 53  41 29 0d 03 ca 14 ec 58  |*CA+Ct*SA).....X|
000007b0  63 2c 59 63 3a f0 38 36  2b 50 2c 78 2c 79 0d 03  |c,Yc:.86+P,x,y..|
000007c0  d4 13 43 70 3d 43 41 3a  53 70 3d 53 41 3a ed 3a  |..Cp=CA:Sp=SA:.:|
000007d0  e1 0d 03 de 05 3a 0d 03  e8 10 dd 20 f2 64 72 61  |.....:..... .dra|
000007e0  77 3a ec 30 2c 62 0d 03  f2 17 e3 20 4b 3d 31 20  |w:.0,b..... K=1 |
000007f0  b8 20 34 3a e3 20 4a 3d  31 20 b8 20 32 0d 03 fc  |. 4:. J=1 . 2...|
00000800  18 f3 20 44 2c 4d 24 3a  e7 20 4e 24 3d 22 53 22  |.. D,M$:. N$="S"|
00000810  20 44 3d 2d 44 0d 04 06  17 f2 74 72 69 61 6e 67  | D=-D.....triang|
00000820  6c 65 28 44 29 3a df 78  2c 79 3a ed 0d 04 10 0d  |le(D):.x,y:.....|
00000830  f0 38 35 2c 30 2c 62 3a  ed 0d 04 1a 1a 48 3d 48  |.85,0,b:.....H=H|
00000840  2d 33 30 3a f2 74 72 69  61 6e 67 6c 65 28 2d 2e  |-30:.triangle(-.|
00000850  34 35 29 0d 04 24 17 df  78 2c 79 3a f2 74 72 69  |45)..$..x,y:.tri|
00000860  61 6e 67 6c 65 28 2e 34  35 29 0d 04 2e 0d f0 38  |angle(.45).....8|
00000870  37 2c 78 2c 79 3a e1 0d  04 38 05 3a 0d 04 42 0b  |7,x,y:...8.:..B.|
00000880  dd 20 f2 64 75 6d 70 0d  04 4c 14 2a 47 49 4d 41  |. .dump..L.*GIMA|
00000890  47 45 20 45 50 53 20 56  26 45 46 0d 04 56 05 e1  |GE EPS V&EF..V..|
000008a0  0d 04 60 05 3a 0d 04 6a  10 dd 20 f2 6b 65 79 3a  |..`.:..j.. .key:|
000008b0  2a 46 58 31 35 0d 04 74  0d ef 37 3a 47 24 3d be  |*FX15..t..7:G$=.|
000008c0  3a e1 0d 04 7e 05 3a 0d  04 88 1a dd 20 f2 65 72  |:...~.:..... .er|
000008d0  72 6f 72 3a ef 33 3a e7  9f 3d 31 37 e5 8d 44 46  |ror:.3:..=17..DF|
000008e0  40 0d 04 92 16 f6 3a f1  22 20 61 74 20 6c 69 6e  |@.....:." at lin|
000008f0  65 20 22 3b 9e 3a e0 0d  04 9c 05 3a 0d 04 a6 41  |e ";.:.....:...A|
00000900  dc 2d 2e 34 31 2c 20 2c  2d 2e 34 2c 4a 41 4e 2c  |.-.41, ,-.4,JAN,|
00000910  2d 2e 33 2c 46 45 42 2c  2d 2e 31 33 2c 4d 41 52  |-.3,FEB,-.13,MAR|
00000920  2c 2e 30 38 2c 41 50 52  2c 2e 32 36 2c 4d 41 59  |,.08,APR,.26,MAY|
00000930  2c 2e 33 38 2c 4a 55 4e  2c 2e 34 31 2c 0d 04 b0  |,.38,JUN,.41,...|
00000940  49 dc 2e 34 31 2c 20 2c  2e 34 2c 20 2c 2e 33 31  |I..41, ,.4, ,.31|
00000950  2c 4a 55 4c 2c 2e 31 34  2c 41 55 47 2c 2d 2e 30  |,JUL,.14,AUG,-.0|
00000960  36 2c 53 45 50 2c 2d 2e  32 35 2c 4f 43 54 2c 2d  |6,SEP,-.25,OCT,-|
00000970  2e 33 38 2c 20 2c 2d 2e  34 31 2c 4e 4f 56 2c 2d  |.38, ,-.41,NOV,-|
00000980  2e 36 2c 44 45 43 0d ff                           |.6,DEC..|
00000988