/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / ARQS_ZIP / TXTFMT1.ZIP / MODULE1.BAS

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| fc 01 02 00 0e 00 1e 01 | 1e 01 08 00 01 02 03 04 |........|........|
|00000010| 06 05 08 0a 00 11 ec 01 | 97 03 00 00 1a 00 5a 00 |........|......Z.|
|00000020| 90 00 10 01 08 01 00 00 | c7 00 5b 03 19 01 cf 00 |........|..[.....|
|00000030| 9a 00 2d 03 14 03 66 00 | 00 00 74 00 00 00 b9 00 |..-...f.|..t.....|
|00000040| 25 01 52 01 fd 01 00 00 | 71 01 00 00 00 00 95 01 |%.R.....|q.......|
|00000050| 9f 00 00 00 06 02 1d 02 | c4 01 28 02 ab 00 76 03 |........|..(...v.|
|00000060| 00 00 3d 01 00 00 00 00 | 00 00 00 00 00 00 00 00 |..=.....|........|
|00000070| 97 03 00 00 84 00 80 08 | 4d 79 46 6f 72 6d 61 74 |........|MyFormat|
|00000080| b0 01 80 0a 46 6f 72 6d | 61 74 54 79 70 65 f7 00 |....Form|atType..|
|00000090| 80 0c 46 6f 72 6d 61 74 | 53 74 72 69 6e 67 da 00 |..Format|String..|
|000000a0| 80 08 69 6e 63 6f 6d 69 | 6e 67 e7 00 80 06 4c 65 |..incomi|ng....Le|
|000000b0| 6e 67 74 68 00 00 80 01 | 69 65 02 80 08 4e 65 78 |ngth....|ie...Nex|
|000000c0| 74 43 68 61 72 43 01 80 | 0a 4e 65 78 74 46 6f 72 |tCharC..|.NextFor|
|000000d0| 6d 61 74 00 00 80 0a 54 | 68 65 43 6f 6e 74 72 6f |mat....T|heContro|
|000000e0| 6c 9a 01 00 04 54 65 78 | 74 ec 02 00 07 4e 65 78 |l....Tex|t....Nex|
|000000f0| 74 41 53 43 79 02 00 09 | 55 70 70 65 72 43 61 73 |tASCy...|UpperCas|
|00000100| 65 bc 01 80 0c 46 6f 72 | 6d 61 74 4c 65 6e 67 74 |e....For|matLengt|
|00000110| 68 00 00 00 0d 46 6f 72 | 6d 61 74 45 64 69 74 69 |h....For|matEditi|
|00000120| 6e 67 dc 01 00 04 54 52 | 55 45 31 01 00 05 46 41 |ng....TR|UE1...FA|
|00000130| 4c 53 45 ce 01 80 08 4b | 65 79 41 73 63 69 69 00 |LSE....K|eyAscii.|
|00000140| 00 00 08 50 6f 73 69 74 | 69 6f 6e 3a 03 00 08 53 |...Posit|ion:...S|
|00000150| 65 6c 53 74 61 72 74 00 | 00 02 02 04 00 00 00 80 |elStart.|........|
|00000160| 0b 43 68 65 63 6b 46 6f | 72 6d 61 74 60 01 80 0a |.CheckFo|rmat`...|
|00000170| 44 65 63 69 6d 61 6c 50 | 6f 73 85 01 80 0d 44 65 |DecimalP|os....De|
|00000180| 63 69 6d 61 6c 50 6c 61 | 63 65 73 00 00 80 10 44 |cimalPla|ces....D|
|00000190| 65 63 69 6d 61 6c 50 6f | 73 46 6f 72 6d 61 74 85 |ecimalPo|sFormat.|
|000001a0| 02 80 0c 44 65 63 69 6d | 61 6c 43 68 61 72 73 f1 |...Decim|alChars.|
|000001b0| 01 80 01 78 e9 01 00 12 | 44 65 63 69 6d 61 6c 45 |...x....|DecimalE|
|000001c0| 6e 63 6f 75 6e 74 65 72 | 65 64 00 00 00 08 53 6c |ncounter|ed....Sl|
|000001d0| 61 73 68 50 6f 73 00 00 | 00 04 54 65 6d 70 6c 02 |ashPos..|..Templ.|
|000001e0| 80 06 78 4d 6f 6e 74 68 | 00 00 80 0a 46 69 72 73 |..xMonth|....Firs|
|000001f0| 74 53 6c 61 73 68 14 02 | 80 09 4e 65 78 74 53 6c |tSlash..|..NextSl|
|00000200| 61 73 68 55 02 80 04 78 | 44 61 79 da 02 00 08 4e |ashU...x|Day....N|
|00000210| 65 78 74 53 6c 61 73 35 | 02 80 05 78 59 65 61 72 |extSlas5|...xYear|
|00000220| a3 02 80 0a 46 6f 72 6d | 61 74 59 65 61 72 cb 02 |....Form|atYear..|
|00000230| 00 05 54 65 6d 70 32 00 | 00 80 07 54 65 6d 70 4e |..Temp2.|...TempN|
|00000240| 75 6d 22 03 00 09 53 65 | 6c 4c 65 6e 67 74 68 45 |um"...Se|lLengthE|
|00000250| 02 80 0c 44 45 46 41 55 | 4c 54 5f 59 45 41 52 bd |...DEFAU|LT_YEAR.|
|00000260| 02 00 0c 45 78 69 74 46 | 75 6e 63 74 69 6f 6e 00 |...ExitF|unction.|
|00000270| 00 80 0c 46 6f 75 6e 64 | 44 65 63 69 6d 61 6c 00 |...Found|Decimal.|
|00000280| 00 00 03 74 68 65 93 02 | 04 09 46 6f 72 63 65 45 |...the..|..ForceE|
|00000290| 78 69 74 00 00 00 08 69 | 6e 73 74 72 69 6e 67 00 |xit....i|nstring.|
|000002a0| 00 00 0a 44 65 63 6f 6d | 61 6c 50 6f 73 b1 02 80 |...Decom|alPos...|
|000002b0| 0c 46 6f 6c 6c 6f 77 46 | 6f 72 6d 61 74 d0 02 00 |.FollowF|ormat...|
|000002c0| 0a 45 78 74 72 61 53 74 | 75 66 66 00 00 80 08 4f |.ExtraSt|uff....O|
|000002d0| 75 74 47 6f 69 6e 67 00 | 00 40 0a 49 6e 69 74 46 |utGoing.|.@.InitF|
|000002e0| 6f 72 6d 61 74 00 00 80 | 01 63 ff 02 80 06 44 6f |ormat...|.c....Do|
|000002f0| 42 65 65 70 6c 03 80 0e | 43 75 72 73 6f 72 50 6f |Beepl...|CursorPo|
|00000300| 73 69 74 69 6f 6e 4c 03 | 80 0f 49 6d 62 65 64 64 |sitionL.|..Imbedd|
|00000310| 65 64 4c 69 74 65 72 61 | 6c 7c 03 80 11 52 65 70 |edLitera|l|...Rep|
|00000320| 6c 61 63 65 54 68 65 43 | 6f 6e 74 72 6f 6c 00 00 |laceTheC|ontrol..|
|00000330| 00 0a 53 6b 69 70 53 70 | 61 63 65 73 00 00 80 07 |..SkipSp|aces....|
|00000340| 43 6f 75 6e 74 65 72 00 | 00 80 09 46 69 72 73 74 |Counter.|...First|
|00000350| 54 69 6d 65 00 00 80 0e | 53 65 6c 65 63 74 69 6f |Time....|Selectio|
|00000360| 6e 53 74 61 72 74 00 00 | 80 0b 4e 75 6d 44 65 63 |nStart..|..NumDec|
|00000370| 69 6d 61 6c 73 00 00 00 | 0d 44 65 63 69 6d 61 6c |imals...|.Decimal|
|00000380| 53 74 72 69 6e 67 8a 03 | 80 06 4e 75 6d 44 65 63 |String..|..NumDec|
|00000390| 00 00 02 02 01 00 00 00 | 00 0a 46 6f 72 6d 61 74 |........|..Format|
|000003a0| 43 68 61 72 00 00 80 09 | 45 78 69 74 56 61 6c 75 |Char....|ExitValu|
|000003b0| 65 0a 00 00 00 18 00 00 | 00 09 00 08 00 ff ff ff |e.......|........|
|000003c0| ff ff ff ff ff 01 00 00 | 00 03 01 00 08 00 4d 79 |........|......My|
|000003d0| 46 6f 72 6d 61 74 02 09 | 30 7a 0f 6e 10 18 00 00 |Format..|0z.n....|
|000003e0| 00 76 00 3c 00 00 00 20 | 54 68 69 73 20 66 75 6e |.v.<... |This fun|
|000003f0| 63 74 69 6f 6e 20 73 68 | 6f 75 6c 64 20 62 65 20 |ction sh|ould be |
|00000400| 63 61 6c 6c 65 64 20 62 | 79 20 74 68 65 20 4b 65 |called b|y the Ke|
|00000410| 79 50 72 65 73 73 20 65 | 76 65 6e 74 20 6f 66 20 |yPress e|vent of |
|00000420| 61 00 00 76 00 3d 00 00 | 00 0d 04 20 74 65 78 74 |a..v.=..|... text|
|00000430| 20 63 6f 6e 74 72 6f 6c | 2e 20 20 49 74 20 63 68 | control|.  It ch|
|00000440| 65 63 6b 73 20 74 6f 20 | 73 65 65 20 74 68 61 74 |ecks to |see that|
|00000450| 20 74 68 65 20 63 6f 6e | 74 65 6e 74 73 20 6f 66 | the con|tents of|
|00000460| 20 74 68 65 68 00 00 76 | 00 23 00 00 00 0d 04 20 | theh..v|.#..... |
|00000470| 74 65 78 74 20 63 6f 6e | 74 72 6f 6c 20 6d 61 74 |text con|trol mat|
|00000480| 63 68 20 61 20 74 65 6d | 70 6c 61 74 65 2e 65 00 |ch a tem|plate.e.|
|00000490| 00 76 00 02 00 00 00 00 | 00 76 00 3c 00 00 00 20 |.v......|.v.<... |
|000004a0| 49 74 20 77 69 6c 6c 20 | 70 65 72 66 6f 72 6d 20 |It will |perform |
|000004b0| 61 20 66 65 77 20 67 6c | 6f 62 61 6c 20 63 68 65 |a few gl|obal che|
|000004c0| 63 6b 73 20 6f 6e 20 74 | 68 65 20 74 65 78 74 20 |cks on t|he text |
|000004d0| 63 6f 6e 74 65 6e 74 73 | 2c 00 00 76 00 3e 00 00 |contents|,..v.>..|
|000004e0| 00 0d 04 20 61 6e 64 20 | 74 68 65 6e 20 76 61 6c |... and |then val|
|000004f0| 69 64 61 74 65 20 74 68 | 65 20 63 75 72 72 65 6e |idate th|e curren|
|00000500| 74 20 63 68 61 72 61 63 | 74 65 72 20 75 73 69 6e |t charac|ter usin|
|00000510| 67 20 53 65 6c 53 74 61 | 72 74 20 74 6f 00 00 76 |g SelSta|rt to..v|
|00000520| 00 2a 00 00 00 0d 04 20 | 64 65 74 65 72 6d 69 6e |.*..... |determin|
|00000530| 65 20 74 68 65 20 6c 6f | 63 61 74 69 6f 6e 20 6f |e the lo|cation o|
|00000540| 66 20 74 68 65 20 63 75 | 72 73 6f 72 2e 00 00 76 |f the cu|rsor...v|
|00000550| 00 02 00 00 00 00 00 40 | 00 1e 00 5a 00 c1 02 03 |.......@|...Z....|
|00000560| 00 b9 00 00 80 08 00 02 | 00 19 01 00 80 01 00 00 |........|........|
|00000570| 00 74 00 00 80 06 00 00 | 00 00 10 fc 00 cc 01 16 |.t......|........|
|00000580| 00 06 00 13 00 0d 00 ab | 00 16 00 06 00 27 00 0d |........|.....'..|
|00000590| 00 9f 00 16 00 06 00 3b | 00 0d 00 84 00 16 00 06 |.......;|........|
|000005a0| 00 53 00 0d 00 93 02 00 | 10 fc 00 dc 01 16 00 01 |.S......|........|
|000005b0| 00 18 00 0d 00 ec 02 00 | 10 00 10 0b 00 b9 00 11 |........|........|
|000005c0| 00 c7 00 0c 00 84 00 00 | 10 00 10 76 00 1a 00 04 |........|...v....|
|000005d0| 00 20 43 68 65 63 6b 20 | 66 6f 72 20 62 61 63 6b |. Check |for back|
|000005e0| 73 70 61 63 65 2e 0d 04 | 20 00 10 0b 00 19 01 e4 |space...| .......|
|000005f0| 20 a6 00 49 00 30 02 00 | 20 e4 20 0c 00 5a 00 00 | ..I.0..| . ..Z..|
|00000600| 20 3d 00 6e 10 00 10 38 | 00 00 10 00 10 76 00 1f | =.n...8|.....v..|
|00000610| 00 04 00 20 43 68 65 63 | 6b 20 66 6f 72 20 69 6d |... Chec|k for im|
|00000620| 62 65 64 64 65 64 20 6c | 69 74 65 72 61 6c 73 2e |bedded l|iterals.|
|00000630| 00 00 10 0b 00 74 00 e4 | 0c c1 00 ed 00 07 00 6a |.....t..|.......j|
|00000640| 02 03 00 40 4c 20 22 a6 | 00 49 00 dc 02 00 20 e4 |...@L ".|.I.... .|
|00000650| 04 f9 00 0c 00 ec 02 00 | 20 0b 00 74 00 0b 00 74 |........| ..t...t|
|00000660| 00 c2 00 06 05 e4 0c f7 | 00 cc 00 0c 00 74 00 00 |........|.....t..|
|00000670| 20 0b 00 84 00 c2 00 06 | 05 0c 00 90 00 00 20 0b | .......|...... .|
|00000680| 00 84 00 c2 00 06 05 0b | 00 b9 00 11 00 31 01 a6 |........|.....1..|
|00000690| 00 49 00 d6 02 00 30 0b | 00 90 00 e4 04 a3 00 0c |.I....0.|........|
|000006a0| 00 90 00 00 20 38 00 00 | 10 32 00 f6 02 00 20 0b |.... 8..|.2.... .|
|000006b0| 00 84 00 c2 00 06 05 e4 | 04 a3 00 0c 00 90 00 00 |........|........|
|000006c0| 10 38 00 00 10 00 10 76 | 00 2b 00 04 00 20 53 65 |.8.....v|.+... Se|
|000006d0| 65 20 69 66 20 77 65 20 | 61 72 65 20 6c 6f 6e 67 |e if we |are long|
|000006e0| 65 72 20 74 68 61 6e 20 | 66 6f 72 6d 61 74 20 73 |er than |format s|
|000006f0| 74 72 69 6e 67 2e 22 00 | 00 00 10 0b 00 74 00 c2 |tring.".|.....t..|
|00000700| 00 06 05 0c 00 e7 00 00 | 10 0b 00 90 00 0b 00 e7 |........|........|
|00000710| 00 df 00 49 00 92 04 00 | 20 76 00 35 00 08 00 20 |...I....| v.5... |
|00000720| 43 68 65 63 6b 20 66 6f | 72 20 61 20 73 65 6c 65 |Check fo|r a sele|
|00000730| 63 74 69 6f 6e 20 62 6c | 6f 63 6b 2e 20 20 49 66 |ction bl|ock.  If|
|00000740| 20 69 74 20 65 78 69 73 | 74 73 2c 20 6c 65 6e 67 | it exis|ts, leng|
|00000750| 74 68 73 00 20 76 00 3c | 00 08 00 20 20 20 72 65 |ths. v.<|...   re|
|00000760| 71 75 69 72 65 6d 65 6e | 74 20 69 73 20 77 61 69 |quiremen|t is wai|
|00000770| 76 65 64 2e 20 20 28 57 | 65 27 6c 6c 20 62 65 20 |ved.  (W|e'll be |
|00000780| 64 65 6c 65 74 69 6e 67 | 20 74 68 65 20 73 65 6c |deleting| the sel|
|00000790| 65 63 74 65 64 00 20 76 | 00 1e 00 08 00 20 20 20 |ected. v|.....   |
|000007a0| 74 65 78 74 20 69 66 20 | 63 68 61 72 61 63 74 65 |text if |characte|
|000007b0| 72 20 69 73 20 4f 4b 2e | 29 00 20 0b 00 b9 00 11 |r is OK.|). .....|
|000007c0| 00 28 02 e4 00 df 00 49 | 00 08 04 00 20 32 00 8e |.(.....I|.... 2..|
|000007d0| 04 00 30 76 00 29 00 0c | 00 20 54 6f 6f 20 6c 6f |..0v.)..|. Too lo|
|000007e0| 6e 67 20 2d 2d 20 72 65 | 64 75 63 65 20 73 69 7a |ng -- re|duce siz|
|000007f0| 65 20 62 79 20 74 72 75 | 6e 63 61 74 69 6e 67 2e |e by tru|ncating.|
|00000800| 79 00 30 0b 00 84 00 0b | 00 e7 00 c1 00 0c 00 84 |y.0.....|........|
|00000810| 00 00 30 0b 00 84 00 0b | 00 b9 00 12 00 c7 00 00 |..0.....|........|
|00000820| 30 0b 00 84 00 c2 00 06 | 05 0b 00 b9 00 12 00 31 |0.......|.......1|
|00000830| 01 00 30 e4 00 0c 00 5a | 00 00 30 1b 01 00 00 01 |..0....Z|..0.....|
|00000840| 00 78 00 00 30 3d 00 6e | 10 00 20 38 00 00 10 38 |.x..0=.n|.. 8...8|
|00000850| 00 00 10 00 10 76 00 1f | 00 04 00 20 41 6c 6c 6f |.....v..|... Allo|
|00000860| 77 20 66 6f 72 20 74 68 | 65 20 6e 65 77 20 63 68 |w for th|e new ch|
|00000870| 61 72 61 63 74 65 72 2e | 68 00 10 0b 00 ec 02 49 |aracter.|h......I|
|00000880| 00 d6 04 00 20 0b 00 90 | 00 e4 04 a3 00 0c 00 90 |.... ...|........|
|00000890| 00 00 10 38 00 00 10 0b | 00 19 01 0c 00 8a 03 00 |...8....|........|
|000008a0| 00 00 10 76 00 2e 00 04 | 00 20 50 69 63 6b 20 74 |...v....|. Pick t|
|000008b0| 68 65 20 63 68 61 72 61 | 63 74 65 72 20 77 65 20 |he chara|cter we |
|000008c0| 61 72 65 20 67 6f 69 6e | 67 20 74 6f 20 65 78 61 |are goin|g to exa|
|000008d0| 6d 69 6e 65 2e 00 10 0b | 00 b9 00 11 00 31 01 e4 |mine....|.....1..|
|000008e0| 04 a3 00 0c 00 9a 00 00 | 10 76 00 4b 00 04 00 20 |........|.v.K... |
|000008f0| 49 66 20 74 68 65 20 63 | 68 61 72 61 63 74 65 72 |If the c|haracter|
|00000900| 20 70 6f 73 69 74 69 6f | 6e 20 69 73 20 69 6e 20 | positio|n is in |
|00000910| 74 68 65 20 74 65 78 74 | 2c 20 63 68 65 63 6b 20 |the text|, check |
|00000920| 69 74 20 61 67 61 69 6e | 73 74 20 74 68 65 20 74 |it again|st the t|
|00000930| 65 6d 70 6c 61 74 65 2e | 00 00 10 0b 00 9a 00 e4 |emplate.|........|
|00000940| 00 df 00 0b 00 9a 00 0b | 00 90 00 e2 00 a4 00 49 |........|.......I|
|00000950| 00 6c 10 00 10 00 20 76 | 00 41 00 08 00 20 50 75 |.l.... v|.A... Pu|
|00000960| 74 20 74 68 65 20 63 68 | 61 72 61 63 74 65 72 20 |t the ch|aracter |
|00000970| 69 6e 74 6f 20 74 68 65 | 20 73 74 72 69 6e 67 20 |into the| string |
|00000980| 61 6c 72 65 61 64 79 20 | 69 6e 20 74 68 65 20 74 |already |in the t|
|00000990| 65 78 74 20 63 6f 6e 74 | 72 6f 6c 2e 20 00 20 0b |ext cont|rol. . .|
|000009a0| 00 84 00 0b 00 9a 00 e4 | 04 c7 00 ed 00 05 00 fc |........|........|
|000009b0| 05 01 00 20 22 a6 00 0b | 00 ec 02 a4 00 49 00 72 |... "...|.....I.r|
|000009c0| 06 00 30 76 00 16 00 0c | 00 20 4f 76 65 72 74 79 |..0v....|. Overty|
|000009d0| 70 65 20 74 68 65 20 73 | 70 61 63 65 2e 00 30 0b |pe the s|pace..0.|
|000009e0| 00 84 00 0b 00 9a 00 e4 | 04 f7 00 c1 00 0b 00 19 |........|........|
|000009f0| 01 ac 00 a3 00 0b 00 84 | 00 0b 00 90 00 0b 00 9a |........|........|
|00000a00| 00 e4 04 a3 00 ee 00 f7 | 00 cc 00 a3 00 0c 00 84 |........|........|
|00000a10| 00 00 30 e4 04 f9 00 0c | 00 ff 02 00 20 32 00 a8 |..0.....|.... 2..|
|00000a20| 06 00 30 0b 00 84 00 0b | 00 9a 00 e4 04 f7 00 c1 |..0.....|........|
|00000a30| 00 0b 00 19 01 ac 00 a3 | 00 0b 00 84 00 0b 00 90 |........|........|
|00000a40| 00 0b 00 9a 00 f7 00 cc | 00 a3 00 0c 00 84 00 00 |........|........|
|00000a50| 20 38 00 00 10 00 20 76 | 00 37 00 08 00 20 43 68 | 8.... v|.7... Ch|
|00000a60| 65 63 6b 20 69 6e 63 6f | 6d 69 6e 67 20 61 67 61 |eck inco|ming aga|
|00000a70| 69 6e 73 74 20 66 6f 72 | 6d 61 74 20 73 74 72 69 |inst for|mat stri|
|00000a80| 6e 67 20 28 74 68 65 20 | 74 65 6d 70 6c 61 74 65 |ng (the |template|
|00000a90| 29 2e 74 00 20 0b 00 84 | 00 0b 00 9a 00 e4 04 c7 |).t. ...|........|
|00000aa0| 00 0c 00 9f 00 76 00 1c | 00 2f 00 20 54 68 65 20 |.....v..|./. The |
|00000ab0| 63 68 61 72 61 63 74 65 | 72 20 74 6f 20 65 78 61 |characte|r to exa|
|00000ac0| 6d 69 6e 65 2e 00 20 0b | 00 74 00 0b 00 9a 00 e4 |mine.. .|.t......|
|00000ad0| 04 c7 00 0c 00 ab 00 76 | 00 31 00 2f 00 20 54 68 |.......v|.1./. Th|
|00000ae0| 65 20 63 6f 72 72 65 73 | 70 6f 6e 64 69 6e 67 20 |e corres|ponding |
|00000af0| 63 68 61 72 61 63 74 65 | 72 20 66 72 6f 6d 20 74 |characte|r from t|
|00000b00| 68 65 20 74 65 6d 70 6c | 61 74 65 2e 20 00 20 0b |he templ|ate. . .|
|00000b10| 00 74 00 0b 00 9a 00 e4 | 04 a3 00 e4 04 c7 00 0c |.t......|........|
|00000b20| 00 93 02 76 00 3f 00 31 | 00 20 54 68 65 20 6e 65 |...v.?.1|. The ne|
|00000b30| 78 74 20 63 68 61 72 61 | 63 74 65 72 20 69 6e 20 |xt chara|cter in |
|00000b40| 74 65 6d 70 6c 61 74 65 | 2e 20 28 55 73 65 64 20 |template|. (Used |
|00000b50| 66 6f 72 20 69 6d 62 65 | 64 64 65 64 20 6c 69 74 |for imbe|dded lit|
|00000b60| 65 72 61 6c 73 29 00 00 | 20 0b 00 74 00 ed 00 05 |erals)..| ..t....|
|00000b70| 00 d4 07 01 00 2e 22 ba | 00 0c 00 4c 03 00 20 0b |......".|...L.. .|
|00000b80| 00 4c 03 e4 00 df 00 49 | 00 16 08 00 30 0b 00 74 |.L.....I|....0..t|
|00000b90| 00 0b 00 74 00 c2 00 06 | 05 0b 00 4c 03 f7 00 cc |...t....|...L....|
|00000ba0| 00 c2 00 06 00 0c 00 4c | 03 00 20 38 00 00 20 0b |.......L|.. 8.. .|
|00000bb0| 00 ab 00 56 00 26 08 00 | 30 ed 00 05 00 2c 08 01 |...V.&..|0....,..|
|00000bc0| 00 39 22 26 00 00 40 76 | 00 23 00 10 00 20 4d 61 |.9"&..@v|.#... Ma|
|00000bd0| 6b 65 20 73 75 72 65 20 | 4e 65 78 74 43 68 61 72 |ke sure |NextChar|
|00000be0| 20 69 73 20 61 20 6e 75 | 6d 62 65 72 2e 20 67 00 | is a nu|mber. g.|
|00000bf0| 40 0b 00 9f 00 56 00 72 | 08 00 50 ed 00 05 00 4c |@....V.r|..P....L|
|00000c00| 08 01 00 30 22 ed 00 05 | 00 56 08 01 00 39 22 27 |...0"...|.V...9"'|
|00000c10| 00 00 60 76 00 2d 00 18 | 00 20 43 68 65 63 6b 20 |..`v.-..|. Check |
|00000c20| 74 6f 20 73 65 65 20 69 | 66 20 77 65 20 68 61 76 |to see i|f we hav|
|00000c30| 65 20 74 6f 6f 20 6d 61 | 6e 79 20 64 65 63 69 6d |e too ma|ny decim|
|00000c40| 61 6c 73 2e 65 00 60 0b | 00 84 00 ed 00 05 00 a2 |als.e.`.|........|
|00000c50| 08 01 00 2e 22 ba 00 0c | 00 6c 03 00 60 0b 00 6c |...."...|.l..`..l|
|00000c60| 03 e4 00 df 00 49 00 44 | 09 01 00 1c 00 0b 00 84 |.....I.D|........|
|00000c70| 00 0b 00 84 00 c2 00 06 | 05 0b 00 6c 03 f7 00 cc |........|...l....|
|00000c80| 00 c2 00 06 00 0c 00 6c | 03 01 00 1c 00 0b 00 6c |.......l|.......l|
|00000c90| 03 0b 00 4c 03 df 00 49 | 00 40 09 01 00 20 00 e4 |...L...I|.@... ..|
|00000ca0| 00 0c 00 8a 03 01 00 20 | 00 1b 01 00 00 01 00 78 |....... |.......x|
|00000cb0| 00 01 00 1c 00 38 00 00 | 60 38 00 00 50 ed 00 05 |.....8..|`8..P...|
|00000cc0| 00 24 09 01 00 2e 22 26 | 00 00 60 0b 00 b9 00 11 |.$...."&|..`.....|
|00000cd0| 00 c7 00 ee 00 ed 00 05 | 00 42 09 01 00 2e 22 ba |........|.B....".|
|00000ce0| 00 e4 00 f1 00 49 00 c6 | 09 01 00 1c 00 76 00 20 |.....I..|.....v. |
|00000cf0| 00 1c 00 20 41 6c 72 65 | 61 64 79 20 68 61 76 65 |... Alre|ady have|
|00000d00| 20 61 20 64 65 63 69 6d | 61 6c 20 70 6f 69 6e 74 | a decim|al point|
|00000d10| 21 01 00 1c 00 e4 00 0c | 00 8a 03 01 00 1c 00 1b |!.......|........|
|00000d20| 01 00 00 01 00 78 00 00 | 60 38 00 00 50 ed 00 05 |.....x..|`8..P...|
|00000d30| 00 a6 09 01 00 2d 22 26 | 00 ed 00 05 00 b8 09 01 |.....-"&|........|
|00000d40| 00 2b 22 26 00 00 60 76 | 00 2b 00 18 00 20 53 69 |.+"&..`v|.+... Si|
|00000d50| 67 6e 73 20 61 72 65 20 | 4f 4b 20 6f 6e 6c 79 20 |gns are |OK only |
|00000d60| 69 6e 20 74 68 65 20 66 | 69 72 73 74 20 70 6f 73 |in the f|irst pos|
|00000d70| 69 74 69 6f 6e 2e 74 00 | 60 0b 00 9a 00 e4 04 a6 |ition.t.|`.......|
|00000d80| 00 49 00 36 0a 00 60 32 | 00 54 0a 01 00 1c 00 e4 |.I.6..`2|.T......|
|00000d90| 00 0c 00 8a 03 01 00 1c | 00 1b 01 00 00 01 00 78 |........|.......x|
|00000da0| 00 00 60 38 00 00 50 25 | 00 00 60 76 00 19 00 18 |..`8..P%|..`v....|
|00000db0| 00 20 4e 6f 74 20 61 20 | 6e 75 6d 62 65 72 2e 20 |. Not a |number. |
|00000dc0| 20 52 65 6d 6f 76 65 2e | 00 00 60 e4 00 0c 00 8a | Remove.|..`.....|
|00000dd0| 03 00 60 1b 01 00 00 01 | 00 78 00 00 40 3a 00 00 |..`.....|.x..@:..|
|00000de0| 00 00 30 ed 00 05 00 a8 | 0a 01 00 2e 22 26 00 00 |..0.....|...."&..|
|00000df0| 40 76 00 3f 00 10 00 20 | 4d 61 6b 65 20 73 75 72 |@v.?... |Make sur|
|00000e00| 65 20 74 68 61 74 20 61 | 20 64 65 63 69 6d 61 6c |e that a| decimal|
|00000e10| 20 68 61 73 20 6e 6f 74 | 20 62 65 65 6e 2c 20 6f | has not| been, o|
|00000e20| 72 20 69 73 20 62 65 69 | 6e 67 2c 20 65 6e 74 65 |r is bei|ng, ente|
|00000e30| 72 65 64 2e 73 00 40 0b | 00 9f 00 ed 00 05 00 ac |red.s.@.|........|
|00000e40| 0a 01 00 2e 22 a6 00 49 | 00 b0 0b 00 50 76 00 1d |...."..I|....Pv..|
|00000e50| 00 14 00 20 54 68 69 73 | 20 69 73 20 74 68 65 20 |... This| is the |
|00000e60| 64 65 63 69 6d 61 6c 20 | 70 6f 69 6e 74 2e 69 00 |decimal |point.i.|
|00000e70| 50 76 00 28 00 14 00 20 | 43 68 65 63 6b 20 66 6f |Pv.(... |Check fo|
|00000e80| 72 20 70 72 65 2d 65 78 | 69 73 74 69 6e 67 20 64 |r pre-ex|isting d|
|00000e90| 65 63 69 6d 61 6c 20 70 | 6f 69 6e 74 2e 00 50 0b |ecimal p|oint..P.|
|00000ea0| 00 b9 00 11 00 c7 00 ee | 00 ed 00 05 00 4e 0a 01 |........|.....N..|
|00000eb0| 00 2e 22 ba 00 0c 00 52 | 01 00 50 0b 00 52 01 e4 |.."....R|..P..R..|
|00000ec0| 00 df 00 49 00 aa 0b 00 | 60 e4 00 0c 00 8a 03 00 |...I....|`.......|
|00000ed0| 60 1b 01 00 00 01 00 78 | 00 00 50 38 00 00 40 32 |`......x|..P8..@2|
|00000ee0| 00 76 0c 00 50 76 00 30 | 00 14 00 20 53 65 65 20 |.v..Pv.0|... See |
|00000ef0| 69 66 20 74 68 65 20 64 | 65 63 69 6d 61 6c 20 70 |if the d|ecimal p|
|00000f00| 6f 69 6e 74 20 77 61 73 | 20 61 6c 72 65 61 64 79 |oint was| already|
|00000f10| 20 65 6e 74 65 72 65 64 | 2e 00 50 0b 00 84 00 ed | entered|..P.....|
|00000f20| 00 05 00 98 0b 01 00 2e | 22 ba 00 0c 00 52 01 00 |........|"....R..|
|00000f30| 50 0b 00 52 01 e4 00 a6 | 00 49 00 72 0c 00 60 76 |P..R....|.I.r..`v|
|00000f40| 00 46 00 18 00 20 4e 6f | 20 64 65 63 69 6d 61 6c |.F... No| decimal|
|00000f50| 20 70 6f 69 6e 74 20 79 | 65 74 3b 20 64 69 73 61 | point y|et; disa|
|00000f60| 6c 6c 6f 77 20 65 6e 74 | 72 79 20 6f 66 20 61 6e |llow ent|ry of an|
|00000f70| 79 74 68 69 6e 67 20 62 | 75 74 20 64 65 63 69 6d |ything b|ut decim|
|00000f80| 61 6c 20 70 6f 69 6e 74 | 2e 00 60 e4 00 0c 00 8a |al point|..`.....|
|00000f90| 03 00 60 1b 01 00 00 01 | 00 78 00 00 50 38 00 00 |..`.....|.x..P8..|
|00000fa0| 40 38 00 00 30 00 30 ed | 00 05 00 84 0c 01 00 21 |@8..0.0.|.......!|
|00000fb0| 22 26 00 00 40 76 00 31 | 00 10 00 20 4d 61 6b 65 |"&..@v.1|... Make|
|00000fc0| 20 73 75 72 65 20 4e 65 | 78 74 43 68 61 72 20 69 | sure Ne|xtChar i|
|00000fd0| 73 20 41 53 43 49 49 20 | 61 6e 64 20 75 70 70 65 |s ASCII |and uppe|
|00000fe0| 72 20 63 61 73 65 20 69 | 74 2e 29 00 40 0b 00 9f |r case i|t.).@...|
|00000ff0| 00 a9 00 e5 00 20 00 de | 00 0b 00 9f 00 a9 00 e5 |..... ..|........|
|00001000| 00 7e 00 e2 00 a4 00 ee | 00 49 00 58 0d 00 50 0b |.~......|.I.X..P.|
|00001010| 00 9f 00 ed 00 05 00 f8 | 0c 01 00 61 22 de 00 0b |........|...a"...|
|00001020| 00 9f 00 ed 00 05 00 08 | 0d 01 00 7a 22 e2 00 a4 |........|...z"...|
|00001030| 00 ee 00 49 00 52 0d 00 | 60 76 00 1f 00 18 00 20 |...I.R..|`v..... |
|00001040| 4c 6f 77 65 72 20 63 61 | 73 65 3b 20 4d 61 6b 65 |Lower ca|se; Make|
|00001050| 20 75 70 70 65 72 20 63 | 61 73 65 2e 6d 00 60 0b | upper c|ase.m.`.|
|00001060| 00 19 01 e5 00 20 00 f7 | 00 0c 00 8a 03 00 50 38 |..... ..|......P8|
|00001070| 00 00 40 32 00 8e 0d 00 | 50 76 00 16 00 14 00 20 |..@2....|Pv..... |
|00001080| 4e 6f 74 20 41 53 43 49 | 49 2e 20 20 52 65 6d 6f |Not ASCI|I.  Remo|
|00001090| 76 65 2e 00 50 e4 00 0c | 00 8a 03 00 50 1b 01 00 |ve..P...|....P...|
|000010a0| 00 01 00 78 00 00 40 38 | 00 00 00 00 30 ed 00 05 |...x..@8|....0...|
|000010b0| 00 6c 0d 01 00 41 22 26 | 00 00 40 76 00 1f 00 10 |.l...A"&|..@v....|
|000010c0| 00 20 4d 61 6b 65 20 73 | 75 72 65 20 4e 65 78 74 |. Make s|ure Next|
|000010d0| 43 68 61 72 20 69 73 20 | 61 6c 70 68 61 2e 00 00 |Char is |alpha...|
|000010e0| 40 0b 00 9f 00 ed 00 05 | 00 01 00 01 00 61 22 df |@.......|.....a".|
|000010f0| 00 0b 00 9f 00 ed 00 05 | 00 01 00 01 00 7a 22 e3 |........|.....z".|
|00001100| 00 a4 00 ee 00 0b 00 9f | 00 ed 00 05 00 01 00 01 |........|........|
|00001110| 00 41 22 df 00 0b 00 9f | 00 ed 00 05 00 01 00 01 |.A".....|........|
|00001120| 00 5a 22 e3 00 a4 00 ee | 00 f5 00 49 00 24 0e 00 |.Z".....|...I.$..|
|00001130| 40 32 00 5a 0e 00 50 76 | 00 16 00 14 00 20 4e 6f |@2.Z..Pv|..... No|
|00001140| 74 20 61 6c 70 68 61 2e | 20 20 52 65 6d 6f 76 65 |t alpha.|  Remove|
|00001150| 2e 00 50 e4 00 0c 00 8a | 03 00 50 1b 01 00 00 01 |..P.....|..P.....|
|00001160| 00 78 00 00 40 38 00 00 | 00 00 30 ed 00 05 00 38 |.x..@8..|..0....8|
|00001170| 0e 01 00 58 22 26 00 00 | 40 76 00 2c 00 10 00 20 |...X"&..|@v.,... |
|00001180| 41 6e 79 20 63 68 61 72 | 61 63 74 65 72 20 61 6c |Any char|acter al|
|00001190| 6c 6f 77 65 64 3b 20 6f | 6e 6c 79 20 63 68 65 63 |lowed; o|nly chec|
|000011a0| 6b 20 6c 65 6e 67 74 68 | 2e 00 30 00 30 25 00 00 |k length|..0.0%..|
|000011b0| 40 0b 00 ec 02 f4 00 49 | 00 22 0f 00 50 76 00 1c |@......I|."..Pv..|
|000011c0| 00 14 00 20 49 6e 76 61 | 6c 69 64 20 66 6f 72 6d |... Inva|lid form|
|000011d0| 61 74 20 63 68 61 72 61 | 63 74 65 72 2e 00 50 ed |at chara|cter..P.|
|000011e0| 00 28 00 b8 0e 24 00 49 | 6e 76 61 6c 69 64 20 63 |.(...$.I|nvalid c|
|000011f0| 68 61 72 61 63 74 65 72 | 20 69 6e 20 66 6f 72 6d |haracter| in form|
|00001200| 61 74 20 73 74 72 69 6e | 67 3a 20 0b 00 ab 00 a3 |at strin|g: .....|
|00001210| 00 1b 01 01 00 06 00 78 | 00 00 40 38 00 00 40 00 |.......x|..@8..@.|
|00001220| 20 3a 00 00 20 0b 00 ff | 02 0b 00 8a 03 e4 00 f1 | :.. ...|........|
|00001230| 00 a4 00 49 00 5c 10 00 | 30 0b 00 84 00 0b 00 9a |...I.\..|0.......|
|00001240| 00 e4 04 f7 00 c1 00 0b | 00 19 01 ac 00 a3 00 0b |........|........|
|00001250| 00 84 00 0b 00 90 00 0b | 00 9a 00 e4 04 a3 00 ee |........|........|
|00001260| 00 f7 00 cc 00 a3 00 0b | 00 b9 00 12 00 c7 00 00 |........|........|
|00001270| 30 e4 00 0c 00 8a 03 00 | 30 76 00 26 00 0c 00 20 |0.......|0v.&... |
|00001280| 53 65 65 20 69 66 20 6e | 65 78 74 20 63 68 61 72 |See if n|ext char|
|00001290| 61 63 74 65 72 20 69 73 | 20 61 20 6c 69 74 65 72 |acter is| a liter|
|000012a0| 61 6c 2e 00 30 e4 00 0c | 00 22 03 00 30 ed 00 09 |al..0...|."..0...|
|000012b0| 00 96 0f 05 00 39 21 2e | 41 58 22 0b 00 93 02 ba |.....9!.|AX".....|
|000012c0| 00 e4 00 a6 00 31 00 0e | 10 00 40 0b 00 22 03 e4 |.....1..|..@.."..|
|000012d0| 04 a3 00 0c 00 22 03 00 | 40 0b 00 74 00 0b 00 9a |....."..|@..t....|
|000012e0| 00 0b 00 22 03 a3 00 e4 | 04 c7 00 0c 00 93 02 00 |..."....|........|
|000012f0| 30 4a 00 c0 0f 00 30 0b | 00 22 03 e4 00 a6 00 49 |0J....0.|.".....I|
|00001300| 00 38 10 00 40 0b 00 9a | 00 0b 00 22 03 a3 00 0b |.8..@...|..."....|
|00001310| 00 b9 00 12 00 31 01 00 | 30 32 00 58 10 00 40 0b |.....1..|02.X..@.|
|00001320| 00 9a 00 0b 00 22 03 e4 | 04 f7 00 ee 00 a3 00 0b |....."..|........|
|00001330| 00 b9 00 12 00 31 01 00 | 30 38 00 00 20 38 00 00 |.....1..|08.. 8..|
|00001340| 20 0b 00 8a 03 0c 00 5a | 00 00 10 38 00 00 00 39 | ......Z|...8...9|
|00001350| 00 09 00 08 00 ff ff ff | ff ff ff ff ff b6 00 00 |........|........|
|00001360| 00 03 00 00 0b 00 43 68 | 65 63 6b 46 6f 72 6d 61 |......Ch|eckForma|
|00001370| 74 02 09 30 d6 0b 7e 0c | 18 00 00 00 40 00 1e 00 |t..0..~.|....@...|
|00001380| 43 01 c1 02 03 00 b9 00 | 00 80 08 00 02 00 74 00 |C.......|......t.|
|00001390| 00 80 06 00 00 00 d0 02 | 00 80 01 00 00 00 00 10 |........|........|
|000013a0| fc 00 42 00 16 00 06 00 | 15 00 0d 00 35 02 16 00 |..B.....|....5...|
|000013b0| 06 00 29 00 0d 00 84 00 | 00 10 fc 00 52 00 16 00 |..).....|....R...|
|000013c0| 06 00 11 00 0d 00 b1 02 | 00 10 ed 00 06 00 5a 00 |........|......Z.|
|000013d0| 02 00 31 39 0c 00 35 02 | 00 00 00 10 0b 00 74 00 |..19..5.|......t.|
|000013e0| e4 0c c1 00 ed 00 07 00 | 76 00 03 00 40 4c 20 22 |........|v...@L "|
|000013f0| a6 00 49 00 a0 00 00 20 | 0b 00 74 00 0b 00 74 00 |..I.... |..t...t.|
|00001400| c2 00 06 05 e4 0c f7 00 | cc 00 0c 00 74 00 00 10 |........|....t...|
|00001410| 38 00 00 00 00 10 0b 00 | b9 00 11 00 c7 00 0c 00 |8.......|........|
|00001420| 84 00 00 10 0b 00 74 00 | e4 04 c1 00 0c 18 66 00 |......t.|......f.|
|00001430| 00 10 e4 04 f9 00 0c 00 | 43 01 00 10 0b 00 b9 00 |........|C.......|
|00001440| 11 00 31 01 0c 00 da 02 | 00 00 00 10 0b 18 66 00 |..1.....|......f.|
|00001450| 56 00 ee 00 00 20 ed 00 | 05 00 f4 00 01 00 21 22 |V.... ..|......!"|
|00001460| 26 00 00 20 ed 00 05 00 | 0c 01 01 00 41 22 26 00 |&.. ....|....A"&.|
|00001470| 00 20 ed 00 05 00 24 01 | 01 00 39 22 26 00 00 20 |. ....$.|..9"&.. |
|00001480| 0b 00 74 00 e4 0c e4 04 | c7 00 ed 00 05 00 46 01 |..t.....|......F.|
|00001490| 01 00 2f 22 a6 00 49 00 | 40 08 00 30 76 00 15 00 |../"..I.|@..0v...|
|000014a0| 0c 00 20 56 61 6c 69 64 | 61 74 65 20 74 68 65 20 |.. Valid|ate the |
|000014b0| 64 61 74 65 2e 00 00 30 | 76 00 37 00 0c 00 20 44 |date...0|v.7... D|
|000014c0| 69 73 61 6c 6c 6f 77 20 | 6f 62 76 69 6f 75 73 6c |isallow |obviousl|
|000014d0| 79 20 62 61 64 20 64 61 | 74 65 73 2c 20 62 75 74 |y bad da|tes, but|
|000014e0| 20 61 6c 6c 6f 77 20 65 | 6d 70 74 79 20 64 61 74 | allow e|mpty dat|
|000014f0| 65 73 2e 20 00 30 0b 00 | 84 00 e4 20 c1 00 ed 00 |es. .0..|... ....|
|00001500| 0c 00 bc 01 08 00 20 20 | 2f 20 20 2f 20 20 a6 00 |......  |/  /  ..|
|00001510| 49 00 d6 01 00 40 3d 00 | 7e 0c 00 30 38 00 00 30 |I....@=.|~..08..0|
|00001520| 0b 00 84 00 c2 00 06 05 | e4 00 a6 00 49 00 10 02 |........|....I...|
|00001530| 00 40 ed 00 0c 00 f2 01 | 08 00 20 20 2f 20 20 2f |.@......|..  /  /|
|00001540| 20 20 0b 00 b9 00 12 00 | c7 00 00 40 3d 00 7e 0c |  ......|...@=.~.|
|00001550| 00 30 38 00 00 30 0b 00 | 84 00 c2 00 06 05 e4 18 |.08..0..|........|
|00001560| e3 00 49 00 2e 02 00 40 | 43 00 6c 02 00 30 38 00 |..I....@|C.l..08.|
|00001570| 00 30 00 30 76 00 32 00 | 0c 00 20 44 65 63 6f 6e |.0.0v.2.|.. Decon|
|00001580| 73 74 72 75 63 74 20 74 | 68 65 20 64 61 74 65 20 |struct t|he date |
|00001590| 61 6e 64 20 76 61 6c 69 | 64 61 74 65 20 65 61 63 |and vali|date eac|
|000015a0| 68 20 70 6f 72 74 69 6f | 6e 2e 00 30 0b 00 84 00 |h portio|n..0....|
|000015b0| ed 00 05 00 74 02 01 00 | 2f 22 ba 00 0c 00 ce 01 |....t...|/"......|
|000015c0| 00 30 0b 00 ce 01 e4 00 | e2 00 49 00 b8 02 00 40 |.0......|..I....@|
|000015d0| 76 00 19 00 10 00 20 4e | 6f 20 73 6c 61 73 68 65 |v..... N|o slashe|
|000015e0| 73 20 2d 20 62 61 64 20 | 64 61 74 65 21 65 00 40 |s - bad |date!e.@|
|000015f0| 43 00 6c 02 00 30 38 00 | 00 30 76 00 0f 00 0c 00 |C.l..08.|.0v.....|
|00001600| 20 43 68 65 63 6b 20 6d | 6f 6e 74 68 2e 74 00 30 | Check m|onth.t.0|
|00001610| 0b 00 84 00 0b 00 ce 01 | e4 04 f7 00 c1 00 0c 18 |........|........|
|00001620| c4 01 00 30 0b 18 c4 01 | dd 00 e4 04 e3 00 0b 18 |...0....|........|
|00001630| c4 01 dd 00 e5 00 0c 00 | df 00 f5 00 49 00 2c 03 |........|....I.,.|
|00001640| 00 40 76 00 18 00 10 00 | 20 42 61 64 20 6d 6f 6e |.@v.....| Bad mon|
|00001650| 74 68 20 2d 20 62 61 64 | 20 64 61 74 65 21 00 40 |th - bad| date!.@|
|00001660| 43 00 6c 02 00 30 38 00 | 00 30 0b 18 c4 01 dd 00 |C.l..08.|.0......|
|00001670| e4 28 e3 00 0b 18 c4 01 | c2 00 06 05 e4 04 a6 00 |.(......|........|
|00001680| a4 00 49 00 9a 03 00 40 | 76 00 2d 00 10 00 20 41 |..I....@|v.-... A|
|00001690| 64 64 20 61 20 7a 65 72 | 6f 20 74 6f 20 6d 6f 6e |dd a zer|o to mon|
|000016a0| 74 68 20 74 6f 20 6d 61 | 6b 65 20 69 74 20 74 77 |th to ma|ke it tw|
|000016b0| 6f 20 64 69 67 69 74 73 | 2e 74 00 40 ed 00 05 00 |o digits|.t.@....|
|000016c0| ce 01 01 00 30 22 0b 18 | c4 01 a3 00 0c 18 c4 01 |....0"..|........|
|000016d0| 00 30 38 00 00 30 00 30 | 0b 00 ce 01 e4 04 a3 00 |.08..0.0|........|
|000016e0| 0b 00 84 00 ed 00 05 00 | 76 03 01 00 2f 22 bb 00 |........|v.../"..|
|000016f0| 0c 00 dc 01 00 30 0b 00 | dc 01 e4 00 a6 00 49 00 |.....0..|......I.|
|00001700| 00 04 00 40 76 00 23 00 | 10 00 20 53 65 63 6f 6e |...@v.#.|.. Secon|
|00001710| 64 20 73 6c 61 73 68 20 | 6d 69 73 73 69 6e 67 20 |d slash |missing |
|00001720| 2d 20 62 61 64 20 64 61 | 74 65 21 20 00 40 43 00 |- bad da|te! .@C.|
|00001730| 6c 02 00 30 38 00 00 30 | 76 00 0d 00 0c 00 20 43 |l..08..0|v..... C|
|00001740| 68 65 63 6b 20 64 61 79 | 2e 20 00 30 0b 18 84 00 |heck day|. .0....|
|00001750| 0b 00 ce 01 e4 04 a3 00 | 0b 00 dc 01 0b 00 ce 01 |........|........|
|00001760| e4 04 a3 00 ee 00 f7 00 | c7 00 0c 18 e9 01 00 30 |........|.......0|
|00001770| 0b 18 e9 01 dd 00 e4 04 | e3 00 0b 18 e9 01 dd 00 |........|........|
|00001780| e5 00 1f 00 df 00 f5 00 | 49 00 84 04 00 40 76 00 |........|I....@v.|
|00001790| 17 00 10 00 20 42 61 64 | 20 64 61 74 65 20 3d 20 |.... Bad| date = |
|000017a0| 62 61 64 20 64 61 74 65 | 21 20 00 40 43 00 6c 02 |bad date|! .@C.l.|
|000017b0| 00 30 38 00 00 30 0b 18 | e9 01 dd 00 e4 28 e3 00 |.08..0..|.....(..|
|000017c0| 0b 18 e9 01 c2 00 06 05 | e4 04 a6 00 a4 00 49 00 |........|......I.|
|000017d0| f0 04 00 40 76 00 2b 00 | 10 00 20 41 64 64 20 61 |...@v.+.|.. Add a|
|000017e0| 20 7a 65 72 6f 20 74 6f | 20 64 61 79 20 74 6f 20 | zero to| day to |
|000017f0| 6d 61 6b 65 20 69 74 20 | 74 77 6f 20 64 69 67 69 |make it |two digi|
|00001800| 74 73 2e 73 00 40 ed 00 | 05 00 c2 02 01 00 30 22 |ts.s.@..|......0"|
|00001810| 0b 18 e9 01 a3 00 0c 18 | e9 01 00 30 38 00 00 30 |........|...08..0|
|00001820| 0b 18 c4 01 ed 00 06 00 | c2 04 02 00 30 34 a6 00 |........|....04..|
|00001830| 0b 18 c4 01 ed 00 06 00 | d2 04 02 00 30 36 a6 00 |........|....06..|
|00001840| f5 00 0b 18 c4 01 ed 00 | 06 00 e4 04 02 00 30 39 |........|......09|
|00001850| a6 00 f5 00 0b 18 c4 01 | ed 00 06 00 f6 04 02 00 |........|........|
|00001860| 31 31 a6 00 f5 00 49 00 | 7c 05 00 40 76 00 18 00 |11....I.||..@v...|
|00001870| 10 00 20 4e 6f 20 6d 6f | 72 65 20 74 68 61 6e 20 |.. No mo|re than |
|00001880| 33 30 20 64 61 79 73 2e | 00 40 0b 18 c4 01 dd 00 |30 days.|.@......|
|00001890| e5 00 1e 00 df 00 49 00 | 78 05 00 50 43 00 6c 02 |......I.|x..PC.l.|
|000018a0| 00 40 38 00 00 30 38 00 | 00 30 0b 18 c4 01 ed 00 |.@8..08.|.0......|
|000018b0| 06 00 4e 05 02 00 30 32 | a6 00 49 00 e6 05 00 40 |..N...02|..I....@|
|000018c0| 76 00 2c 00 10 00 20 43 | 68 65 63 6b 20 66 6f 72 |v.,... C|heck for|
|000018d0| 20 6c 65 61 70 20 79 65 | 61 72 20 28 66 75 74 75 | leap ye|ar (futu|
|000018e0| 72 65 20 65 6e 68 61 6e | 63 65 6d 65 6e 74 29 2e |re enhan|cement).|
|000018f0| 00 40 0b 18 c4 01 dd 00 | e5 00 1c 00 df 00 49 00 |.@......|......I.|
|00001900| e2 05 00 50 43 00 6c 02 | 00 40 38 00 00 30 38 00 |...PC.l.|.@8..08.|
|00001910| 00 00 00 30 76 00 0e 00 | 0c 00 20 43 68 65 63 6b |...0v...|.. Check|
|00001920| 20 79 65 61 72 2e 00 30 | 0b 00 84 00 0b 00 dc 01 | year..0|........|
|00001930| e4 04 a3 00 e5 00 63 00 | c7 00 cf 00 0c 18 fd 01 |......c.|........|
|00001940| 00 30 76 00 22 00 0c 00 | 20 45 78 74 72 61 63 74 |.0v."...| Extract|
|00001950| 20 79 65 61 72 20 70 6f | 72 74 69 6f 6e 20 6f 66 | year po|rtion of|
|00001960| 20 66 6f 72 6d 61 74 2e | 00 30 0b 00 74 00 ed 00 | format.|.0..t...|
|00001970| 05 00 16 06 01 00 2f 22 | ba 00 0c 00 1d 02 00 30 |....../"|.......0|
|00001980| 0b 00 1d 02 e4 04 a3 00 | 0b 00 74 00 ed 00 05 00 |........|..t.....|
|00001990| 38 06 01 00 2f 22 bb 00 | 0c 00 1d 02 00 30 0b 00 |8.../"..|.....0..|
|000019a0| 74 00 0b 00 74 00 c2 00 | 06 05 0b 00 1d 02 f7 00 |t...t...|........|
|000019b0| cc 00 0c 18 06 02 00 30 | 0b 18 fd 01 c2 00 06 05 |.......0|........|
|000019c0| 0b 18 06 02 c2 00 06 05 | f1 00 49 00 42 07 00 40 |........|..I.B..@|
|000019d0| 0b 18 fd 01 c2 00 06 05 | e4 08 a6 00 49 00 08 07 |........|....I...|
|000019e0| 00 50 76 00 25 00 14 00 | 20 41 64 64 20 64 65 66 |.Pv.%...| Add def|
|000019f0| 61 75 6c 74 20 79 65 61 | 72 20 74 6f 20 6d 61 6b |ault yea|r to mak|
|00001a00| 65 20 34 20 64 69 67 69 | 74 73 2e 65 00 50 0b 00 |e 4 digi|ts.e.P..|
|00001a10| 35 02 0b 18 fd 01 a3 00 | 0c 18 fd 01 00 40 32 00 |5.......|.....@2.|
|00001a20| 3e 07 00 50 76 00 26 00 | 14 00 20 49 6e 63 6f 72 |>..Pv.&.|.. Incor|
|00001a30| 72 65 63 74 20 6e 75 6d | 62 65 72 20 6f 66 20 64 |rect num|ber of d|
|00001a40| 69 67 69 74 73 20 69 6e | 20 79 65 61 72 2e 00 50 |igits in| year..P|
|00001a50| 43 00 6c 02 00 40 38 00 | 00 30 38 00 00 30 0b 18 |C.l..@8.|.08..0..|
|00001a60| fd 01 c2 00 06 05 e4 10 | a6 00 49 00 b0 07 00 40 |........|..I....@|
|00001a70| 0b 18 fd 01 dd 00 e5 00 | 08 07 e3 00 0b 18 fd 01 |........|........|
|00001a80| dd 00 e5 00 0f 27 df 00 | a4 00 49 00 ac 07 00 50 |.....'..|..I....P|
|00001a90| 76 00 21 00 14 00 20 44 | 61 74 65 20 74 6f 6f 20 |v.!... D|ate too |
|00001aa0| 6f 6c 64 20 6f 72 20 74 | 6f 20 66 61 72 20 66 75 |old or t|o far fu|
|00001ab0| 74 75 72 65 2e 79 00 50 | 43 00 6c 02 00 40 38 00 |ture.y.P|C.l..@8.|
|00001ac0| 00 30 38 00 00 30 76 00 | 35 00 0c 00 20 57 72 69 |.08..0v.|5... Wri|
|00001ad0| 74 65 20 74 68 65 20 63 | 6f 72 72 65 63 74 6c 79 |te the c|orrectly|
|00001ae0| 20 66 6f 72 6d 61 74 74 | 65 64 20 64 61 74 65 20 | formatt|ed date |
|00001af0| 74 6f 20 74 68 65 20 63 | 6f 6e 74 72 6f 6c 2e 73 |to the c|ontrol.s|
|00001b00| 00 30 0b 18 c4 01 ed 00 | 05 00 c0 07 01 00 2f 22 |.0......|....../"|
|00001b10| a3 00 0b 18 e9 01 a3 00 | ed 00 05 00 d2 07 01 00 |........|........|
|00001b20| 2f 22 a3 00 0b 18 fd 01 | a3 00 0b 00 b9 00 12 00 |/"......|........|
|00001b30| c7 00 00 30 0b 00 b9 00 | 11 00 c7 00 ee 00 c2 00 |...0....|........|
|00001b40| 08 00 0b 00 b9 00 12 00 | 31 01 00 20 32 00 3a 0c |........|1.. 2.:.|
|00001b50| 00 30 76 00 28 00 0c 00 | 20 43 68 65 63 6b 20 66 |.0v.(...| Check f|
|00001b60| 6f 72 20 61 6e 79 20 6e | 6f 6e 2d 6e 75 6d 65 72 |or any n|on-numer|
|00001b70| 69 63 20 63 68 61 72 61 | 63 74 65 72 73 2e 00 30 |ic chara|cters..0|
|00001b80| e4 00 0c 04 55 02 00 30 | 0b 00 9a 00 e4 04 0b 00 |....U..0|........|
|00001b90| 84 00 c2 00 06 05 3e 00 | ff ff 28 0a 00 40 0b 00 |......>.|..(..@..|
|00001ba0| 84 00 0b 00 9a 00 e4 04 | c7 00 56 00 aa 08 00 50 |........|..V....P|
|00001bb0| ed 00 05 00 b0 08 01 00 | 30 22 ed 00 05 00 ba 08 |........|0"......|
|00001bc0| 01 00 39 22 27 00 00 50 | ed 00 05 00 d2 08 01 00 |..9"'..P|........|
|00001bd0| 2e 22 26 00 00 60 0b 04 | 55 02 49 00 1e 09 01 00 |."&..`..|U.I.....|
|00001be0| 1c 00 76 00 22 00 1c 00 | 20 54 68 69 73 20 69 73 |..v."...| This is|
|00001bf0| 20 61 20 73 65 63 6f 6e | 64 20 64 65 63 69 6d 61 | a secon|d decima|
|00001c00| 6c 20 70 6f 69 6e 74 21 | 01 00 1c 00 43 00 6c 02 |l point!|....C.l.|
|00001c10| 00 60 38 00 00 60 e4 04 | f9 00 0c 04 55 02 00 60 |.`8..`..|....U..`|
|00001c20| 0b 00 9a 00 e4 04 a6 00 | 49 00 62 09 01 00 1c 00 |........|I.b.....|
|00001c30| ed 00 05 00 fe 08 01 00 | 30 22 0b 00 84 00 a3 00 |........|0"......|
|00001c40| 0c 00 84 00 01 00 1c 00 | 0b 00 9a 00 e4 04 a3 00 |........|........|
|00001c50| 0c 00 9a 00 00 60 38 00 | 00 50 ed 00 05 00 04 09 |.....`8.|.P......|
|00001c60| 01 00 2d 22 26 00 ed 00 | 05 00 16 09 01 00 2b 22 |..-"&...|......+"|
|00001c70| 26 00 00 60 0b 00 9a 00 | e4 04 a6 00 49 00 a0 09 |&..`....|....I...|
|00001c80| 00 60 32 00 dc 09 01 00 | 1c 00 76 00 27 00 1c 00 |.`2.....|..v.'...|
|00001c90| 20 53 69 67 6e 73 20 63 | 61 6e 20 6f 6e 6c 79 20 | Signs c|an only |
|00001ca0| 62 65 20 69 6e 20 66 69 | 72 73 74 20 70 6f 73 69 |be in fi|rst posi|
|00001cb0| 74 69 6f 6e 2e 2d 01 00 | 1c 00 43 00 6c 02 00 60 |tion.-..|..C.l..`|
|00001cc0| 38 00 00 50 25 00 00 60 | 76 00 26 00 18 00 20 4e |8..P%..`|v.&... N|
|00001cd0| 6f 6e 2d 6e 75 6d 65 72 | 69 63 20 63 68 61 72 61 |on-numer|ic chara|
|00001ce0| 63 74 65 72 2e 20 20 42 | 61 64 20 6e 75 6d 62 65 |cter.  B|ad numbe|
|00001cf0| 72 21 00 60 43 00 6c 02 | 00 40 3a 00 00 30 0b 00 |r!.`C.l.|.@:..0..|
|00001d00| 9a 00 4e 00 ff ff 03 00 | 00 30 76 00 26 00 0c 00 |..N.....|.0v.&...|
|00001d10| 20 41 64 6a 75 73 74 20 | 64 65 63 69 6d 61 6c 20 | Adjust |decimal |
|00001d20| 70 6f 69 6e 74 2c 20 69 | 66 20 6e 65 63 65 73 73 |point, i|f necess|
|00001d30| 61 72 79 2e 00 30 0b 00 | 74 00 ed 00 05 00 62 0a |ary..0..|t.....b.|
|00001d40| 01 00 2e 22 ba 00 0c 00 | 71 01 00 30 0b 00 71 01 |..."....|q..0..q.|
|00001d50| e4 00 df 00 49 00 36 0c | 00 40 0b 00 84 00 ed 00 |....I.6.|.@......|
|00001d60| 05 00 88 0a 01 00 2e 22 | ba 00 0c 00 52 01 00 40 |......."|....R..@|
|00001d70| 76 00 2e 00 10 00 20 47 | 65 74 20 74 68 65 20 6e |v..... G|et the n|
|00001d80| 75 6d 62 65 72 20 6f 66 | 20 64 65 63 69 6d 61 6c |umber of| decimal|
|00001d90| 20 70 6c 61 63 65 73 20 | 69 6e 20 66 6f 72 6d 61 | places |in forma|
|00001da0| 74 2e 00 40 0b 00 74 00 | c2 00 06 05 0b 00 71 01 |t..@..t.|......q.|
|00001db0| f7 00 0c 00 60 01 00 40 | 0b 00 60 01 e4 00 df 00 |....`..@|..`.....|
|00001dc0| 0b 00 52 01 e4 00 a6 00 | a4 00 49 00 3e 0b 00 50 |..R.....|..I.>..P|
|00001dd0| 76 00 18 00 14 00 20 41 | 70 70 65 6e 64 20 64 65 |v..... A|ppend de|
|00001de0| 63 69 6d 61 6c 20 70 6f | 69 6e 74 2e 00 50 0b 00 |cimal po|int..P..|
|00001df0| 84 00 ed 00 05 00 20 0b | 01 00 2e 22 a3 00 0c 00 |...... .|..."....|
|00001e00| 84 00 00 50 0b 00 84 00 | c2 00 06 05 0c 00 52 01 |...P....|......R.|
|00001e10| 00 40 38 00 00 40 76 00 | 40 00 10 00 20 47 65 74 |.@8..@v.|@... Get|
|00001e20| 20 6e 75 6d 62 65 72 20 | 6f 66 20 63 68 61 72 61 | number |of chara|
|00001e30| 63 74 65 72 73 20 74 6f | 20 72 69 67 68 74 20 6f |cters to| right o|
|00001e40| 66 20 64 65 63 69 6d 61 | 6c 20 69 6e 20 69 6e 70 |f decima|l in inp|
|00001e50| 75 74 20 73 74 72 69 6e | 67 2e 00 40 0b 00 84 00 |ut strin|g..@....|
|00001e60| c2 00 06 05 0b 00 52 01 | f7 00 0c 00 85 01 00 40 |......R.|.......@|
|00001e70| 0b 00 85 01 0b 00 60 01 | df 00 49 00 b6 0b 00 50 |......`.|..I....P|
|00001e80| 43 00 6c 02 00 40 32 00 | 30 0c 00 50 76 00 11 00 |C.l..@2.|0..Pv...|
|00001e90| 14 00 20 41 70 70 65 6e | 64 20 7a 65 72 6f 65 73 |.. Appen|d zeroes|
|00001ea0| 2e 20 00 50 0b 00 9a 00 | e4 04 0b 00 60 01 0b 00 |. .P....|....`...|
|00001eb0| 85 01 f7 00 3e 00 ff ff | 06 0c 00 60 0b 00 84 00 |....>...|...`....|
|00001ec0| ed 00 05 00 f2 0b 01 00 | 30 22 a3 00 0c 00 84 00 |........|0"......|
|00001ed0| 00 50 0b 00 9a 00 4e 00 | ff ff 03 00 00 50 0b 00 |.P....N.|.....P..|
|00001ee0| 84 00 0b 00 b9 00 12 00 | c7 00 00 50 0b 00 84 00 |........|...P....|
|00001ef0| c2 00 06 05 0b 00 b9 00 | 12 00 31 01 00 40 38 00 |........|..1..@8.|
|00001f00| 00 00 00 30 38 00 00 20 | 38 00 00 10 3a 00 00 10 |...08.. |8...:...|
|00001f10| 3d 00 7e 0c 00 00 04 00 | ff ff 6c 02 00 10 e4 00 |=.~.....|..l.....|
|00001f20| 0c 00 43 01 00 10 0b 00 | d0 02 49 00 74 0c 00 20 |..C.....|..I.t.. |
|00001f30| 1b 01 00 00 01 00 78 00 | 00 10 38 00 00 10 3d 00 |......x.|..8...=.|
|00001f40| 7e 0c 00 00 00 00 39 00 | 09 00 08 00 a2 0b ff ff |~.....9.|........|
|00001f50| ff ff ff ff a5 00 00 00 | 03 00 00 0a 00 49 6e 69 |........|.....Ini|
|00001f60| 74 46 6f 72 6d 61 74 01 | 08 30 30 02 40 02 18 00 |tFormat.|.00.@...|
|00001f70| 00 00 58 00 16 00 bd 02 | 00 01 02 00 b9 00 00 80 |..X.....|........|
|00001f80| 08 00 02 00 74 00 00 80 | 06 00 00 00 00 10 fc 00 |....t...|........|
|00001f90| 30 00 16 00 01 00 0a 00 | 0d 00 9a 00 00 10 fc 00 |0.......|........|
|00001fa0| 4a 00 16 00 06 00 0a 00 | 0d 00 cb 02 16 00 06 00 |J.......|........|
|00001fb0| 1e 00 0d 00 b1 02 00 00 | 00 10 e4 04 f9 00 0c 00 |........|........|
|00001fc0| 2d 03 00 10 76 00 1f 00 | 04 00 20 43 68 65 63 6b |-...v...|.. Check|
|00001fd0| 20 66 6f 72 20 69 6d 62 | 65 64 64 65 64 20 6c 69 | for imb|edded li|
|00001fe0| 74 65 72 61 6c 73 2e 00 | 00 10 0b 00 74 00 e4 0c |terals..|....t...|
|00001ff0| c1 00 ed 00 07 00 90 00 | 03 00 40 4c 20 22 a6 00 |........|..@L "..|
|00002000| 49 00 3c 02 00 20 0b 00 | 74 00 0b 00 74 00 c2 00 |I.<.. ..|t...t...|
|00002010| 06 05 e4 0c f7 00 cc 00 | 0c 00 74 00 00 20 76 00 |........|..t.. v.|
|00002020| 1f 00 08 00 20 55 73 65 | 20 73 70 61 63 65 73 20 |.... Use| spaces |
|00002030| 61 73 20 70 6c 61 63 65 | 20 68 6f 6c 64 65 72 73 |as place| holders|
|00002040| 2e 20 00 20 0b 00 9a 00 | e4 04 0b 00 74 00 c2 00 |. . ....|....t...|
|00002050| 06 05 3e 00 ff ff b2 01 | 00 30 0b 00 74 00 0b 00 |..>.....|.0..t...|
|00002060| 9a 00 e4 04 c7 00 0c 00 | cb 02 00 30 ed 00 09 00 |........|...0....|
|00002070| 12 01 05 00 39 41 21 2e | 58 22 0b 00 cb 02 ba 00 |....9A!.|X"......|
|00002080| 0c 00 95 01 00 30 0b 00 | 95 01 e4 00 a6 00 49 00 |.....0..|......I.|
|00002090| 68 01 00 40 76 00 17 00 | 10 00 20 41 6e 20 69 6d |h..@v...|.. An im|
|000020a0| 62 65 64 64 65 64 20 6c | 69 74 65 72 61 6c 2e 01 |bedded l|iteral..|
|000020b0| 00 40 0b 00 b1 02 0b 00 | cb 02 a3 00 0c 00 b1 02 |.@......|........|
|000020c0| 00 30 32 00 a8 01 00 40 | 0b 00 b1 02 ed 00 05 00 |.02....@|........|
|000020d0| 74 01 01 00 20 22 a3 00 | 0c 00 b1 02 00 40 0b 00 |t... "..|.....@..|
|000020e0| 2d 03 49 00 a4 01 00 50 | 0b 00 9a 00 e4 04 f7 00 |-.I....P|........|
|000020f0| 0c 00 3a 03 00 50 e4 00 | 0c 00 2d 03 00 40 38 00 |..:..P..|..-..@8.|
|00002100| 00 30 38 00 00 20 0b 00 | 9a 00 4e 00 ff ff 01 00 |.08.. ..|..N.....|
|00002110| 00 10 00 20 0b 00 b9 00 | 11 00 c7 00 ee 00 c2 00 |... ....|........|
|00002120| 08 00 e4 00 a6 00 49 00 | 38 02 00 30 76 00 3d 00 |......I.|8..0v.=.|
|00002130| 0c 00 20 50 75 74 20 74 | 68 65 20 74 65 6d 70 6c |.. Put t|he templ|
|00002140| 61 74 65 20 69 6e 20 74 | 68 65 20 74 65 78 74 20 |ate in t|he text |
|00002150| 62 6f 78 20 69 66 20 74 | 68 65 72 65 27 73 20 6e |box if t|here's n|
|00002160| 6f 74 68 69 6e 67 20 74 | 68 65 72 65 2e 6f 00 30 |othing t|here.o.0|
|00002170| 0b 00 b1 02 0b 00 b9 00 | 12 00 c7 00 00 30 0b 00 |........|.....0..|
|00002180| 3a 03 0b 00 b9 00 12 00 | 31 01 00 20 38 00 00 10 |:.......|1.. 8...|
|00002190| 38 00 00 10 00 00 39 00 | 09 00 08 00 ff ff ff ff |8.....9.|........|
|000021a0| ff ff ff ff 20 00 00 00 | 03 00 fd                |.... ...|...     |
+--------+-------------------------+-------------------------+--------+--------+