home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / OTL-BBU1.DMS / in.adf / AcidSource / datelib < prev    next >
Unknown  |  1994-04-04  |  3.6 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% gt2 Kopftext: '!libheader' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 21 6c 69 62 68 65 61 64 | 65 72 7b 23 64 61 74 65 |!libhead|er{#date|
|00000010| 6c 69 62 2c 30 2c 30 2c | 30 2c 30 7d 00 00 21 61 |lib,0,0,|0,0}..!a|
|00000020| 66 75 6e 63 74 69 6f 6e | 20 7b 23 6c 6f 6e 67 7d |function| {#long}|
|00000030| 00 21 61 72 67 73 00 21 | 6c 69 62 73 20 7b 23 64 |.!args.!|libs {#d|
|00000040| 6f 73 6c 69 62 2c 6c 61 | 36 7d 00 21 73 75 62 73 |oslib,la|6}.!subs|
|00000050| 20 7b 5f 64 61 74 65 2c | 30 2c 30 7d 00 21 6e 61 | {_date,|0,0}.!na|
|00000060| 6d 65 20 7b 22 53 79 73 | 74 65 6d 44 61 74 65 22 |me {"Sys|temDate"|
|00000070| 2c 22 52 65 74 75 72 6e | 73 20 73 79 73 74 65 6d |,"Return|s system|
|00000080| 20 64 61 74 65 20 61 73 | 20 6e 75 6d 62 65 72 20 | date as| number |
|00000090| 6f 66 20 64 61 79 73 20 | 73 69 6e 63 65 20 31 2f |of days |since 1/|
|000000a0| 31 2f 31 39 37 38 22 7d | 00 00 21 61 66 75 6e 63 |1/1978"}|..!afunc|
|000000b0| 74 69 6f 6e 20 7b 23 73 | 74 72 69 6e 67 7d 00 21 |tion {#s|tring}.!|
|000000c0| 61 72 67 73 20 7b 23 6c | 6f 6e 67 7d 00 21 6c 69 |args {#l|ong}.!li|
|000000d0| 62 73 00 21 73 75 62 73 | 20 7b 5f 64 61 74 65 73 |bs.!subs| {_dates|
|000000e0| 74 72 2c 30 2c 30 7d 00 | 21 6e 61 6d 65 20 7b 22 |tr,0,0}.|!name {"|
|000000f0| 44 61 74 65 24 22 2c 22 | 64 61 79 73 2e 6c 20 3b |Date$","|days.l ;|
|00000100| 63 6f 6e 76 65 72 74 73 | 20 64 61 79 73 20 73 69 |converts| days si|
|00000110| 6e 63 65 20 31 2f 31 2f | 31 39 37 38 20 74 6f 20 |nce 1/1/|1978 to |
|00000120| 64 61 74 65 20 73 74 72 | 69 6e 67 22 7d 00 00 21 |date str|ing"}..!|
|00000130| 61 66 75 6e 63 74 69 6f | 6e 20 7b 23 6c 6f 6e 67 |afunctio|n {#long|
|00000140| 7d 00 21 61 72 67 73 20 | 7b 23 73 74 72 69 6e 67 |}.!args |{#string|
|00000150| 7d 00 21 6c 69 62 73 00 | 21 73 75 62 73 20 7b 5f |}.!libs.|!subs {_|
|00000160| 63 61 6c 63 64 61 79 73 | 2c 30 2c 30 7d 00 21 6e |calcdays|,0,0}.!n|
|00000170| 61 6d 65 20 7b 22 4e 75 | 6d 44 61 79 73 22 2c 22 |ame {"Nu|mDays","|
|00000180| 64 61 74 65 24 20 3b 63 | 6f 6e 76 65 72 74 73 20 |date$ ;c|onverts |
|00000190| 64 64 2f 6d 6d 2f 79 79 | 79 79 20 74 6f 20 64 61 |dd/mm/yy|yy to da|
|000001a0| 79 73 20 73 69 6e 63 65 | 20 31 2f 31 2f 31 39 37 |ys since| 1/1/197|
|000001b0| 38 22 7d 00 00 21 61 73 | 74 61 74 65 6d 65 6e 74 |8"}..!as|tatement|
|000001c0| 00 21 61 72 67 73 20 7b | 23 77 6f 72 64 7d 00 21 |.!args {|#word}.!|
|000001d0| 6c 69 62 73 00 21 73 75 | 62 73 20 7b 5f 64 61 74 |libs.!su|bs {_dat|
|000001e0| 65 66 6f 72 6d 61 74 2c | 30 2c 30 7d 00 21 6e 61 |eformat,|0,0}.!na|
|000001f0| 6d 65 20 7b 22 44 61 74 | 65 46 6f 72 6d 61 74 22 |me {"Dat|eFormat"|
|00000200| 2c 22 30 3d 64 64 2f 6d | 6d 2f 79 79 79 79 20 31 |,"0=dd/m|m/yyyy 1|
|00000210| 3d 6d 6d 2f 64 64 2f 79 | 79 79 79 22 7d 00 00 21 |=mm/dd/y|yyy"}..!|
|00000220| 61 66 75 6e 63 74 69 6f | 6e 20 7b 23 77 6f 72 64 |afunctio|n {#word|
|00000230| 7d 00 21 61 72 67 73 00 | 21 6c 69 62 73 00 21 73 |}.!args.|!libs.!s|
|00000240| 75 62 73 20 7b 5f 64 61 | 79 73 2c 30 2c 30 7d 00 |ubs {_da|ys,0,0}.|
|00000250| 21 6e 61 6d 65 20 7b 22 | 44 61 79 73 22 2c 22 20 |!name {"|Days"," |
|00000260| 3b 72 65 74 75 72 6e 73 | 20 64 61 79 20 63 61 6c |;returns| day cal|
|00000270| 63 75 6c 61 74 65 64 20 | 69 6e 20 6c 61 73 74 20 |culated |in last |
|00000280| 63 61 6c 6c 20 74 6f 20 | 64 61 74 65 24 22 7d 00 |call to |date$"}.|
|00000290| 00 21 61 66 75 6e 63 74 | 69 6f 6e 20 7b 23 77 6f |.!afunct|ion {#wo|
|000002a0| 72 64 7d 00 21 61 72 67 | 73 00 21 6c 69 62 73 00 |rd}.!arg|s.!libs.|
|000002b0| 21 73 75 62 73 20 7b 5f | 6d 6f 6e 74 68 73 2c 30 |!subs {_|months,0|
|000002c0| 2c 30 7d 00 21 6e 61 6d | 65 20 7b 22 4d 6f 6e 74 |,0}.!nam|e {"Mont|
|000002d0| 68 73 22 2c 22 20 3b 72 | 65 74 75 72 6e 73 20 6d |hs"," ;r|eturns m|
|000002e0| 6f 6e 74 68 20 63 61 6c | 63 75 6c 61 74 65 64 20 |onth cal|culated |
|000002f0| 69 6e 20 6c 61 73 74 20 | 63 61 6c 6c 20 74 6f 20 |in last |call to |
|00000300| 64 61 74 65 24 22 7d 00 | 00 21 61 66 75 6e 63 74 |date$"}.|.!afunct|
|00000310| 69 6f 6e 20 7b 23 77 6f | 72 64 7d 00 21 61 72 67 |ion {#wo|rd}.!arg|
|00000320| 73 00 21 6c 69 62 73 00 | 21 73 75 62 73 20 7b 5f |s.!libs.|!subs {_|
|00000330| 79 65 61 72 73 2c 30 2c | 30 7d 00 21 6e 61 6d 65 |years,0,|0}.!name|
|00000340| 20 7b 22 59 65 61 72 73 | 22 2c 22 20 3b 72 65 74 | {"Years|"," ;ret|
|00000350| 75 72 6e 73 20 79 65 61 | 72 20 63 61 6c 63 75 6c |urns yea|r calcul|
|00000360| 61 74 65 64 20 69 6e 20 | 6c 61 73 74 20 63 61 6c |ated in |last cal|
|00000370| 6c 20 74 6f 20 64 61 74 | 65 24 22 7d 00 00 21 61 |l to dat|e$"}..!a|
|00000380| 66 75 6e 63 74 69 6f 6e | 20 7b 23 77 6f 72 64 7d |function| {#word}|
|00000390| 00 21 61 72 67 73 00 21 | 6c 69 62 73 00 21 73 75 |.!args.!|libs.!su|
|000003a0| 62 73 20 7b 5f 77 65 65 | 6b 64 61 79 2c 30 2c 30 |bs {_wee|kday,0,0|
|000003b0| 7d 00 21 6e 61 6d 65 20 | 7b 22 57 65 65 6b 44 61 |}.!name |{"WeekDa|
|000003c0| 79 22 2c 22 20 3b 72 65 | 74 75 72 6e 73 20 64 61 |y"," ;re|turns da|
|000003d0| 79 20 6f 66 20 77 65 65 | 6b 20 63 61 6c 63 75 6c |y of wee|k calcul|
|000003e0| 61 74 65 64 20 69 6e 20 | 6c 61 73 74 20 63 61 6c |ated in |last cal|
|000003f0| 6c 20 74 6f 20 64 61 74 | 65 24 22 7d 00 00 21 61 |l to dat|e$"}..!a|
|00000400| 66 75 6e 63 74 69 6f 6e | 20 7b 23 77 6f 72 64 7d |function| {#word}|
|00000410| 00 21 61 72 67 73 00 21 | 6c 69 62 73 20 7b 23 64 |.!args.!|libs {#d|
|00000420| 6f 73 6c 69 62 2c 6c 61 | 36 7d 00 21 73 75 62 73 |oslib,la|6}.!subs|
|00000430| 20 7b 5f 68 6f 75 72 73 | 2c 30 2c 30 7d 00 21 6e | {_hours|,0,0}.!n|
|00000440| 61 6d 65 20 7b 22 48 6f | 75 72 73 22 2c 22 20 3b |ame {"Ho|urs"," ;|
|00000450| 67 65 74 73 20 73 79 73 | 74 65 6d 20 74 69 6d 65 |gets sys|tem time|
|00000460| 20 61 6e 64 20 72 65 74 | 75 72 6e 73 20 68 6f 75 | and ret|urns hou|
|00000470| 72 20 6f 66 20 64 61 79 | 22 7d 00 00 21 61 66 75 |r of day|"}..!afu|
|00000480| 6e 63 74 69 6f 6e 20 7b | 23 77 6f 72 64 7d 00 21 |nction {|#word}.!|
|00000490| 61 72 67 73 00 21 6c 69 | 62 73 00 21 73 75 62 73 |args.!li|bs.!subs|
|000004a0| 20 7b 5f 6d 69 6e 73 2c | 30 2c 30 7d 00 21 6e 61 | {_mins,|0,0}.!na|
|000004b0| 6d 65 20 7b 22 4d 69 6e | 73 22 2c 22 20 3b 72 65 |me {"Min|s"," ;re|
|000004c0| 74 75 72 6e 73 20 6d 69 | 6e 75 74 65 73 20 63 61 |turns mi|nutes ca|
|000004d0| 6c 63 75 6c 61 74 65 64 | 20 61 74 20 6c 61 73 74 |lculated| at last|
|000004e0| 20 63 61 6c 6c 20 74 6f | 20 68 6f 75 72 22 7d 00 | call to| hour"}.|
|000004f0| 00 21 61 66 75 6e 63 74 | 69 6f 6e 20 7b 23 77 6f |.!afunct|ion {#wo|
|00000500| 72 64 7d 00 21 61 72 67 | 73 00 21 6c 69 62 73 00 |rd}.!arg|s.!libs.|
|00000510| 21 73 75 62 73 20 7b 5f | 73 65 63 73 2c 30 2c 30 |!subs {_|secs,0,0|
|00000520| 7d 00 21 6e 61 6d 65 20 | 7b 22 53 65 63 73 22 2c |}.!name |{"Secs",|
|00000530| 22 20 3b 72 65 74 75 72 | 6e 73 20 73 65 63 6f 6e |" ;retur|ns secon|
|00000540| 64 73 20 63 61 6c 63 75 | 6c 61 74 65 64 20 61 74 |ds calcu|lated at|
|00000550| 20 6c 61 73 74 20 63 61 | 6c 6c 20 74 6f 20 68 6f | last ca|ll to ho|
|00000560| 75 72 22 7d 00 00 21 6c | 69 62 66 69 6e 00 00 23 |ur"}..!l|ibfin..#|
|00000570| 64 61 79 73 69 6e 71 75 | 61 64 79 72 3d 33 36 35 |daysinqu|adyr=365|
|00000580| 2a 34 2b 31 20 20 20 20 | 20 20 20 20 20 20 20 20 |*4+1 | |
|00000590| 20 20 20 20 20 20 3b 71 | 75 61 64 79 72 20 73 74 | ;q|uadyr st|
|000005a0| 61 6e 64 73 20 66 6f 72 | 20 34 20 79 65 61 72 20 |ands for| 4 year |
|000005b0| 63 79 63 6c 65 00 23 64 | 61 79 73 70 31 39 37 38 |cycle.#d|aysp1978|
|000005c0| 3d 23 64 61 79 73 69 6e | 71 75 61 64 79 72 2a 34 |=#daysin|quadyr*4|
|000005d0| 39 34 2b 33 36 36 2b 33 | 36 35 20 20 20 3b 64 61 |94+366+3|65 ;da|
|000005e0| 79 73 20 66 72 6f 6d 20 | 30 2f 30 2f 30 20 74 6f |ys from |0/0/0 to|
|000005f0| 20 31 2f 31 2f 37 38 00 | 00 2e 5f 68 6f 75 72 73 | 1/1/78.|.._hours|
|00000600| 3a 00 20 20 80 7e 2e 6c | 20 23 73 74 61 6d 70 2c |:. .~.l| #stamp,|
|00000610| 64 31 3a 80 79 20 20 5f | 44 61 74 65 53 74 61 6d |d1:.y _|DateStam|
|00000620| 70 28 61 36 29 00 20 20 | 80 7e 2e 6c 20 73 74 61 |p(a6). |.~.l sta|
|00000630| 6d 70 2b 34 28 70 63 29 | 2c 64 30 3a 80 72 20 23 |mp+4(pc)|,d0:.r #|
|00000640| 36 30 2c 64 30 3a 80 94 | 00 2e 5f 6d 69 6e 73 3a |60,d0:..|.._mins:|
|00000650| 00 20 20 80 7e 2e 6c 20 | 73 74 61 6d 70 2b 34 28 |. .~.l |stamp+4(|
|00000660| 70 63 29 2c 64 30 3a 80 | 72 20 23 36 30 2c 64 30 |pc),d0:.|r #60,d0|
|00000670| 3a 80 ac 20 64 30 3a 80 | 94 00 2e 5f 73 65 63 73 |:.. d0:.|..._secs|
|00000680| 3a 00 20 20 80 7e 2e 6c | 20 73 74 61 6d 70 2b 38 |:. .~.l| stamp+8|
|00000690| 28 70 63 29 2c 64 30 3a | 80 72 20 23 35 30 2c 64 |(pc),d0:|.r #50,d|
|000006a0| 30 3a 80 94 00 00 2e 5f | 64 61 74 65 66 6f 72 6d |0:....._|dateform|
|000006b0| 61 74 3a 00 20 20 80 7e | 20 64 30 2c 64 61 74 65 |at:. .~| d0,date|
|000006c0| 66 6f 72 6d 61 74 3a 80 | 94 00 00 64 61 74 65 66 |format:.|...datef|
|000006d0| 6f 72 6d 61 74 3a 80 25 | 20 30 00 00 2e 5f 64 61 |ormat:.%| 0..._da|
|000006e0| 74 65 3a 00 20 20 80 7e | 2e 6c 20 23 73 74 61 6d |te:. .~|.l #stam|
|000006f0| 70 2c 64 31 3a 80 79 20 | 20 5f 44 61 74 65 53 74 |p,d1:.y | _DateSt|
|00000700| 61 6d 70 28 61 36 29 3a | 80 7e 2e 6c 20 73 74 61 |amp(a6):|.~.l sta|
|00000710| 6d 70 28 70 63 29 2c 64 | 30 3a 80 94 00 00 2e 5f |mp(pc),d|0:....._|
|00000720| 64 61 74 65 73 74 72 3a | 00 20 20 80 3d 2e 6c 20 |datestr:|. .=.l |
|00000730| 23 64 61 79 73 70 31 39 | 37 38 2c 64 30 3a 80 7e |#daysp19|78,d0:.~|
|00000740| 2e 6c 20 64 30 2c 74 6f | 74 64 61 79 3a 80 7e 2e |.l d0,to|tday:.~.|
|00000750| 6c 20 64 30 2c 64 31 3a | 80 71 20 23 64 61 79 73 |l d0,d1:|.q #days|
|00000760| 69 6e 71 75 61 64 79 72 | 2c 64 31 00 20 20 80 7e |inquadyr|,d1. .~|
|00000770| 20 23 64 61 79 73 69 6e | 71 75 61 64 79 72 2c 64 | #daysin|quadyr,d|
|00000780| 32 3a 80 83 20 64 31 2c | 64 32 3a 80 a7 2e 6c 20 |2:.. d1,|d2:...l |
|00000790| 64 32 2c 64 30 3a 80 44 | 23 32 2c 64 31 00 20 20 |d2,d0:.D|#2,d1. |
|000007a0| 80 5c 20 23 33 36 36 2c | 64 30 3a 80 4c 20 6e 6f |.\ #366,|d0:.L no|
|000007b0| 63 6c 31 3a 80 a7 23 33 | 36 36 2c 64 30 3a 80 76 |cl1:..#3|66,d0:.v|
|000007c0| 2e 6c 20 64 30 3a 80 71 | 20 23 33 36 35 2c 64 30 |.l d0:.q| #365,d0|
|000007d0| 00 20 20 80 3d 20 64 30 | 2c 64 31 3a 80 40 23 31 |. .= d0|,d1:.@#1|
|000007e0| 2c 64 31 3a 80 ac 20 64 | 30 3a 80 5c 20 23 33 31 |,d1:.. d|0:.\ #31|
|000007f0| 2b 32 37 2c 64 30 3a 80 | 4c 20 6e 6f 63 6c 31 3a |+27,d0:.|L nocl1:|
|00000800| 80 40 23 31 2c 64 30 3a | 6e 6f 63 6c 31 00 20 20 |.@#1,d0:|nocl1. |
|00000810| 80 81 23 30 2c 64 32 3a | 80 7a 20 6d 6f 6e 74 68 |..#0,d2:|.z month|
|00000820| 73 2b 32 2c 61 30 3a 6e | 78 6d 3a 80 40 23 31 2c |s+2,a0:n|xm:.@#1,|
|00000830| 64 32 3a 80 5c 20 28 61 | 30 29 2b 2c 64 30 3a 80 |d2:.\ (a|0)+,d0:.|
|00000840| 51 20 6e 78 6d 00 20 20 | 80 a7 20 2d 34 28 61 30 |Q nxm. |.. -4(a0|
|00000850| 29 2c 64 30 3a 80 40 23 | 31 2c 64 30 3a 00 20 20 |),d0:.@#|1,d0:. |
|00000860| 80 82 20 64 30 2d 64 32 | 2c 64 79 6d 00 20 20 80 |.. d0-d2|,dym. .|
|00000870| b0 20 64 61 74 65 66 6f | 72 6d 61 74 3a 80 48 20 |. datefo|rmat:.H |
|00000880| 6e 6f 73 77 61 70 31 3a | 80 75 20 64 30 2c 64 32 |noswap1:|.u d0,d2|
|00000890| 3a 6e 6f 73 77 61 70 31 | 00 20 20 80 7e 20 64 30 |:noswap1|. .~ d0|
|000008a0| 2c 64 33 3a 80 76 2e 6c | 20 64 33 3a 80 72 20 23 |,d3:.v.l| d3:.r #|
|000008b0| 31 30 2c 64 33 3a 80 3d | 23 34 38 2c 64 33 3a 80 |10,d3:.=|#48,d3:.|
|000008c0| 7e 2e 62 20 64 33 2c 28 | 61 33 29 2b 00 20 20 80 |~.b d3,(|a3)+. .|
|000008d0| ac 20 64 33 3a 80 3d 23 | 34 38 2c 64 33 3a 80 7e |. d3:.=#|48,d3:.~|
|000008e0| 2e 62 20 64 33 2c 28 61 | 33 29 2b 3a 80 7e 2e 62 |.b d3,(a|3)+:.~.b|
|000008f0| 20 23 22 2f 22 2c 28 61 | 33 29 2b 00 20 20 80 7e | #"/",(a|3)+. .~|
|00000900| 20 64 32 2c 64 33 3a 80 | 76 2e 6c 20 64 33 3a 80 | d2,d3:.|v.l d3:.|
|00000910| 72 20 23 31 30 2c 64 33 | 3a 80 3d 23 34 38 2c 64 |r #10,d3|:.=#48,d|
|00000920| 33 3a 80 7e 2e 62 20 64 | 33 2c 28 61 33 29 2b 00 |3:.~.b d|3,(a3)+.|
|00000930| 20 20 80 ac 20 64 33 3a | 80 3d 23 34 38 2c 64 33 | .. d3:|.=#48,d3|
|00000940| 3a 80 7e 2e 62 20 64 33 | 2c 28 61 33 29 2b 3a 80 |:.~.b d3|,(a3)+:.|
|00000950| 7e 2e 62 20 23 22 2f 22 | 2c 28 61 33 29 2b 00 20 |~.b #"/"|,(a3)+. |
|00000960| 20 80 76 2e 6c 20 64 31 | 3a 80 72 23 31 30 30 2c | .v.l d1|:.r#100,|
|00000970| 64 31 00 20 20 80 7e 20 | 64 31 2c 64 33 3a 80 76 |d1. .~ |d1,d3:.v|
|00000980| 2e 6c 20 64 33 3a 80 72 | 20 23 31 30 2c 64 33 3a |.l d3:.r| #10,d3:|
|00000990| 80 3d 23 34 38 2c 64 33 | 3a 80 7e 2e 62 20 64 33 |.=#48,d3|:.~.b d3|
|000009a0| 2c 28 61 33 29 2b 00 20 | 20 80 ac 20 64 33 3a 80 |,(a3)+. | .. d3:.|
|000009b0| 3d 23 34 38 2c 64 33 3a | 80 7e 2e 62 20 64 33 2c |=#48,d3:|.~.b d3,|
|000009c0| 28 61 33 29 2b 3a 00 20 | 20 80 ac 20 64 31 3a 80 |(a3)+:. | .. d1:.|
|000009d0| 7e 20 64 31 2c 64 33 3a | 80 76 2e 6c 20 64 33 3a |~ d1,d3:|.v.l d3:|
|000009e0| 80 72 20 23 31 30 2c 64 | 33 3a 80 3d 23 34 38 2c |.r #10,d|3:.=#48,|
|000009f0| 64 33 3a 80 7e 2e 62 20 | 64 33 2c 28 61 33 29 2b |d3:.~.b |d3,(a3)+|
|00000a00| 00 20 20 80 ac 20 64 33 | 3a 80 3d 23 34 38 2c 64 |. .. d3|:.=#48,d|
|00000a10| 33 3a 80 7e 2e 62 20 64 | 33 2c 28 61 33 29 2b 3a |3:.~.b d|3,(a3)+:|
|00000a20| 80 81 23 31 30 2c 64 30 | 3a 80 94 00 00 5f 77 65 |..#10,d0|:...._we|
|00000a30| 65 6b 64 61 79 3a 00 20 | 20 80 7e 2e 6c 20 74 6f |ekday:. | .~.l to|
|00000a40| 74 64 61 79 2c 64 30 3a | 80 aa 23 32 2c 64 30 3a |tday,d0:|..#2,d0:|
|00000a50| 80 72 20 23 33 32 37 36 | 37 2c 64 30 3a 80 ac 20 |.r #3276|7,d0:.. |
|00000a60| 64 30 3a 80 76 2e 6c 20 | 64 30 00 20 20 80 72 20 |d0:.v.l |d0. .r |
|00000a70| 23 37 2c 64 30 3a 80 ac | 20 64 30 3a 80 94 00 5f |#7,d0:..| d0:..._|
|00000a80| 64 61 79 73 3a 80 7e 20 | 64 79 6d 28 70 63 29 2c |days:.~ |dym(pc),|
|00000a90| 64 30 3a 80 94 00 5f 6d | 6f 6e 74 68 73 3a 80 7e |d0:..._m|onths:.~|
|00000aa0| 20 64 79 6d 2b 34 28 70 | 63 29 2c 64 30 3a 80 94 | dym+4(p|c),d0:..|
|00000ab0| 00 5f 79 65 61 72 73 3a | 80 7e 20 64 79 6d 2b 32 |._years:|.~ dym+2|
|00000ac0| 28 70 63 29 2c 64 30 3a | 80 94 00 00 74 6f 74 64 |(pc),d0:|....totd|
|00000ad0| 61 79 3a 80 25 2e 6c 20 | 30 00 64 79 6d 3a 80 25 |ay:.%.l |0.dym:.%|
|00000ae0| 20 30 2c 30 2c 30 00 00 | 2e 5f 63 61 6c 63 64 61 | 0,0,0..|._calcda|
|00000af0| 79 73 00 20 20 80 81 23 | 30 2c 64 32 3a 80 7e 2e |ys. ..#|0,d2:.~.|
|00000b00| 6c 20 64 30 2c 61 30 00 | 20 20 80 81 23 30 2c 64 |l d0,a0.| ..#0,d|
|00000b10| 31 3a 80 7e 2e 62 20 28 | 61 30 29 2b 2c 64 31 3a |1:.~.b (|a0)+,d1:|
|00000b20| 80 5c 20 23 22 2f 22 2c | 64 31 3a 80 48 20 67 65 |.\ #"/",|d1:.H ge|
|00000b30| 74 6d 3a 80 a7 23 34 38 | 2c 64 31 00 20 20 80 7e |tm:..#48|,d1. .~|
|00000b40| 2e 62 20 28 61 30 29 2b | 2c 64 32 3a 80 5c 20 23 |.b (a0)+|,d2:.\ #|
|00000b50| 22 2f 22 2c 64 32 3a 80 | 48 20 67 65 74 6d 3a 80 |"/",d2:.|H getm:.|
|00000b60| a7 23 34 38 2c 64 32 3a | 80 84 23 31 30 2c 64 31 |.#48,d2:|..#10,d1|
|00000b70| 3a 80 3d 20 64 32 2c 64 | 31 00 20 20 80 5c 2e 62 |:.= d2,d|1. .\.b|
|00000b80| 23 22 2f 22 2c 28 61 30 | 29 2b 3a 80 50 20 73 6b |#"/",(a0|)+:.P sk|
|00000b90| 69 70 63 61 6c 63 00 67 | 65 74 6d 3a 80 7e 20 64 |ipcalc.g|etm:.~ d|
|00000ba0| 31 2c 64 33 00 20 20 80 | 81 23 30 2c 64 31 3a 80 |1,d3. .|.#0,d1:.|
|00000bb0| 7e 2e 62 20 28 61 30 29 | 2b 2c 64 31 3a 80 5c 20 |~.b (a0)|+,d1:.\ |
|00000bc0| 23 22 2f 22 2c 64 31 3a | 80 48 20 67 65 74 79 3a |#"/",d1:|.H gety:|
|00000bd0| 80 a7 23 34 38 2c 64 31 | 00 20 20 80 7e 2e 62 20 |..#48,d1|. .~.b |
|00000be0| 28 61 30 29 2b 2c 64 32 | 3a 80 5c 20 23 22 2f 22 |(a0)+,d2|:.\ #"/"|
|00000bf0| 2c 64 32 3a 80 48 20 67 | 65 74 79 3a 80 a7 23 34 |,d2:.H g|ety:..#4|
|00000c00| 38 2c 64 32 3a 80 84 23 | 31 30 2c 64 31 3a 80 3d |8,d2:..#|10,d1:.=|
|00000c10| 20 64 32 2c 64 31 00 20 | 20 80 5c 2e 62 23 22 2f | d2,d1. | .\.b#"/|
|00000c20| 22 2c 28 61 30 29 2b 3a | 80 50 20 73 6b 69 70 63 |",(a0)+:|.P skipc|
|00000c30| 61 6c 63 00 67 65 74 79 | 3a 80 7e 20 64 31 2c 64 |alc.gety|:.~ d1,d|
|00000c40| 34 00 20 20 80 81 23 30 | 2c 64 31 3a 80 7e 2e 62 |4. ..#0|,d1:.~.b|
|00000c50| 20 28 61 30 29 2b 2c 64 | 31 3a 80 5c 20 23 22 2f | (a0)+,d|1:.\ #"/|
|00000c60| 22 2c 64 31 3a 80 48 20 | 67 65 74 79 3a 80 a7 23 |",d1:.H |gety:..#|
|00000c70| 34 38 2c 64 31 00 20 20 | 80 7e 2e 62 20 28 61 30 |48,d1. |.~.b (a0|
|00000c80| 29 2b 2c 64 32 3a 80 5c | 20 23 22 2f 22 2c 64 32 |)+,d2:.\| #"/",d2|
|00000c90| 3a 80 48 20 67 6f 74 79 | 3a 80 a7 23 34 38 2c 64 |:.H goty|:..#48,d|
|00000ca0| 32 3a 80 84 23 31 30 2c | 64 31 3a 80 3d 20 64 32 |2:..#10,|d1:.= d2|
|00000cb0| 2c 64 31 00 20 20 80 7e | 2e 62 20 28 61 30 29 2b |,d1. .~|.b (a0)+|
|00000cc0| 2c 64 32 3a 80 5c 20 23 | 22 2f 22 2c 64 32 3a 80 |,d2:.\ #|"/",d2:.|
|00000cd0| 48 20 67 6f 74 79 3a 80 | a7 23 34 38 2c 64 32 3a |H goty:.|.#48,d2:|
|00000ce0| 80 84 23 31 30 2c 64 31 | 3a 80 3d 20 64 32 2c 64 |..#10,d1|:.= d2,d|
|00000cf0| 31 00 20 20 80 7e 2e 62 | 20 28 61 30 29 2b 2c 64 |1. .~.b| (a0)+,d|
|00000d00| 32 3a 80 5c 20 23 22 2f | 22 2c 64 32 3a 80 48 20 |2:.\ #"/|",d2:.H |
|00000d10| 67 6f 74 79 3a 80 a7 23 | 34 38 2c 64 32 3a 80 84 |goty:..#|48,d2:..|
|00000d20| 23 31 30 2c 64 31 3a 80 | 3d 20 64 32 2c 64 31 00 |#10,d1:.|= d2,d1.|
|00000d30| 67 6f 74 79 3a 00 20 20 | 80 b0 20 64 61 74 65 66 |goty:. |.. datef|
|00000d40| 6f 72 6d 61 74 3a 80 48 | 20 6e 6f 73 77 61 70 32 |ormat:.H| noswap2|
|00000d50| 3a 80 75 20 64 33 2c 64 | 34 3a 6e 6f 73 77 61 70 |:.u d3,d|4:noswap|
|00000d60| 32 00 20 20 80 7e 23 33 | 36 35 2c 64 30 3a 80 84 |2. .~#3|65,d0:..|
|00000d70| 20 64 31 2c 64 30 3a 80 | 72 23 34 2c 64 31 3a 80 | d1,d0:.|r#4,d1:.|
|00000d80| 7e 20 64 31 2c 64 32 00 | 20 20 80 3d 20 64 34 2c |~ d1,d2.| .= d4,|
|00000d90| 64 34 3a 80 3d 20 6d 6f | 6e 74 68 73 2d 32 28 70 |d4:.= mo|nths-2(p|
|00000da0| 63 2c 64 34 29 2c 64 32 | 3a 80 76 2e 6c 20 64 32 |c,d4),d2|:.v.l d2|
|00000db0| 3a 80 3d 2e 6c 20 64 32 | 2c 64 30 00 20 20 80 ac |:.=.l d2|,d0. ..|
|00000dc0| 20 64 31 3a 80 b0 20 64 | 31 3a 80 48 20 69 73 6c | d1:.. d|1:.H isl|
|00000dd0| 65 61 70 3a 80 5c 20 23 | 36 2c 64 34 3a 80 51 20 |eap:.\ #|6,d4:.Q |
|00000de0| 69 73 6c 65 61 70 3a 80 | 40 23 31 2c 64 30 3a 69 |isleap:.|@#1,d0:i|
|00000df0| 73 6c 65 61 70 00 20 20 | 80 76 2e 6c 20 64 33 3a |sleap. |.v.l d3:|
|00000e00| 80 3d 2e 6c 20 64 33 2c | 64 30 3a 80 a7 2e 6c 20 |.=.l d3,|d0:...l |
|00000e10| 23 64 61 79 73 70 31 39 | 37 38 2c 64 30 3a 80 aa |#daysp19|78,d0:..|
|00000e20| 23 31 2c 64 30 3a 80 94 | 00 00 73 6b 69 70 63 61 |#1,d0:..|..skipca|
|00000e30| 6c 63 3a 80 81 23 30 2c | 64 30 3a 80 94 00 00 73 |lc:..#0,|d0:....s|
|00000e40| 74 61 6d 70 3a 80 25 2e | 6c 20 30 2c 30 2c 30 00 |tamp:.%.|l 0,0,0.|
|00000e50| 6d 6f 6e 74 68 73 3a 80 | 25 20 30 2c 33 31 2c 36 |months:.|% 0,31,6|
|00000e60| 30 2c 39 31 2c 31 32 31 | 2c 31 35 32 2c 31 38 32 |0,91,121|,152,182|
|00000e70| 2c 32 31 33 2c 32 34 34 | 2c 32 37 34 2c 33 30 35 |,213,244|,274,305|
|00000e80| 2c 33 33 35 2c 31 30 30 | 30 00 |,335,100|0. |
+--------+-------------------------+-------------------------+--------+--------+