home *** CD-ROM | disk | FTP | other *** search
/ Program Metropolis - Software Boutique 95 / SOFTWARECD.iso / camipro3 / macros.cmz / AUTOCAL.SMM < prev    next >
Encoding:
INI File  |  1994-08-14  |  30.5 KB  |  2,283 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     
  5. [files]
  6. [charset]
  7.     82
  8.     CHINESEBIG5 (Windows)
  9. [revisions]
  10.     0
  11. [prn]
  12.     HP LaserJet IIISi
  13. [port]
  14.     LPT2:
  15. [lang]
  16.     1
  17. [desc]
  18.     ª╣Ñ¿╢░Ñ╤ _calmon.sty ññ¬║Ñ\»α┼▄╝╞ªs¿·íAÑH½Kª█░╩│B▓zñδ╛ΣíC 
  19.     
  20.     
  21.     
  22.     
  23.     775972736
  24.     128
  25.     677005541
  26.     71584142
  27.     8
  28.     0
  29.     0
  30.     0
  31.     0
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     0
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     3
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [tag]
  54.     Body Text
  55.     2
  56.     [fnt]
  57.         TimesNewRomanPS
  58.         200
  59.         0
  60.         49152
  61.     [algn]
  62.         1
  63.         1
  64.         0
  65.         0
  66.         0
  67.     [spc]
  68.         33
  69.         273
  70.         1
  71.         0
  72.         0
  73.         1
  74.         100
  75.     [brk]
  76.         4
  77.     [line]
  78.         8
  79.         0
  80.         1
  81.         0
  82.         1
  83.         1
  84.         1
  85.         10
  86.         10
  87.         1
  88.     [spec]
  89.         0
  90.         0
  91.         
  92.         0
  93.         1
  94.         1
  95.         0
  96.         0
  97.         0
  98.         0
  99.     [nfmt]
  100.         272
  101.         1
  102.         3
  103.         .
  104.         ,
  105.         $
  106.     Body Text
  107.     0
  108.     0
  109. [tag]
  110.     Function
  111.     3
  112.     [fnt]
  113.         TimesNewRomanPS
  114.         200
  115.         0
  116.         49153
  117.     [algn]
  118.         1
  119.         1
  120.         0
  121.         0
  122.         0
  123.     [spc]
  124.         33
  125.         244
  126.         1
  127.         0
  128.         0
  129.         1
  130.         100
  131.     [brk]
  132.         68
  133.     [line]
  134.         8
  135.         0
  136.         1
  137.         0
  138.         1
  139.         1
  140.         1
  141.         10
  142.         10
  143.         1
  144.     [spec]
  145.         0
  146.         0
  147.         
  148.         0
  149.         1
  150.         1
  151.         0
  152.         0
  153.         0
  154.         0
  155.     [nfmt]
  156.         272
  157.         1
  158.         3
  159.         .
  160.         ,
  161.         $
  162.     Body Text
  163.     0
  164.     0
  165. [tag]
  166.     Header
  167.     4
  168.     [fnt]
  169.         TimesNewRomanPS
  170.         200
  171.         0
  172.         49153
  173.     [algn]
  174.         4
  175.         1
  176.         0
  177.         0
  178.         0
  179.     [spc]
  180.         33
  181.         273
  182.         1
  183.         0
  184.         0
  185.         1
  186.         100
  187.     [brk]
  188.         4
  189.     [line]
  190.         8
  191.         0
  192.         1
  193.         0
  194.         1
  195.         1
  196.         1
  197.         10
  198.         10
  199.         1
  200.     [spec]
  201.         0
  202.         0
  203.         
  204.         0
  205.         1
  206.         1
  207.         0
  208.         0
  209.         0
  210.         0
  211.     [nfmt]
  212.         272
  213.         1
  214.         3
  215.         .
  216.         ,
  217.         $
  218.     Header
  219.     0
  220.     0
  221. [tag]
  222.     Remark
  223.     5
  224.     [fnt]
  225.         TimesNewRomanPS
  226.         200
  227.         255
  228.         49152
  229.     [algn]
  230.         1
  231.         1
  232.         0
  233.         0
  234.         0
  235.     [spc]
  236.         33
  237.         273
  238.         1
  239.         0
  240.         0
  241.         1
  242.         100
  243.     [brk]
  244.         4
  245.     [line]
  246.         8
  247.         0
  248.         1
  249.         0
  250.         1
  251.         1
  252.         1
  253.         10
  254.         10
  255.         1
  256.     [spec]
  257.         0
  258.         0
  259.         
  260.         0
  261.         1
  262.         1
  263.         0
  264.         0
  265.         0
  266.         0
  267.     [nfmt]
  268.         272
  269.         1
  270.         3
  271.         .
  272.         ,
  273.         $
  274.     Remark
  275.     0
  276.     0
  277. [tag]
  278.     Estßndar
  279.     6
  280.     [fnt]
  281.         Tms Rmn
  282.         240
  283.         0
  284.         49152
  285.     [algn]
  286.         1
  287.         1
  288.         0
  289.         0
  290.         0
  291.     [spc]
  292.         17
  293.         0
  294.         1
  295.         0
  296.         0
  297.         1
  298.         100
  299.     [brk]
  300.         4
  301.     [line]
  302.         8
  303.         0
  304.         1
  305.         0
  306.         1
  307.         1
  308.         1
  309.         10
  310.         10
  311.         1
  312.     [spec]
  313.         0
  314.         0
  315.         
  316.         0
  317.         1
  318.         1
  319.         0
  320.         0
  321.         0
  322.         0
  323.     [nfmt]
  324.         24
  325.         1
  326.         2
  327.         ,
  328.          
  329.         F
  330.     Estßndar
  331.     0
  332.     0
  333. [lay]
  334.     Standard
  335.     513
  336.     [rght]
  337.         15840
  338.         12240
  339.         1
  340.         1440
  341.         1440
  342.         1
  343.         1440
  344.         1440
  345.         0
  346.         1
  347.         0
  348.         1
  349.         0
  350.         2
  351.         1
  352.         1440
  353.         10800
  354.         4
  355.         1
  356.         720
  357.         1
  358.         1440
  359.         1
  360.         2160
  361.         1
  362.         2880
  363.     [hrght]
  364.     [lyfrm]
  365.         1
  366.         11200
  367.         0
  368.         0
  369.         12240
  370.         1440
  371.         0
  372.         1
  373.         3
  374.         1 0 0 0 0 0 0
  375.         0
  376.         0
  377.         1
  378.     [frmlay]
  379.         1440
  380.         12240
  381.         1
  382.         1440
  383.         72
  384.         1
  385.         792
  386.         1440
  387.         0
  388.         1
  389.         0
  390.         1
  391.         1
  392.         0
  393.         1
  394.         1440
  395.         10800
  396.         0
  397.     [txt]
  398. Creator: Powell H. Smith
  399.  
  400. <:R1,1,3,9270,>Date of Creation: 06/22/91    Release 6D
  401.  
  402. >
  403.     [frght]
  404.     [lyfrm]
  405.         1
  406.         13248
  407.         0
  408.         14400
  409.         12240
  410.         15840
  411.         0
  412.         1
  413.         3
  414.         1 0 0 0 0 0 0
  415.         0
  416.         0
  417.         2
  418.     [frmlay]
  419.         15840
  420.         12240
  421.         1
  422.         1440
  423.         792
  424.         1
  425.         14472
  426.         1440
  427.         0
  428.         1
  429.         0
  430.         1
  431.         1
  432.         0
  433.         1
  434.         1440
  435.         10800
  436.         0
  437.     [txt]
  438. >
  439. [elay]
  440. [l1]
  441.     0
  442. [pg]
  443.     8
  444.     51 0 38 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  445.     105 0 18 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  446.     159 0 35 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  447.     213 0 32 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  448.     266 0 21 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  449.     320 0 19 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  450.     363 42 2 32 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  451.     366 0 10 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  452. [edoc]
  453. <:#480,9360>'ATTENTION : If you change the name of the calendar style sheet, ~calmon.sty, you must change the blue text on this page to the new  name you have chosen. 
  454.  
  455. <:#192,9360><:f160,2Tms Rmn,194,0,0>'WARNING : If you modify the contents in ~calmon.sty, this macro may not function properly!<:f>
  456.  
  457. <:#192,9360><:f160,2Tms Rmn,194,0,0>'WARNING: This macro is for use with "DD/MM/YY" format ONLY!
  458.  
  459. <:#192,9360><:f><:f160,2Tms Rmn,0,0,0>
  460.  
  461. <:#240,9360>FUNCTION AutoCal()
  462.  
  463. <:#240,9360>SingleStep(0)
  464.  
  465. @Remark@<:#240,9360>'Declaration of Variables
  466.  
  467. <:#240,9360>DEFSTR Month1   <:f160,2Tms Rmn,255,0,0>'This variable contains the month direct from the dialog box.<:f>
  468.  
  469. <:#240,9360>DEFSTR Year1  <:f160,2Tms Rmn,255,0,0> 'This variable contains the year direct from dialog box (YYYY).<:f>
  470.  
  471. <:#240,9360>DEFSTR LMonth  <:f160,2Tms Rmn,255,0,0> 'This variable contains the calendar month in lower case.<:f>
  472.  
  473. <:#240,9360>DEFSTR NMonth <:f160,2Tms Rmn,255,0,0> 'This variable contains the month and day of Calendar Date  (MM/DD/).<:f>
  474.  
  475. <:#240,9360>DEFSTR Stat1   <:f160,2Tms Rmn,255,0,0>'This variable checks for Cancel from dialog box.<:f>
  476.  
  477. <:#240,9360>DEFSTR FirstDayWeek  <:f160,2Tms Rmn,255,0,0> 'This contains the Value of the day of the week the month starts on.<:f>
  478.  
  479. <:#240,9360>DEFSTR LastDay  <:f160,2Tms Rmn,255,0,0>'This contains the value of the number of days in current month.<:f>
  480.  
  481. <:#240,9360>DEFSTR ChkLen  <:f160,2Tms Rmn,255,0,0>'This contains the value representing the number of characters in the year that was typed in Heymon.<:f>
  482.  
  483. <:#240,9360>DEFSTR CurStyleSheet  <:f160,2Tms Rmn,255,0,0>'This contains the style sheet for the current dicument<:f>
  484.  
  485. <:#240,9360>DEFSTR CurDocName <:f160,2Tms Rmn,255,0,0> 'This contains the name of the current document.<:f>
  486.  
  487. <:#240,9360>DEFSTR TotalWindows  <:f160,2Tms Rmn,255,0,0>This contains the number of MDI windows open when starting macro.
  488.  
  489. @Remark@<:#240,9360>'Declaration of Functions.
  490.  
  491. <:#240,9360>DECLARE BuildDate(M,Y,N)
  492.  
  493. <:#240,9360>DECLARE FillCalendar(F,L)
  494.  
  495. <:#240,9360>DECLARE CheckLeap(M,Y,N)
  496.  
  497. <:#240,9360>DECLARE AdjustTable()
  498.  
  499. <:#240,9360>DECLARE     GetDate(String) 'Mei Peng
  500.  
  501. @Remark@<:#240,9360><:f200,2TimesNewRomanPS,255,0,0>'Check for no windows open.<:f>
  502.  
  503. <:#240,9360>TotalWindows = GetOpenfileCount()
  504.  
  505. <:#240,9360>IF TotalWindows = 0
  506.  
  507. <:#480,9360>    Message("<:f,Q▓╙⌐·┼Θ,>╜╨½÷ñ@ñU<:f><:f,Q▓╙⌐·┼Θ,>íe└╔«╫<:f>/<:f,Q▓╙⌐·┼Θ,>╢}╖s└╔«╫íf<:f><:f,Q▓╙⌐·┼Θ,>íA┐∩╛▄<:f> _calmon.sty<:f,Q▓╙⌐·┼Θ,>íA<:f><:f,Q▓╙⌐·┼Θ,>¿├┐∩¿·íuÑ]ºtñ║«eívªA░⌡ªµª╣Ñ¿╢░<:f><:f,Q▓╙⌐·┼Θ,>íC<:f>")  
  508.  
  509. <:#240,9360>    EXIT FUNCTION
  510.  
  511. <:#240,9360>ENDIF
  512.  
  513. @Remark@<:#240,9360>'Check for error in running macro.
  514.  
  515. <:#240,9360>CurDocName = GetDocInfo$(1)
  516.  
  517. <:#240,9360>CurStyleSheet = GetDocInfo$(3)
  518.  
  519. <:#240,9360>IF CurDocName <<<;> "(<:f,Q▓╙⌐·┼Θ,>Ñ╝⌐RªW<:f>)" OR CurStyleSheet <<<;> "<:f160,2Tms Rmn,0,0,255>_CALMON.STY<:f>"
  520.  
  521. <:#480,9360>    Message("<:f,Q▓╙⌐·┼Θ,>╜╨½÷ñ@ñU<:f><:f,Q▓╙⌐·┼Θ,>íe└╔«╫<:f>/<:f,Q▓╙⌐·┼Θ,>╢}╖s└╔«╫íf<:f><:f,Q▓╙⌐·┼Θ,>íA┐∩╛▄<:f> _calmon.sty<:f,Q▓╙⌐·┼Θ,>íA<:f><:f,Q▓╙⌐·┼Θ,>¿├┐∩¿·íuÑ]ºtñ║«eívªA░⌡ªµª╣Ñ¿╢░<:f><:f,Q▓╙⌐·┼Θ,>íC<:f>")  
  522.  
  523. <:#240,9360>    EXIT FUNCTION
  524.  
  525. <:#240,9360>ENDIF
  526.  
  527. @Remark@<:#240,9360>'Fill Edit boxes with current Month and Year.
  528.  
  529. <:#240,9360>FillEdit(9500,GetDate(StrField$(FormatDate$(Now(),"c"),2." ")))
  530.  
  531. <:#240,9360>FillEdit(9501,StrField$(FormatDate$(Now(),"c"),3." "))
  532.  
  533. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñ@ñδ<:f>")
  534.  
  535. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñGñδ<:f>")
  536.  
  537. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñTñδ<:f>")
  538.  
  539. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>Ñ|ñδ<:f>")
  540.  
  541. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñ¡ñδ<:f>")
  542.  
  543. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñ╗ñδ<:f>")
  544.  
  545. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñCñδ<:f>")
  546.  
  547. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñKñδ<:f>")
  548.  
  549. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñEñδ<:f>")
  550.  
  551. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñQñδ<:f>")
  552.  
  553. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñQñ@ñδ<:f>")
  554.  
  555. <:#240,9360>FillEdit(9500,"<:f,Q▓╙⌐·┼Θ,>ñQñGñδ<:f>")
  556.  
  557. <:#240,9360>FillEdit(9501,"1980")
  558.  
  559. <:#240,9360>FillEdit(9501,"1981")
  560.  
  561. <:#240,9360>FillEdit(9501,"1982")
  562.  
  563. <:#240,9360>FillEdit(9501,"1983")
  564.  
  565. <:#240,9360>FillEdit(9501,"1984")
  566.  
  567. <:#240,9360>FillEdit(9501,"1985")
  568.  
  569. <:#240,9360>FillEdit(9501,"1986")
  570.  
  571. <:#240,9360>FillEdit(9501,"1987")
  572.  
  573. <:#240,9360>FillEdit(9501,"1988")
  574.  
  575. <:#240,9360>FillEdit(9501,"1989")
  576.  
  577. <:#240,9360>FillEdit(9501,"1990")
  578.  
  579. <:#240,9360>FillEdit(9501,"1991")
  580.  
  581. <:#240,9360>FillEdit(9501,"1992")
  582.  
  583. <:#240,9360>FillEdit(9501,"1993")
  584.  
  585. <:#240,9360>FillEdit(9501,"1994")
  586.  
  587. <:#240,9360>FillEdit(9501,"1995")
  588.  
  589. <:#240,9360>FillEdit(9501,"1996")
  590.  
  591. <:#240,9360>FillEdit(9501,"1997")
  592.  
  593. <:#240,9360>FillEdit(9501,"1998")
  594.  
  595. <:#240,9360>FillEdit(9501,"1999")
  596.  
  597. <:#240,9360>LayoutMode()
  598.  
  599. <:#240,9360>FullPageView()
  600.  
  601. <:#240,9360>TryAgain:
  602.  
  603. @Remark@<:#240,9360>'Call Dialog box for data entry and get data from edit boxes.
  604.  
  605. <:#240,9360>Stat1=DialogBox("." "Heymon")
  606.  
  607. <:#240,9360>Month1=GetDialogField$(9500)
  608.  
  609. <:#240,9360>Year1=GetDialogField$(9501)
  610.  
  611. @Remark@<:#240,9360>'Check for Cancel.
  612.  
  613. <:#240,9360>IF Stat1=0
  614.  
  615. <:#240,9360>    EXIT FUNCTION
  616.  
  617. <:#240,9360>ENDIF
  618.  
  619. @Remark@<:#240,9360>'Check for error in entry.
  620.  
  621. <:#240,9360>IF Year1 << 1980 OR Year1 <;> 1999
  622.  
  623. <:#240,9360>    Message("<:f,Q▓╙⌐·┼Θ,>ª~Ñ≈╜d│≥Ñ▓╢╖ªb<:f> 1980 <:f,Q▓╙⌐·┼Θ,>⌐M<:f> 1999 
  624. <:f,Q▓╙⌐·┼Θ,>ñº╢í<:f><:f,Q▓╙⌐·┼Θ,>íC<:f>")
  625.  
  626. <:#240,9360>    FillEdit(9500,Month1)
  627.  
  628. <:#240,9360>    FillEdit(9501,Year1)
  629.  
  630. <:#240,9360>    GOTO TryAgain
  631.  
  632. <:#240,9360>ENDIF
  633.  
  634. <:#240,9360>ChkLen = LEN(Year1)
  635.  
  636. <:#240,9360>IF ChkLen<<<;>4
  637.  
  638. <:#240,9360>    Message("<:f,Q▓╙⌐·┼Θ,>ª~Ñ≈¬║«µªíÑ▓╢╖¼O<:f> YYYY (<:f,Q▓╙⌐·┼Θ,>ªp<:f> '1991')")
  639.  
  640. <:#240,9360>    FillEdit(9500,Month1)
  641.  
  642. <:#240,9360>    FillEdit(9501,Year1)
  643.  
  644. <:#240,9360>    GOTO TryAgain
  645.  
  646. <:#240,9360>'ELSEIF Year1<<1980 OR Year1<;>1999
  647.  
  648. <:#240,9360>    Message("<:f,Q▓╙⌐·┼Θ,>ª~Ñ≈╜d│≥Ñ▓╢╖ªb<:f> 1980 <:f,Q▓╙⌐·┼Θ,>⌐M<:f> 1999 
  649. <:f,Q▓╙⌐·┼Θ,>ñº╢í<:f><:f,Q▓╙⌐·┼Θ,>íC<:f>")
  650.  
  651. <:#240,9360>    FillEdit(9500,Month1)
  652.  
  653. <:#240,9360>    FillEdit(9501,Year1)
  654.  
  655. <:#240,9360>    GOTO TryAgain
  656.  
  657. <:#240,9360>ENDIF
  658.  
  659. @Remark@<:#240,9360>'Convert month to lower case and process.
  660.  
  661. <:#240,9360>LMonth=LCase$(Month1)
  662.  
  663. <:#240,9360>IF LMonth= "ñ@ñδ" 
  664.  
  665. <:#240,9360>    NMonth="01/01/"
  666.  
  667. <:#240,9360>    LastDay=31
  668.  
  669. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  670.  
  671. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  672.  
  673. <:#240,9360>ELSEIF LMonth= "ñGñδ"  
  674.  
  675. <:#240,9360>    NMonth="01/02/"
  676.  
  677. <:#240,9360>    LastDay=CheckLeap(Month1,Year1,NMonth)
  678.  
  679. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  680.  
  681. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  682.  
  683. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñTñδ<:f>"
  684.  
  685. <:#240,9360>    NMonth="01/03/"
  686.  
  687. <:#240,9360>    LastDay=31
  688.  
  689. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  690.  
  691. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  692.  
  693. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>Ñ|ñδ<:f>"  
  694.  
  695. <:#240,9360>    NMonth="01/04/"
  696.  
  697. <:#240,9360>    LastDay=30
  698.  
  699. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  700.  
  701. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  702.  
  703. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñ¡ñδ<:f>"  
  704.  
  705. <:#240,9360>    NMonth="01/05/"
  706.  
  707. <:#240,9360>    LastDay=31
  708.  
  709. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  710.  
  711. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  712.  
  713. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñ╗ñδ<:f>"  
  714.  
  715. <:#240,9360>    NMonth="01/06/"
  716.  
  717. <:#240,9360>    LastDay=30
  718.  
  719. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  720.  
  721. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  722.  
  723. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñCñδ<:f>"
  724.  
  725. <:#240,9360>    NMonth="01/07/"
  726.  
  727. <:#240,9360>    LastDay=31
  728.  
  729. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  730.  
  731. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  732.  
  733. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñKñδ<:f>"  
  734.  
  735. <:#240,9360>    NMonth="01/08/"
  736.  
  737. <:#240,9360>    LastDay=31
  738.  
  739. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  740.  
  741. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  742.  
  743. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñEñδ<:f>"  
  744.  
  745. <:#240,9360>    NMonth="01/09/"
  746.  
  747. <:#240,9360>    LastDay=30
  748.  
  749. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  750.  
  751. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  752.  
  753. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñQñδ<:f>"  
  754.  
  755. <:#240,9360>    NMonth="01/10/"
  756.  
  757. <:#240,9360>    LastDay=31
  758.  
  759. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  760.  
  761. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  762.  
  763. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñQñ@ñδ<:f>"  
  764.  
  765. <:#240,9360>    NMonth="01/11/"
  766.  
  767. <:#240,9360>    LastDay=30
  768.  
  769. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  770.  
  771. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  772.  
  773. <:#240,9360>ELSEIF LMonth= "<:f,Q▓╙⌐·┼Θ,>ñQñGñδ<:f>"  
  774.  
  775. <:#240,9360>    NMonth="01/12/"
  776.  
  777. <:#240,9360>    LastDay=31
  778.  
  779. <:#240,9360>    FirstDayWeek=BuildDate(Month1,Year1,NMonth)
  780.  
  781. <:#240,9360>    FillCalendar(FirstDayWeek,LastDay)
  782.  
  783. @Remark@<:#240,9360>'Check for error in Month entry
  784.  
  785. <:#240,9360>ELSE 
  786.  
  787. <:#240,9360>    Message ("This is not a valid month.  Please try again.")
  788.  
  789. <:#240,9360>    FillEdit(9500,Month1)
  790.  
  791. <:#240,9360>    FillEdit(9501,Year1)
  792.  
  793. <:#240,9360>    GOTO TryAgain
  794.  
  795. <:#240,9360>ENDIF
  796.  
  797. <:#240,9360>
  798.  
  799. <:#240,9360>END FUNCTION
  800.  
  801. <:#240,9360>
  802.  
  803. <:#240,9360>Function BuildDate(Month1,Year1,NMonth)
  804.  
  805. <:#240,9360>DEFSTR CDate
  806.  
  807. <:#240,9360>DEFSTR NDate
  808.  
  809. <:#240,9360>DEFSTR NDays
  810.  
  811. <:#240,9360>DEFSTR WDate
  812.  
  813. <:#240,9360>DEFSTR DateRef
  814.  
  815. <:#240,9360>DEFSTR TYear
  816.  
  817. @Remark@<:#240,9360>'Extract last two digits of date for processing.
  818.  
  819. <:#240,9360>TYear=Mid$(Year1,3,2)
  820.  
  821. <:#240,9360>CDate=StrCat$(NMonth,TYear) 
  822.  
  823. <:#240,9360>DateRef="01/01/90"
  824.  
  825. <:#240,9360>NDays=DateDiff(CDate,DateRef)
  826.  
  827. <:#240,9360>NDate=NDays*86400+631224000
  828.  
  829. <:#240,9360>WDate=FormatDate$(NDate,"f")
  830.  
  831. <:#240,9360>BuildDate=StrField$(WDate,1," ")
  832.  
  833. <:#240,9360>Type("<[>CtrlHome]{Year1}<[>Tab]{Month1}<[>Tab]{Year1}")
  834.  
  835. <:#240,9360>END FUNCTION
  836.  
  837. <:#240,9360>
  838.  
  839. <:#240,9360>FUNCTION FillCalendar(FirstDayWeek,LastDay)
  840.  
  841. <:#240,9360>DEFSTR DayNum
  842.  
  843. <:#240,9360>DEFSTR Column
  844.  
  845. <:#240,9360>DEFSTR Row
  846.  
  847. <:#240,9360>DEFSTR Row2
  848.  
  849. <:#240,9360>DEFSTR Row3
  850.  
  851. <:#240,9360>DEFSTR R1
  852.  
  853. <:#240,9360>DEFSTR R2
  854.  
  855. <:#240,9360>DEFSTR R3
  856.  
  857. <:#240,9360>DEFSTR R4
  858.  
  859. <:#240,9360>Type( "<[>CTRLHome]<[>Down]<[>Down]<[>Right]" )
  860.  
  861. <:#240,9360>DayNum=1
  862.  
  863. <:#240,9360>IF FirstDayWeek="Sunday"
  864.  
  865. <:#240,9360>    FOR R1=1 TO 6
  866.  
  867. <:#240,9360>        Type("{DayNum}<[>Right]<[>Right]")
  868.  
  869. <:#240,9360>        DayNum=DayNum + 1
  870.  
  871. <:#240,9360>    NEXT
  872.  
  873. <:#240,9360>ELSEIF FirstDayWeek="Monday"
  874.  
  875. <:#240,9360>    Type("<[>Right]<[>Right]")
  876.  
  877. <:#240,9360>    FOR R1=1 TO 5
  878.  
  879. <:#240,9360>        Type("{DayNum}<[>Right]<[>Right]")
  880.  
  881. <:#240,9360>        DayNum=DayNum + 1
  882.  
  883. <:#240,9360>    NEXT
  884.  
  885. <:#240,9360>ELSEIF FirstDayWeek="Tuesday"
  886.  
  887. <:#240,9360>    Type("<[>Right]<[>Right]<[>Right]<[>Right]")
  888.  
  889. <:#240,9360>    FOR R2=1 TO 4
  890.  
  891. <:#240,9360>        Type("{DayNum}<[>Right]<[>Right]")
  892.  
  893. <:#240,9360>        DayNum=DayNum + 1
  894.  
  895. <:#240,9360>    NEXT
  896.  
  897. <:#240,9360>ELSEIF FirstDayWeek="Wednesday"
  898.  
  899. <:#240,9360>    Type("<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]")
  900.  
  901. <:#240,9360>    FOR R3=1 TO 3
  902.  
  903. <:#240,9360>        Type("{DayNum}<[>Right]<[>Right]")
  904.  
  905. <:#240,9360>        DayNum=DayNum + 1
  906.  
  907. <:#240,9360>    NEXT
  908.  
  909. <:#240,9360>ELSEIF FirstDayWeek="Thursday"
  910.  
  911. <:#240,9360>    Type("<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]")
  912.  
  913. <:#240,9360>    FOR R4=1 TO 2
  914.  
  915. <:#240,9360>        Type("{DayNum}<[>Right]<[>Right]")
  916.  
  917. <:#240,9360>        DayNum=DayNum + 1
  918.  
  919. <:#240,9360>    NEXT
  920.  
  921. <:#240,9360>ELSEIF FirstDayWeek="Friday"
  922.  
  923. <:#240,9360>    Type("<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]")
  924.  
  925. <:#240,9360>    Type("{DayNum}<[>Right]<[>Right]")
  926.  
  927. <:#240,9360>    DayNum=DayNum + 1
  928.  
  929. <:#240,9360>ELSEIF FirstDayWeek="Saturday"
  930.  
  931. <:#480,9360>    Type("<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]<[>Right]")
  932.  
  933. <:#240,9360>ENDIF
  934.  
  935. <:#240,9360>Type("{DayNum}<[>Right]<[>Down]<[>Right]")
  936.  
  937. <:#240,9360>DayNum=DayNum + 1
  938.  
  939. <:#240,9360>FOR Column=2 <++>to<-+> 5
  940.  
  941. <:#240,9360>    FOR Row= 1 <++>to<-+> 6
  942.  
  943. <:#240,9360>        Type("{DayNum}<[>Right]<[>Right]")
  944.  
  945. <:#240,9360>        DayNum=DayNum + 1
  946.  
  947. <:#240,9360>        IF DayNum <;> LastDay
  948.  
  949. <:#240,9360>            EXIT FUNCTION
  950.  
  951. <:#240,9360>        ENDIF
  952.  
  953. <:#240,9360>    NEXT 
  954.  
  955. <:#240,9360>    IF Column=5 AND DayNum<<LastDay
  956.  
  957. <:#240,9360>        Singlestep(0)
  958.  
  959. <:#240,9360>        Type("{DayNum}")
  960.  
  961. <:#240,9360>        DayNum=DayNum + 1
  962.  
  963. <:#240,9360>        Type("<[>Right]")
  964.  
  965. <:#240,9360>        AdjustTable()
  966.  
  967. <:#240,9360>        FOR Row2=1 TO 7
  968.  
  969. <:#240,9360>            ConnectCells()
  970.  
  971. <:#240,9360>            FOR Row3=1 TO 2
  972.  
  973. <:#240,9360>                TurnOn=TopSide
  974.  
  975. <:#240,9360>                TurnOff=0
  976.  
  977. <:#240,9360>                StaySame=CellShade + Outline
  978.  
  979. <:#240,9360>                TableLines(TurnOn, TurnOff, StaySame, Hairline, CellShade)
  980.  
  981. <:#240,9360>                Type("<[>CTRLRight]")
  982.  
  983. <:#240,9360>            NEXT
  984.  
  985. <:#240,9360>            Type("<[>CTRLLeft]")
  986.  
  987. <:#240,9360>            Type("{DayNum}")
  988.  
  989. <:#240,9360>            DayNum=DayNum + 1
  990.  
  991. <:#240,9360>            Type("<[>CTRLRight]")
  992.  
  993. <:#240,9360>            IF DayNum <;> LastDay
  994.  
  995. <:#240,9360>                BREAK
  996.  
  997. <:#240,9360>            ENDIF
  998.  
  999. <:#240,9360>        NEXT
  1000.  
  1001. <:#240,9360>    ELSEIF DayNum = LastDay
  1002.  
  1003. <:#240,9360>        Type("{DayNum}<[>CtrlHome]")
  1004.  
  1005. <:#240,9360>        BREAK
  1006.  
  1007. <:#240,9360>    ELSE
  1008.  
  1009. <:#240,9360>        Type("{DayNum}<[>Right]<[>Down]<[>Right]")
  1010.  
  1011. <:#240,9360>    ENDIF
  1012.  
  1013. <:#240,9360>    DayNum=DayNum + 1
  1014.  
  1015. <:#240,9360>NEXT
  1016.  
  1017. <:#240,9360>END FUNCTION
  1018.  
  1019. <:#240,9360>
  1020.  
  1021. <:#240,9360>FUNCTION CheckLeap(Month1,Year1,NMonth)
  1022.  
  1023. <:#240,9360>DEFSTR CDate
  1024.  
  1025. <:#240,9360>DEFSTR NDate
  1026.  
  1027. <:#240,9360>DEFSTR NDays
  1028.  
  1029. <:#240,9360>DEFSTR WDate
  1030.  
  1031. <:#240,9360>DEFSTR DateRef
  1032.  
  1033. <:#240,9360>DEFSTR TYear
  1034.  
  1035. <:#240,9360>DEFSTR LNDate
  1036.  
  1037. <:#240,9360>DEFSTR LeapDate
  1038.  
  1039. @Remark@<:#240,9360>'Extract last two digits of date for processing.
  1040.  
  1041. <:#240,9360>TYear=Mid$(Year1,3,2)
  1042.  
  1043. <:#240,9360>CDate=StrCat$(NMonth,TYear) 
  1044.  
  1045. <:#240,9360>DateRef="01/01/90"
  1046.  
  1047. <:#240,9360>NDays=DateDiff(CDate,DateRef)
  1048.  
  1049. <:#240,9360>NDate=NDays*86400+631224000
  1050.  
  1051. <:#240,9360>LNDate=NDate +  2419200
  1052.  
  1053. <:#240,9360>LeapDate=FormatDate$(LNDate,"a")
  1054.  
  1055. <:#240,9360>LeapNum=StrField$(LeapDate,1,"/")
  1056.  
  1057. 'IF LeapNum=3
  1058.  
  1059. '    CheckLeap=28
  1060.  
  1061. IF LeapNum=29
  1062.  
  1063.     CheckLeap=29
  1064.  
  1065. <:#240,9360>ELSE 
  1066.  
  1067. '    CheckLeap=29
  1068.  
  1069.     CheckLeap=28
  1070.  
  1071. <:#240,9360>ENDIF
  1072.  
  1073. <:#240,9360>END FUNCTION
  1074.  
  1075. <:#240,9360>
  1076.  
  1077. <:#240,9360>FUNCTION AdjustTable()
  1078.  
  1079. <:#240,9360>SizeColumnRow(-32768 -32768 936 -32768  )
  1080.  
  1081. <:#240,9360>Type( "<[>Up]" )
  1082.  
  1083. <:#240,9360>SizeColumnRow(-32768 -32768 936 -32768  )
  1084.  
  1085. <:#240,9360>Type( "<[>Down]" )
  1086.  
  1087. <:#240,9360>'ConnectCells( )
  1088.  
  1089. <:#240,9360>'Type( "<[>CTRLRight]<[>CTRLRight]" )
  1090.  
  1091. <:#240,9360>'ConnectCells( )
  1092.  
  1093. <:#240,9360>'Type("<[>CTRLLeft]")
  1094.  
  1095. <:#240,9360>'Type("<[>CTRLLeft]<[>CTRLLeft]<[>CTRLLeft]")
  1096.  
  1097. <:#240,9360>END FUNCTION
  1098.  
  1099. <:#240,9360>
  1100.  
  1101. <:#240,9360>Function GetDate(String)
  1102.  
  1103. <:#240,9360>defstr ostring
  1104.  
  1105. <:#240,9360>IF string = "January"
  1106.  
  1107. <:#240,9360>    ostring= "ñ@ñδ" 
  1108.  
  1109. <:#240,9360>ELSEIF  string = "February"
  1110.  
  1111. <:#240,9360>    ostring= "ñGñδ"  
  1112.  
  1113. <:#240,9360>ELSEIF string = "March"
  1114.  
  1115. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñTñδ<:f>"
  1116.  
  1117. <:#240,9360>ELSEIF string = "April"
  1118.  
  1119. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>Ñ|ñδ<:f>"  
  1120.  
  1121. <:#240,9360>ELSEIF string = "May"
  1122.  
  1123. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñ¡ñδ<:f>"  
  1124.  
  1125. <:#240,9360>ELSEIF string = "June"
  1126.  
  1127. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñ╗ñδ<:f>"  
  1128.  
  1129. <:#240,9360>ELSEIF string = "July"
  1130.  
  1131. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñCñδ<:f>"
  1132.  
  1133. <:#240,9360>ELSEIF string = "August"
  1134.  
  1135. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñKñδ<:f>"  
  1136.  
  1137. <:#240,9360>ELSEIF string = "September"
  1138.  
  1139. <:#240,9360>     ostring= "<:f,Q▓╙⌐·┼Θ,>ñEñδ<:f>"  
  1140.  
  1141. <:#240,9360>ELSEIF string = "October"
  1142.  
  1143. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñQñδ<:f>"  
  1144.  
  1145. <:#240,9360>ELSEIF string = "November"
  1146.  
  1147. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñQñ@ñδ<:f>"  
  1148.  
  1149. <:#240,9360>ELSEIF string = "December"
  1150.  
  1151. <:#240,9360>    ostring= "<:f,Q▓╙⌐·┼Θ,>ñQñGñδ<:f>"  
  1152.  
  1153. <:#240,9360>ELSE 
  1154.  
  1155. <:#240,9360>    Message ("This is not a valid month.  Please try again.")
  1156.  
  1157. <:#240,9360>ENDIF
  1158.  
  1159. <:#240,9360>return ostring
  1160.  
  1161. <:#240,9360>END FUNCTION
  1162.  
  1163. <:#240,9360>
  1164.  
  1165. @Remark@<:#240,9360>'Dialog Box Section
  1166.  
  1167. <:#240,9360>DIALOG    Heymon
  1168.  
  1169. <:#480,9360>-2134376448    6    94    58    136    50    ""    ""    "<:f,Q▓╙⌐·┼Θ,>ñδ╛Σ<:f>"
  1170.  
  1171. <:#240,9360>FONT    12    "System"
  1172.  
  1173. <:#720,9360>4    6    27    10    1000    1342177280    "static"    "ñδÑ≈íG"    0 
  1174.  
  1175. <:#720,9360>4    21    24    10    1001    1342177280    "static"    "ª~Ñ≈íG"    0 
  1176.  
  1177. <:#720,9360>31    4    52    40    9500    1344339979    "combobox"    ""    0 
  1178.  
  1179. <:#720,9360>31    19    52    40    9501    1344339979    "combobox"    ""    0 
  1180.  
  1181. <:#720,9360>91    3    40    14    1    1342242817    "button"    "╜T⌐w"    0 
  1182.  
  1183. <:#720,9360>91    19    40    14    2    1342242816    "button"    "¿·«°"    0 
  1184.  
  1185. <:#240,9360>END DIALOG
  1186.  
  1187. >
  1188.  
  1189. [Embedded]
  1190. 00020421
  1191. >
  1192. [macsum] 7
  1193. AutoCal 0 0 23 4
  1194. BuildDate 4884 3 7 174
  1195. FillCalendar 5359 2 13 192
  1196. CheckLeap 8380 3 10 283
  1197. AdjustTable 9002 0 1 311
  1198. GetDate 9171 1 2 323
  1199. Heymon 10262 0 -1 356
  1200. [macse]
  1201. 14 AutoCal
  1202. 0 4 0
  1203. 17 3
  1204. 29 1 Month1
  1205. 17 4
  1206. 29 2 Year1
  1207. 17 5
  1208. 29 3 LMonth
  1209. 17 6
  1210. 29 4 NMonth
  1211. 17 7
  1212. 29 5 Stat1
  1213. 17 8
  1214. 29 6 FirstDayWeek
  1215. 17 9
  1216. 29 7 LastDay
  1217. 17 10
  1218. 29 8 ChkLen
  1219. 17 11
  1220. 29 9 CurStyleSheet
  1221. 17 12
  1222. 29 10 CurDocName
  1223. 17 13
  1224. 29 11 TotalWindows
  1225. 29 12 This
  1226. 29 13 contains
  1227. 29 14 the
  1228. 29 15 number
  1229. 29 16 of
  1230. 29 17 MDI
  1231. 29 18 windows
  1232. 29 19 open
  1233. 29 20 when
  1234. 29 21 starting
  1235. 29 22 macro.
  1236. 17 15
  1237. 17 16
  1238. 17 17
  1239. 17 18
  1240. 17 19
  1241. 17 21
  1242. 0 1050
  1243. 13
  1244. 8 11
  1245. 17 22
  1246. 6 11
  1247. 5 0
  1248. 18 0
  1249. 11 00000600
  1250. 17 23
  1251. 0 3 "╜╨½÷ñ@ñUíe└╔«╫/╢}╖s└╔«╫ífíA┐∩╛▄ _calmon.styíA¿├┐∩¿·íuÑ]ºtñ║«eívªA░⌡ªµª╣Ñ¿╢░íC"
  1252. 6 0
  1253. 15
  1254. 9
  1255. 17 27
  1256. 0 279 1
  1257. 13
  1258. 8 10
  1259. 17 28
  1260. 0 279 3
  1261. 13
  1262. 8 9
  1263. 17 29
  1264. 6 10
  1265. 7 "(Ñ╝⌐RªW)"
  1266. 18 1
  1267. 6 9
  1268. 7 "_CALMON.STY"
  1269. 18 1
  1270. 1 2
  1271. 11 00000834
  1272. 17 30
  1273. 0 3 "╜╨½÷ñ@ñUíe└╔«╫/╢}╖s└╔«╫ífíA┐∩╛▄ _calmon.styíA¿├┐∩¿·íuÑ]ºtñ║«eívªA░⌡ªµª╣Ñ¿╢░íC"
  1274. 6 0
  1275. 15
  1276. 9
  1277. 17 34
  1278. 0 772
  1279. 13
  1280. 0 770 [X] "c"
  1281. 13
  1282. 0 20 [X] 2. " "
  1283. 13
  1284. 16 GetDate [X]
  1285. 13
  1286. 0 31 9500 [X]
  1287. 17 35
  1288. 0 772
  1289. 13
  1290. 0 770 [X] "c"
  1291. 13
  1292. 0 20 [X] 3. " "
  1293. 13
  1294. 0 31 9501 [X]
  1295. 17 36
  1296. 0 31 9500 "ñ@ñδ"
  1297. 17 37
  1298. 0 31 9500 "ñGñδ"
  1299. 17 38
  1300. 0 31 9500 "ñTñδ"
  1301. 17 39
  1302. 0 31 9500 "Ñ|ñδ"
  1303. 17 40
  1304. 0 31 9500 "ñ¡ñδ"
  1305. 17 41
  1306. 0 31 9500 "ñ╗ñδ"
  1307. 17 42
  1308. 0 31 9500 "ñCñδ"
  1309. 17 43
  1310. 0 31 9500 "ñKñδ"
  1311. 17 44
  1312. 0 31 9500 "ñEñδ"
  1313. 17 45
  1314. 0 31 9500 "ñQñδ"
  1315. 17 46
  1316. 0 31 9500 "ñQñ@ñδ"
  1317. 17 47
  1318. 0 31 9500 "ñQñGñδ"
  1319. 17 48
  1320. 0 31 9501 "1980"
  1321. 17 49
  1322. 0 31 9501 "1981"
  1323. 17 50
  1324. 0 31 9501 "1982"
  1325. 17 51
  1326. 0 31 9501 "1983"
  1327. 17 52
  1328. 0 31 9501 "1984"
  1329. 17 53
  1330. 0 31 9501 "1985"
  1331. 17 54
  1332. 0 31 9501 "1986"
  1333. 17 55
  1334. 0 31 9501 "1987"
  1335. 17 56
  1336. 0 31 9501 "1988"
  1337. 17 57
  1338. 0 31 9501 "1989"
  1339. 17 58
  1340. 0 31 9501 "1990"
  1341. 17 59
  1342. 0 31 9501 "1991"
  1343. 17 60
  1344. 0 31 9501 "1992"
  1345. 17 61
  1346. 0 31 9501 "1993"
  1347. 17 62
  1348. 0 31 9501 "1994"
  1349. 17 63
  1350. 0 31 9501 "1995"
  1351. 17 64
  1352. 0 31 9501 "1996"
  1353. 17 65
  1354. 0 31 9501 "1997"
  1355. 17 66
  1356. 0 31 9501 "1998"
  1357. 17 67
  1358. 0 31 9501 "1999"
  1359. 17 68
  1360. 2 210 1
  1361. 17 69
  1362. 2 201 1
  1363. 17 72
  1364. 0 26 "." "Heymon"
  1365. 13
  1366. 8 5
  1367. 17 73
  1368. 0 27 9500
  1369. 13
  1370. 8 1
  1371. 17 74
  1372. 0 27 9501
  1373. 13
  1374. 8 2
  1375. 17 76
  1376. 6 5
  1377. 5 0
  1378. 18 0
  1379. 11 00001973
  1380. 6 0
  1381. 15
  1382. 9
  1383. 17 80
  1384. 6 2
  1385. 5 1980
  1386. 18 5
  1387. 6 2
  1388. 5 1999
  1389. 18 3
  1390. 1 2
  1391. 11 00002153
  1392. 17 81
  1393. 0 3 "ª~Ñ≈╜d│≥Ñ▓╢╖ªb 1980 ⌐M 1999 ñº╢ííC"
  1394. 17 82
  1395. 0 31 9500 "{1}"
  1396. 17 83
  1397. 0 31 9501 "{2}"
  1398. 17 84
  1399. 10 00001836
  1400. 17 86
  1401. 0 14 "{2}"
  1402. 13
  1403. 8 8
  1404. 17 87
  1405. 6 8
  1406. 5 4
  1407. 18 1
  1408. 11 00002450
  1409. 17 88
  1410. 0 3 "ª~Ñ≈¬║«µªíÑ▓╢╖¼O YYYY (ªp '1991')"
  1411. 17 89
  1412. 0 31 9500 "{1}"
  1413. 17 90
  1414. 0 31 9501 "{2}"
  1415. 17 91
  1416. 10 00001836
  1417. 17 93
  1418. 0 3 "ª~Ñ≈╜d│≥Ñ▓╢╖ªb 1980 ⌐M 1999 ñº╢ííC"
  1419. 17 94
  1420. 0 31 9500 "{1}"
  1421. 17 95
  1422. 0 31 9501 "{2}"
  1423. 17 96
  1424. 10 00001836
  1425. 17 99
  1426. 0 17 "{1}"
  1427. 13
  1428. 8 3
  1429. 17 100
  1430. 6 3
  1431. 7 "ñ@ñδ"
  1432. 18 0
  1433. 11 00002663
  1434. 17 101
  1435. 7 "01/01/"
  1436. 8 4
  1437. 17 102
  1438. 5 31
  1439. 8 7
  1440. 17 103
  1441. 16 BuildDate "{1}" "{2}" "{4}"
  1442. 13
  1443. 8 6
  1444. 17 104
  1445. 16 FillCalendar "{6}" "{7}"
  1446. 10 00004864
  1447. 17 105
  1448. 6 3
  1449. 7 "ñGñδ"
  1450. 18 0
  1451. 11 00002878
  1452. 17 106
  1453. 7 "01/02/"
  1454. 8 4
  1455. 17 107
  1456. 16 CheckLeap "{1}" "{2}" "{4}"
  1457. 13
  1458. 8 7
  1459. 17 108
  1460. 16 BuildDate "{1}" "{2}" "{4}"
  1461. 13
  1462. 8 6
  1463. 17 109
  1464. 16 FillCalendar "{6}" "{7}"
  1465. 10 00004864
  1466. 17 110
  1467. 6 3
  1468. 7 "ñTñδ"
  1469. 18 0
  1470. 11 00003063
  1471. 17 111
  1472. 7 "01/03/"
  1473. 8 4
  1474. 17 112
  1475. 5 31
  1476. 8 7
  1477. 17 113
  1478. 16 BuildDate "{1}" "{2}" "{4}"
  1479. 13
  1480. 8 6
  1481. 17 114
  1482. 16 FillCalendar "{6}" "{7}"
  1483. 10 00004864
  1484. 17 115
  1485. 6 3
  1486. 7 "Ñ|ñδ"
  1487. 18 0
  1488. 11 00003248
  1489. 17 116
  1490. 7 "01/04/"
  1491. 8 4
  1492. 17 117
  1493. 5 30
  1494. 8 7
  1495. 17 118
  1496. 16 BuildDate "{1}" "{2}" "{4}"
  1497. 13
  1498. 8 6
  1499. 17 119
  1500. 16 FillCalendar "{6}" "{7}"
  1501. 10 00004864
  1502. 17 120
  1503. 6 3
  1504. 7 "ñ¡ñδ"
  1505. 18 0
  1506. 11 00003433
  1507. 17 121
  1508. 7 "01/05/"
  1509. 8 4
  1510. 17 122
  1511. 5 31
  1512. 8 7
  1513. 17 123
  1514. 16 BuildDate "{1}" "{2}" "{4}"
  1515. 13
  1516. 8 6
  1517. 17 124
  1518. 16 FillCalendar "{6}" "{7}"
  1519. 10 00004864
  1520. 17 125
  1521. 6 3
  1522. 7 "ñ╗ñδ"
  1523. 18 0
  1524. 11 00003618
  1525. 17 126
  1526. 7 "01/06/"
  1527. 8 4
  1528. 17 127
  1529. 5 30
  1530. 8 7
  1531. 17 128
  1532. 16 BuildDate "{1}" "{2}" "{4}"
  1533. 13
  1534. 8 6
  1535. 17 129
  1536. 16 FillCalendar "{6}" "{7}"
  1537. 10 00004864
  1538. 17 130
  1539. 6 3
  1540. 7 "ñCñδ"
  1541. 18 0
  1542. 11 00003803
  1543. 17 131
  1544. 7 "01/07/"
  1545. 8 4
  1546. 17 132
  1547. 5 31
  1548. 8 7
  1549. 17 133
  1550. 16 BuildDate "{1}" "{2}" "{4}"
  1551. 13
  1552. 8 6
  1553. 17 134
  1554. 16 FillCalendar "{6}" "{7}"
  1555. 10 00004864
  1556. 17 135
  1557. 6 3
  1558. 7 "ñKñδ"
  1559. 18 0
  1560. 11 00003988
  1561. 17 136
  1562. 7 "01/08/"
  1563. 8 4
  1564. 17 137
  1565. 5 31
  1566. 8 7
  1567. 17 138
  1568. 16 BuildDate "{1}" "{2}" "{4}"
  1569. 13
  1570. 8 6
  1571. 17 139
  1572. 16 FillCalendar "{6}" "{7}"
  1573. 10 00004864
  1574. 17 140
  1575. 6 3
  1576. 7 "ñEñδ"
  1577. 18 0
  1578. 11 00004173
  1579. 17 141
  1580. 7 "01/09/"
  1581. 8 4
  1582. 17 142
  1583. 5 30
  1584. 8 7
  1585. 17 143
  1586. 16 BuildDate "{1}" "{2}" "{4}"
  1587. 13
  1588. 8 6
  1589. 17 144
  1590. 16 FillCalendar "{6}" "{7}"
  1591. 10 00004864
  1592. 17 145
  1593. 6 3
  1594. 7 "ñQñδ"
  1595. 18 0
  1596. 11 00004358
  1597. 17 146
  1598. 7 "01/10/"
  1599. 8 4
  1600. 17 147
  1601. 5 31
  1602. 8 7
  1603. 17 148
  1604. 16 BuildDate "{1}" "{2}" "{4}"
  1605. 13
  1606. 8 6
  1607. 17 149
  1608. 16 FillCalendar "{6}" "{7}"
  1609. 10 00004864
  1610. 17 150
  1611. 6 3
  1612. 7 "ñQñ@ñδ"
  1613. 18 0
  1614. 11 00004545
  1615. 17 151
  1616. 7 "01/11/"
  1617. 8 4
  1618. 17 152
  1619. 5 30
  1620. 8 7
  1621. 17 153
  1622. 16 BuildDate "{1}" "{2}" "{4}"
  1623. 13
  1624. 8 6
  1625. 17 154
  1626. 16 FillCalendar "{6}" "{7}"
  1627. 10 00004864
  1628. 17 155
  1629. 6 3
  1630. 7 "ñQñGñδ"
  1631. 18 0
  1632. 11 00004732
  1633. 17 156
  1634. 7 "01/12/"
  1635. 8 4
  1636. 17 157
  1637. 5 31
  1638. 8 7
  1639. 17 158
  1640. 16 BuildDate "{1}" "{2}" "{4}"
  1641. 13
  1642. 8 6
  1643. 17 159
  1644. 16 FillCalendar "{6}" "{7}"
  1645. 10 00004864
  1646. 17 162
  1647. 0 3 "This is not a valid month.  Please try again."
  1648. 17 163
  1649. 0 31 9500 "{1}"
  1650. 17 164
  1651. 0 31 9501 "{2}"
  1652. 17 165
  1653. 10 00001836
  1654. 6 0
  1655. 15
  1656. 17 168
  1657. 9
  1658. 14 BuildDate
  1659. 29 0 Month1
  1660. 29 1 Year1
  1661. 29 2 NMonth
  1662. 29 3 BuildDate
  1663. 17 1
  1664. 29 4 CDate
  1665. 17 2
  1666. 29 5 NDate
  1667. 17 3
  1668. 29 6 NDays
  1669. 17 4
  1670. 29 7 WDate
  1671. 17 5
  1672. 29 8 DateRef
  1673. 17 6
  1674. 29 9 TYear
  1675. 17 8
  1676. 0 15 "{1}" 3 2
  1677. 13
  1678. 8 9
  1679. 17 9
  1680. 0 16 "{2}" "{9}"
  1681. 13
  1682. 8 4
  1683. 17 10
  1684. 7 "01/01/90"
  1685. 8 8
  1686. 17 11
  1687. 0 769 "{4}" "{8}"
  1688. 13
  1689. 8 6
  1690. 17 12
  1691. 6 6
  1692. 5 86400
  1693. 4 0
  1694. 5 631224000
  1695. 3 0
  1696. 8 5
  1697. 17 13
  1698. 0 770 "{5}" "f"
  1699. 13
  1700. 8 7
  1701. 17 14
  1702. 0 20 "{7}" 1 " "
  1703. 13
  1704. 8 3
  1705. 17 15
  1706. 0 6 "[16420]{1}[9]{0}[9]{1}"
  1707. 6 3
  1708. 15
  1709. 17 16
  1710. 9
  1711. 14 FillCalendar
  1712. 29 0 FirstDayWeek
  1713. 29 1 LastDay
  1714. 29 2 FillCalendar
  1715. 17 1
  1716. 29 3 DayNum
  1717. 17 2
  1718. 29 4 Column
  1719. 17 3
  1720. 29 5 Row
  1721. 17 4
  1722. 29 6 Row2
  1723. 17 5
  1724. 29 7 Row3
  1725. 17 6
  1726. 29 8 R1
  1727. 17 7
  1728. 29 9 R2
  1729. 17 8
  1730. 29 10 R3
  1731. 17 9
  1732. 29 11 R4
  1733. 17 10
  1734. 0 6 "[16420][40][40][39]"
  1735. 17 11
  1736. 5 1
  1737. 8 3
  1738. 17 12
  1739. 6 0
  1740. 7 "Sunday"
  1741. 18 0
  1742. 11 00000484
  1743. 5 1
  1744. 8 8
  1745. 17 13
  1746. 5 6
  1747. 6 8
  1748. 18 2
  1749. 12 00000405
  1750. 10 00000471
  1751. 5 1
  1752. 6 8
  1753. 3 0
  1754. 8 8
  1755. 10 00000323
  1756. 17 14
  1757. 0 6 "{3}[39][39]"
  1758. 17 15
  1759. 6 3
  1760. 5 1
  1761. 3 0
  1762. 8 3
  1763. 10 00000372
  1764. 10 00001766
  1765. 17 17
  1766. 6 0
  1767. 7 "Monday"
  1768. 18 0
  1769. 11 00000721
  1770. 17 18
  1771. 0 6 "[39][39]"
  1772. 5 1
  1773. 8 8
  1774. 17 19
  1775. 5 5
  1776. 6 8
  1777. 18 2
  1778. 12 00000642
  1779. 10 00000708
  1780. 5 1
  1781. 6 8
  1782. 3 0
  1783. 8 8
  1784. 10 00000560
  1785. 17 20
  1786. 0 6 "{3}[39][39]"
  1787. 17 21
  1788. 6 3
  1789. 5 1
  1790. 3 0
  1791. 8 3
  1792. 10 00000609
  1793. 10 00001766
  1794. 17 23
  1795. 6 0
  1796. 7 "Tuesday"
  1797. 18 0
  1798. 11 00000967
  1799. 17 24
  1800. 0 6 "[39][39][39][39]"
  1801. 5 1
  1802. 8 9
  1803. 17 25
  1804. 5 4
  1805. 6 9
  1806. 18 2
  1807. 12 00000888
  1808. 10 00000954
  1809. 5 1
  1810. 6 9
  1811. 3 0
  1812. 8 9
  1813. 10 00000806
  1814. 17 26
  1815. 0 6 "{3}[39][39]"
  1816. 17 27
  1817. 6 3
  1818. 5 1
  1819. 3 0
  1820. 8 3
  1821. 10 00000855
  1822. 10 00001766
  1823. 17 29
  1824. 6 0
  1825. 7 "Wednesday"
  1826. 18 0
  1827. 11 00001227
  1828. 17 30
  1829. 0 6 "[39][39][39][39][39][39]"
  1830. 5 1
  1831. 8 10
  1832. 17 31
  1833. 5 3
  1834. 6 10
  1835. 18 2
  1836. 12 00001148
  1837. 10 00001214
  1838. 5 1
  1839. 6 10
  1840. 3 0
  1841. 8 10
  1842. 10 00001063
  1843. 17 32
  1844. 0 6 "{3}[39][39]"
  1845. 17 33
  1846. 6 3
  1847. 5 1
  1848. 3 0
  1849. 8 3
  1850. 10 00001113
  1851. 10 00001766
  1852. 17 35
  1853. 6 0
  1854. 7 "Thursday"
  1855. 18 0
  1856. 11 00001494
  1857. 17 36
  1858. 0 6 "[39][39][39][39][39][39][39][39]"
  1859. 5 1
  1860. 8 11
  1861. 17 37
  1862. 5 2
  1863. 6 11
  1864. 18 2
  1865. 12 00001415
  1866. 10 00001481
  1867. 5 1
  1868. 6 11
  1869. 3 0
  1870. 8 11
  1871. 10 00001330
  1872. 17 38
  1873. 0 6 "{3}[39][39]"
  1874. 17 39
  1875. 6 3
  1876. 5 1
  1877. 3 0
  1878. 8 3
  1879. 10 00001380
  1880. 10 00001766
  1881. 17 41
  1882. 6 0
  1883. 7 "Friday"
  1884. 18 0
  1885. 11 00001658
  1886. 17 42
  1887. 0 6 "[39][39][39][39][39][39][39][39][39][39]"
  1888. 17 43
  1889. 0 6 "{3}[39][39]"
  1890. 17 44
  1891. 6 3
  1892. 5 1
  1893. 3 0
  1894. 8 3
  1895. 10 00001766
  1896. 17 45
  1897. 6 0
  1898. 7 "Saturday"
  1899. 18 0
  1900. 11 00001766
  1901. 17 46
  1902. 0 6 "[39][39][39][39][39][39][39][39][39][39][39][39]"
  1903. 17 48
  1904. 0 6 "{3}[39][40][39]"
  1905. 17 49
  1906. 6 3
  1907. 5 1
  1908. 3 0
  1909. 8 3
  1910. 5 2
  1911. 8 4
  1912. 17 50
  1913. 5 5
  1914. 6 4
  1915. 18 2
  1916. 12 00001915
  1917. 10 00003002
  1918. 5 1
  1919. 6 4
  1920. 3 0
  1921. 8 4
  1922. 10 00001833
  1923. 5 1
  1924. 8 5
  1925. 17 51
  1926. 5 6
  1927. 6 5
  1928. 18 2
  1929. 12 00002007
  1930. 10 00002121
  1931. 5 1
  1932. 6 5
  1933. 3 0
  1934. 8 5
  1935. 10 00001925
  1936. 17 52
  1937. 0 6 "{3}[39][39]"
  1938. 17 53
  1939. 6 3
  1940. 5 1
  1941. 3 0
  1942. 8 3
  1943. 17 54
  1944. 6 3
  1945. 6 1
  1946. 18 3
  1947. 11 00002108
  1948. 6 2
  1949. 15
  1950. 9
  1951. 10 00001974
  1952. 17 58
  1953. 6 4
  1954. 5 5
  1955. 18 0
  1956. 6 3
  1957. 6 1
  1958. 18 5
  1959. 1 1
  1960. 11 00002838
  1961. 17 59
  1962. 0 4 0
  1963. 17 60
  1964. 0 6 "{3}"
  1965. 17 61
  1966. 6 3
  1967. 5 1
  1968. 3 0
  1969. 8 3
  1970. 17 62
  1971. 0 6 "[39]"
  1972. 17 63
  1973. 16 AdjustTable
  1974. 5 1
  1975. 8 6
  1976. 17 64
  1977. 5 7
  1978. 6 6
  1979. 18 2
  1980. 12 00002371
  1981. 10 00002825
  1982. 5 1
  1983. 6 6
  1984. 3 0
  1985. 8 6
  1986. 10 00002289
  1987. 17 65
  1988. 2 635 1
  1989. 5 1
  1990. 8 7
  1991. 17 66
  1992. 5 2
  1993. 6 7
  1994. 18 2
  1995. 12 00002479
  1996. 10 00002667
  1997. 5 1
  1998. 6 7
  1999. 3 0
  2000. 8 7
  2001. 10 00002397
  2002. 17 67
  2003. 29 12 TurnOn
  2004. 5 16
  2005. 8 12
  2006. 17 68
  2007. 29 13 TurnOff
  2008. 5 0
  2009. 8 13
  2010. 17 69
  2011. 29 14 StaySame
  2012. 5 64
  2013. 5 2
  2014. 3 0
  2015. 8 14
  2016. 17 70
  2017. 2 632 1 "{12}" "{13}" "{14}" 1 64
  2018. 17 71
  2019. 0 6 "[16423]"
  2020. 10 00002446
  2021. 17 73
  2022. 0 6 "[16421]"
  2023. 17 74
  2024. 0 6 "{3}"
  2025. 17 75
  2026. 6 3
  2027. 5 1
  2028. 3 0
  2029. 8 3
  2030. 17 76
  2031. 0 6 "[16423]"
  2032. 17 77
  2033. 6 3
  2034. 6 1
  2035. 18 3
  2036. 11 00002812
  2037. 17 78
  2038. 10 00002825
  2039. 10 00002338
  2040. 10 00002962
  2041. 17 81
  2042. 6 3
  2043. 6 1
  2044. 18 0
  2045. 11 00002932
  2046. 17 82
  2047. 0 6 "{3}[16420]"
  2048. 17 83
  2049. 10 00003002
  2050. 10 00002962
  2051. 17 85
  2052. 0 6 "{3}[39][40][39]"
  2053. 17 87
  2054. 6 3
  2055. 5 1
  2056. 3 0
  2057. 8 3
  2058. 10 00001882
  2059. 6 2
  2060. 15
  2061. 17 89
  2062. 9
  2063. 14 CheckLeap
  2064. 29 0 Month1
  2065. 29 1 Year1
  2066. 29 2 NMonth
  2067. 29 3 CheckLeap
  2068. 17 1
  2069. 29 4 CDate
  2070. 17 2
  2071. 29 5 NDate
  2072. 17 3
  2073. 29 6 NDays
  2074. 17 4
  2075. 29 7 WDate
  2076. 17 5
  2077. 29 8 DateRef
  2078. 17 6
  2079. 29 9 TYear
  2080. 17 7
  2081. 29 10 LNDate
  2082. 17 8
  2083. 29 11 LeapDate
  2084. 17 10
  2085. 0 15 "{1}" 3 2
  2086. 13
  2087. 8 9
  2088. 17 11
  2089. 0 16 "{2}" "{9}"
  2090. 13
  2091. 8 4
  2092. 17 12
  2093. 7 "01/01/90"
  2094. 8 8
  2095. 17 13
  2096. 0 769 "{4}" "{8}"
  2097. 13
  2098. 8 6
  2099. 17 14
  2100. 6 6
  2101. 5 86400
  2102. 4 0
  2103. 5 631224000
  2104. 3 0
  2105. 8 5
  2106. 17 15
  2107. 6 5
  2108. 5 2419200
  2109. 3 0
  2110. 8 10
  2111. 17 16
  2112. 0 770 "{10}" "a"
  2113. 13
  2114. 8 11
  2115. 17 17
  2116. 29 12 LeapNum
  2117. 0 20 "{11}" 1 "/"
  2118. 13
  2119. 8 12
  2120. 17 20
  2121. 6 12
  2122. 5 29
  2123. 18 0
  2124. 11 00000585
  2125. 17 21
  2126. 5 29
  2127. 8 3
  2128. 10 00000603
  2129. 17 24
  2130. 5 28
  2131. 8 3
  2132. 6 3
  2133. 15
  2134. 17 26
  2135. 9
  2136. 14 AdjustTable
  2137. 29 0 AdjustTable
  2138. 17 1
  2139. 2 634 1 -32768 -32768 936 -32768
  2140. 17 2
  2141. 0 6 "[38]"
  2142. 17 3
  2143. 2 634 1 -32768 -32768 936 -32768
  2144. 17 4
  2145. 0 6 "[40]"
  2146. 6 0
  2147. 15
  2148. 17 10
  2149. 9
  2150. 14 GetDate
  2151. 29 0 String
  2152. 29 1 GetDate
  2153. 17 1
  2154. 29 2 ostring
  2155. 17 2
  2156. 6 0
  2157. 7 "January"
  2158. 18 0
  2159. 11 00000136
  2160. 17 3
  2161. 7 "ñ@ñδ"
  2162. 8 2
  2163. 10 00001053
  2164. 17 4
  2165. 6 0
  2166. 7 "February"
  2167. 18 0
  2168. 11 00000214
  2169. 17 5
  2170. 7 "ñGñδ"
  2171. 8 2
  2172. 10 00001053
  2173. 17 6
  2174. 6 0
  2175. 7 "March"
  2176. 18 0
  2177. 11 00000289
  2178. 17 7
  2179. 7 "ñTñδ"
  2180. 8 2
  2181. 10 00001053
  2182. 17 8
  2183. 6 0
  2184. 7 "April"
  2185. 18 0
  2186. 11 00000364
  2187. 17 9
  2188. 7 "Ñ|ñδ"
  2189. 8 2
  2190. 10 00001053
  2191. 17 10
  2192. 6 0
  2193. 7 "May"
  2194. 18 0
  2195. 11 00000439
  2196. 17 11
  2197. 7 "ñ¡ñδ"
  2198. 8 2
  2199. 10 00001053
  2200. 17 12
  2201. 6 0
  2202. 7 "June"
  2203. 18 0
  2204. 11 00000515
  2205. 17 13
  2206. 7 "ñ╗ñδ"
  2207. 8 2
  2208. 10 00001053
  2209. 17 14
  2210. 6 0
  2211. 7 "July"
  2212. 18 0
  2213. 11 00000591
  2214. 17 15
  2215. 7 "ñCñδ"
  2216. 8 2
  2217. 10 00001053
  2218. 17 16
  2219. 6 0
  2220. 7 "August"
  2221. 18 0
  2222. 11 00000669
  2223. 17 17
  2224. 7 "ñKñδ"
  2225. 8 2
  2226. 10 00001053
  2227. 17 18
  2228. 6 0
  2229. 7 "September"
  2230. 18 0
  2231. 11 00000750
  2232. 17 19
  2233. 7 "ñEñδ"
  2234. 8 2
  2235. 10 00001053
  2236. 17 20
  2237. 6 0
  2238. 7 "October"
  2239. 18 0
  2240. 11 00000829
  2241. 17 21
  2242. 7 "ñQñδ"
  2243. 8 2
  2244. 10 00001053
  2245. 17 22
  2246. 6 0
  2247. 7 "November"
  2248. 18 0
  2249. 11 00000911
  2250. 17 23
  2251. 7 "ñQñ@ñδ"
  2252. 8 2
  2253. 10 00001053
  2254. 17 24
  2255. 6 0
  2256. 7 "December"
  2257. 18 0
  2258. 11 00000993
  2259. 17 25
  2260. 7 "ñQñGñδ"
  2261. 8 2
  2262. 10 00001053
  2263. 17 27
  2264. 0 3 "This is not a valid month.  Please try again."
  2265. 17 29
  2266. 6 2
  2267. 15
  2268. 9
  2269. 6 1
  2270. 15
  2271. 17 30
  2272. 9
  2273. DIALOG Heymon
  2274. -2134376448 6 94 58 136 50 "" "" "ñδ╛Σ" 
  2275. FONT 12 "System" 
  2276. 4 6 27 10 1000 1342177280 "static" "ñδÑ≈íG" 0 
  2277. 4 21 24 10 1001 1342177280 "static" "ª~Ñ≈íG" 0 
  2278. 31 4 52 40 9500 1344339979 "combobox" "" 0 
  2279. 31 19 52 40 9501 1344339979 "combobox" "" 0 
  2280. 91 3 40 14 1 1342242817 "button" "╜T⌐w" 0 
  2281. 91 19 40 14 2 1342242816 "button" "¿·«°" 0 
  2282. 00020446
  2283.