home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Microsoft Windows Dynamic Link Library
(executable/dll).
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4d 5a 02 01 01 00 00 00 | 04 00 00 00 ff ff 00 00 |MZ......|........|
|00000010| b8 00 00 00 00 00 00 00 | 40 00 00 00 00 00 00 00 |........|@.......|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 80 00 00 00 |........|........|
|00000040| 0e 1f ba 0e 00 b4 09 cd | 21 b8 01 4c cd 21 54 68 |........|!..L.!Th|
|00000050| 69 73 20 70 72 6f 67 72 | 61 6d 20 72 65 71 75 69 |is progr|am requi|
|00000060| 72 65 73 20 4d 69 63 72 | 6f 73 6f 66 74 20 57 69 |res Micr|osoft Wi|
|00000070| 6e 64 6f 77 73 2e 0d 0a | 24 00 00 00 00 00 00 00 |ndows...|$.......|
|00000080| 4e 45 05 3c e8 01 01 00 | 00 00 00 00 01 83 01 00 |NE.<....|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 02 00 00 00 |........|........|
|000000a0| 25 00 40 00 50 00 dc 01 | e8 01 e8 01 69 02 00 00 |%.@.P...|....i...|
|000000b0| 00 00 05 00 00 00 02 08 | 15 00 05 00 00 00 0a 03 |........|........|
|000000c0| 16 00 10 00 61 0c 10 00 | 17 00 17 00 40 0c 17 00 |....a...|....@...|
|000000d0| 05 00 06 80 20 00 00 00 | 00 00 1a 00 05 00 30 1c |.... ...|......0.|
|000000e0| 01 83 00 00 00 00 1f 00 | 06 00 30 1c 02 83 00 00 |........|..0.....|
|000000f0| 00 00 25 00 0c 00 30 1c | 01 82 00 00 00 00 31 00 |..%...0.|......1.|
|00000100| 02 00 30 1c 02 82 00 00 | 00 00 33 00 0b 00 30 1c |..0.....|..3...0.|
|00000110| 01 84 00 00 00 00 3e 00 | 09 00 30 1c 02 84 00 00 |......>.|..0.....|
|00000120| 00 00 47 00 0b 00 30 1c | 03 84 00 00 00 00 52 00 |..G...0.|......R.|
|00000130| 0b 00 30 1c 04 84 00 00 | 00 00 5d 00 03 00 30 1c |..0.....|..]...0.|
|00000140| 05 84 00 00 00 00 60 00 | 0b 00 30 1c 06 84 00 00 |......`.|..0.....|
|00000150| 00 00 6b 00 11 00 30 1c | 07 84 00 00 00 00 7c 00 |..k...0.|......|.|
|00000160| 11 00 30 1c 08 84 00 00 | 00 00 8d 00 17 00 30 1c |..0.....|......0.|
|00000170| 09 84 00 00 00 00 a4 00 | 0f 00 30 1c 0a 84 00 00 |........|..0.....|
|00000180| 00 00 b3 00 11 00 30 1c | 0b 84 00 00 00 00 c4 00 |......0.|........|
|00000190| 14 00 30 1c 0c 84 00 00 | 00 00 d8 00 15 00 30 1c |..0.....|......0.|
|000001a0| 0d 84 00 00 00 00 ed 00 | 0f 00 30 1c 0e 84 00 00 |........|..0.....|
|000001b0| 00 00 fc 00 15 00 30 1c | 0f 84 00 00 00 00 11 01 |......0.|........|
|000001c0| 12 00 30 1c 10 84 00 00 | 00 00 23 01 20 00 30 1c |..0.....|..#. .0.|
|000001d0| 11 84 00 00 00 00 43 01 | 10 00 30 1c 12 84 00 00 |......C.|..0.....|
|000001e0| 00 00 53 01 13 00 30 1c | 13 84 00 00 00 00 66 01 |..S...0.|......f.|
|000001f0| 12 00 30 1c 14 84 00 00 | 00 00 78 01 10 00 30 1c |..0.....|..x...0.|
|00000200| 15 84 00 00 00 00 88 01 | 0d 00 30 1c 16 84 00 00 |........|..0.....|
|00000210| 00 00 95 01 05 00 30 1c | 01 86 00 00 00 00 9a 01 |......0.|........|
|00000220| 07 00 30 1c 01 87 00 00 | 00 00 a1 01 0a 00 30 1c |..0.....|......0.|
|00000230| 01 85 00 00 00 00 ab 01 | 0b 00 30 1c 02 85 00 00 |........|..0.....|
|00000240| 00 00 b6 01 11 00 30 1c | 03 85 00 00 00 00 c7 01 |......0.|........|
|00000250| 0d 00 30 1c 04 85 00 00 | 00 00 00 00 08 4e 53 45 |..0.....|.....NSE|
|00000260| 57 33 30 45 4e 00 00 00 | 00 21 71 3a 5c 31 33 38 |W30EN...|.!q:\138|
|00000270| 2e 34 5c 62 69 6e 5c 77 | 31 36 5c 62 69 6e 5c 6e |.4\bin\w|16\bin\n|
|00000280| 73 65 77 33 30 65 6e 2e | 65 78 65 00 00 00 00 00 |sew30en.|exe.....|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 05 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 1e 58 90 45 55 8b ec 1e | 8e d8 b8 01 00 4d 4d 8b |.X.EU...|.....MM.|
|000002f0| e5 1f 5d 4d ca 02 00 00 | 00 00 00 00 00 00 00 00 |..]M....|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 07 43 6c 61 73 73 65 73 | 05 41 72 67 25 64 04 20 |.Classes|.Arg%d. |
|00000350| 41 53 20 0a 28 44 69 73 | 61 62 6c 65 64 29 06 42 |AS .(Dis|abled).B|
|00000360| 59 56 41 4c 20 02 2e 2e | 01 29 02 3a 20 02 2c 20 |YVAL ...|.).: ., |
|00000370| 0c 44 61 74 61 20 4d 65 | 6d 62 65 72 73 0e 28 44 |.Data Me|mbers.(D|
|00000380| 65 63 6c 61 72 61 74 69 | 6f 6e 73 29 06 45 76 65 |eclarati|ons).Eve|
|00000390| 6e 74 73 07 47 6c 6f 62 | 61 6c 73 0a 49 6e 69 74 |nts.Glob|als.Init|
|000003a0| 69 61 6c 69 7a 65 14 4c | 6f 74 75 73 53 63 72 69 |ialize.L|otusScri|
|000003b0| 70 74 20 4c 61 6e 67 75 | 61 67 65 0e 53 63 72 69 |pt Langu|age.Scri|
|000003c0| 70 74 20 43 6c 61 73 73 | 65 73 00 00 00 00 00 00 |pt Class|es......|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 0c 53 63 72 69 70 74 20 | 54 79 70 65 73 07 4d 65 |.Script |Types.Me|
|000003f0| 74 68 6f 64 73 12 4e 6f | 20 49 74 65 6d 73 20 41 |thods.No| Items A|
|00000400| 76 61 69 6c 61 62 6c 65 | 0c 4f 4c 45 32 20 43 6c |vailable|.OLE2 Cl|
|00000410| 61 73 73 65 73 01 28 09 | 28 4f 70 74 69 6f 6e 73 |asses.(.|(Options|
|00000420| 29 07 50 72 6f 64 75 63 | 74 09 56 61 72 69 61 62 |).Produc|t.Variab|
|00000430| 6c 65 73 12 53 75 62 73 | 20 61 6e 64 20 46 75 6e |les.Subs| and Fun|
|00000440| 63 74 69 6f 6e 73 09 43 | 6f 6e 73 74 61 6e 74 73 |ctions.C|onstants|
|00000450| 0a 50 72 6f 70 65 72 74 | 69 65 73 06 53 4f 55 52 |.Propert|ies.SOUR|
|00000460| 43 45 09 54 65 72 6d 69 | 6e 61 74 65 05 20 28 25 |CE.Termi|nate. (%|
|00000470| 73 29 07 55 4e 4b 4e 4f | 57 4e 09 4f 50 54 49 4f |s).UNKNO|WN.OPTIO|
|00000480| 4e 41 4c 20 00 00 00 00 | 00 00 00 00 00 00 00 00 |NAL ....|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 10 4f 70 65 72 61 74 69 | 6f 6e 20 66 61 69 6c 65 |.Operati|on faile|
|000004b0| 64 0e 46 69 6c 65 20 6e | 6f 74 20 66 6f 75 6e 64 |d.File n|ot found|
|000004c0| 13 55 6e 61 62 6c 65 20 | 74 6f 20 6f 70 65 6e 20 |.Unable |to open |
|000004d0| 66 69 6c 65 21 55 73 65 | 20 67 65 6e 65 72 61 6c |file!Use| general|
|000004e0| 20 68 65 6c 70 20 66 6f | 72 20 74 68 69 73 20 63 | help fo|r this c|
|000004f0| 6f 6e 74 65 78 74 19 55 | 6e 61 62 6c 65 20 74 6f |ontext.U|nable to|
|00000500| 20 61 6c 6c 6f 63 61 74 | 65 20 6d 65 6d 6f 72 79 | allocat|e memory|
|00000510| 16 52 65 67 69 73 74 72 | 79 20 6d 6f 64 75 6c 65 |.Registr|y module|
|00000520| 20 65 78 69 73 74 73 19 | 52 65 67 69 73 74 72 79 | exists.|Registry|
|00000530| 20 6d 6f 64 75 6c 65 20 | 6e 6f 74 20 66 6f 75 6e | module |not foun|
|00000540| 64 12 43 61 6e 20 6f 6e | 6c 79 20 72 75 6e 20 61 |d.Can on|ly run a|
|00000550| 20 53 75 62 25 43 61 6e | 20 6f 6e 6c 79 20 72 75 | Sub%Can| only ru|
|00000560| 6e 20 61 20 53 75 62 20 | 77 69 74 68 20 6e 6f 20 |n a Sub |with no |
|00000570| 70 61 72 61 6d 65 74 65 | 72 73 16 53 75 62 70 72 |paramete|rs.Subpr|
|00000580| 6f 67 72 61 6d 20 6e 61 | 6d 65 20 65 78 69 73 74 |ogram na|me exist|
|00000590| 73 17 53 75 62 70 72 6f | 67 72 61 6d 20 6e 61 6d |s.Subpro|gram nam|
|000005a0| 65 20 69 6e 76 61 6c 69 | 64 14 53 75 62 70 72 6f |e invali|d.Subpro|
|000005b0| 67 72 61 6d 20 6e 6f 74 | 20 66 6f 75 6e 64 0e 54 |gram not| found.T|
|000005c0| 65 78 74 20 6e 6f 74 20 | 66 6f 75 6e 64 15 49 6e |ext not |found.In|
|000005d0| 76 61 6c 69 64 20 76 61 | 72 69 61 62 6c 65 20 74 |valid va|riable t|
|000005e0| 79 70 65 13 53 63 72 69 | 70 74 20 69 73 20 65 78 |ype.Scri|pt is ex|
|000005f0| 65 63 75 74 69 6e 67 1a | 54 6f 6f 20 6d 61 6e 79 |ecuting.|Too many|
|00000600| 20 72 65 63 75 72 73 69 | 76 65 20 73 63 72 69 70 | recursi|ve scrip|
|00000610| 74 73 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ts......|........|
|00000620| 2c 54 6f 6f 20 6d 61 6e | 79 20 65 72 72 6f 72 73 |,Too man|y errors|
|00000630| 20 69 6e 20 73 63 72 69 | 70 74 3b 20 6f 70 65 72 | in scri|pt; oper|
|00000640| 61 74 69 6f 6e 20 61 62 | 6f 72 74 65 64 00 00 00 |ation ab|orted...|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 03 41 6c 6c 0a 44 61 74 | 61 20 74 79 70 65 73 15 |.All.Dat|a types.|
|00000670| 50 72 65 64 65 66 69 6e | 65 64 20 64 61 74 61 20 |Predefin|ed data |
|00000680| 74 79 70 65 73 21 54 65 | 73 74 69 6e 67 20 66 6f |types!Te|sting fo|
|00000690| 72 20 64 61 74 61 20 74 | 79 70 65 73 20 61 6e 64 |r data t|ypes and|
|000006a0| 20 76 61 6c 75 65 73 17 | 55 73 65 72 2d 64 65 66 | values.|User-def|
|000006b0| 69 6e 65 64 20 64 61 74 | 61 20 74 79 70 65 73 16 |ined dat|a types.|
|000006c0| 44 61 74 65 20 61 6e 64 | 20 74 69 6d 65 20 68 61 |Date and| time ha|
|000006d0| 6e 64 6c 69 6e 67 1f 43 | 6f 6e 76 65 72 74 69 6e |ndling.C|onvertin|
|000006e0| 67 20 64 61 74 65 20 61 | 6e 64 20 74 69 6d 65 20 |g date a|nd time |
|000006f0| 76 61 6c 75 65 73 19 47 | 65 74 74 69 6e 67 20 61 |values.G|etting a|
|00000700| 6e 64 20 73 65 74 74 69 | 6e 67 20 64 61 74 65 73 |nd setti|ng dates|
|00000710| 18 47 65 74 74 69 6e 67 | 20 61 6e 64 20 73 65 74 |.Getting| and set|
|00000720| 74 69 6e 67 20 74 69 6d | 65 1c 44 65 63 6c 61 72 |ting tim|e.Declar|
|00000730| 61 74 69 6f 6e 73 20 61 | 6e 64 20 64 65 66 69 6e |ations a|nd defin|
|00000740| 69 74 69 6f 6e 73 06 41 | 72 72 61 79 73 09 43 6f |itions.A|rrays.Co|
|00000750| 6e 73 74 61 6e 74 73 13 | 44 65 63 6c 61 72 61 74 |nstants.|Declarat|
|00000760| 69 6f 6e 20 6f 70 74 69 | 6f 6e 73 1f 46 75 6e 63 |ion opti|ons.Func|
|00000770| 74 69 6f 6e 73 2c 20 70 | 72 6f 70 65 72 74 69 65 |tions, p|ropertie|
|00000780| 73 2c 20 61 6e 64 20 73 | 75 62 73 05 4c 69 73 74 |s, and s|ubs.List|
|00000790| 73 10 53 63 61 6c 61 72 | 20 76 61 72 69 61 62 6c |s.Scalar| variabl|
|000007a0| 65 73 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |es......|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 23 55 73 65 72 2d 64 65 | 66 69 6e 65 64 20 64 61 |#User-de|fined da|
|000007d0| 74 61 20 74 79 70 65 73 | 20 61 6e 64 20 63 6c 61 |ta types| and cla|
|000007e0| 73 73 65 73 08 56 61 72 | 69 61 6e 74 73 11 44 61 |sses.Var|iants.Da|
|000007f0| 74 61 20 6d 61 6e 69 70 | 75 6c 61 74 69 6f 6e 06 |ta manip|ulation.|
|00000800| 41 72 72 61 79 73 09 43 | 6f 6e 73 74 61 6e 74 73 |Arrays.C|onstants|
|00000810| 1f 46 75 6e 63 74 69 6f | 6e 73 2c 20 70 72 6f 70 |.Functio|ns, prop|
|00000820| 65 72 74 69 65 73 2c 20 | 61 6e 64 20 73 75 62 73 |erties, |and subs|
|00000830| 05 4c 69 73 74 73 0c 4f | 4c 45 32 20 6f 62 6a 65 |.Lists.O|LE2 obje|
|00000840| 63 74 73 0f 50 72 6f 64 | 75 63 74 20 6f 62 6a 65 |cts.Prod|uct obje|
|00000850| 63 74 73 10 53 63 61 6c | 61 72 20 76 61 72 69 61 |cts.Scal|ar varia|
|00000860| 62 6c 65 73 07 43 6c 61 | 73 73 65 73 08 56 61 72 |bles.Cla|sses.Var|
|00000870| 69 61 6e 74 73 0e 45 72 | 72 6f 72 20 68 61 6e 64 |iants.Er|ror hand|
|00000880| 6c 69 6e 67 0e 45 76 65 | 6e 74 20 68 61 6e 64 6c |ling.Eve|nt handl|
|00000890| 69 6e 67 0d 46 69 6c 65 | 20 68 61 6e 64 6c 69 6e |ing.File| handlin|
|000008a0| 67 24 43 72 65 61 74 69 | 6e 67 2c 20 6f 70 65 6e |g$Creati|ng, open|
|000008b0| 69 6e 67 2c 20 61 6e 64 | 20 63 6c 6f 73 69 6e 67 |ing, and| closing|
|000008c0| 20 66 69 6c 65 73 00 00 | 00 00 00 00 00 00 00 00 | files..|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 24 47 65 74 74 69 6e 67 | 20 61 6e 64 20 73 65 74 |$Getting| and set|
|000008f0| 74 69 6e 67 20 66 69 6c | 65 20 69 6e 66 6f 72 6d |ting fil|e inform|
|00000900| 61 74 69 6f 6e 22 47 65 | 74 74 69 6e 67 20 61 6e |ation"Ge|tting an|
|00000910| 64 20 73 65 74 74 69 6e | 67 20 66 69 6c 65 20 70 |d settin|g file p|
|00000920| 6f 73 69 74 69 6f 6e 73 | 1e 4d 61 6e 61 67 69 6e |ositions|.Managin|
|00000930| 67 20 66 69 6c 65 73 20 | 61 6e 64 20 64 69 72 65 |g files |and dire|
|00000940| 63 74 6f 72 69 65 73 12 | 52 65 61 64 69 6e 67 20 |ctories.|Reading |
|00000950| 66 72 6f 6d 20 66 69 6c | 65 73 10 57 72 69 74 69 |from fil|es.Writi|
|00000960| 6e 67 20 74 6f 20 66 69 | 6c 65 73 0f 46 6c 6f 77 |ng to fi|les.Flow|
|00000970| 20 6f 66 20 63 6f 6e 74 | 72 6f 6c 09 42 72 61 6e | of cont|rol.Bran|
|00000980| 63 68 69 6e 67 07 4c 6f | 6f 70 69 6e 67 10 53 63 |ching.Lo|oping.Sc|
|00000990| 72 69 70 74 20 65 78 65 | 63 75 74 69 6f 6e 0f 4e |ript exe|cution.N|
|000009a0| 75 6d 62 65 72 20 68 61 | 6e 64 6c 69 6e 67 16 4d |umber ha|ndling.M|
|000009b0| 61 74 68 65 6d 61 74 69 | 63 61 6c 20 66 75 6e 63 |athemati|cal func|
|000009c0| 74 69 6f 6e 73 18 4e 75 | 6d 62 65 72 2f 6e 75 6d |tions.Nu|mber/num|
|000009d0| 62 65 72 20 63 6f 6e 76 | 65 72 73 69 6f 6e 18 4e |ber conv|ersion.N|
|000009e0| 75 6d 62 65 72 2f 73 74 | 72 69 6e 67 20 63 6f 6e |umber/st|ring con|
|000009f0| 76 65 72 73 69 6f 6e 17 | 54 72 69 67 6f 6e 6f 6d |version.|Trigonom|
|00000a00| 65 74 72 69 63 20 66 75 | 6e 63 74 69 6f 6e 73 09 |etric fu|nctions.|
|00000a10| 4f 70 65 72 61 74 6f 72 | 73 14 41 72 69 74 68 6d |Operator|s.Arithm|
|00000a20| 65 74 69 63 20 6f 70 65 | 72 61 74 6f 72 73 00 00 |etic ope|rators..|
|00000a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a40| 14 52 65 6c 61 74 69 6f | 6e 61 6c 20 6f 70 65 72 |.Relatio|nal oper|
|00000a50| 61 74 6f 72 73 17 43 6f | 6e 63 61 74 65 6e 61 74 |ators.Co|ncatenat|
|00000a60| 69 6f 6e 20 6f 70 65 72 | 61 74 6f 72 73 11 4c 6f |ion oper|ators.Lo|
|00000a70| 67 69 63 61 6c 20 6f 70 | 65 72 61 74 6f 72 73 12 |gical op|erators.|
|00000a80| 53 63 72 69 70 74 20 65 | 6e 76 69 72 6f 6e 6d 65 |Script e|nvironme|
|00000a90| 6e 74 20 45 78 74 65 72 | 6e 61 6c 20 6d 6f 64 75 |nt Exter|nal modu|
|00000aa0| 6c 65 73 20 61 6e 64 20 | 64 65 66 69 6e 69 74 69 |les and |definiti|
|00000ab0| 6f 6e 73 0e 53 63 72 69 | 70 74 20 6f 70 74 69 6f |ons.Scri|pt optio|
|00000ac0| 6e 73 13 53 6f 75 72 63 | 65 20 63 6f 64 65 20 63 |ns.Sourc|e code c|
|00000ad0| 6f 6e 74 72 6f 6c 0f 53 | 74 72 69 6e 67 20 68 61 |ontrol.S|tring ha|
|00000ae0| 6e 64 6c 69 6e 67 18 50 | 6c 61 74 66 6f 72 6d 20 |ndling.P|latform |
|00000af0| 63 68 61 72 61 63 74 65 | 72 20 63 6f 64 65 73 14 |characte|r codes.|
|00000b00| 43 68 61 72 61 63 74 65 | 72 20 65 78 74 72 61 63 |Characte|r extrac|
|00000b10| 74 69 6f 6e 15 43 68 61 | 72 61 63 74 65 72 20 72 |tion.Cha|racter r|
|00000b20| 65 70 6c 61 63 65 6d 65 | 6e 74 0a 43 6f 6d 70 61 |eplaceme|nt.Compa|
|00000b30| 72 69 73 6f 6e 19 43 6f | 6e 76 65 72 73 69 6f 6e |rison.Co|nversion|
|00000b40| 20 61 6e 64 20 66 6f 72 | 6d 61 74 74 69 6e 67 18 | and for|matting.|
|00000b50| 4e 75 6d 62 65 72 2f 73 | 74 72 69 6e 67 20 63 6f |Number/s|tring co|
|00000b60| 6e 76 65 72 73 69 6f 6e | 17 55 6e 69 63 6f 64 65 |nversion|.Unicode|
|00000b70| 20 73 74 72 69 6e 67 20 | 68 61 6e 64 6c 69 6e 67 | string |handling|
|00000b80| 1f 53 79 73 74 65 6d 20 | 61 6e 64 20 65 6e 76 69 |.System |and envi|
|00000b90| 72 6f 6e 6d 65 6e 74 20 | 68 61 6e 64 6c 69 6e 67 |ronment |handling|
|00000ba0| 1d 45 78 65 63 75 74 69 | 6e 67 20 70 72 6f 67 72 |.Executi|ng progr|
|00000bb0| 61 6d 73 20 61 6e 64 20 | 6d 61 63 72 6f 73 19 54 |ams and |macros.T|
|00000bc0| 65 72 6d 69 6e 61 6c 20 | 69 6e 70 75 74 20 61 6e |erminal |input an|
|00000bd0| 64 20 6f 75 74 70 75 74 | 01 5e 01 2d 01 2a 01 2f |d output|.^.-.*./|
|00000be0| 01 5c 01 2b 01 26 01 3d | 02 3c 3e 02 3e 3c 01 3c |.\.+.&.=|.<>.><.<|
|00000bf0| 02 3c 3d 02 3d 3c 01 3e | 00 00 00 00 00 00 00 00 |.<=.=<.>|........|
|00000c00| 02 3e 3d 02 3d 3e 13 41 | 62 73 20 28 20 6e 75 6d |.>=.=>.A|bs ( num|
|00000c10| 45 78 70 72 20 29 40 41 | 62 73 1a 41 63 6f 73 40 |Expr )@A|bs.Acos@|
|00000c20| 41 43 6f 73 20 28 20 6e | 75 6d 45 78 70 72 20 29 |ACos ( n|umExpr )|
|00000c30| 40 41 43 6f 73 22 41 63 | 74 69 76 61 74 65 41 70 |@ACos"Ac|tivateAp|
|00000c40| 70 20 77 69 6e 64 6f 77 | 4e 61 6d 65 40 41 63 74 |p window|Name@Act|
|00000c50| 69 76 61 74 65 41 70 70 | 03 41 6e 64 16 41 73 63 |ivateApp|.And.Asc|
|00000c60| 20 28 20 73 74 72 69 6e | 67 45 78 70 72 20 29 40 | ( strin|gExpr )@|
|00000c70| 41 73 63 1a 41 73 69 6e | 40 41 53 69 6e 20 28 20 |Asc.Asin|@ASin ( |
|00000c80| 6e 75 6d 45 78 70 72 20 | 29 40 41 53 69 6e 18 41 |numExpr |)@ASin.A|
|00000c90| 74 6e 20 40 41 54 6e 20 | 28 20 6e 75 6d 45 78 70 |tn @ATn |( numExp|
|00000ca0| 72 20 29 40 41 54 6e 25 | 41 74 6e 32 40 41 54 6e |r )@ATn%|Atn2@ATn|
|00000cb0| 32 20 28 20 6e 75 6d 45 | 78 70 72 58 2c 20 6e 75 |2 ( numE|xprX, nu|
|00000cc0| 6d 45 78 70 72 59 20 29 | 40 41 54 6e 32 04 42 65 |mExprY )|@ATn2.Be|
|00000cd0| 65 70 13 42 69 6e 20 28 | 20 6e 75 6d 45 78 70 72 |ep.Bin (| numExpr|
|00000ce0| 20 29 40 42 69 6e 15 42 | 69 6e 24 20 28 20 6e 75 | )@Bin.B|in$ ( nu|
|00000cf0| 6d 45 78 70 72 20 29 40 | 42 69 6e 24 2b 43 61 6c |mExpr )@|Bin$+Cal|
|00000d00| 6c 20 73 75 62 4f 72 46 | 75 6e 63 74 69 6f 6e 20 |l subOrF|unction |
|00000d10| 5b 20 28 20 5b 20 61 72 | 67 4c 69 73 74 20 5d 20 |[ ( [ ar|gList ] |
|00000d20| 29 20 5d 40 43 61 6c 6c | 17 43 63 75 72 40 43 43 |) ]@Call|.Ccur@CC|
|00000d30| 75 72 20 28 20 65 78 70 | 72 20 29 40 43 43 75 72 |ur ( exp|r )@CCur|
|00000d40| 1b 43 64 61 74 40 43 44 | 61 74 20 28 20 64 61 74 |.Cdat@CD|at ( dat|
|00000d50| 65 45 78 70 72 20 29 40 | 43 44 61 74 00 00 00 00 |eExpr )@|CDat....|
|00000d60| 17 43 64 62 6c 40 43 44 | 62 6c 20 28 20 65 78 70 |.Cdbl@CD|bl ( exp|
|00000d70| 72 20 29 40 43 44 62 6c | 16 43 68 64 69 72 40 43 |r )@CDbl|.Chdir@C|
|00000d80| 68 44 69 72 20 70 61 74 | 68 40 43 68 44 69 72 1d |hDir pat|h@ChDir.|
|00000d90| 43 68 64 72 69 76 65 40 | 43 68 44 72 69 76 65 20 |Chdrive@|ChDrive |
|00000da0| 64 72 69 76 65 40 43 68 | 44 72 69 76 65 13 43 68 |drive@Ch|Drive.Ch|
|00000db0| 72 20 28 20 6e 75 6d 45 | 78 70 72 20 29 40 43 68 |r ( numE|xpr )@Ch|
|00000dc0| 72 15 43 68 72 24 20 28 | 20 6e 75 6d 45 78 70 72 |r.Chr$ (| numExpr|
|00000dd0| 20 29 40 43 68 72 24 17 | 43 69 6e 74 40 43 49 6e | )@Chr$.|Cint@CIn|
|00000de0| 74 20 28 20 65 78 70 72 | 20 29 40 43 49 6e 74 55 |t ( expr| )@CIntU|
|00000df0| 43 6c 61 73 73 40 5b 20 | 50 75 62 6c 69 63 20 7c |Class@[ |Public ||
|00000e00| 20 50 72 69 76 61 74 65 | 20 5d 20 43 6c 61 73 73 | Private| ] Class|
|00000e10| 20 63 6c 61 73 73 4e 61 | 6d 65 20 5b 20 41 73 20 | classNa|me [ As |
|00000e20| 62 61 73 65 43 6c 61 73 | 73 20 5d 20 63 6c 61 73 |baseClas|s ] clas|
|00000e30| 73 42 6f 64 79 20 45 6e | 64 20 43 6c 61 73 73 40 |sBody En|d Class@|
|00000e40| 43 6c 61 73 73 17 43 6c | 6e 67 40 43 4c 6e 67 20 |Class.Cl|ng@CLng |
|00000e50| 28 20 65 78 70 72 20 29 | 40 43 4c 6e 67 3b 43 6c |( expr )|@CLng;Cl|
|00000e60| 6f 73 65 20 5b 20 5b 20 | 23 20 5d 20 66 69 6c 65 |ose [ [ |# ] file|
|00000e70| 4e 75 6d 62 65 72 20 5b | 20 2c 20 5b 20 23 20 5d |Number [| , [ # ]|
|00000e80| 20 66 69 6c 65 4e 75 6d | 62 65 72 20 5d 20 2e 2e | fileNum|ber ] ..|
|00000e90| 2e 20 5d 40 43 6c 6f 73 | 65 18 43 6f 6d 6d 61 6e |. ]@Clos|e.Comman|
|00000ea0| 64 20 40 43 6f 6d 6d 61 | 6e 64 40 43 6f 6d 6d 61 |d @Comma|nd@Comma|
|00000eb0| 6e 64 08 43 6f 6d 6d 61 | 6e 64 24 51 43 6f 6e 73 |nd.Comma|nd$QCons|
|00000ec0| 74 40 5b 20 50 75 62 6c | 69 63 20 7c 20 50 72 69 |t@[ Publ|ic | Pri|
|00000ed0| 76 61 74 65 20 5d 20 43 | 6f 6e 73 74 20 63 6f 6e |vate ] C|onst con|
|00000ee0| 73 74 4e 61 6d 65 20 3d | 20 65 78 70 72 20 5b 20 |stName =| expr [ |
|00000ef0| 2c 20 63 6f 6e 73 74 4e | 61 6d 65 20 3d 20 65 78 |, constN|ame = ex|
|00000f00| 70 72 20 5d 2e 2e 2e 40 | 43 6f 6e 73 74 11 43 6f |pr ]...@|Const.Co|
|00000f10| 73 20 28 20 61 6e 67 6c | 65 20 29 40 43 6f 73 27 |s ( angl|e )@Cos'|
|00000f20| 43 72 65 61 74 65 4f 62 | 6a 65 63 74 20 28 20 63 |CreateOb|ject ( c|
|00000f30| 6c 61 73 73 4e 61 6d 65 | 20 29 40 43 72 65 61 74 |lassName| )@Creat|
|00000f40| 65 4f 62 6a 65 63 74 17 | 43 73 6e 67 40 43 53 6e |eObject.|Csng@CSn|
|00000f50| 67 20 28 20 65 78 70 72 | 20 29 40 43 53 6e 67 17 |g ( expr| )@CSng.|
|00000f60| 43 73 74 72 40 43 53 74 | 72 20 28 20 65 78 70 72 |Cstr@CSt|r ( expr|
|00000f70| 20 29 40 43 53 74 72 00 | 00 00 00 00 00 00 00 00 | )@CStr.|........|
|00000f80| 23 43 75 72 64 69 72 20 | 40 43 75 72 44 69 72 20 |#Curdir |@CurDir |
|00000f90| 5b 20 28 20 64 72 69 76 | 65 20 29 20 5d 40 43 75 |[ ( driv|e ) ]@Cu|
|00000fa0| 72 44 69 72 25 43 75 72 | 64 69 72 24 40 43 75 72 |rDir%Cur|dir$@Cur|
|00000fb0| 44 69 72 24 20 5b 20 28 | 20 64 72 69 76 65 20 29 |Dir$ [ (| drive )|
|00000fc0| 20 5d 40 43 75 72 44 69 | 72 24 1b 43 75 72 64 72 | ]@CurDi|r$.Curdr|
|00000fd0| 69 76 65 20 40 43 75 72 | 44 72 69 76 65 40 43 75 |ive @Cur|Drive@Cu|
|00000fe0| 72 44 72 69 76 65 1d 43 | 75 72 64 72 69 76 65 24 |rDrive.C|urdrive$|
|00000ff0| 40 43 75 72 44 72 69 76 | 65 24 40 43 75 72 44 72 |@CurDriv|e$@CurDr|
|00001000| 69 76 65 24 08 43 75 72 | 72 65 6e 63 79 17 43 76 |ive$.Cur|rency.Cv|
|00001010| 61 72 40 43 56 61 72 20 | 28 20 65 78 70 72 20 29 |ar@CVar |( expr )|
|00001020| 40 43 56 61 72 23 44 61 | 74 61 74 79 70 65 40 44 |@CVar#Da|tatype@D|
|00001030| 61 74 61 54 79 70 65 20 | 28 20 65 78 70 72 20 29 |ataType |( expr )|
|00001040| 40 44 61 74 61 54 79 70 | 65 04 44 61 74 65 14 44 |@DataTyp|e.Date.D|
|00001050| 61 74 65 20 3d 20 64 61 | 74 65 45 78 70 72 40 44 |ate = da|teExpr@D|
|00001060| 61 74 65 05 44 61 74 65 | 24 16 44 61 74 65 24 20 |ate.Date|$.Date$ |
|00001070| 3d 20 64 61 74 65 45 78 | 70 72 40 44 61 74 65 24 |= dateEx|pr@Date$|
|00001080| 37 44 61 74 65 6e 75 6d | 62 65 72 40 44 61 74 65 |7Datenum|ber@Date|
|00001090| 4e 75 6d 62 65 72 20 28 | 20 79 65 61 72 20 2c 20 |Number (| year , |
|000010a0| 6d 6f 6e 74 68 20 2c 20 | 64 61 79 20 29 40 44 61 |month , |day )@Da|
|000010b0| 74 65 4e 75 6d 62 65 72 | 2c 44 61 74 65 76 61 6c |teNumber|,Dateval|
|000010c0| 75 65 40 44 61 74 65 56 | 61 6c 75 65 20 28 20 73 |ue@DateV|alue ( s|
|000010d0| 74 72 69 6e 67 45 78 70 | 72 20 29 40 44 61 74 65 |tringExp|r )@Date|
|000010e0| 56 61 6c 75 65 14 44 61 | 79 20 28 20 64 61 74 65 |Value.Da|y ( date|
|000010f0| 45 78 70 72 20 29 40 44 | 61 79 80 44 65 63 6c 61 |Expr )@D|ay.Decla|
|00001100| 72 65 20 5b 20 50 75 62 | 6c 69 63 20 7c 20 50 72 |re [ Pub|lic | Pr|
|00001110| 69 76 61 74 65 20 5d 20 | 7b 20 46 75 6e 63 74 69 |ivate ] |{ Functi|
|00001120| 6f 6e 20 7c 20 53 75 62 | 20 7d 20 4c 53 6e 61 6d |on | Sub| } LSnam|
|00001130| 65 20 4c 69 62 20 6c 69 | 62 4e 61 6d 65 20 5b 20 |e Lib li|bName [ |
|00001140| 41 6c 69 61 73 20 61 6c | 69 61 73 4e 61 6d 65 20 |Alias al|iasName |
|00001150| 5d 20 28 20 5b 20 61 72 | 67 4c 69 73 74 20 5d 20 |] ( [ ar|gList ] |
|00001160| 29 20 5b 20 41 73 20 72 | 65 74 75 72 6e 54 79 70 |) [ As r|eturnTyp|
|00001170| 65 20 5d 40 44 65 63 6c | 61 72 65 23 44 65 66 43 |e ]@Decl|are#DefC|
|00001180| 75 72 20 72 61 6e 67 65 | 20 5b 20 2c 20 72 61 6e |ur range| [ , ran|
|00001190| 67 65 20 5d 20 2e 2e 2e | 40 44 65 66 43 75 72 00 |ge ] ...|@DefCur.|
|000011a0| 23 44 65 66 44 62 6c 20 | 72 61 6e 67 65 20 5b 20 |#DefDbl |range [ |
|000011b0| 2c 20 72 61 6e 67 65 20 | 5d 20 2e 2e 2e 40 44 65 |, range |] ...@De|
|000011c0| 66 44 62 6c 23 44 65 66 | 49 6e 74 20 72 61 6e 67 |fDbl#Def|Int rang|
|000011d0| 65 20 5b 20 2c 20 72 61 | 6e 67 65 20 5d 20 2e 2e |e [ , ra|nge ] ..|
|000011e0| 2e 40 44 65 66 49 6e 74 | 23 44 65 66 4c 6e 67 20 |.@DefInt|#DefLng |
|000011f0| 72 61 6e 67 65 20 5b 20 | 2c 20 72 61 6e 67 65 20 |range [ |, range |
|00001200| 5d 20 2e 2e 2e 40 44 65 | 66 4c 6e 67 23 44 65 66 |] ...@De|fLng#Def|
|00001210| 53 6e 67 20 72 61 6e 67 | 65 20 5b 20 2c 20 72 61 |Sng rang|e [ , ra|
|00001220| 6e 67 65 20 5d 20 2e 2e | 2e 40 44 65 66 53 6e 67 |nge ] ..|.@DefSng|
|00001230| 22 44 65 66 53 74 72 20 | 72 61 6e 67 65 20 5b 20 |"DefStr |range [ |
|00001240| 2c 20 72 61 6e 67 65 20 | 5d 20 2e 2e 40 44 65 66 |, range |] ..@Def|
|00001250| 53 74 72 23 44 65 66 56 | 61 72 20 72 61 6e 67 65 |Str#DefV|ar range|
|00001260| 20 5b 20 2c 20 72 61 6e | 67 65 20 5d 20 2e 2e 2e | [ , ran|ge ] ...|
|00001270| 40 44 65 66 56 61 72 14 | 44 65 6c 65 74 65 20 6f |@DefVar.|Delete o|
|00001280| 62 6a 52 65 66 40 44 65 | 6c 65 74 65 2f 44 65 6c |bjRef@De|lete/Del|
|00001290| 65 74 65 40 53 75 62 20 | 44 65 6c 65 74 65 20 5b |ete@Sub |Delete [|
|000012a0| 20 73 74 61 74 65 6d 65 | 6e 74 73 20 5d 20 45 6e | stateme|nts ] En|
|000012b0| 64 20 53 75 62 40 44 65 | 6c 65 74 65 39 44 69 6d |d Sub@De|lete9Dim|
|000012c0| 20 76 61 72 69 61 62 6c | 65 44 65 63 6c 61 72 61 | variabl|eDeclara|
|000012d0| 74 69 6f 6e 20 5b 20 20 | 2c 20 76 61 72 69 61 62 |tion [ |, variab|
|000012e0| 6c 65 44 65 63 6c 61 72 | 61 74 69 6f 6e 20 5d 2e |leDeclar|ation ].|
|000012f0| 2e 2e 40 44 69 6d 3f 53 | 74 61 74 69 63 20 76 61 |..@Dim?S|tatic va|
|00001300| 72 69 61 62 6c 65 44 65 | 63 6c 61 72 61 74 69 6f |riableDe|claratio|
|00001310| 6e 20 5b 20 20 2c 20 76 | 61 72 69 61 62 6c 65 44 |n [ , v|ariableD|
|00001320| 65 63 6c 61 72 61 74 69 | 6f 6e 20 5d 2e 2e 2e 40 |eclarati|on ]...@|
|00001330| 53 74 61 74 69 63 3f 50 | 75 62 6c 69 63 20 76 61 |Static?P|ublic va|
|00001340| 72 69 61 62 6c 65 44 65 | 63 6c 61 72 61 74 69 6f |riableDe|claratio|
|00001350| 6e 20 5b 20 20 2c 20 76 | 61 72 69 61 62 6c 65 44 |n [ , v|ariableD|
|00001360| 65 63 6c 61 72 61 74 69 | 6f 6e 20 5d 2e 2e 2e 40 |eclarati|on ]...@|
|00001370| 50 75 62 6c 69 63 41 50 | 72 69 76 61 74 65 20 76 |PublicAP|rivate v|
|00001380| 61 72 69 61 62 6c 65 44 | 65 63 6c 61 72 61 74 69 |ariableD|eclarati|
|00001390| 6f 6e 20 5b 20 20 2c 20 | 76 61 72 69 61 62 6c 65 |on [ , |variable|
|000013a0| 44 65 63 6c 61 72 61 74 | 69 6f 6e 20 5d 2e 2e 2e |Declarat|ion ]...|
|000013b0| 40 50 72 69 76 61 74 65 | 2c 44 69 72 20 5b 20 28 |@Private|,Dir [ (|
|000013c0| 20 66 69 6c 65 53 70 65 | 63 20 5b 20 2c 20 61 74 | fileSpe|c [ , at|
|000013d0| 74 72 69 62 75 74 65 4d | 61 73 6b 20 5d 20 29 20 |tributeM|ask ] ) |
|000013e0| 5d 40 44 69 72 2e 44 69 | 72 24 20 5b 20 28 20 66 |]@Dir.Di|r$ [ ( f|
|000013f0| 69 6c 65 53 70 65 63 20 | 5b 20 2c 20 61 74 74 72 |ileSpec |[ , attr|
|00001400| 69 62 75 74 65 4d 61 73 | 6b 20 5d 20 29 20 5d 40 |ibuteMas|k ] ) ]@|
|00001410| 44 69 72 24 35 44 6f 20 | 5b 20 57 68 69 6c 65 20 |Dir$5Do |[ While |
|00001420| 7c 20 55 6e 74 69 6c 20 | 63 6f 6e 64 69 74 69 6f || Until |conditio|
|00001430| 6e 20 5d 20 5b 20 73 74 | 61 74 65 6d 65 6e 74 73 |n ] [ st|atements|
|00001440| 20 5d 20 4c 6f 6f 70 40 | 44 6f 35 44 6f 20 5b 20 | ] Loop@|Do5Do [ |
|00001450| 73 74 61 74 65 6d 65 6e | 74 73 20 5d 20 4c 6f 6f |statemen|ts ] Loo|
|00001460| 70 20 5b 20 57 68 69 6c | 65 20 7c 20 55 6e 74 69 |p [ Whil|e | Unti|
|00001470| 6c 20 63 6f 6e 64 69 74 | 69 6f 6e 20 5d 40 44 6f |l condit|ion ]@Do|
|00001480| 06 44 6f 75 62 6c 65 16 | 45 6e 64 20 5b 20 72 65 |.Double.|End [ re|
|00001490| 74 75 72 6e 43 6f 64 65 | 20 5d 40 45 6e 64 27 45 |turnCode| ]@End'E|
|000014a0| 6e 76 69 72 6f 6e 20 28 | 20 7b 20 65 6e 76 69 72 |nviron (| { envir|
|000014b0| 6f 6e 4e 61 6d 65 20 7c | 20 6e 20 7d 20 29 40 45 |onName || n } )@E|
|000014c0| 6e 76 69 72 6f 6e 29 45 | 6e 76 69 72 6f 6e 24 20 |nviron)E|nviron$ |
|000014d0| 28 20 7b 20 65 6e 76 69 | 72 6f 6e 4e 61 6d 65 20 |( { envi|ronName |
|000014e0| 7c 20 6e 20 7d 20 29 40 | 45 6e 76 69 72 6f 6e 24 || n } )@|Environ$|
|000014f0| 16 45 6f 66 20 28 20 66 | 69 6c 65 4e 75 6d 62 65 |.Eof ( f|ileNumbe|
|00001500| 72 20 29 40 45 6f 66 03 | 45 71 76 6b 45 72 61 73 |r )@Eof.|EqvkEras|
|00001510| 65 20 7b 20 61 72 72 61 | 79 4e 61 6d 65 20 7c 20 |e { arra|yName | |
|00001520| 6c 69 73 74 4e 61 6d 65 | 20 7c 20 6c 69 73 74 4e |listName| | listN|
|00001530| 61 6d 65 20 28 20 74 61 | 67 20 29 20 7d 20 5b 2c |ame ( ta|g ) } [,|
|00001540| 20 7b 20 61 72 72 61 79 | 4e 61 6d 65 20 7c 20 6c | { array|Name | l|
|00001550| 69 73 74 4e 61 6d 65 20 | 7c 20 6c 69 73 74 4e 61 |istName || listNa|
|00001560| 6d 65 20 28 20 74 61 67 | 20 29 20 7d 20 5d 2e 2e |me ( tag| ) } ]..|
|00001570| 2e 40 45 72 61 73 65 03 | 45 72 6c 03 45 72 72 13 |.@Erase.|Erl.Err.|
|00001580| 45 72 72 20 3d 20 65 72 | 72 4e 75 6d 62 65 72 40 |Err = er|rNumber@|
|00001590| 45 72 72 1d 45 72 72 6f | 72 20 5b 20 28 20 65 72 |Err.Erro|r [ ( er|
|000015a0| 72 4e 75 6d 62 65 72 20 | 29 20 5d 40 45 72 72 6f |rNumber |) ]@Erro|
|000015b0| 72 23 45 72 72 6f 72 20 | 65 72 72 4e 75 6d 62 65 |r#Error |errNumbe|
|000015c0| 72 20 5b 20 2c 20 6d 73 | 67 45 78 70 72 20 5d 40 |r [ , ms|gExpr ]@|
|000015d0| 45 72 72 6f 72 1f 45 72 | 72 6f 72 24 20 5b 20 28 |Error.Er|ror$ [ (|
|000015e0| 20 65 72 72 4e 75 6d 62 | 65 72 20 29 20 5d 40 45 | errNumb|er ) ]@E|
|000015f0| 72 72 6f 72 24 28 45 76 | 61 6c 75 61 74 65 20 28 |rror$(Ev|aluate (|
|00001600| 20 6d 61 63 72 6f 20 5b | 20 2c 20 6f 62 6a 65 63 | macro [| , objec|
|00001610| 74 20 5d 20 29 40 45 76 | 61 6c 75 61 74 65 18 45 |t ] )@Ev|aluate.E|
|00001620| 78 65 63 75 74 65 20 28 | 20 74 65 78 74 20 29 40 |xecute (| text )@|
|00001630| 45 78 65 63 75 74 65 14 | 45 78 65 63 75 74 65 20 |Execute.|Execute |
|00001640| 74 65 78 74 40 45 78 65 | 63 75 74 65 00 00 00 00 |text@Exe|cute....|
|00001650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001660| 0f 45 78 69 74 20 44 6f | 40 45 78 69 74 20 44 6f |.Exit Do|@Exit Do|
|00001670| 11 45 78 69 74 20 46 6f | 72 40 45 78 69 74 20 46 |.Exit Fo|r@Exit F|
|00001680| 6f 72 17 45 78 69 74 20 | 46 6f 72 41 6c 6c 40 45 |or.Exit |ForAll@E|
|00001690| 78 69 74 20 46 6f 72 41 | 6c 6c 1b 45 78 69 74 20 |xit ForA|ll.Exit |
|000016a0| 46 75 6e 63 74 69 6f 6e | 40 45 78 69 74 20 46 75 |Function|@Exit Fu|
|000016b0| 6e 63 74 69 6f 6e 1b 45 | 78 69 74 20 50 72 6f 70 |nction.E|xit Prop|
|000016c0| 65 72 74 79 40 45 78 69 | 74 20 50 72 6f 70 65 72 |erty@Exi|t Proper|
|000016d0| 74 79 11 45 78 69 74 20 | 53 75 62 40 45 78 69 74 |ty.Exit |Sub@Exit|
|000016e0| 20 53 75 62 13 45 78 70 | 20 28 20 6e 75 6d 45 78 | Sub.Exp| ( numEx|
|000016f0| 70 72 20 29 40 45 78 70 | 05 46 41 4c 53 45 2c 46 |pr )@Exp|.FALSE,F|
|00001700| 69 6c 65 41 74 74 72 20 | 28 20 66 69 6c 65 4e 75 |ileAttr |( fileNu|
|00001710| 6d 62 65 72 20 2c 20 61 | 74 74 72 69 62 75 74 65 |mber , a|ttribute|
|00001720| 20 29 40 46 69 6c 65 41 | 74 74 72 26 46 69 6c 65 | )@FileA|ttr&File|
|00001730| 43 6f 70 79 20 73 6f 75 | 72 63 65 20 2c 20 64 65 |Copy sou|rce , de|
|00001740| 73 74 69 6e 61 74 69 6f | 6e 40 46 69 6c 65 43 6f |stinatio|n@FileCo|
|00001750| 70 79 26 46 69 6c 65 44 | 61 74 65 54 69 6d 65 20 |py&FileD|ateTime |
|00001760| 28 20 66 69 6c 65 4e 61 | 6d 65 20 29 40 46 69 6c |( fileNa|me )@Fil|
|00001770| 65 44 61 74 65 54 69 6d | 65 1c 46 69 6c 65 4c 65 |eDateTim|e.FileLe|
|00001780| 6e 20 28 20 66 69 6c 65 | 4e 61 6d 65 20 29 40 46 |n ( file|Name )@F|
|00001790| 69 6c 65 4c 65 6e 13 46 | 69 78 20 28 20 6e 75 6d |ileLen.F|ix ( num|
|000017a0| 45 78 70 72 20 29 40 46 | 69 78 67 46 6f 72 20 63 |Expr )@F|ixgFor c|
|000017b0| 6f 75 6e 74 56 61 72 20 | 3d 20 66 69 72 73 74 20 |ountVar |= first |
|000017c0| 54 6f 20 6c 61 73 74 20 | 5b 20 53 74 65 70 20 69 |To last |[ Step i|
|000017d0| 6e 63 72 65 6d 65 6e 74 | 20 5d 20 5b 20 73 74 61 |ncrement| ] [ sta|
|000017e0| 74 65 6d 65 6e 74 73 20 | 5d 20 4e 65 78 74 20 5b |tements |] Next [|
|000017f0| 20 63 6f 75 6e 74 56 61 | 72 20 5b 20 2c 20 63 6f | countVa|r [ , co|
|00001800| 75 6e 74 56 61 72 20 5d | 20 2e 2e 2e 20 5d 40 46 |untVar ]| ... ]@F|
|00001810| 6f 72 42 46 6f 72 61 6c | 6c 40 46 6f 72 41 6c 6c |orBForal|l@ForAll|
|00001820| 20 72 65 66 56 61 72 20 | 49 6e 20 63 6f 6e 74 61 | refVar |In conta|
|00001830| 69 6e 65 72 20 5b 20 73 | 74 61 74 65 6d 65 6e 74 |iner [ s|tatement|
|00001840| 73 20 5d 20 45 6e 64 20 | 46 6f 72 41 6c 6c 40 46 |s ] End |ForAll@F|
|00001850| 6f 72 41 6c 6c 21 46 6f | 72 6d 61 74 20 28 20 65 |orAll!Fo|rmat ( e|
|00001860| 78 70 72 20 5b 20 2c 20 | 66 6d 74 24 20 5d 20 29 |xpr [ , |fmt$ ] )|
|00001870| 40 46 6f 72 6d 61 74 00 | 00 00 00 00 00 00 00 00 |@Format.|........|
|00001880| 23 46 6f 72 6d 61 74 24 | 20 28 20 65 78 70 72 20 |#Format$| ( expr |
|00001890| 5b 20 2c 20 66 6d 74 24 | 20 5d 20 29 40 46 6f 72 |[ , fmt$| ] )@For|
|000018a0| 6d 61 74 24 1d 46 72 61 | 63 74 69 6f 6e 20 28 20 |mat$.Fra|ction ( |
|000018b0| 6e 75 6d 45 78 70 72 20 | 29 40 46 72 61 63 74 69 |numExpr |)@Fracti|
|000018c0| 6f 6e 08 46 72 65 65 46 | 69 6c 65 83 46 75 6e 63 |on.FreeF|ile.Func|
|000018d0| 74 69 6f 6e 40 5b 20 53 | 74 61 74 69 63 20 5d 20 |tion@[ S|tatic ] |
|000018e0| 5b 20 50 75 62 6c 69 63 | 20 7c 20 50 72 69 76 61 |[ Public| | Priva|
|000018f0| 74 65 20 5d 20 46 75 6e | 63 74 69 6f 6e 20 66 75 |te ] Fun|ction fu|
|00001900| 6e 63 74 69 6f 6e 4e 61 | 6d 65 20 5b 20 28 20 5b |nctionNa|me [ ( [|
|00001910| 20 61 72 67 4c 69 73 74 | 20 5d 20 29 20 5d 20 5b | argList| ] ) ] [|
|00001920| 20 41 73 20 74 79 70 65 | 20 5d 20 5b 20 73 74 61 | As type| ] [ sta|
|00001930| 74 65 6d 65 6e 74 73 20 | 5d 20 45 6e 64 20 46 75 |tements |] End Fu|
|00001940| 6e 63 74 69 6f 6e 40 46 | 75 6e 63 74 69 6f 6e 37 |nction@F|unction7|
|00001950| 47 65 74 20 5b 23 5d 66 | 69 6c 65 4e 75 6d 62 65 |Get [#]f|ileNumbe|
|00001960| 72 20 2c 20 5b 20 72 65 | 63 6f 72 64 4e 75 6d 62 |r , [ re|cordNumb|
|00001970| 65 72 20 5d 20 2c 20 76 | 61 72 69 61 62 6c 65 4e |er ] , v|ariableN|
|00001980| 61 6d 65 40 47 65 74 24 | 47 65 74 46 69 6c 65 41 |ame@Get$|GetFileA|
|00001990| 74 74 72 20 28 20 66 69 | 6c 65 4e 61 6d 65 20 29 |ttr ( fi|leName )|
|000019a0| 40 47 65 74 46 69 6c 65 | 41 74 74 72 30 47 65 74 |@GetFile|Attr0Get|
|000019b0| 4f 62 6a 65 63 74 20 28 | 20 70 61 74 68 6e 61 6d |Object (| pathnam|
|000019c0| 65 20 5b 20 2c 20 63 6c | 61 73 73 6e 61 6d 65 20 |e [ , cl|assname |
|000019d0| 5d 20 29 40 47 65 74 4f | 62 6a 65 63 74 3d 47 6f |] )@GetO|bject=Go|
|000019e0| 53 75 62 20 6c 61 62 65 | 6c 20 5b 20 73 74 61 74 |Sub labe|l [ stat|
|000019f0| 65 6d 65 6e 74 73 5d 20 | 6c 61 62 65 6c 20 3a 20 |ements] |label : |
|00001a00| 5b 20 73 74 61 74 65 6d | 65 6e 74 73 20 5d 20 52 |[ statem|ents ] R|
|00001a10| 65 74 75 72 6e 40 47 6f | 53 75 62 0f 47 6f 54 6f |eturn@Go|Sub.GoTo|
|00001a20| 20 6c 61 62 65 6c 40 47 | 6f 54 6f 13 48 65 78 20 | label@G|oTo.Hex |
|00001a30| 28 20 6e 75 6d 45 78 70 | 72 20 29 40 48 65 78 15 |( numExp|r )@Hex.|
|00001a40| 48 65 78 24 20 28 20 6e | 75 6d 45 78 70 72 20 29 |Hex$ ( n|umExpr )|
|00001a50| 40 48 65 78 24 16 48 6f | 75 72 20 28 20 64 61 74 |@Hex$.Ho|ur ( dat|
|00001a60| 65 45 78 70 72 20 29 40 | 48 6f 75 72 32 49 66 20 |eExpr )@|Hour2If |
|00001a70| 63 6f 6e 64 69 74 69 6f | 6e 20 47 6f 54 6f 20 6c |conditio|n GoTo l|
|00001a80| 61 62 65 6c 20 5b 20 45 | 6c 73 65 20 5b 20 73 74 |abel [ E|lse [ st|
|00001a90| 61 74 65 6d 65 6e 74 73 | 20 5d 20 5d 40 49 66 3b |atements| ] ]@If;|
|00001aa0| 49 66 20 63 6f 6e 64 69 | 74 69 6f 6e 20 54 68 65 |If condi|tion The|
|00001ab0| 6e 20 5b 20 73 74 61 74 | 65 6d 65 6e 74 73 20 5d |n [ stat|ements ]|
|00001ac0| 20 5b 20 45 6c 73 65 20 | 5b 20 73 74 61 74 65 6d | [ Else |[ statem|
|00001ad0| 65 6e 74 73 20 5d 20 5d | 40 49 66 17 49 66 20 63 |ents ] ]|@If.If c|
|00001ae0| 6f 6e 64 69 74 69 6f 6e | 20 54 68 65 6e 2e 2e 2e |ondition| Then...|
|00001af0| 40 49 66 09 49 4d 45 53 | 74 61 74 75 73 00 00 00 |@If.IMES|tatus...|
|00001b00| 03 49 6d 70 25 49 6e 63 | 6c 75 64 65 40 25 49 6e |.Imp%Inc|lude@%In|
|00001b10| 63 6c 75 64 65 20 66 69 | 6c 65 4e 61 6d 65 2e 2e |clude fi|leName..|
|00001b20| 2e 40 25 49 6e 63 6c 75 | 64 65 3b 49 6e 69 74 69 |.@%Inclu|de;Initi|
|00001b30| 61 6c 69 7a 65 40 53 75 | 62 20 49 6e 69 74 69 61 |alize@Su|b Initia|
|00001b40| 6c 69 7a 65 20 5b 20 73 | 74 61 74 65 6d 65 6e 74 |lize [ s|tatement|
|00001b50| 73 20 5d 20 45 6e 64 20 | 53 75 62 40 49 6e 69 74 |s ] End |Sub@Init|
|00001b60| 69 61 6c 69 7a 65 25 49 | 6e 70 75 74 20 28 20 63 |ialize%I|nput ( c|
|00001b70| 6f 75 6e 74 20 2c 20 5b | 23 5d 66 69 6c 65 4e 75 |ount , [|#]fileNu|
|00001b80| 6d 62 65 72 20 29 40 49 | 6e 70 75 74 28 49 6e 70 |mber )@I|nput(Inp|
|00001b90| 75 74 20 23 66 69 6c 65 | 4e 75 6d 62 65 72 20 2c |ut #file|Number ,|
|00001ba0| 20 76 61 72 69 61 62 6c | 65 4c 69 73 74 40 49 6e | variabl|eList@In|
|00001bb0| 70 75 74 20 23 27 49 6e | 70 75 74 24 20 28 20 63 |put #'In|put$ ( c|
|00001bc0| 6f 75 6e 74 20 2c 20 5b | 23 5d 66 69 6c 65 4e 75 |ount , [|#]fileNu|
|00001bd0| 6d 62 65 72 20 29 40 49 | 6e 70 75 74 24 27 49 6e |mber )@I|nput$'In|
|00001be0| 70 75 74 42 20 28 20 63 | 6f 75 6e 74 20 2c 20 5b |putB ( c|ount , [|
|00001bf0| 23 5d 66 69 6c 65 4e 75 | 6d 62 65 72 20 29 40 49 |#]fileNu|mber )@I|
|00001c00| 6e 70 75 74 42 29 49 6e | 70 75 74 42 24 20 28 20 |nputB)In|putB$ ( |
|00001c10| 63 6f 75 6e 74 20 2c 20 | 5b 23 5d 66 69 6c 65 4e |count , |[#]fileN|
|00001c20| 75 6d 62 65 72 20 29 40 | 49 6e 70 75 74 42 24 50 |umber )@|InputB$P|
|00001c30| 49 6e 70 75 74 42 6f 78 | 20 28 20 70 72 6f 6d 70 |InputBox| ( promp|
|00001c40| 74 20 5b 20 2c 20 5b 20 | 74 69 74 6c 65 20 5d 20 |t [ , [ |title ] |
|00001c50| 5d 20 5b 20 2c 20 5b 20 | 64 65 66 61 75 6c 74 20 |] [ , [ |default |
|00001c60| 5d 20 5b 20 2c 20 78 70 | 6f 73 20 2c 20 79 70 6f |] [ , xp|os , ypo|
|00001c70| 73 20 5d 20 5d 20 29 40 | 49 6e 70 75 74 42 6f 78 |s ] ] )@|InputBox|
|00001c80| 54 49 6e 70 75 74 42 6f | 78 5b 24 5d 20 28 20 70 |TInputBo|x[$] ( p|
|00001c90| 72 6f 6d 70 74 20 5b 20 | 2c 20 5b 20 74 69 74 6c |rompt [ |, [ titl|
|00001ca0| 65 20 5d 20 5d 20 5b 20 | 2c 20 5b 20 64 65 66 61 |e ] ] [ |, [ defa|
|00001cb0| 75 6c 74 20 5d 20 5b 20 | 2c 20 78 70 6f 73 20 2c |ult ] [ |, xpos ,|
|00001cc0| 20 79 70 6f 73 20 5d 20 | 5d 20 29 40 49 6e 70 75 | ypos ] |] )@Inpu|
|00001cd0| 74 42 6f 78 24 34 49 6e | 73 74 72 20 40 49 6e 53 |tBox$4In|str @InS|
|00001ce0| 74 72 20 28 20 5b 20 62 | 65 67 69 6e 20 2c 20 5d |tr ( [ b|egin , ]|
|00001cf0| 20 73 74 72 69 6e 67 31 | 20 2c 20 73 74 72 69 6e | string1| , strin|
|00001d00| 67 32 20 29 40 49 6e 53 | 74 72 3d 49 6e 73 74 72 |g2 )@InS|tr=Instr|
|00001d10| 32 40 49 6e 53 74 72 20 | 28 20 62 65 67 69 6e 20 |2@InStr |( begin |
|00001d20| 2c 20 73 74 72 69 6e 67 | 31 20 2c 20 73 74 72 69 |, string|1 , stri|
|00001d30| 6e 67 32 20 2c 20 63 6f | 6d 70 4d 65 74 68 6f 64 |ng2 , co|mpMethod|
|00001d40| 20 29 40 49 6e 53 74 72 | 37 49 6e 73 74 72 62 20 | )@InStr|7Instrb |
|00001d50| 40 49 6e 53 74 72 42 20 | 28 20 5b 20 62 65 67 69 |@InStrB |( [ begi|
|00001d60| 6e 20 2c 20 5d 20 73 74 | 72 69 6e 67 31 20 2c 20 |n , ] st|ring1 , |
|00001d70| 73 74 72 69 6e 67 32 20 | 29 40 49 6e 53 74 72 42 |string2 |)@InStrB|
|00001d80| 13 49 6e 74 20 28 20 6e | 75 6d 45 78 70 72 20 29 |.Int ( n|umExpr )|
|00001d90| 40 49 6e 74 07 49 6e 74 | 65 67 65 72 02 49 73 00 |@Int.Int|eger.Is.|
|00001da0| 18 49 73 41 72 72 61 79 | 20 28 20 65 78 70 72 20 |.IsArray| ( expr |
|00001db0| 29 40 49 73 41 72 72 61 | 79 16 49 73 44 61 74 65 |)@IsArra|y.IsDate|
|00001dc0| 20 28 20 65 78 70 72 20 | 29 40 49 73 44 61 74 65 | ( expr |)@IsDate|
|00001dd0| 2f 49 73 45 6c 65 6d 65 | 6e 74 20 28 20 6c 69 73 |/IsEleme|nt ( lis|
|00001de0| 74 4e 61 6d 65 20 28 20 | 73 74 72 69 6e 67 45 78 |tName ( |stringEx|
|00001df0| 70 72 20 29 20 29 40 49 | 73 45 6c 65 6d 65 6e 74 |pr ) )@I|sElement|
|00001e00| 18 49 73 45 6d 70 74 79 | 20 28 20 65 78 70 72 20 |.IsEmpty| ( expr |
|00001e10| 29 40 49 73 45 6d 70 74 | 79 16 49 73 4c 69 73 74 |)@IsEmpt|y.IsList|
|00001e20| 20 28 20 65 78 70 72 20 | 29 40 49 73 4c 69 73 74 | ( expr |)@IsList|
|00001e30| 16 49 73 4e 75 6c 6c 20 | 28 20 65 78 70 72 20 29 |.IsNull |( expr )|
|00001e40| 40 49 73 4e 75 6c 6c 1c | 49 73 4e 75 6d 65 72 69 |@IsNull.|IsNumeri|
|00001e50| 63 20 28 20 65 78 70 72 | 20 29 40 49 73 4e 75 6d |c ( expr| )@IsNum|
|00001e60| 65 72 69 63 1a 49 73 4f | 62 6a 65 63 74 20 28 20 |eric.IsO|bject ( |
|00001e70| 65 78 70 72 20 29 40 49 | 73 4f 62 6a 65 63 74 1a |expr )@I|sObject.|
|00001e80| 49 73 53 63 61 6c 61 72 | 20 28 20 65 78 70 72 20 |IsScalar| ( expr |
|00001e90| 29 40 49 73 53 63 61 6c | 61 72 1c 49 73 55 6e 6b |)@IsScal|ar.IsUnk|
|00001ea0| 6e 6f 77 6e 20 28 20 65 | 78 70 72 20 29 40 49 73 |nown ( e|xpr )@Is|
|00001eb0| 55 6e 6b 6e 6f 77 6e 12 | 4b 69 6c 6c 20 66 69 6c |Unknown.|Kill fil|
|00001ec0| 65 4e 61 6d 65 40 4b 69 | 6c 6c 32 4c 62 6f 75 6e |eName@Ki|ll2Lboun|
|00001ed0| 64 40 4c 42 6f 75 6e 64 | 20 28 20 61 72 72 61 79 |d@LBound| ( array|
|00001ee0| 4e 61 6d 65 20 5b 20 2c | 20 64 69 6d 65 6e 73 69 |Name [ ,| dimensi|
|00001ef0| 6f 6e 20 5d 20 29 40 4c | 42 6f 75 6e 64 1b 4c 63 |on ] )@L|Bound.Lc|
|00001f00| 61 73 65 20 40 4c 43 61 | 73 65 20 28 20 65 78 70 |ase @LCa|se ( exp|
|00001f10| 72 20 29 40 4c 43 61 73 | 65 1d 4c 63 61 73 65 24 |r )@LCas|e.Lcase$|
|00001f20| 40 4c 43 61 73 65 24 20 | 28 20 65 78 70 72 20 29 |@LCase$ |( expr )|
|00001f30| 40 4c 43 61 73 65 24 16 | 4c 65 66 74 20 28 20 65 |@LCase$.|Left ( e|
|00001f40| 78 70 72 20 2c 20 6e 20 | 29 40 4c 65 66 74 18 4c |xpr , n |)@Left.L|
|00001f50| 65 66 74 24 20 28 20 65 | 78 70 72 20 2c 20 6e 20 |eft$ ( e|xpr , n |
|00001f60| 29 40 4c 65 66 74 24 00 | 00 00 00 00 00 00 00 00 |)@Left$.|........|
|00001f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f80| 42 4c 65 6e 20 28 20 7b | 20 73 74 72 69 6e 67 45 |BLen ( {| stringE|
|00001f90| 78 70 72 20 7c 20 76 61 | 72 69 61 6e 74 45 78 70 |xpr | va|riantExp|
|00001fa0| 72 20 7c 20 76 61 72 69 | 61 62 6c 65 45 78 70 72 |r | vari|ableExpr|
|00001fb0| 20 7c 20 74 79 70 65 4e | 61 6d 65 20 7d 20 29 40 | | typeN|ame } )@|
|00001fc0| 4c 65 6e 44 4c 65 6e 42 | 20 28 20 7b 20 73 74 72 |LenDLenB| ( { str|
|00001fd0| 69 6e 67 45 78 70 72 20 | 7c 20 76 61 72 69 61 6e |ingExpr || varian|
|00001fe0| 74 45 78 70 72 20 7c 20 | 76 61 72 69 61 62 6c 65 |tExpr | |variable|
|00001ff0| 45 78 70 72 20 7c 20 74 | 79 70 65 4e 61 6d 65 20 |Expr | t|ypeName |
|00002000| 7d 20 29 40 4c 65 6e 42 | 46 4c 65 6e 42 50 20 28 |} )@LenB|FLenBP (|
|00002010| 20 7b 20 73 74 72 69 6e | 67 45 78 70 72 20 7c 20 | { strin|gExpr | |
|00002020| 76 61 72 69 61 6e 74 45 | 78 70 72 20 7c 20 76 61 |variantE|xpr | va|
|00002030| 72 69 61 62 6c 65 45 78 | 70 72 20 7c 20 74 79 70 |riableEx|pr | typ|
|00002040| 65 4e 61 6d 65 20 7d 20 | 29 40 4c 65 6e 42 50 21 |eName } |)@LenBP!|
|00002050| 4c 65 74 40 5b 20 4c 65 | 74 20 5d 20 76 61 72 69 |Let@[ Le|t ] vari|
|00002060| 61 62 6c 65 49 44 20 3d | 20 65 78 70 72 40 4c 65 |ableID =| expr@Le|
|00002070| 74 04 4c 69 6b 65 2d 4c | 69 6e 65 20 49 6e 70 75 |t.Like-L|ine Inpu|
|00002080| 74 20 23 66 69 6c 65 4e | 75 6d 62 65 72 20 2c 20 |t #fileN|umber , |
|00002090| 76 61 72 4e 61 6d 65 40 | 4c 69 6e 65 20 49 6e 70 |varName@|Line Inp|
|000020a0| 75 74 20 23 1a 4c 69 73 | 74 54 61 67 20 28 20 72 |ut #.Lis|tTag ( r|
|000020b0| 65 66 56 61 72 20 29 40 | 4c 69 73 74 54 61 67 16 |efVar )@|ListTag.|
|000020c0| 4c 6f 63 20 28 20 66 69 | 6c 65 4e 75 6d 62 65 72 |Loc ( fi|leNumber|
|000020d0| 20 29 40 4c 6f 63 44 4c | 6f 63 6b 20 5b 23 5d 66 | )@LocDL|ock [#]f|
|000020e0| 69 6c 65 4e 75 6d 62 65 | 72 20 5b 20 2c 20 72 65 |ileNumbe|r [ , re|
|000020f0| 63 6f 72 64 4e 75 6d 62 | 65 72 20 20 7c 20 20 7b |cordNumb|er | {|
|00002100| 20 5b 20 73 74 61 72 74 | 20 5d 20 54 6f 20 65 6e | [ start| ] To en|
|00002110| 64 20 20 7d 20 5d 40 4c | 6f 63 6b 16 4c 6f 66 20 |d } ]@L|ock.Lof |
|00002120| 28 20 66 69 6c 65 4e 75 | 6d 62 65 72 20 29 40 4c |( fileNu|mber )@L|
|00002130| 6f 66 13 4c 6f 67 20 28 | 20 6e 75 6d 45 78 70 72 |of.Log (| numExpr|
|00002140| 20 29 40 4c 6f 67 04 4c | 6f 6e 67 25 4c 73 65 74 | )@Log.L|ong%Lset|
|00002150| 40 4c 53 65 74 20 73 74 | 72 69 6e 67 56 61 72 20 |@LSet st|ringVar |
|00002160| 3d 20 73 74 72 69 6e 67 | 45 78 70 72 40 4c 53 65 |= string|Expr@LSe|
|00002170| 74 21 4c 74 72 69 6d 20 | 40 4c 54 72 69 6d 20 28 |t!Ltrim |@LTrim (|
|00002180| 20 73 74 72 69 6e 67 45 | 78 70 72 20 29 40 4c 54 | stringE|xpr )@LT|
|00002190| 72 69 6d 23 4c 74 72 69 | 6d 24 40 4c 54 72 69 6d |rim#Ltri|m$@LTrim|
|000021a0| 24 20 28 20 73 74 72 69 | 6e 67 45 78 70 72 20 29 |$ ( stri|ngExpr )|
|000021b0| 40 4c 54 72 69 6d 24 59 | 4d 65 73 73 61 67 65 42 |@LTrim$Y|MessageB|
|000021c0| 6f 78 20 28 6d 65 73 73 | 61 67 65 20 5b 20 2c 20 |ox (mess|age [ , |
|000021d0| 5b 20 62 75 74 74 6f 6e | 73 20 2b 20 69 63 6f 6e |[ button|s + icon|
|000021e0| 20 2b 20 64 65 66 61 75 | 6c 74 20 2b 20 6d 6f 64 | + defau|lt + mod|
|000021f0| 65 20 5d 20 5b 20 2c 20 | 62 6f 78 54 69 74 6c 65 |e ] [ , |boxTitle|
|00002200| 20 5d 20 5d 20 29 40 4d | 65 73 73 61 67 65 42 6f | ] ] )@M|essageBo|
|00002210| 78 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |x.......|........|
|00002220| 56 4d 65 73 73 61 67 65 | 42 6f 78 20 6d 65 73 73 |VMessage|Box mess|
|00002230| 61 67 65 20 5b 20 2c 20 | 5b 20 62 75 74 74 6f 6e |age [ , |[ button|
|00002240| 73 20 2b 20 69 63 6f 6e | 20 2b 20 64 65 66 61 75 |s + icon| + defau|
|00002250| 6c 74 20 2b 20 6d 6f 64 | 65 20 5d 20 5b 20 2c 20 |lt + mod|e ] [ , |
|00002260| 62 6f 78 54 69 74 6c 65 | 20 5d 20 5d 40 4d 65 73 |boxTitle| ] ]@Mes|
|00002270| 73 61 67 65 42 6f 78 37 | 4d 69 64 20 28 20 73 74 |sageBox7|Mid ( st|
|00002280| 72 69 6e 67 56 61 72 20 | 2c 20 73 74 61 72 74 20 |ringVar |, start |
|00002290| 5b 20 2c 20 6c 65 6e 67 | 74 68 20 5d 20 29 20 3d |[ , leng|th ] ) =|
|000022a0| 20 73 74 72 69 6e 67 45 | 78 70 72 40 4d 69 64 24 | stringE|xpr@Mid$|
|000022b0| 4d 69 64 20 28 65 78 70 | 72 20 2c 20 73 74 61 72 |Mid (exp|r , star|
|000022c0| 74 20 5b 20 2c 20 6c 65 | 6e 67 74 68 20 5d 20 29 |t [ , le|ngth ] )|
|000022d0| 40 4d 69 64 39 4d 69 64 | 24 20 28 20 73 74 72 69 |@Mid9Mid|$ ( stri|
|000022e0| 6e 67 56 61 72 20 2c 20 | 73 74 61 72 74 20 5b 20 |ngVar , |start [ |
|000022f0| 2c 20 6c 65 6e 67 74 68 | 20 5d 20 29 20 3d 20 73 |, length| ] ) = s|
|00002300| 74 72 69 6e 67 45 78 70 | 72 40 4d 69 64 24 26 4d |tringExp|r@Mid$&M|
|00002310| 69 64 24 20 28 65 78 70 | 72 20 2c 20 73 74 61 72 |id$ (exp|r , star|
|00002320| 74 20 5b 20 2c 20 6c 65 | 6e 67 74 68 20 5d 20 29 |t [ , le|ngth ] )|
|00002330| 40 4d 69 64 24 1a 4d 69 | 6e 75 74 65 20 28 20 64 |@Mid$.Mi|nute ( d|
|00002340| 61 74 65 45 78 70 72 20 | 29 40 4d 69 6e 75 74 65 |ateExpr |)@Minute|
|00002350| 10 4d 6b 44 69 72 20 70 | 61 74 68 40 4d 6b 44 69 |.MkDir p|ath@MkDi|
|00002360| 72 03 4d 6f 64 18 4d 6f | 6e 74 68 20 28 20 64 61 |r.Mod.Mo|nth ( da|
|00002370| 74 65 45 78 70 72 20 29 | 40 4d 6f 6e 74 68 1c 4e |teExpr )|@Month.N|
|00002380| 61 6d 65 20 6f 6c 64 4e | 61 6d 65 20 41 73 20 6e |ame oldN|ame As n|
|00002390| 65 77 4e 61 6d 65 40 4e | 61 6d 65 5e 4e 65 77 40 |ewName@N|ame^New@|
|000023a0| 53 75 62 20 4e 65 77 20 | 5b 20 28 20 5b 20 61 72 |Sub New |[ ( [ ar|
|000023b0| 67 4c 69 73 74 20 5d 20 | 29 20 5d 20 5b 20 2c 20 |gList ] |) ] [ , |
|000023c0| 62 61 73 65 43 6c 61 73 | 73 20 28 20 5b 20 62 61 |baseClas|s ( [ ba|
|000023d0| 73 65 41 72 67 4c 69 73 | 74 20 5d 20 29 20 5d 20 |seArgLis|t ] ) ] |
|000023e0| 5b 20 73 74 61 74 65 6d | 65 6e 74 73 20 5d 20 45 |[ statem|ents ] E|
|000023f0| 6e 64 20 53 75 62 40 4e | 65 77 0c 4e 6f 74 20 65 |nd Sub@N|ew.Not e|
|00002400| 78 70 72 40 4e 6f 74 17 | 4e 6f 74 68 69 6e 67 40 |xpr@Not.|Nothing@|
|00002410| 4e 4f 54 48 49 4e 47 40 | 4e 4f 54 48 49 4e 47 03 |NOTHING@|NOTHING.|
|00002420| 4e 6f 77 0e 4e 75 6c 6c | 40 4e 55 4c 4c 40 4e 55 |Now.Null|@NULL@NU|
|00002430| 4c 4c 13 4f 63 74 20 28 | 20 6e 75 6d 45 78 70 72 |LL.Oct (| numExpr|
|00002440| 20 29 40 4f 63 74 00 00 | 00 00 00 00 00 00 00 00 | )@Oct..|........|
|00002450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002460| 15 4f 63 74 24 20 28 20 | 6e 75 6d 45 78 70 72 20 |.Oct$ ( |numExpr |
|00002470| 29 40 4f 63 74 24 46 4f | 6e 20 45 72 72 6f 72 20 |)@Oct$FO|n Error |
|00002480| 5b 20 65 72 72 4e 75 6d | 62 65 72 20 5d 20 7b 20 |[ errNum|ber ] { |
|00002490| 47 6f 54 6f 20 6c 61 62 | 65 6c 20 20 7c 20 52 65 |GoTo lab|el | Re|
|000024a0| 73 75 6d 65 20 4e 65 78 | 74 20 7c 20 47 6f 54 6f |sume Nex|t | GoTo|
|000024b0| 20 30 20 7d 40 4f 6e 20 | 45 72 72 6f 72 59 4f 6e | 0 }@On |ErrorYOn|
|000024c0| 20 45 76 65 6e 74 20 65 | 76 65 6e 74 4e 61 6d 65 | Event e|ventName|
|000024d0| 20 46 72 6f 6d 20 70 72 | 6f 64 4f 62 6a 65 63 74 | From pr|odObject|
|000024e0| 20 7b 20 43 61 6c 6c 20 | 68 61 6e 64 6c 65 72 4e | { Call |handlerN|
|000024f0| 61 6d 65 20 7c 20 52 65 | 6d 6f 76 65 20 5b 20 68 |ame | Re|move [ h|
|00002500| 61 6e 64 6c 65 72 4e 61 | 6d 65 20 5d 20 7d 40 4f |andlerNa|me ] }@O|
|00002510| 6e 20 45 76 65 6e 74 77 | 4f 6e 20 6e 75 6d 45 78 |n Eventw|On numEx|
|00002520| 70 72 20 47 6f 53 75 62 | 20 6c 61 62 65 6c 20 5b |pr GoSub| label [|
|00002530| 20 2c 20 6c 61 62 65 6c | 20 5d 2e 2e 2e 20 5b 20 | , label| ]... [ |
|00002540| 73 74 61 74 65 6d 65 6e | 74 73 20 5d 20 6c 61 62 |statemen|ts ] lab|
|00002550| 65 6c 3a 20 20 73 74 61 | 74 65 6d 65 6e 74 73 20 |el: sta|tements |
|00002560| 2e 2e 2e 20 52 65 74 75 | 72 6e 20 6c 61 62 65 6c |... Retu|rn label|
|00002570| 20 3a 20 73 74 61 74 65 | 6d 65 6e 74 73 20 2e 2e | : state|ments ..|
|00002580| 2e 20 52 65 74 75 72 6e | 20 2e 2e 2e 40 4f 6e 27 |. Return| ...@On'|
|00002590| 4f 6e 20 6e 75 6d 45 78 | 70 72 20 47 6f 54 6f 20 |On numEx|pr GoTo |
|000025a0| 6c 61 62 65 6c 20 5b 20 | 2c 20 6c 61 62 65 6c 20 |label [ |, label |
|000025b0| 5d 2e 2e 2e 40 4f 6e cd | 4f 70 65 6e 20 66 69 6c |]...@On.|Open fil|
|000025c0| 65 4e 61 6d 65 20 5b 20 | 46 6f 72 20 7b 20 52 61 |eName [ |For { Ra|
|000025d0| 6e 64 6f 6d 20 7c 20 49 | 6e 70 75 74 20 7c 20 4f |ndom | I|nput | O|
|000025e0| 75 74 70 75 74 20 7c 20 | 41 70 70 65 6e 64 20 7c |utput | |Append ||
|000025f0| 20 42 69 6e 61 72 79 20 | 7d 20 5d 20 5b 20 41 63 | Binary |} ] [ Ac|
|00002600| 63 65 73 73 20 7b 20 52 | 65 61 64 20 7c 20 52 65 |cess { R|ead | Re|
|00002610| 61 64 20 57 72 69 74 65 | 20 7c 20 57 72 69 74 65 |ad Write| | Write|
|00002620| 20 7d 20 5d 20 5b 20 7b | 20 53 68 61 72 65 64 20 | } ] [ {| Shared |
|00002630| 7c 20 4c 6f 63 6b 20 52 | 65 61 64 20 7c 20 4c 6f || Lock R|ead | Lo|
|00002640| 63 6b 20 52 65 61 64 20 | 57 72 69 74 65 20 7c 20 |ck Read |Write | |
|00002650| 4c 6f 63 6b 20 57 72 69 | 74 65 20 7d 20 5d 20 41 |Lock Wri|te } ] A|
|00002660| 73 20 5b 23 5d 66 69 6c | 65 4e 75 6d 62 65 72 20 |s [#]fil|eNumber |
|00002670| 5b 20 4c 65 6e 20 3d 20 | 72 65 63 4c 65 6e 20 5d |[ Len = |recLen ]|
|00002680| 40 4f 70 65 6e 1c 4f 70 | 74 69 6f 6e 20 42 61 73 |@Open.Op|tion Bas|
|00002690| 65 20 62 61 73 65 40 4f | 70 74 69 6f 6e 20 42 61 |e base@O|ption Ba|
|000026a0| 73 65 38 4f 70 74 69 6f | 6e 20 43 6f 6d 70 61 72 |se8Optio|n Compar|
|000026b0| 65 20 7b 20 43 61 73 65 | 20 7c 20 4e 6f 43 61 73 |e { Case| | NoCas|
|000026c0| 65 20 7c 20 42 69 6e 61 | 72 79 20 7d 40 4f 70 74 |e | Bina|ry }@Opt|
|000026d0| 69 6f 6e 20 43 6f 6d 70 | 61 72 65 1d 4f 70 74 69 |ion Comp|are.Opti|
|000026e0| 6f 6e 20 44 65 63 6c 61 | 72 65 40 4f 70 74 69 6f |on Decla|re@Optio|
|000026f0| 6e 20 44 65 63 6c 61 72 | 65 1b 4f 70 74 69 6f 6e |n Declar|e.Option|
|00002700| 20 50 75 62 6c 69 63 40 | 4f 70 74 69 6f 6e 20 50 | Public@|Option P|
|00002710| 75 62 6c 69 63 02 4f 72 | 02 50 49 28 50 72 69 6e |ublic.Or|.PI(Prin|
|00002720| 74 20 23 66 69 6c 65 4e | 75 6d 62 65 72 20 5b 20 |t #fileN|umber [ |
|00002730| 2c 20 65 78 70 72 4c 69 | 73 74 20 5d 40 50 72 69 |, exprLi|st ]@Pri|
|00002740| 6e 74 20 23 18 50 72 69 | 6e 74 20 5b 20 65 78 70 |nt #.Pri|nt [ exp|
|00002750| 72 4c 69 73 74 20 5d 40 | 50 72 69 6e 74 7b 50 72 |rList ]@|Print{Pr|
|00002760| 6f 70 65 72 74 79 20 47 | 65 74 40 5b 20 53 74 61 |operty G|et@[ Sta|
|00002770| 74 69 63 20 5d 20 5b 20 | 50 75 62 6c 69 63 20 7c |tic ] [ |Public ||
|00002780| 20 50 72 69 76 61 74 65 | 20 5d 20 50 72 6f 70 65 | Private| ] Prope|
|00002790| 72 74 79 20 47 65 74 20 | 70 72 6f 70 65 72 74 79 |rty Get |property|
|000027a0| 4e 61 6d 65 20 5b 20 41 | 73 20 74 79 70 65 20 5d |Name [ A|s type ]|
|000027b0| 20 5b 20 73 74 61 74 65 | 6d 65 6e 74 73 20 5d 20 | [ state|ments ] |
|000027c0| 45 6e 64 20 50 72 6f 70 | 65 72 74 79 40 50 72 6f |End Prop|erty@Pro|
|000027d0| 70 65 72 74 79 20 47 65 | 74 7b 50 72 6f 70 65 72 |perty Ge|t{Proper|
|000027e0| 74 79 20 53 65 74 40 5b | 20 53 74 61 74 69 63 20 |ty Set@[| Static |
|000027f0| 5d 20 5b 20 50 75 62 6c | 69 63 20 7c 20 50 72 69 |] [ Publ|ic | Pri|
|00002800| 76 61 74 65 20 5d 20 50 | 72 6f 70 65 72 74 79 20 |vate ] P|roperty |
|00002810| 53 65 74 20 70 72 6f 70 | 65 72 74 79 4e 61 6d 65 |Set prop|ertyName|
|00002820| 20 5b 20 41 73 20 74 79 | 70 65 20 5d 20 5b 20 73 | [ As ty|pe ] [ s|
|00002830| 74 61 74 65 6d 65 6e 74 | 73 20 5d 20 45 6e 64 20 |tatement|s ] End |
|00002840| 50 72 6f 70 65 72 74 79 | 40 50 72 6f 70 65 72 74 |Property|@Propert|
|00002850| 79 20 53 65 74 00 00 00 | 00 00 00 00 00 00 00 00 |y Set...|........|
|00002860| 32 50 75 74 20 5b 23 5d | 66 69 6c 65 4e 75 6d 62 |2Put [#]|fileNumb|
|00002870| 65 72 20 2c 20 5b 20 72 | 65 63 6f 72 64 4e 75 6d |er , [ r|ecordNum|
|00002880| 62 65 72 20 5d 20 2c 20 | 76 61 72 4e 61 6d 65 40 |ber ] , |varName@|
|00002890| 50 75 74 1f 52 61 6e 64 | 6f 6d 69 7a 65 20 5b 20 |Put.Rand|omize [ |
|000028a0| 6e 75 6d 45 78 70 72 20 | 5d 40 52 61 6e 64 6f 6d |numExpr |]@Random|
|000028b0| 69 7a 65 69 52 65 64 69 | 6d 40 52 65 44 69 6d 20 |izeiRedi|m@ReDim |
|000028c0| 5b 20 50 72 65 73 65 72 | 76 65 20 5d 20 61 72 72 |[ Preser|ve ] arr|
|000028d0| 61 79 4e 61 6d 65 20 28 | 20 62 6f 75 6e 64 73 20 |ayName (| bounds |
|000028e0| 29 20 5b 20 41 73 20 74 | 79 70 65 5d 20 5b 20 2c |) [ As t|ype] [ ,|
|000028f0| 20 61 72 72 61 79 4e 61 | 6d 65 20 28 20 62 6f 75 | arrayNa|me ( bou|
|00002900| 6e 64 73 20 29 20 5b 20 | 41 73 20 74 79 70 65 20 |nds ) [ |As type |
|00002910| 5d 20 2e 2e 2e 20 5d 40 | 52 65 44 69 6d 11 52 65 |] ... ]@|ReDim.Re|
|00002920| 6d 32 40 25 52 65 6d 2e | 2e 2e 40 25 52 65 6d 0c |m2@%Rem.|..@%Rem.|
|00002930| 52 65 6d 20 74 65 78 74 | 40 52 65 6d 05 52 65 73 |Rem text|@Rem.Res|
|00002940| 65 74 22 52 65 73 75 6d | 65 20 5b 20 30 20 7c 20 |et"Resum|e [ 0 | |
|00002950| 4e 65 78 74 20 7c 20 6c | 61 62 65 6c 20 5d 40 52 |Next | l|abel ]@R|
|00002960| 65 73 75 6d 65 06 52 65 | 74 75 72 6e 18 52 69 67 |esume.Re|turn.Rig|
|00002970| 68 74 20 28 20 65 78 70 | 72 20 2c 20 6e 20 29 40 |ht ( exp|r , n )@|
|00002980| 52 69 67 68 74 1a 52 69 | 67 68 74 24 20 28 20 65 |Right.Ri|ght$ ( e|
|00002990| 78 70 72 20 2c 20 6e 20 | 29 40 52 69 67 68 74 24 |xpr , n |)@Right$|
|000029a0| 16 52 6d 64 69 72 40 52 | 6d 44 69 72 20 70 61 74 |.Rmdir@R|mDir pat|
|000029b0| 68 40 52 6d 44 69 72 17 | 52 6e 64 20 5b 20 28 20 |h@RmDir.|Rnd [ ( |
|000029c0| 6e 75 6d 45 78 70 72 20 | 29 20 5d 40 52 6e 64 20 |numExpr |) ]@Rnd |
|000029d0| 52 6f 75 6e 64 20 28 20 | 6e 75 6d 45 78 70 72 20 |Round ( |numExpr |
|000029e0| 2c 20 70 6c 61 63 65 73 | 20 29 40 52 6f 75 6e 64 |, places| )@Round|
|000029f0| 25 52 73 65 74 40 52 53 | 65 74 20 73 74 72 69 6e |%Rset@RS|et strin|
|00002a00| 67 56 61 72 20 3d 20 73 | 74 72 69 6e 67 45 78 70 |gVar = s|tringExp|
|00002a10| 72 40 52 53 65 74 21 52 | 74 72 69 6d 20 40 52 54 |r@RSet!R|trim @RT|
|00002a20| 72 69 6d 20 28 20 73 74 | 72 69 6e 67 45 78 70 72 |rim ( st|ringExpr|
|00002a30| 20 29 40 52 54 72 69 6d | 23 52 74 72 69 6d 24 40 | )@RTrim|#Rtrim$@|
|00002a40| 52 54 72 69 6d 24 20 28 | 20 73 74 72 69 6e 67 45 |RTrim$ (| stringE|
|00002a50| 78 70 72 20 29 40 52 54 | 72 69 6d 24 00 00 00 00 |xpr )@RT|rim$....|
|00002a60| 1a 53 65 63 6f 6e 64 20 | 28 20 64 61 74 65 45 78 |.Second |( dateEx|
|00002a70| 70 72 20 29 40 53 65 63 | 6f 6e 64 18 53 65 65 6b |pr )@Sec|ond.Seek|
|00002a80| 20 28 20 66 69 6c 65 4e | 75 6d 62 65 72 20 29 40 | ( fileN|umber )@|
|00002a90| 53 65 65 6b 22 53 65 65 | 6b 20 5b 23 5d 66 69 6c |Seek"See|k [#]fil|
|00002aa0| 65 4e 75 6d 62 65 72 20 | 2c 20 70 6f 73 69 74 69 |eNumber |, positi|
|00002ab0| 6f 6e 40 53 65 65 6b 93 | 53 65 6c 65 63 74 20 43 |on@Seek.|Select C|
|00002ac0| 61 73 65 20 73 65 6c 65 | 63 74 45 78 70 72 3a 20 |ase sele|ctExpr: |
|00002ad0| 5b 20 43 61 73 65 20 63 | 6f 6e 64 4c 69 73 74 31 |[ Case c|ondList1|
|00002ae0| 20 5b 20 73 74 61 74 65 | 6d 65 6e 74 73 20 5d 20 | [ state|ments ] |
|00002af0| 5d 20 5b 20 43 61 73 65 | 20 63 6f 6e 64 4c 69 73 |] [ Case| condLis|
|00002b00| 74 32 20 5b 20 73 74 61 | 74 65 6d 65 6e 74 73 20 |t2 [ sta|tements |
|00002b10| 5d 20 5d 20 2e 2e 2e 20 | 5b 20 43 61 73 65 20 45 |] ] ... |[ Case E|
|00002b20| 6c 73 65 20 5b 20 73 74 | 61 74 65 6d 65 6e 74 73 |lse [ st|atements|
|00002b30| 20 5d 20 5d 20 45 6e 64 | 20 53 65 6c 65 63 74 40 | ] ] End| Select@|
|00002b40| 53 65 6c 65 63 74 20 43 | 61 73 65 29 53 65 6e 64 |Select C|ase)Send|
|00002b50| 4b 65 79 73 20 73 74 72 | 69 6e 67 20 5b 20 2c 20 |Keys str|ing [ , |
|00002b60| 70 72 6f 63 65 73 73 4e | 6f 77 20 5d 40 53 65 6e |processN|ow ]@Sen|
|00002b70| 64 4b 65 79 73 2b 53 65 | 74 20 76 61 72 20 3d 20 |dKeys+Se|t var = |
|00002b80| 4e 65 77 20 63 6c 61 73 | 73 20 5b 20 28 20 5b 20 |New clas|s [ ( [ |
|00002b90| 61 72 67 4c 69 73 74 20 | 5d 20 29 20 5d 40 53 65 |argList |] ) ]@Se|
|00002ba0| 74 13 53 65 74 20 76 61 | 72 31 20 3d 20 76 61 72 |t.Set va|r1 = var|
|00002bb0| 32 40 53 65 74 2f 53 65 | 74 20 76 61 72 20 3d 20 |2@Set/Se|t var = |
|00002bc0| 42 69 6e 64 20 5b 20 70 | 72 6f 64 43 6c 61 73 73 |Bind [ p|rodClass|
|00002bd0| 20 5d 20 28 20 6f 62 6a | 65 63 74 4e 61 6d 65 20 | ] ( obj|ectName |
|00002be0| 29 40 53 65 74 2d 53 65 | 74 46 69 6c 65 41 74 74 |)@Set-Se|tFileAtt|
|00002bf0| 72 20 66 69 6c 65 4e 61 | 6d 65 20 2c 20 61 74 74 |r fileNa|me , att|
|00002c00| 72 69 62 75 74 65 73 40 | 53 65 74 46 69 6c 65 41 |ributes@|SetFileA|
|00002c10| 74 74 72 13 53 67 6e 20 | 28 20 6e 75 6d 45 78 70 |ttr.Sgn |( numExp|
|00002c20| 72 20 29 40 53 67 6e 29 | 53 68 65 6c 6c 20 28 20 |r )@Sgn)|Shell ( |
|00002c30| 70 72 6f 67 72 61 6d 20 | 5b 20 2c 20 77 69 6e 64 |program |[ , wind|
|00002c40| 6f 77 53 74 79 6c 65 20 | 5d 20 29 40 53 68 65 6c |owStyle |] )@Shel|
|00002c50| 6c 11 53 69 6e 20 28 20 | 61 6e 67 6c 65 20 29 40 |l.Sin ( |angle )@|
|00002c60| 53 69 6e 06 53 69 6e 67 | 6c 65 17 53 70 61 63 65 |Sin.Sing|le.Space|
|00002c70| 20 28 20 6e 75 6d 45 78 | 70 72 20 29 40 53 70 61 | ( numEx|pr )@Spa|
|00002c80| 63 65 19 53 70 61 63 65 | 24 20 28 20 6e 75 6d 45 |ce.Space|$ ( numE|
|00002c90| 78 70 72 20 29 40 53 70 | 61 63 65 24 13 53 70 63 |xpr )@Sp|ace$.Spc|
|00002ca0| 20 28 20 6e 75 6d 45 78 | 70 72 20 29 40 53 70 63 | ( numEx|pr )@Spc|
|00002cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002cc0| 13 53 71 72 20 28 20 6e | 75 6d 45 78 70 72 20 29 |.Sqr ( n|umExpr )|
|00002cd0| 40 53 71 72 13 53 74 72 | 20 28 20 6e 75 6d 45 78 |@Sqr.Str| ( numEx|
|00002ce0| 70 72 20 29 40 53 74 72 | 15 53 74 72 24 20 28 20 |pr )@Str|.Str$ ( |
|00002cf0| 6e 75 6d 45 78 70 72 20 | 29 40 53 74 72 24 3c 53 |numExpr |)@Str$<S|
|00002d00| 74 72 43 6f 6d 70 61 72 | 65 20 28 20 73 74 72 69 |trCompar|e ( stri|
|00002d10| 6e 67 31 20 2c 20 73 74 | 72 69 6e 67 32 20 5b 20 |ng1 , st|ring2 [ |
|00002d20| 2c 20 63 6f 6d 70 4d 65 | 74 68 6f 64 20 5d 20 29 |, compMe|thod ] )|
|00002d30| 40 53 74 72 43 6f 6d 70 | 61 72 65 06 53 74 72 69 |@StrComp|are.Stri|
|00002d40| 6e 67 37 53 74 72 69 6e | 67 20 28 20 73 74 72 69 |ng7Strin|g ( stri|
|00002d50| 6e 67 4c 65 6e 20 2c 20 | 7b 20 63 68 61 72 43 6f |ngLen , |{ charCo|
|00002d60| 64 65 20 7c 20 73 74 72 | 69 6e 67 45 78 70 72 20 |de | str|ingExpr |
|00002d70| 7d 20 29 40 53 74 72 69 | 6e 67 39 53 74 72 69 6e |} )@Stri|ng9Strin|
|00002d80| 67 24 20 28 20 73 74 72 | 69 6e 67 4c 65 6e 20 2c |g$ ( str|ingLen ,|
|00002d90| 20 7b 20 63 68 61 72 43 | 6f 64 65 20 7c 20 73 74 | { charC|ode | st|
|00002da0| 72 69 6e 67 45 78 70 72 | 20 7d 20 29 40 53 74 72 |ringExpr| } )@Str|
|00002db0| 69 6e 67 24 5e 53 75 62 | 40 5b 20 53 74 61 74 69 |ing$^Sub|@[ Stati|
|00002dc0| 63 20 5d 20 5b 20 50 75 | 62 6c 69 63 20 7c 20 50 |c ] [ Pu|blic | P|
|00002dd0| 72 69 76 61 74 65 20 5d | 20 53 75 62 20 73 75 62 |rivate ]| Sub sub|
|00002de0| 4e 61 6d 65 20 5b 20 28 | 20 5b 20 61 72 67 4c 69 |Name [ (| [ argLi|
|00002df0| 73 74 20 5d 20 29 20 5d | 20 5b 20 73 74 61 74 65 |st ] ) ]| [ state|
|00002e00| 6d 65 6e 74 73 20 5d 20 | 45 6e 64 20 53 75 62 40 |ments ] |End Sub@|
|00002e10| 53 75 62 12 54 61 62 20 | 28 20 63 6f 6c 75 6d 6e |Sub.Tab |( column|
|00002e20| 20 29 40 54 61 62 11 54 | 61 6e 20 28 20 61 6e 67 | )@Tab.T|an ( ang|
|00002e30| 6c 65 20 29 40 54 61 6e | 38 54 65 72 6d 69 6e 61 |le )@Tan|8Termina|
|00002e40| 74 65 40 53 75 62 20 54 | 65 72 6d 69 6e 61 74 65 |te@Sub T|erminate|
|00002e50| 20 5b 20 73 74 61 74 65 | 6d 65 6e 74 73 20 5d 20 | [ state|ments ] |
|00002e60| 45 6e 64 20 53 75 62 40 | 54 65 72 6d 69 6e 61 74 |End Sub@|Terminat|
|00002e70| 65 09 54 69 6d 65 40 54 | 69 6d 65 14 54 69 6d 65 |e.Time@T|ime.Time|
|00002e80| 20 3d 20 74 69 6d 65 45 | 78 70 72 40 54 69 6d 65 | = timeE|xpr@Time|
|00002e90| 05 54 69 6d 65 24 16 54 | 69 6d 65 24 20 3d 20 74 |.Time$.T|ime$ = t|
|00002ea0| 69 6d 65 45 78 70 72 40 | 54 69 6d 65 24 3b 54 69 |imeExpr@|Time$;Ti|
|00002eb0| 6d 65 6e 75 6d 62 65 72 | 40 54 69 6d 65 4e 75 6d |menumber|@TimeNum|
|00002ec0| 62 65 72 20 28 20 68 6f | 75 72 20 2c 20 6d 69 6e |ber ( ho|ur , min|
|00002ed0| 75 74 65 20 2c 20 73 65 | 63 6f 6e 64 20 29 40 54 |ute , se|cond )@T|
|00002ee0| 69 6d 65 4e 75 6d 62 65 | 72 00 00 00 00 00 00 00 |imeNumbe|r.......|
|00002ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f00| 05 54 69 6d 65 72 2c 54 | 69 6d 65 76 61 6c 75 65 |.Timer,T|imevalue|
|00002f10| 40 54 69 6d 65 56 61 6c | 75 65 20 28 20 73 74 72 |@TimeVal|ue ( str|
|00002f20| 69 6e 67 45 78 70 72 20 | 29 40 54 69 6d 65 56 61 |ingExpr |)@TimeVa|
|00002f30| 6c 75 65 05 54 6f 64 61 | 79 18 54 72 69 6d 20 28 |lue.Toda|y.Trim (|
|00002f40| 20 73 74 72 69 6e 67 45 | 78 70 72 20 29 40 54 72 | stringE|xpr )@Tr|
|00002f50| 69 6d 1a 54 72 69 6d 24 | 20 28 20 73 74 72 69 6e |im.Trim$| ( strin|
|00002f60| 67 45 78 70 72 20 29 40 | 54 72 69 6d 24 0e 54 72 |gExpr )@|Trim$.Tr|
|00002f70| 75 65 40 54 52 55 45 40 | 54 52 55 45 48 54 79 70 |ue@TRUE@|TRUEHTyp|
|00002f80| 65 40 5b 20 50 75 62 6c | 69 63 20 7c 20 50 72 69 |e@[ Publ|ic | Pri|
|00002f90| 76 61 74 65 20 5d 20 54 | 79 70 65 20 74 79 70 65 |vate ] T|ype type|
|00002fa0| 4e 61 6d 65 20 6d 65 6d | 62 65 72 44 65 63 6c 61 |Name mem|berDecla|
|00002fb0| 72 61 74 69 6f 6e 73 20 | 45 6e 64 20 54 79 70 65 |rations |End Type|
|00002fc0| 40 54 79 70 65 1a 54 79 | 70 65 4e 61 6d 65 20 28 |@Type.Ty|peName (|
|00002fd0| 20 65 78 70 72 20 29 40 | 54 79 70 65 4e 61 6d 65 | expr )@|TypeName|
|00002fe0| 31 55 62 6f 75 6e 64 40 | 55 42 6f 75 6e 64 28 20 |1Ubound@|UBound( |
|00002ff0| 61 72 72 61 79 4e 61 6d | 65 20 5b 20 2c 20 64 69 |arrayNam|e [ , di|
|00003000| 6d 65 6e 73 69 6f 6e 20 | 5d 20 29 40 55 42 6f 75 |mension |] )@UBou|
|00003010| 6e 64 1b 55 63 61 73 65 | 20 40 55 43 61 73 65 20 |nd.Ucase| @UCase |
|00003020| 28 20 65 78 70 72 20 29 | 40 55 43 61 73 65 1d 55 |( expr )|@UCase.U|
|00003030| 63 61 73 65 24 40 55 43 | 61 73 65 24 20 28 20 65 |case$@UC|ase$ ( e|
|00003040| 78 70 72 20 29 40 55 43 | 61 73 65 24 1c 55 63 68 |xpr )@UC|ase$.Uch|
|00003050| 72 20 40 55 43 68 72 20 | 28 20 6c 6f 6e 67 45 78 |r @UChr |( longEx|
|00003060| 70 72 20 29 40 55 43 68 | 72 1e 55 63 68 72 24 40 |pr )@UCh|r.Uchr$@|
|00003070| 55 43 68 72 24 20 28 20 | 6c 6f 6e 67 45 78 70 72 |UChr$ ( |longExpr|
|00003080| 20 29 40 55 43 68 72 24 | 16 55 6e 69 20 28 20 73 | )@UChr$|.Uni ( s|
|00003090| 74 72 69 6e 67 45 78 70 | 72 20 29 40 55 6e 69 48 |tringExp|r )@UniH|
|000030a0| 55 6e 6c 6f 63 6b 20 5b | 23 5d 66 69 6c 65 4e 75 |Unlock [|#]fileNu|
|000030b0| 6d 62 65 72 20 5b 20 2c | 20 72 65 63 6f 72 64 4e |mber [ ,| recordN|
|000030c0| 75 6d 62 65 72 20 20 7c | 20 20 7b 20 5b 20 73 74 |umber || { [ st|
|000030d0| 61 72 74 20 5d 20 54 6f | 20 65 6e 64 20 20 7d 20 |art ] To| end } |
|000030e0| 5d 40 55 6e 6c 6f 63 6b | 11 55 73 65 20 75 73 65 |]@Unlock|.Use use|
|000030f0| 53 63 72 69 70 74 40 55 | 73 65 00 00 00 00 00 00 |Script@U|se......|
|00003100| 18 55 73 65 4c 53 58 20 | 6c 73 78 44 4c 4c 6e 61 |.UseLSX |lsxDLLna|
|00003110| 6d 65 40 55 73 65 4c 53 | 58 42 55 73 74 72 69 6e |me@UseLS|XBUstrin|
|00003120| 67 20 40 55 53 74 72 69 | 6e 67 20 28 20 73 74 72 |g @UStri|ng ( str|
|00003130| 69 6e 67 4c 65 6e 20 2c | 20 7b 20 63 68 61 72 43 |ingLen ,| { charC|
|00003140| 6f 64 65 20 7c 20 73 74 | 72 69 6e 67 45 78 70 72 |ode | st|ringExpr|
|00003150| 20 7d 20 29 40 55 53 74 | 72 69 6e 67 44 55 73 74 | } )@USt|ringDUst|
|00003160| 72 69 6e 67 24 40 55 53 | 74 72 69 6e 67 24 20 28 |ring$@US|tring$ (|
|00003170| 20 73 74 72 69 6e 67 4c | 65 6e 20 2c 20 7b 20 63 | stringL|en , { c|
|00003180| 68 61 72 43 6f 64 65 20 | 7c 20 73 74 72 69 6e 67 |harCode || string|
|00003190| 45 78 70 72 20 7d 20 29 | 40 55 53 74 72 69 6e 67 |Expr } )|@UString|
|000031a0| 24 15 56 61 6c 28 20 73 | 74 72 69 6e 67 45 78 70 |$.Val( s|tringExp|
|000031b0| 72 20 29 40 56 61 6c 07 | 56 61 72 69 61 6e 74 1c |r )@Val.|Variant.|
|000031c0| 57 65 65 6b 64 61 79 20 | 28 20 64 61 74 65 45 78 |Weekday |( dateEx|
|000031d0| 70 72 20 29 40 57 65 65 | 6b 64 61 79 29 57 68 69 |pr )@Wee|kday)Whi|
|000031e0| 6c 65 20 63 6f 6e 64 69 | 74 69 6f 6e 20 5b 20 73 |le condi|tion [ s|
|000031f0| 74 61 74 65 6d 65 6e 74 | 73 20 5d 20 57 45 6e 64 |tatement|s ] WEnd|
|00003200| 40 57 68 69 6c 65 21 57 | 69 64 74 68 20 23 66 69 |@While!W|idth #fi|
|00003210| 6c 65 4e 75 6d 62 65 72 | 20 2c 20 77 69 64 74 68 |leNumber| , width|
|00003220| 40 57 69 64 74 68 20 23 | 2b 57 69 74 68 20 6f 62 |@Width #|+With ob|
|00003230| 6a 65 63 74 52 65 66 20 | 5b 20 73 74 61 74 65 6d |jectRef |[ statem|
|00003240| 65 6e 74 73 20 5d 20 45 | 6e 64 20 57 69 74 68 40 |ents ] E|nd With@|
|00003250| 57 69 74 68 28 57 72 69 | 74 65 20 23 66 69 6c 65 |With(Wri|te #file|
|00003260| 4e 75 6d 62 65 72 20 5b | 20 2c 20 65 78 70 72 4c |Number [| , exprL|
|00003270| 69 73 74 20 5d 40 57 72 | 69 74 65 20 23 03 58 6f |ist ]@Wr|ite #.Xo|
|00003280| 72 15 59 65 61 72 28 20 | 64 61 74 65 45 78 70 72 |r.Year( |dateExpr|
|00003290| 20 29 40 59 65 61 72 05 | 59 69 65 6c 64 00 00 00 | )@Year.|Yield...|
|000032a0| 07 4f 62 6a 65 63 74 3a | 07 53 63 72 69 70 74 3a |.Object:|.Script:|
|000032b0| 06 4f 75 74 70 75 74 09 | 56 61 72 69 61 62 6c 65 |.Output.|Variable|
|000032c0| 73 07 42 72 6f 77 73 65 | 72 0b 42 72 65 61 6b 70 |s.Browse|r.Breakp|
|000032d0| 6f 69 6e 74 73 06 43 61 | 6c 6c 73 3a 07 45 72 72 |oints.Ca|lls:.Err|
|000032e0| 6f 72 73 3a 0a 50 61 73 | 74 65 20 4e 61 6d 65 09 |ors:.Pas|te Name.|
|000032f0| 43 61 74 65 67 6f 72 79 | 3a 13 4e 6f 20 76 61 72 |Category|:.No var|
|00003300| 69 61 62 6c 65 20 63 6f | 6e 74 65 78 74 0d 4d 53 |iable co|ntext.MS|
|00003310| 20 53 61 6e 73 20 53 65 | 72 69 66 06 53 79 73 74 | Sans Se|rif.Syst|
|00003320| 65 6d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |em......|........|
|00003330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003340| 11 52 65 61 64 6f 6e 6c | 79 20 50 72 6f 70 65 72 |.Readonl|y Proper|
|00003350| 74 79 0d 4f 75 74 20 6f | 66 20 4d 65 6d 6f 72 79 |ty.Out o|f Memory|
|00003360| 0c 55 6e 6b 6e 6f 77 6e | 20 54 79 70 65 10 55 6e |.Unknown| Type.Un|
|00003370| 6b 6e 6f 77 6e 49 6e 74 | 65 72 66 61 63 65 0c 4e |knownInt|erface.N|
|00003380| 6f 20 43 6f 6e 74 61 69 | 6e 65 72 0d 49 6e 76 61 |o Contai|ner.Inva|
|00003390| 6c 69 64 20 49 6e 64 65 | 78 15 55 6e 69 6d 70 6c |lid Inde|x.Unimpl|
|000033a0| 65 6d 65 6e 74 65 64 20 | 46 65 61 74 75 72 65 0c |emented |Feature.|
|000033b0| 4e 6f 20 52 6f 6f 6d 20 | 4c 65 66 74 0f 42 61 64 |No Room |Left.Bad|
|000033c0| 20 4c 69 6e 65 20 4e 75 | 6d 62 65 72 0c 4e 55 4c | Line Nu|mber.NUL|
|000033d0| 4c 20 50 6f 69 6e 74 65 | 72 0b 45 6e 64 20 6f 66 |L Pointe|r.End of|
|000033e0| 20 4c 69 73 74 0e 49 6e | 74 65 72 6e 61 6c 20 45 | List.In|ternal E|
|000033f0| 72 72 6f 72 09 4e 6f 20 | 57 69 6e 64 6f 77 09 4e |rror.No |Window.N|
|00003400| 6f 74 20 46 6f 75 6e 64 | 00 00 00 00 00 00 00 00 |ot Found|........|
|00003410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003420| 0e 55 6e 65 78 70 65 63 | 74 65 64 3a 20 25 73 0a |.Unexpec|ted: %s.|
|00003430| 45 78 70 65 63 74 65 64 | 3a 20 04 5b 25 64 5d 11 |Expected|: .[%d].|
|00003440| 49 6c 6c 65 67 61 6c 20 | 73 74 61 74 65 6d 65 6e |Illegal |statemen|
|00003450| 74 0b 45 6e 64 2d 6f 66 | 2d 66 69 6c 65 1e 43 6f |t.End-of|-file.Co|
|00003460| 6d 70 69 6c 65 72 20 73 | 74 61 63 6b 20 6f 76 65 |mpiler s|tack ove|
|00003470| 72 66 6c 6f 77 20 61 74 | 3a 20 25 73 17 49 6c 6c |rflow at|: %s.Ill|
|00003480| 65 67 61 6c 20 72 61 6e | 67 65 20 73 70 65 63 69 |egal ran|ge speci|
|00003490| 66 69 65 72 1a 49 6c 6c | 65 67 61 6c 20 75 73 65 |fier.Ill|egal use|
|000034a0| 20 6f 66 20 70 61 72 65 | 6e 74 68 65 73 65 73 0d | of pare|ntheses.|
|000034b0| 4f 75 74 20 6f 66 20 6d | 65 6d 6f 72 79 0b 45 6e |Out of m|emory.En|
|000034c0| 64 2d 6f 66 2d 6c 69 6e | 65 2b 4e 61 6d 65 64 20 |d-of-lin|e+Named |
|000034d0| 70 72 6f 64 75 63 74 20 | 63 6c 61 73 73 20 69 6e |product |class in|
|000034e0| 73 74 61 6e 63 65 20 6e | 6f 74 20 76 61 6c 69 64 |stance n|ot valid|
|000034f0| 20 68 65 72 65 29 53 45 | 54 20 72 65 71 75 69 72 | here)SE|T requir|
|00003500| 65 64 20 6f 6e 20 63 6c | 61 73 73 20 69 6e 73 74 |ed on cl|ass inst|
|00003510| 61 6e 63 65 20 61 73 73 | 69 67 6e 6d 65 6e 74 15 |ance ass|ignment.|
|00003520| 55 6e 74 65 72 6d 69 6e | 61 74 65 64 20 25 73 20 |Untermin|ated %s |
|00003530| 62 6c 6f 63 6b 09 53 74 | 61 74 65 6d 65 6e 74 0a |block.St|atement.|
|00003540| 45 78 70 72 65 73 73 69 | 6f 6e 0a 49 64 65 6e 74 |Expressi|on.Ident|
|00003550| 69 66 69 65 72 00 00 00 | 00 00 00 00 00 00 00 00 |ifier...|........|
|00003560| 08 4f 70 65 72 61 74 6f | 72 10 45 6e 64 2d 6f 66 |.Operato|r.End-of|
|00003570| 2d 73 74 61 74 65 6d 65 | 6e 74 09 44 61 74 61 20 |-stateme|nt.Data |
|00003580| 74 79 70 65 0f 53 74 72 | 69 6e 67 20 63 6f 6e 73 |type.Str|ing cons|
|00003590| 74 61 6e 74 05 4c 61 62 | 65 6c 01 30 01 31 2e 49 |tant.Lab|el.0.1.I|
|000035a0| 6c 6c 65 67 61 6c 20 63 | 68 61 72 61 63 74 65 72 |llegal c|haracter|
|000035b0| 20 61 66 74 65 72 20 63 | 6f 6e 74 69 6e 75 61 74 | after c|ontinuat|
|000035c0| 69 6f 6e 20 63 68 61 72 | 61 63 74 65 72 22 49 6c |ion char|acter"Il|
|000035d0| 6c 65 67 61 6c 20 74 79 | 70 65 20 73 75 66 66 69 |legal ty|pe suffi|
|000035e0| 78 20 6f 6e 20 6b 65 79 | 77 6f 72 64 3a 20 25 73 |x on key|word: %s|
|000035f0| 28 43 6f 6d 70 69 6c 65 | 72 20 73 74 61 74 65 6d |(Compile|r statem|
|00003600| 65 6e 74 20 73 74 61 63 | 6b 20 6f 76 65 72 66 6c |ent stac|k overfl|
|00003610| 6f 77 20 61 74 3a 20 25 | 73 2a 44 49 4d 20 72 65 |ow at: %|s*DIM re|
|00003620| 71 75 69 72 65 64 20 6f | 6e 20 64 65 63 6c 61 72 |quired o|n declar|
|00003630| 61 74 69 6f 6e 73 20 69 | 6e 20 74 68 69 73 20 73 |ations i|n this s|
|00003640| 63 6f 70 65 08 43 6f 6e | 73 74 61 6e 74 1c 55 6e |cope.Con|stant.Un|
|00003650| 74 65 72 6d 69 6e 61 74 | 65 64 20 73 74 72 69 6e |terminat|ed strin|
|00003660| 67 20 63 6f 6e 73 74 61 | 6e 74 10 4e 75 6d 65 72 |g consta|nt.Numer|
|00003670| 69 63 20 63 6f 6e 73 74 | 61 6e 74 25 55 6e 74 65 |ic const|ant%Unte|
|00003680| 72 6d 69 6e 61 74 65 64 | 20 73 71 75 61 72 65 20 |rminated| square |
|00003690| 62 72 61 63 6b 65 74 20 | 72 65 66 65 72 65 6e 63 |bracket |referenc|
|000036a0| 65 13 52 65 6c 61 74 69 | 6f 6e 61 6c 20 6f 70 65 |e.Relati|onal ope|
|000036b0| 72 61 74 6f 72 00 00 00 | 00 00 00 00 00 00 00 00 |rator...|........|
|000036c0| 35 43 41 53 45 20 45 4c | 53 45 20 6d 75 73 74 20 |5CASE EL|SE must |
|000036d0| 62 65 20 74 68 65 20 6c | 61 73 74 20 43 41 53 45 |be the l|ast CASE|
|000036e0| 20 69 6e 20 61 20 53 45 | 4c 45 43 54 20 73 74 61 | in a SE|LECT sta|
|000036f0| 74 65 6d 65 6e 74 11 49 | 6c 6c 65 67 61 6c 20 64 |tement.I|llegal d|
|00003700| 69 72 65 63 74 69 76 65 | 1c 44 75 70 6c 69 63 61 |irective|.Duplica|
|00003710| 74 65 20 70 72 6f 63 65 | 64 75 72 65 20 6e 61 6d |te proce|dure nam|
|00003720| 65 3a 20 25 73 2d 49 6c | 6c 65 67 61 6c 20 75 73 |e: %s-Il|legal us|
|00003730| 65 20 6f 66 20 65 73 63 | 61 70 65 20 63 68 61 72 |e of esc|ape char|
|00003740| 61 63 74 65 72 20 69 6e | 20 69 64 65 6e 74 69 66 |acter in| identif|
|00003750| 69 65 72 1f 49 6c 6c 65 | 67 61 6c 20 75 73 65 20 |ier.Ille|gal use |
|00003760| 6f 66 20 65 73 63 61 70 | 65 20 63 68 61 72 61 63 |of escap|e charac|
|00003770| 74 65 72 27 49 6c 6c 65 | 67 61 6c 20 65 78 65 63 |ter'Ille|gal exec|
|00003780| 75 74 61 62 6c 65 20 63 | 6f 64 65 20 69 6e 20 44 |utable c|ode in D|
|00003790| 65 63 6c 61 72 61 74 69 | 6f 6e 73 23 4d 45 20 6e |eclarati|ons#ME n|
|000037a0| 6f 74 20 76 61 6c 69 64 | 20 6f 75 74 73 69 64 65 |ot valid| outside|
|000037b0| 20 6f 66 20 63 6c 61 73 | 73 20 73 63 6f 70 65 23 | of clas|s scope#|
|000037c0| 2e 2e 20 6e 6f 74 20 76 | 61 6c 69 64 20 6f 75 74 |.. not v|alid out|
|000037d0| 73 69 64 65 20 6f 66 20 | 63 6c 61 73 73 20 73 63 |side of |class sc|
|000037e0| 6f 70 65 1c 55 6e 74 65 | 72 6d 69 6e 61 74 65 64 |ope.Unte|rminated|
|000037f0| 20 62 6c 6f 63 6b 20 73 | 74 61 74 65 6d 65 6e 74 | block s|tatement|
|00003800| 1a 55 6e 6d 61 74 63 68 | 65 64 20 62 6c 6f 63 6b |.Unmatch|ed block|
|00003810| 20 74 65 72 6d 69 6e 61 | 74 6f 72 07 49 4e 43 4c | termina|tor.INCL|
|00003820| 55 44 45 06 45 4e 44 52 | 45 4d 36 43 61 6e 6e 6f |UDE.ENDR|EM6Canno|
|00003830| 74 20 66 6f 72 77 61 72 | 64 20 64 65 63 6c 61 72 |t forwar|d declar|
|00003840| 65 20 75 73 65 72 2d 64 | 65 66 69 6e 65 64 20 63 |e user-d|efined c|
|00003850| 6c 61 73 73 20 6f 72 20 | 64 61 74 61 20 74 79 70 |lass or |data typ|
|00003860| 65 26 50 72 6f 63 65 64 | 75 72 65 73 20 6d 61 79 |e&Proced|ures may|
|00003870| 20 6e 6f 74 20 62 65 20 | 66 6f 72 77 61 72 64 20 | not be |forward |
|00003880| 64 65 63 6c 61 72 65 64 | 1f 53 79 6e 74 61 78 20 |declared|.Syntax |
|00003890| 63 68 65 63 6b 69 6e 67 | 20 62 75 66 66 65 72 20 |checking| buffer |
|000038a0| 6f 76 65 72 66 6c 6f 77 | 21 50 55 42 4c 49 43 20 |overflow|!PUBLIC |
|000038b0| 6e 6f 74 20 61 6c 6c 6f | 77 65 64 20 69 6e 20 74 |not allo|wed in t|
|000038c0| 68 69 73 20 6d 6f 64 75 | 6c 65 00 00 00 00 00 00 |his modu|le......|
|000038d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000038e0| 2b 50 72 6f 63 65 64 75 | 72 65 20 64 65 66 69 6e |+Procedu|re defin|
|000038f0| 69 74 69 6f 6e 73 20 69 | 6c 6c 65 67 61 6c 20 69 |itions i|llegal i|
|00003900| 6e 20 74 68 69 73 20 73 | 63 6f 70 65 1f 49 6c 6c |n this s|cope.Ill|
|00003910| 65 67 61 6c 20 64 75 70 | 6c 69 63 61 74 65 20 45 |egal dup|licate E|
|00003920| 4e 44 20 73 74 61 74 65 | 6d 65 6e 74 29 49 6c 6c |ND state|ment)Ill|
|00003930| 65 67 61 6c 20 65 78 65 | 63 75 74 61 62 6c 65 20 |egal exe|cutable |
|00003940| 63 6f 64 65 20 6f 75 74 | 73 69 64 65 20 70 72 6f |code out|side pro|
|00003950| 63 65 64 75 72 65 0d 4e | 61 6d 65 20 74 6f 6f 20 |cedure.N|ame too |
|00003960| 6c 6f 6e 67 23 53 74 61 | 74 65 6d 65 6e 74 20 69 |long#Sta|tement i|
|00003970| 6c 6c 65 67 61 6c 20 69 | 6e 20 54 59 50 45 20 62 |llegal i|n TYPE b|
|00003980| 6c 6f 63 6b 3a 20 25 73 | 24 53 74 61 74 65 6d 65 |lock: %s|$Stateme|
|00003990| 6e 74 20 69 6c 6c 65 67 | 61 6c 20 69 6e 20 43 4c |nt illeg|al in CL|
|000039a0| 41 53 53 20 62 6c 6f 63 | 6b 3a 20 25 73 1a 49 6e |ASS bloc|k: %s.In|
|000039b0| 76 61 6c 69 64 20 74 79 | 70 65 20 66 6f 72 20 70 |valid ty|pe for p|
|000039c0| 72 6f 63 65 64 75 72 65 | 22 53 74 61 74 65 6d 65 |rocedure|"Stateme|
|000039d0| 6e 74 20 69 73 20 69 6c | 6c 65 67 61 6c 20 69 6e |nt is il|legal in|
|000039e0| 20 74 68 69 73 20 73 63 | 6f 70 65 22 49 6c 6c 65 | this sc|ope"Ille|
|000039f0| 67 61 6c 20 65 78 65 63 | 75 74 61 62 6c 65 20 63 |gal exec|utable c|
|00003a00| 6f 64 65 20 69 6e 20 4f | 70 74 69 6f 6e 73 29 49 |ode in O|ptions)I|
|00003a10| 6c 6c 65 67 61 6c 20 6f | 6e 20 64 65 63 6c 61 72 |llegal o|n declar|
|00003a20| 61 74 69 6f 6e 73 20 69 | 6e 20 74 68 69 73 20 73 |ations i|n this s|
|00003a30| 63 6f 70 65 3a 20 25 73 | 2a 49 6c 6c 65 67 61 6c |cope: %s|*Illegal|
|00003a40| 20 63 68 61 72 61 63 74 | 65 72 20 61 66 74 65 72 | charact|er after|
|00003a50| 20 25 49 4e 43 4c 55 44 | 45 20 64 69 72 65 63 74 | %INCLUD|E direct|
|00003a60| 69 76 65 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ive.....|........|
|00003a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+