home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78b98.iso / Smart30 / ENGLISH / PRODUCTS / LOTUS009.DSK / QKSTAT.SMM < prev    next >
INI File  |  1993-06-25  |  27KB  |  1,866 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     QMS-PS 810
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     Quickly calculate basic numeric summary information for a shaded range of numbers.
  19.     
  20.     
  21.     
  22.     
  23.     741043541
  24.     35
  25.     732310448
  26.     835
  27.     8
  28.     0
  29.     0
  30.     0
  31.     0
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     1
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [ParaNum]
  54.     1
  55. [tag]
  56.     Body Text
  57.     2
  58.     [fnt]
  59.         Times New Roman
  60.         240
  61.         0
  62.         49152
  63.     [algn]
  64.         1
  65.         1
  66.         0
  67.         0
  68.         0
  69.     [spc]
  70.         33
  71.         273
  72.         1
  73.         0
  74.         0
  75.         1
  76.         100
  77.     [brk]
  78.         4
  79.     [line]
  80.         8
  81.         0
  82.         1
  83.         0
  84.         1
  85.         1
  86.         1
  87.         10
  88.         10
  89.         1
  90.     [spec]
  91.         0
  92.         2
  93.         
  94.         0
  95.         1
  96.         1
  97.         0
  98.         0
  99.         0
  100.         0
  101.     [nfmt]
  102.         280
  103.         1
  104.         2
  105.         .
  106.         ,
  107.         $
  108.     Body Text
  109.     0
  110.     0
  111. [tag]
  112.     Body Single
  113.     3
  114.     [fnt]
  115.         Times New Roman
  116.         240
  117.         0
  118.         49152
  119.     [algn]
  120.         1
  121.         1
  122.         0
  123.         0
  124.         0
  125.     [spc]
  126.         33
  127.         273
  128.         1
  129.         0
  130.         0
  131.         1
  132.         100
  133.     [brk]
  134.         4
  135.     [line]
  136.         8
  137.         0
  138.         1
  139.         0
  140.         1
  141.         1
  142.         1
  143.         10
  144.         10
  145.         1
  146.     [spec]
  147.         0
  148.         0
  149.         
  150.         0
  151.         1
  152.         1
  153.         0
  154.         0
  155.         0
  156.         0
  157.     [nfmt]
  158.         280
  159.         1
  160.         2
  161.         .
  162.         ,
  163.         $
  164.     Body Single
  165.     0
  166.     0
  167. [tag]
  168.     Bullet
  169.     4
  170.     [fnt]
  171.         Times New Roman
  172.         240
  173.         0
  174.         49152
  175.     [algn]
  176.         1
  177.         1
  178.         0
  179.         288
  180.         288
  181.     [spc]
  182.         33
  183.         273
  184.         1
  185.         0
  186.         0
  187.         1
  188.         100
  189.     [brk]
  190.         4
  191.     [line]
  192.         8
  193.         0
  194.         1
  195.         0
  196.         1
  197.         1
  198.         1
  199.         10
  200.         10
  201.         1
  202.     [spec]
  203.         0
  204.         0
  205.         <*0>
  206.         360
  207.         1
  208.         1
  209.         0
  210.         0
  211.         0
  212.         0
  213.     [nfmt]
  214.         272
  215.         1
  216.         2
  217.         .
  218.         ,
  219.         $
  220.     Bullet
  221.     0
  222.     0
  223. [tag]
  224.     Bullet 1
  225.     5
  226.     [fnt]
  227.         Times New Roman
  228.         240
  229.         0
  230.         49152
  231.     [algn]
  232.         1
  233.         1
  234.         288
  235.         288
  236.         288
  237.     [spc]
  238.         33
  239.         273
  240.         1
  241.         0
  242.         0
  243.         1
  244.         100
  245.     [brk]
  246.         4
  247.     [line]
  248.         8
  249.         0
  250.         1
  251.         0
  252.         1
  253.         1
  254.         1
  255.         10
  256.         10
  257.         1
  258.     [spec]
  259.         0
  260.         0
  261.         <*5>
  262.         0
  263.         1
  264.         1
  265.         0
  266.         0
  267.         0
  268.         0
  269.     [nfmt]
  270.         280
  271.         1
  272.         2
  273.         .
  274.         ,
  275.         $
  276.     Bullet 1
  277.     0
  278.     0
  279. [tag]
  280.     Number List
  281.     6
  282.     [fnt]
  283.         Times New Roman
  284.         240
  285.         0
  286.         49152
  287.     [algn]
  288.         1
  289.         1
  290.         360
  291.         360
  292.         360
  293.     [spc]
  294.         33
  295.         273
  296.         1
  297.         0
  298.         0
  299.         1
  300.         100
  301.     [brk]
  302.         4
  303.     [line]
  304.         8
  305.         0
  306.         1
  307.         0
  308.         1
  309.         1
  310.         1
  311.         10
  312.         10
  313.         1
  314.     [spec]
  315.         0
  316.         0
  317.         <*:>.
  318.         360
  319.         1
  320.         1
  321.         0
  322.         16
  323.         0
  324.         0
  325.     [nfmt]
  326.         272
  327.         1
  328.         2
  329.         .
  330.         ,
  331.         $
  332.     Number List
  333.     0
  334.     0
  335. [tag]
  336.     Subhead
  337.     7
  338.     [fnt]
  339.         Times New Roman
  340.         240
  341.         0
  342.         49155
  343.     [algn]
  344.         1
  345.         1
  346.         0
  347.         0
  348.         0
  349.     [spc]
  350.         33
  351.         273
  352.         1
  353.         72
  354.         72
  355.         1
  356.         100
  357.     [brk]
  358.         4
  359.     [line]
  360.         8
  361.         0
  362.         1
  363.         0
  364.         1
  365.         1
  366.         1
  367.         10
  368.         10
  369.         1
  370.     [spec]
  371.         0
  372.         1
  373.         
  374.         0
  375.         1
  376.         1
  377.         0
  378.         0
  379.         0
  380.         0
  381.     [nfmt]
  382.         272
  383.         1
  384.         2
  385.         .
  386.         ,
  387.         $
  388.     Subhead
  389.     0
  390.     0
  391. [tag]
  392.     Title
  393.     8
  394.     [fnt]
  395.         Arial
  396.         360
  397.         0
  398.         16385
  399.     [algn]
  400.         4
  401.         1
  402.         0
  403.         0
  404.         0
  405.     [spc]
  406.         33
  407.         446
  408.         1
  409.         144
  410.         72
  411.         1
  412.         100
  413.     [brk]
  414.         16
  415.     [line]
  416.         8
  417.         0
  418.         1
  419.         0
  420.         1
  421.         1
  422.         1
  423.         10
  424.         10
  425.         1
  426.     [spec]
  427.         0
  428.         0
  429.         
  430.         0
  431.         1
  432.         1
  433.         0
  434.         0
  435.         0
  436.         0
  437.     [nfmt]
  438.         272
  439.         1
  440.         2
  441.         .
  442.         ,
  443.         $
  444.     Title
  445.     0
  446.     0
  447. [tag]
  448.     Header
  449.     9
  450.     [fnt]
  451.         Times New Roman
  452.         240
  453.         0
  454.         49152
  455.     [algn]
  456.         1
  457.         1
  458.         0
  459.         0
  460.         0
  461.     [spc]
  462.         33
  463.         273
  464.         1
  465.         0
  466.         0
  467.         1
  468.         100
  469.     [brk]
  470.         4
  471.     [line]
  472.         8
  473.         0
  474.         1
  475.         0
  476.         1
  477.         1
  478.         1
  479.         10
  480.         10
  481.         1
  482.     [spec]
  483.         0
  484.         0
  485.         
  486.         0
  487.         1
  488.         1
  489.         0
  490.         0
  491.         0
  492.         0
  493.     [nfmt]
  494.         280
  495.         1
  496.         2
  497.         .
  498.         ,
  499.         $
  500.     Header
  501.     0
  502.     0
  503. [tag]
  504.     Footer
  505.     11
  506.     [fnt]
  507.         Times New Roman
  508.         240
  509.         0
  510.         49152
  511.     [algn]
  512.         1
  513.         1
  514.         0
  515.         0
  516.         0
  517.     [spc]
  518.         33
  519.         273
  520.         1
  521.         0
  522.         0
  523.         1
  524.         100
  525.     [brk]
  526.         4
  527.     [line]
  528.         8
  529.         0
  530.         1
  531.         0
  532.         1
  533.         1
  534.         1
  535.         10
  536.         10
  537.         1
  538.     [spec]
  539.         0
  540.         0
  541.         
  542.         0
  543.         1
  544.         1
  545.         0
  546.         0
  547.         0
  548.         0
  549.     [nfmt]
  550.         280
  551.         1
  552.         2
  553.         .
  554.         ,
  555.         $
  556.     Footer
  557.     0
  558.     0
  559. [lay]
  560.     Standard
  561.     516
  562.     [rght]
  563.         16833
  564.         11908
  565.         1
  566.         1440
  567.         1440
  568.         1
  569.         1440
  570.         1440
  571.         0
  572.         1
  573.         0
  574.         1
  575.         0
  576.         2
  577.         1
  578.         1440
  579.         10465
  580.         12
  581.         1
  582.         720
  583.         1
  584.         1440
  585.         1
  586.         2160
  587.         1
  588.         2880
  589.         1
  590.         3600
  591.         1
  592.         4320
  593.         1
  594.         5040
  595.         1
  596.         5760
  597.         1
  598.         6480
  599.         1
  600.         7200
  601.         1
  602.         7920
  603.         1
  604.         8640
  605.     [hrght]
  606.     [lyfrm]
  607.         1
  608.         11200
  609.         0
  610.         0
  611.         11908
  612.         1440
  613.         0
  614.         1
  615.         3
  616.         1 0 0 0 0 0 0
  617.         0
  618.         0
  619.         1
  620.     [frmlay]
  621.         1440
  622.         11908
  623.         1
  624.         1440
  625.         72
  626.         1
  627.         792
  628.         1440
  629.         0
  630.         1
  631.         0
  632.         1
  633.         1
  634.         0
  635.         1
  636.         1440
  637.         10465
  638.         2
  639.         2
  640.         4680
  641.         3
  642.         9360
  643.     [txt]
  644. Peyton McManus    Lotus WPD
  645.  
  646. >
  647.     [frght]
  648.     [lyfrm]
  649.         1
  650.         13248
  651.         0
  652.         15393
  653.         11908
  654.         16833
  655.         0
  656.         1
  657.         3
  658.         1 0 0 0 0 0 0
  659.         0
  660.         0
  661.         2
  662.     [frmlay]
  663.         16833
  664.         11908
  665.         1
  666.         1440
  667.         792
  668.         1
  669.         15465
  670.         1440
  671.         0
  672.         1
  673.         0
  674.         1
  675.         1
  676.         0
  677.         1
  678.         1440
  679.         10465
  680.         2
  681.         2
  682.         4680
  683.         3
  684.         9360
  685.     [txt]
  686. >
  687. [elay]
  688. [l1]
  689.     0
  690. [pg]
  691.     1
  692.     42 0 20 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
  693. [edoc]
  694. <:#284,9025>
  695.  
  696. <:#284,9025>
  697.  
  698. <:#568,9025>Define        CECREATEINSTANCE(LPHANDLE)    DllCall("LTSCE01.DLL,CECREATEINSTANCE,HO",%1)
  699.  
  700. <:#568,9025>Define        CEDESTROYINSTANCE(HANDLE)    DllCall("LTSCE01.DLL,CEDESTROYINSTANCE,HH",%1)
  701.  
  702. <:#568,9025>Define        CECALCNOW(HINSTANCE, lpFormula, lpOutPut)    DllCall("LTSCE01.DLL,CECALCNOW,HHCC",%1,%2,%3)
  703.  
  704. <:#284,9025><:f,,>
  705.  
  706. <:#284,9025>define IsOKToRun(menuname)    GetInfo(217, 24, %1);
  707.  
  708. <:#284,9025>Define        Separator    "^"
  709.  
  710. <:#284,9025>
  711.  
  712. <:#284,9025><:X3,-32768;Include "Amixlate.sam!qkstat">' Text for the dialog box
  713.  
  714. @Outline3@<:#568,9025>Define    cTocopy        "To copy a value into your document, select the value then click the Copy button.  Choose Paste to insert the value into your document."
  715.  
  716. @Outline3@<:#284,9025>define    cClick    "Click Data...to see the data Ami Pro gathered from your selection."
  717.  
  718. @Outline3@<:#284,9025>Define    Sum_Form    "@Sum({List})"
  719.  
  720. @Outline3@<:#284,9025>Define    Avg_Form    "@Round(@Avg({List});3)"
  721.  
  722. @Outline3@<:#284,9025>Define    Min_Form    "@Min({List})"
  723.  
  724. @Outline3@<:#284,9025>Define    Max_Form    "@Max({List})"
  725.  
  726. <:#284,9025>
  727.  
  728. @Outline3@<:#568,9025>Define    cThisFunction    "This function enables you to see fast, basic summary information about numeric data."
  729.  
  730. @Outline3@<:#568,9025>Define    cSelectData        "Select data from your document or click the Data... button to enter data."
  731.  
  732. @Outline3@<:#284,9025>
  733.  
  734. @Outline3@<:#284,9025>Define    MaxChar        240
  735.  
  736. @Outline3@<:#284,9025>Define TooManyChars    "You have selected too much data."<:X~3,-32768;Include "Amixlate.sam!qkstat">
  737.  
  738. <:#284,9025><:X3,-32768;Include "Amixlate.sam!common">Define    NotFound    "LTSCE01.DLL not found.  Copy the dll to your windows directory"
  739.  
  740. @Outline3@<:#568,9025>Define    ErrorMessage    "The ltsce01.dll could not be loaded.  Please copy the dll to the Ami Pro directory."<:X~3,-32768;Include "Amixlate.sam!common">
  741.  
  742. <:#284,9025>
  743.  
  744. <:#284,9025>' How we display numbers in the dlg
  745.  
  746. <:#284,9025>Define    NumDecimals    3
  747.  
  748. <:#284,9025>
  749.  
  750. @Outline2@<:#284,9025>
  751.  
  752. <:#284,9025>
  753.  
  754. <:#284,9025>
  755.  
  756. <:#284,9025>' Dlg Defines
  757.  
  758. <:#284,9025>Define    Avgradio    21
  759.  
  760. <:#284,9025>Define    Sumradio    20
  761.  
  762. <:#284,9025>Define    Maxradio    22
  763.  
  764. <:#284,9025>Define    Minradio    23
  765.  
  766. <:#284,9025>Define    Avgtext    1021
  767.  
  768. <:#284,9025>Define    Sumtext    1020
  769.  
  770. <:#284,9025>Define    Maxtext    1022
  771.  
  772. <:#284,9025>Define    Mintext    1023
  773.  
  774. <:#284,9025>Define    Copybutton    40
  775.  
  776. <:#284,9025>Define    Databutton    41
  777.  
  778. <:#284,9025>Define    cToCopyText    1000
  779.  
  780. <:#284,9025>Define    cClickText    1001
  781.  
  782. <:#284,9025>
  783.  
  784. <:#284,9025>
  785.  
  786. <:#284,9025>' Win API Defines
  787.  
  788. <:#284,9025>' API defines
  789.  
  790. @Outline2@<:#284,9025>define    WM_SETFONT    0x30
  791.  
  792. @Outline2@<:#568,9025>define CreateFont()        DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14)
  793.  
  794. @Outline2@<:#284,9025>define    DeleteObject(handle)    DllCall("gdi,DeleteObject,HH", %1)
  795.  
  796. @Outline2@<:#568,9025>Define    MyGetDlgItemText(hdg, id, string, max)    DllCall("User,GetDlgItemText,HHHCH",%1,%2,%3,%4)
  797.  
  798. <:#284,9025>define    CloseDlg(id)    dllcall("user,PostMessage,HHHHHH", HDLG, 0X111, %1, 0, 0).
  799.  
  800. <:#284,9025>Define    EnableWindow()    DllCall("User,EnableWindow,AHA",%1,%2)
  801.  
  802. @Outline2@<:#568,9025>define    SendMessage(hwnd, msg, wpara, lparm)    DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4)
  803.  
  804. @Outline2@<:#284,9025>
  805.  
  806. @Outline2@<:#284,9025>
  807.  
  808. <:#284,9025>Declare FindAndReplace(String, FindWhat, ReplaceWhat)
  809.  
  810. <:#284,9025>Declare BuildNumberList(Val, aNumbers, List)
  811.  
  812. <:#284,9025>Declare StartEngine()
  813.  
  814. <:#284,9025>Declare DisplayBox(List)
  815.  
  816. <:#284,9025>Declare DataDlg(Hdlg, id, value)
  817.  
  818. <:#284,9025>Declare SetFontDlg(Hdlg, Id, value)
  819.  
  820. <:#284,9025>Declare FontDlg(Action, Hdlg, id)
  821.  
  822. <:#284,9025>
  823.  
  824. @Subhead@<:#284,9025>Function GetShade()
  825.  
  826. <:#284,9025>DefStr Stat, List, hInstance;
  827.  
  828. <:#284,9025>Mac = GetRunningMacroFile$()
  829.  
  830. <:#284,9025>If IsOKToRun(Copy)
  831.  
  832. <:#284,9025>    Copy()
  833.  
  834. <:#284,9025>Else
  835.  
  836. <:#284,9025>    ClipBoardWrite("",1)
  837.  
  838. <:#284,9025>Endif
  839.  
  840. <:#284,9025>Id = StartEngine()
  841.  
  842. <:#284,9025>If Id = 0
  843.  
  844. <:#284,9025>    Message(ErrorMessage)
  845.  
  846. <:#284,9025>    Return 0;
  847.  
  848. <:#284,9025>Endif
  849.  
  850. <:#284,9025>RetVal = CECREATEINSTANCE(&hInstance)
  851.  
  852. <:#284,9025>AllocGlobalVar("hInstance",1)
  853.  
  854. <:#284,9025>SetGlobalVar("hInstance",hInstance)
  855.  
  856. <:#284,9025>FontDlg(1,0,0)
  857.  
  858. <:#284,9025>
  859.  
  860. <:#284,9025>SetDlgCallBack(0,"{Mac}!InitDlg")
  861.  
  862. <:#284,9025>SetDlgCallBack(Databutton,"{Mac}!DataBox")
  863.  
  864. <:#284,9025>SetDlgCallBack(Copybutton,"{Mac}!CopyData")
  865.  
  866. @Outline3@<:#284,9025>DlgKeyInterrupt(112, "{mac}!DisplayHelp")
  867.  
  868. <:#284,9025>Box = DialogBox(".","QuickStat")
  869.  
  870. <:#284,9025>CEDestroyInstance(hInstance)
  871.  
  872. <:#284,9025>FreeGlobalVar("hInstance")
  873.  
  874. <:#284,9025>FontDlg(4,0,0)
  875.  
  876. <:#284,9025>DllFreeLib(id)
  877.  
  878. <:#284,9025>End Function
  879.  
  880. <:#284,9025>
  881.  
  882. @Subhead@<:I0,0,0,0><:S+-1><:#284,9025>Function BuildNumberList(Val, aNumbers, List)
  883.  
  884. <:#568,9025>' This function takes a string separated with spaces and creates a numeric list of values sep with a ,
  885.  
  886. <:#284,9025>DefStr Value, Location;
  887.  
  888. <:#284,9025>sList = ";"
  889.  
  890. <:#284,9025>Val = StrCat$(Val,Separator)    ' put a space at the end
  891.  
  892. <:#284,9025>x = 1
  893.  
  894. <:#284,9025>OffSet = 0
  895.  
  896. <:#284,9025>Count = 1
  897.  
  898. <:#284,9025>While 0 != Assign(&Location, Instr(OffSet, Val, Separator))
  899.  
  900. <:#284,9025>    Value =  StrField$(Val, x, Separator)
  901.  
  902. <:#284,9025>    If IsNumeric(Value)
  903.  
  904. <:#284,9025>        If count = 1
  905.  
  906. <:#284,9025>            TempList = "{Value}"        
  907.  
  908. <:#284,9025>        Else
  909.  
  910. <:#284,9025>            TempList = StrCat$(TempList,"{sList}",Value)
  911.  
  912. <:#284,9025>        Endif
  913.  
  914. <:#284,9025>        Count = Count + 1
  915.  
  916. <:#284,9025>    Endif
  917.  
  918. <:#284,9025>    x = x + 1
  919.  
  920. <:#284,9025>    OffSet = Location + 1
  921.  
  922. <:#284,9025>Wend
  923.  
  924. <:#284,9025>*List = TempList
  925.  
  926. <:#284,9025>End Function
  927.  
  928. <:#284,9025>
  929.  
  930. @Subhead@<:#284,9025>Function StartEngine()
  931.  
  932. <:#284,9025>LibId = DLLLoadLib("LTSCE01.DLL","CECreateInstance","HO")
  933.  
  934. <:#284,9025>If LibId = 0
  935.  
  936. <:#284,9025>    Message(ErrorMessage)
  937.  
  938. <:#284,9025>    Return 0;
  939.  
  940. <:#284,9025>Endif
  941.  
  942. <:#284,9025>Return Libid
  943.  
  944. <:#284,9025>End function
  945.  
  946. <:#284,9025>
  947.  
  948. @Subhead@<:#284,9025>Function InitDlg(Hdlg, Id, Value)
  949.  
  950. <:#284,9025>IgnoreKeyBoard(2)
  951.  
  952. <:#284,9025>HourGlass(on)
  953.  
  954. <:#284,9025>SetDlgItemText(hdlg,Sumradio,1)
  955.  
  956. <:#284,9025>SetFontDlg(Hdlg, Id, Value)
  957.  
  958. <:#284,9025>DataDlg(hDlg, Id, Value)
  959.  
  960. <:#284,9025>HourGlass(off)
  961.  
  962. <:#284,9025>End Function
  963.  
  964. <:#284,9025>
  965.  
  966. <:#284,9025>
  967.  
  968. @Subhead@<:#284,9025>Function DataDlg(Hdlg, id, value)
  969.  
  970. <:#284,9025>IgnoreKeyBoard(2)
  971.  
  972. <:#284,9025>DefStr Sum, Avg, Median, Max, Min, hInstance, List;
  973.  
  974. <:#284,9025>' Turn dlg paint off
  975.  
  976. <:#284,9025>HourGlass(on)
  977.  
  978. <:#284,9025>Dim aNumbers(1)
  979.  
  980. <:#284,9025>val = ClipBoardRead(1)
  981.  
  982. <:#284,9025>CurrencySymbol = GetProfileString$("Intl","sCurrency","Win.ini")
  983.  
  984. <:#284,9025>sThousand = GetProfileString$("Intl","sThousand","Win.ini")
  985.  
  986. <:#284,9025>sList = GetProfileString$("Intl","sList","Win.ini")
  987.  
  988. <:#284,9025>
  989.  
  990. <:#284,9025>'FindAndReplace(&Val, sList, Separator)        ' Convert tab to space
  991.  
  992. <:#284,9025>FindAndReplace(&Val, "    ", Separator)        ' Convert tab to space
  993.  
  994. <:#284,9025>FindAndReplace(&Val, Chr$(10),Separator)
  995.  
  996. <:#284,9025>FindAndReplace(&Val, Chr$(13),Separator)
  997.  
  998. <:#284,9025>FindAndReplace(&Val, "{CurrencySymbol}","")            ' Remove $ sign
  999.  
  1000. <:#284,9025>If sThousand != " "
  1001.  
  1002. <:#284,9025>    FindAndReplace(&Val, "{sThousand}","")                ' Remove Commas
  1003.  
  1004. <:#284,9025>    FindAndReplace(&Val, " ", Separator)
  1005.  
  1006. <:#284,9025>Else
  1007.  
  1008. <:#284,9025>    FindAndReplace(&Val, " ", "")
  1009.  
  1010. <:#284,9025>Endif
  1011.  
  1012. <:#284,9025>'Message("{Val} before numberlist")
  1013.  
  1014. <:#284,9025>BuildNumberList(Val, &aNumbers, &List) 
  1015.  
  1016. <:#284,9025>'Message("{List} after numberlist")
  1017.  
  1018. <:#284,9025>If Len(List)<;>MaxChar
  1019.  
  1020. <:#284,9025>    List = Left$(List,MaxChar)
  1021.  
  1022. <:#284,9025>    Message(TooManyChars, "Ami Pro")
  1023.  
  1024. <:#284,9025>    Return -1;
  1025.  
  1026. <:#284,9025>Endif
  1027.  
  1028. <:#284,9025>hInstance = GetGlobalVar$("hInstance")
  1029.  
  1030. <:#284,9025>
  1031.  
  1032. <:#284,9025>
  1033.  
  1034. <:#284,9025>CECalcNow(hInstance,Sum_Form,&Sum)
  1035.  
  1036. <:#284,9025>CECalcNow(hInstance,Avg_Form,&Avg)
  1037.  
  1038. <:#284,9025>CECalcNow(hInstance,Min_Form,&Min)
  1039.  
  1040. <:#284,9025>CECalcNow(hInstance,Max_Form,&Max)
  1041.  
  1042. <:#284,9025>
  1043.  
  1044. <:#284,9025>SetDlgItemText(Hdlg, Sumtext, Sum)
  1045.  
  1046. <:#284,9025>SetDlgItemText(Hdlg, Avgtext, Avg)
  1047.  
  1048. <:#284,9025>SetDlgItemText(Hdlg, Maxtext, Max)
  1049.  
  1050. <:#284,9025>SetDlgItemText(Hdlg, Mintext, Min)
  1051.  
  1052. <:#284,9025>If  Len(List) <;> 0
  1053.  
  1054. <:#284,9025>    SetDlgItemText(Hdlg, cTocopytext, cToCopy)
  1055.  
  1056. <:#284,9025>    SetDlgItemText(Hdlg, cClickText, cClick)
  1057.  
  1058. <:#284,9025>    EnableWindow(GetDlgItem(Hdlg, Copybutton),1)
  1059.  
  1060. <:#284,9025>Else
  1061.  
  1062. <:#284,9025>    ' grey the copy button
  1063.  
  1064. <:#284,9025>    SetDlgItemText(Hdlg, cToCopyText, cThisFunction)
  1065.  
  1066. <:#284,9025>    SetDlgItemText(Hdlg, cClickText, cSelectData)
  1067.  
  1068. <:#284,9025>    EnableWindow(GetDlgItem(Hdlg, Copybutton),0)
  1069.  
  1070. <:#284,9025>
  1071.  
  1072. <:#284,9025>Endif    
  1073.  
  1074. <:#284,9025>HourGlass(off)
  1075.  
  1076. <:#284,9025>End Function
  1077.  
  1078. <:#284,9025>
  1079.  
  1080. <:#284,9025>
  1081.  
  1082. <:#284,9025>
  1083.  
  1084. @Subhead@<:#284,9025>Function FindAndReplace(String, Findwhat, Replacewith)
  1085.  
  1086. <:#284,9025>DefStr Location;
  1087.  
  1088. <:#284,9025>OffSet = 0
  1089.  
  1090. <:#284,9025>While 0 != Assign(&Location, Instr(OffSet, String, FindWhat))
  1091.  
  1092. <:#284,9025>    BeforeLocation = Left$(String, Location - 1)
  1093.  
  1094. <:#284,9025>    AfterLocation = Right$(String, Len(String) - Location);
  1095.  
  1096. <:#284,9025>    *String = StrCat$(BeforeLocation, ReplaceWith, AfterLocation)
  1097.  
  1098. <:#284,9025>Wend
  1099.  
  1100. <:#284,9025>End Function
  1101.  
  1102. <:#284,9025>
  1103.  
  1104. @Subhead@<:#284,9025>function DisplayHelp()
  1105.  
  1106. @Outline2@<:#284,9025>' two defines needed for help.  The help name and panel number are defined above
  1107.  
  1108. @Outline2@<:#284,9025>define FindWindowa() DllCall("user,FindWindow,HCC", %1, %2)
  1109.  
  1110. @Outline2@<:#568,9025>define WinHelpa(hWnd, file, cmd, ptr)    DllCall("user,WinHelp,HHCHJ", %1, %2, %3, %4)
  1111.  
  1112. @Outline2@<:#284,9025>prohWnd = FindWindowa("AmiProWndA", 0)
  1113.  
  1114. @Outline2@<:#284,9025>helpfile = strcat$(GetAmiDirectory$(), "HelpPack.hlp")
  1115.  
  1116. @Outline2@<:#284,9025>PanelNum= 55 
  1117.  
  1118. @Outline2@<:#284,9025>WinHelpa(prohWnd, helpfile, 0x0001, Panelnum)
  1119.  
  1120. @Outline2@<:#284,9025>end function
  1121.  
  1122. <:#284,9025>
  1123.  
  1124. <:#284,9025>
  1125.  
  1126. <:#284,9025>
  1127.  
  1128. <:#284,9025>
  1129.  
  1130. @Subhead@<:#284,9025>Function FontDlg(Action, Hdlg, id)
  1131.  
  1132. <:#284,9025>' 1    Create a font and allocvar
  1133.  
  1134. <:#284,9025>' 2    Return the handle of the create font 
  1135.  
  1136. <:#284,9025>' 3    Set the id specified to the font
  1137.  
  1138. <:#284,9025>' 4    Freeglobalvar and delete created object
  1139.  
  1140. <:#284,9025>
  1141.  
  1142. @Outline2@<:#568,9025>define    CreateFontDLG()        DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14)
  1143.  
  1144. @Outline2@<:#284,9025>define    DeleteObjectDLG(handle)    DllCall("gdi,DeleteObject,HH", %1)
  1145.  
  1146. @Outline2@<:#568,9025>define    SendMessageDLG(hwnd, msg, wpara, lparm)    DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4)
  1147.  
  1148. @Outline2@<:#284,9025>
  1149.  
  1150. @Outline2@<:#284,9025>
  1151.  
  1152. <:#284,9025>Switch Action
  1153.  
  1154. <:#284,9025>    Case 1    ' Create the font and store it
  1155.  
  1156. @Outline2@<:#284,9025>        Font = CreateFontDLG(13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 32, "Helv")
  1157.  
  1158. <:#284,9025>        AllocGlobalVar("FontHandle",1)
  1159.  
  1160. <:#284,9025>        If Font
  1161.  
  1162. <:#284,9025>            SetGlobalVar("FontHandle",Font)
  1163.  
  1164. <:#284,9025>            Return Font
  1165.  
  1166. <:#284,9025>        Else
  1167.  
  1168. <:#284,9025>            Return 0;    ' no font
  1169.  
  1170. <:#284,9025>        Endif
  1171.  
  1172. <:#284,9025>        Break;
  1173.  
  1174. <:#284,9025>    Case 2    ' Return the handle to the font
  1175.  
  1176. <:#284,9025>        Handle = GetGlobalVar$("FontHandle")
  1177.  
  1178. <:#284,9025>        If Handle 
  1179.  
  1180. <:#284,9025>            Return Handle
  1181.  
  1182. <:#284,9025>        Else
  1183.  
  1184. <:#284,9025>            Return 0
  1185.  
  1186. <:#284,9025>        Endif
  1187.  
  1188. <:#284,9025>
  1189.  
  1190. <:#284,9025>    Case 3    ' Set the id to the font
  1191.  
  1192. <:#284,9025>        Handle = GetGlobalVar$("FontHandle")
  1193.  
  1194. <:#284,9025>        If Handle 
  1195.  
  1196. <:#284,9025>            IdControl = GetDlgITem(Hdlg, id)
  1197.  
  1198. <:#284,9025>            SendMessageDlg(idControl, 0x30, Handle, 0)
  1199.  
  1200. <:#284,9025>            Return 1
  1201.  
  1202. <:#284,9025>        Else
  1203.  
  1204. <:#284,9025>            Return 0
  1205.  
  1206. <:#284,9025>        Endif
  1207.  
  1208. <:#284,9025>        Break;        
  1209.  
  1210. <:#284,9025>        
  1211.  
  1212. <:#284,9025>    Case 4    ' Delete the font and clear the var
  1213.  
  1214. <:#284,9025>        Handle = GetGlobalVar$("FontHandle")
  1215.  
  1216. <:#284,9025>        If Handle
  1217.  
  1218. <:#284,9025>            DeleteObjectDLG(Handle)
  1219.  
  1220. <:#284,9025>            Stat = 1    
  1221.  
  1222. <:#284,9025>        Else
  1223.  
  1224. <:#284,9025>            Stat = 0
  1225.  
  1226. <:#284,9025>        Endif
  1227.  
  1228. <:#284,9025>        FreeGlobalVar("FontHandle")
  1229.  
  1230. <:#284,9025>        Return Stat        
  1231.  
  1232. <:#284,9025>    Default
  1233.  
  1234. <:#284,9025>EndSwitch    
  1235.  
  1236. <:#284,9025>
  1237.  
  1238. <:#284,9025>End Function
  1239.  
  1240. <:#284,9025>
  1241.  
  1242. <:#284,9025>
  1243.  
  1244. <:#284,9025>
  1245.  
  1246. @Subhead@<:#284,9025>Function SetFontDlg(Hdlg, id, Value)
  1247.  
  1248. @Outline2@<:#284,9025>Font = FontDlg(2,0,0)
  1249.  
  1250. @Outline2@<:#284,9025>If Font
  1251.  
  1252. @Outline2@<:#284,9025>    For t = 20 to 23
  1253.  
  1254. @Outline2@<:#284,9025>        Htext = GetDlgItem(hDlg, t)
  1255.  
  1256. @Outline2@<:#284,9025>        hRadio = GetDlgItem(hDlg, t + 1000)
  1257.  
  1258. @Outline2@<:#284,9025>        SendMessage(hText, WM_SETFONT, font, 0)
  1259.  
  1260. @Outline4@<:#284,9025>        SendMessage(hradio, WM_SETFONT, font, 0)
  1261.  
  1262. @Outline4@<:#284,9025>    Next
  1263.  
  1264. @Outline4@<:#284,9025>    SendMessage(GetDlgItem(hdlg, cToCopyText), WM_SETFONT, font, 0)
  1265.  
  1266. @Outline4@<:#284,9025>    SendMessage(GetDlgItem(hdlg, cClickText), WM_SETFONT, font, 0)
  1267.  
  1268. @Outline2@<:#284,9025>Endif
  1269.  
  1270. <:#284,9025>End Function
  1271.  
  1272. <:#284,9025>
  1273.  
  1274. <:#284,9025>
  1275.  
  1276. <:#284,9025>
  1277.  
  1278. <:#284,9025>
  1279.  
  1280. <:#284,9025>
  1281.  
  1282. <:#284,9025>
  1283.  
  1284. <:#284,9025>
  1285.  
  1286. @Subhead@<:#284,9025>FUnction CopyData(Hdlg, Id, value)
  1287.  
  1288. <:#284,9025>DefStr Data;
  1289.  
  1290. <:#284,9025>If GetDlgItemText(Hdlg, Sumradio)
  1291.  
  1292. <:#284,9025>    MyGetDlgItemText(Hdlg, Sumtext, &Data, 80)
  1293.  
  1294. <:#284,9025>Elseif GetDlgItemText(Hdlg, Avgradio)
  1295.  
  1296. <:#284,9025>    MyGetDlgItemText(hDlg, Avgtext, &Data, 80)
  1297.  
  1298. <:#284,9025>Elseif GetDlgItemText(hDlg, Maxradio)
  1299.  
  1300. <:#284,9025>    MyGetDlgItemText(hDlg, Maxtext, &Data, 80)
  1301.  
  1302. <:#284,9025>Elseif GetdlgItemText(hDlg, Minradio)
  1303.  
  1304. <:#284,9025>    MyGetDlgItemText(hDlg, Mintext, &Data, 80)
  1305.  
  1306. <:#284,9025>Endif
  1307.  
  1308. <:#284,9025>ClipBoardWrite(Data,1)
  1309.  
  1310. <:#284,9025>CloseDlg(2)
  1311.  
  1312. <:#284,9025>End Function
  1313.  
  1314. <:#284,9025>
  1315.  
  1316. <:#284,9025>
  1317.  
  1318. <:#284,9025>
  1319.  
  1320. <:#284,9025>
  1321.  
  1322. @Subhead@<:#284,9025>Function DataBox(Hdlg, Id, Value)
  1323.  
  1324. <:#284,9025>Value = ClipBoardRead(1)
  1325.  
  1326. <:#284,9025>Filledit(8000,Value)
  1327.  
  1328. <:#284,9025>Box = Dialogbox(".","Data")
  1329.  
  1330. <:#284,9025>If Box <<<;>1
  1331.  
  1332. <:#284,9025>    Return 0
  1333.  
  1334. <:#284,9025>Endif
  1335.  
  1336. <:#284,9025>Data = GetDialogField$(8000)
  1337.  
  1338. <:#284,9025>ClipBoardWrite(Data,1)
  1339.  
  1340. <:#284,9025>DataDlg(Hdlg, id, value)
  1341.  
  1342. <:#284,9025>End Function
  1343.  
  1344. <:#284,9025>
  1345.  
  1346. <:#284,9025>
  1347.  
  1348. <:#284,9025>
  1349.  
  1350. <:#284,9025>
  1351.  
  1352. <:#284,9025>
  1353.  
  1354. <:#284,9025>DIALOG    QuickStat
  1355.  
  1356. <:#284,9025>-2134376448    13    131    27    152    107    ""    "AmiDialog"    "QuickStats"
  1357.  
  1358. <:#284,9025>FONT    8    "Helv"
  1359.  
  1360. <:#284,9025>108    3    40    14    1    1342373889    "button"    "Done"    0 
  1361.  
  1362. <:#284,9025>108    19    40    14    40    1342373888    "button"    "Copy"    0 
  1363.  
  1364. <:#284,9025>108    35    40    14    41    1342373888    "button"    "&Data..."    0 
  1365.  
  1366. <:#284,9025>6    4    35    10    20    1342242825    "button"    "&Sum"    0 
  1367.  
  1368. <:#284,9025>6    16    40    10    21    1342242825    "button"    "&Average"    0 
  1369.  
  1370. <:#284,9025>6    28    50    10    22    1342242825    "button"    "&Maximum"    0 
  1371.  
  1372. <:#284,9025>6    40    50    10    23    1342242825    "button"    "Mi&nimum"    0 
  1373.  
  1374. <:#284,9025>6    52    142    33    1000    1342177280    "static"    "text"    0 
  1375.  
  1376. <:#284,9025>6    84    145    19    1001    1342177280    "static"    "text"    0 
  1377.  
  1378. <:#284,9025>60    4    34    8    1020    1342177282    "static"    "text"    0 
  1379.  
  1380. <:#284,9025>60    16    34    8    1021    1342177282    "static"    "text"    0 
  1381.  
  1382. <:#284,9025>60    28    34    8    1022    1342177282    "static"    "text"    0 
  1383.  
  1384. <:#284,9025>60    40    34    8    1023    1342177282    "static"    "text"    0 
  1385.  
  1386. <:#284,9025>END DIALOG
  1387.  
  1388. <:#284,9025>
  1389.  
  1390. <:#284,9025>
  1391.  
  1392. <:#284,9025>DIALOG    Data
  1393.  
  1394. <:#284,9025>-2134376448    4    80    51    207    107    ""    "AmiDialog"    "Data"
  1395.  
  1396. <:#284,9025>FONT    8    "Helv"
  1397.  
  1398. <:#284,9025>6    6    156    96    8000    1350631492    "edit"    ""    0 
  1399.  
  1400. <:#284,9025>164    4    40    14    1    1342373889    "button"    "OK"    0 
  1401.  
  1402. <:#284,9025>164    21    40    14    2    1342373888    "button"    "Cancel"    0 
  1403.  
  1404. <:#284,9025>163    49    40    27    1000    1342177281    "static"    "CTRL + M for a new line"    0 
  1405.  
  1406. <:#284,9025>END DIALOG
  1407.  
  1408. >
  1409.  
  1410. [Embedded]
  1411. 00020400
  1412. >
  1413. [macsum] 13
  1414. GetShade 0 0 8 65
  1415. BuildNumberList 612 3 8 94
  1416. StartEngine 1018 0 2 118
  1417. InitDlg 1244 3 1 127
  1418. DataDlg 1374 3 13 137
  1419. FindAndReplace 3019 3 5 195
  1420. DisplayHelp 3271 0 4 205
  1421. FontDlg 3456 3 5 218
  1422. SetFontDlg 4253 3 5 276
  1423. CopyData 4729 3 2 296
  1424. DataBox 5194 3 3 314
  1425. QuickStat 5387 0 -1 330
  1426. Data 6098 0 -1 349
  1427. [macse]
  1428. 14 GetShade
  1429. 0 802
  1430. 13
  1431. 8 4
  1432. 0 1313 217 24 154
  1433. 13
  1434. 11 00000087
  1435. 2 154 1
  1436. 10 00000100
  1437. 0 1038 "" 1
  1438. 16 StartEngine
  1439. 13
  1440. 8 5
  1441. 6 5
  1442. 5 0
  1443. 18 0
  1444. 11 00000257
  1445. 0 3 "The ltsce01.dll could not be loaded.  Please copy the dll to the Ami Pro directory."
  1446. 5 0
  1447. 15
  1448. 9
  1449. 0 284 "LTSCE01.DLL,CECREATEINSTANCE,HO" &3
  1450. 13
  1451. 8 6
  1452. 0 271 "hInstance" 1
  1453. 0 264 "hInstance" "{3}"
  1454. 16 FontDlg 1 0 0
  1455. 0 41 0 "{4}!InitDlg"
  1456. 0 41 41 "{4}!DataBox"
  1457. 0 41 40 "{4}!CopyData"
  1458. 0 47 112 "{4}!DisplayHelp"
  1459. 0 26 "." "QuickStat"
  1460. 13
  1461. 8 7
  1462. 0 284 "LTSCE01.DLL,CEDESTROYINSTANCE,HH" "{3}"
  1463. 0 266 "hInstance"
  1464. 16 FontDlg 4 0 0
  1465. 0 298 "{5}"
  1466. 6 0
  1467. 15
  1468. 9
  1469. 14 BuildNumberList
  1470. 7 ";"
  1471. 8 6
  1472. 0 16 "{0}" "^"
  1473. 13
  1474. 8 0
  1475. 5 1
  1476. 8 7
  1477. 5 0
  1478. 8 8
  1479. 5 1
  1480. 8 9
  1481. 5 0
  1482. 0 808 "{8}" "{0}" "^"
  1483. 13
  1484. 0 805 &5 [X]
  1485. 13
  1486. 18 1
  1487. 11 00000382
  1488. 0 20 "{0}" "{7}" "^"
  1489. 13
  1490. 8 4
  1491. 0 277 "{4}"
  1492. 13
  1493. 11 00000329
  1494. 6 9
  1495. 5 1
  1496. 18 0
  1497. 11 00000274
  1498. 7 "{4}"
  1499. 8 10
  1500. 10 00000309
  1501. 0 16 "{10}" "{6}" "{4}"
  1502. 13
  1503. 8 10
  1504. 6 9
  1505. 5 1
  1506. 3 0
  1507. 8 9
  1508. 6 7
  1509. 5 1
  1510. 3 0
  1511. 8 7
  1512. 6 5
  1513. 5 1
  1514. 3 0
  1515. 8 8
  1516. 10 00000087
  1517. 6 10
  1518. 28 2
  1519. 6 3
  1520. 15
  1521. 9
  1522. 14 StartEngine
  1523. 0 297 "LTSCE01.DLL" "CECreateInstance" "HO"
  1524. 13
  1525. 8 1
  1526. 6 1
  1527. 5 0
  1528. 18 0
  1529. 11 00000202
  1530. 0 3 "The ltsce01.dll could not be loaded.  Please copy the dll to the Ami Pro directory."
  1531. 5 0
  1532. 15
  1533. 9
  1534. 6 1
  1535. 15
  1536. 9
  1537. 6 0
  1538. 15
  1539. 9
  1540. 14 InitDlg
  1541. 0 32 2
  1542. 0 296 1
  1543. 0 43 "{0}" 20 1
  1544. 16 SetFontDlg "{0}" "{1}" "{2}"
  1545. 16 DataDlg "{0}" "{1}" "{2}"
  1546. 0 296 0
  1547. 6 3
  1548. 15
  1549. 9
  1550. 14 DataDlg
  1551. 0 32 2
  1552. 0 296 1
  1553. 5 1
  1554. 21 11 [X]
  1555. 0 1037 1
  1556. 13
  1557. 8 12
  1558. 0 286 "Intl" "sCurrency" "Win.ini"
  1559. 13
  1560. 8 13
  1561. 0 286 "Intl" "sThousand" "Win.ini"
  1562. 13
  1563. 8 14
  1564. 0 286 "Intl" "sList" "Win.ini"
  1565. 13
  1566. 8 15
  1567. 16 FindAndReplace &12 "    " "^"
  1568. 0 39 10
  1569. 13
  1570. 16 FindAndReplace &12 [X] "^"
  1571. 0 39 13
  1572. 13
  1573. 16 FindAndReplace &12 [X] "^"
  1574. 16 FindAndReplace &12 "{13}" ""
  1575. 6 14
  1576. 7 " "
  1577. 18 1
  1578. 11 00000460
  1579. 16 FindAndReplace &12 "{14}" ""
  1580. 16 FindAndReplace &12 " " "^"
  1581. 10 00000490
  1582. 16 FindAndReplace &12 " " ""
  1583. 16 BuildNumberList "{12}" &11 &10
  1584. 0 14 "{10}"
  1585. 13
  1586. 5 240
  1587. 18 3
  1588. 11 00000659
  1589. 0 806 "{10}" 240
  1590. 13
  1591. 8 10
  1592. 0 3 "You have selected too much data." "Ami Pro"
  1593. 5 -1
  1594. 15
  1595. 9
  1596. 0 265 "hInstance"
  1597. 13
  1598. 8 9
  1599. 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Sum({10})" &4
  1600. 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Round(@Avg({10});3)" &5
  1601. 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Min({10})" &8
  1602. 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Max({10})" &7
  1603. 0 43 "{0}" 1020 "{4}"
  1604. 0 43 "{0}" 1021 "{5}"
  1605. 0 43 "{0}" 1022 "{7}"
  1606. 0 43 "{0}" 1023 "{8}"
  1607. 0 14 "{10}"
  1608. 13
  1609. 5 0
  1610. 18 3
  1611. 11 00001371
  1612. 0 43 "{0}" 1000 "To copy a value into your document, select the value then click the Copy button.  Choose Paste to insert the value into your document."
  1613. 0 43 "{0}" 1001 "Click Data...to see the data Ami Pro gathered from your selection."
  1614. 0 44 "{0}" 40
  1615. 13
  1616. 0 284 "User,EnableWindow,AHA" [X] 1
  1617. 10 00001624
  1618. 0 43 "{0}" 1000 "This function enables you to see fast, basic summary information about numeric data."
  1619. 0 43 "{0}" 1001 "Select data from your document or click the Data... button to enter data."
  1620. 0 44 "{0}" 40
  1621. 13
  1622. 0 284 "User,EnableWindow,AHA" [X] 0
  1623. 0 296 0
  1624. 6 3
  1625. 15
  1626. 9
  1627. 14 FindAndReplace
  1628. 5 0
  1629. 8 5
  1630. 5 0
  1631. 0 808 "{5}" "{0}" "{1}"
  1632. 13
  1633. 0 805 &4 [X]
  1634. 13
  1635. 18 1
  1636. 11 00000240
  1637. 6 4
  1638. 5 1
  1639. 3 1
  1640. 0 806 "{0}" [X]
  1641. 13
  1642. 8 6
  1643. 0 14 "{0}"
  1644. 13
  1645. 6 4
  1646. 3 1
  1647. 0 807 "{0}" [X]
  1648. 13
  1649. 8 7
  1650. 0 16 "{6}" "{2}" "{7}"
  1651. 13
  1652. 28 0
  1653. 10 00000029
  1654. 6 3
  1655. 15
  1656. 9
  1657. 14 DisplayHelp
  1658. 0 284 "user,FindWindow,HCC" "AmiProWndA" 0
  1659. 13
  1660. 8 1
  1661. 0 798
  1662. 13
  1663. 0 16 [X] "HelpPack.hlp"
  1664. 13
  1665. 8 2
  1666. 5 55
  1667. 8 3
  1668. 0 284 "user,WinHelp,HHCHJ" "{1}" "{2}" 1 "{3}"
  1669. 6 0
  1670. 15
  1671. 9
  1672. 14 FontDlg
  1673. 5 1
  1674. 6 0
  1675. 18 0
  1676. 11 00000255
  1677. 0 284 "gdi,CreateFont,HHHHHHHHHHHHHHC" 13 0 0 0 400 0 0 0 0 0 0 0 0 "Helv"
  1678. 13
  1679. 8 4
  1680. 0 271 "FontHandle" 1
  1681. 6 4
  1682. 11 00000217
  1683. 0 264 "FontHandle" "{4}"
  1684. 6 4
  1685. 15
  1686. 9
  1687. 10 00000229
  1688. 5 0
  1689. 15
  1690. 9
  1691. 10 00000785
  1692. 10 00000785
  1693. 5 2
  1694. 6 0
  1695. 18 0
  1696. 11 00000381
  1697. 0 265 "FontHandle"
  1698. 13
  1699. 8 5
  1700. 6 5
  1701. 11 00000356
  1702. 6 5
  1703. 15
  1704. 9
  1705. 10 00000368
  1706. 5 0
  1707. 15
  1708. 9
  1709. 10 00000785
  1710. 5 3
  1711. 6 0
  1712. 18 0
  1713. 11 00000596
  1714. 0 265 "FontHandle"
  1715. 13
  1716. 8 5
  1717. 6 5
  1718. 11 00000558
  1719. 0 44 "{1}" "{2}"
  1720. 13
  1721. 8 6
  1722. 0 284 "user,SendMessage,HHHHJ" "{6}" 48 "{5}" 0
  1723. 5 1
  1724. 15
  1725. 9
  1726. 10 00000570
  1727. 5 0
  1728. 15
  1729. 9
  1730. 10 00000785
  1731. 10 00000785
  1732. 5 4
  1733. 6 0
  1734. 18 0
  1735. 11 00000785
  1736. 0 265 "FontHandle"
  1737. 13
  1738. 8 5
  1739. 6 5
  1740. 11 00000730
  1741. 0 284 "gdi,DeleteObject,HH" "{5}"
  1742. 5 1
  1743. 8 7
  1744. 10 00000740
  1745. 5 0
  1746. 8 7
  1747. 0 266 "FontHandle"
  1748. 6 7
  1749. 15
  1750. 9
  1751. 10 00000785
  1752. 6 3
  1753. 15
  1754. 9
  1755. 14 SetFontDlg
  1756. 16 FontDlg 2 0 0
  1757. 13
  1758. 8 4
  1759. 6 4
  1760. 11 00000464
  1761. 5 20
  1762. 8 5
  1763. 5 23
  1764. 6 5
  1765. 18 2
  1766. 12 00000147
  1767. 10 00000328
  1768. 5 1
  1769. 6 5
  1770. 3 0
  1771. 8 5
  1772. 10 00000071
  1773. 0 44 "{0}" "{5}"
  1774. 13
  1775. 8 6
  1776. 6 5
  1777. 5 1000
  1778. 3 0
  1779. 0 44 "{0}" [X]
  1780. 13
  1781. 8 7
  1782. 0 284 "user,SendMessage,HHHHJ" "{6}" 48 "{4}" 0
  1783. 0 284 "user,SendMessage,HHHHJ" "{7}" 48 "{4}" 0
  1784. 10 00000114
  1785. 0 44 "{0}" 1000
  1786. 13
  1787. 0 284 "user,SendMessage,HHHHJ" [X] 48 "{4}" 0
  1788. 0 44 "{0}" 1001
  1789. 13
  1790. 0 284 "user,SendMessage,HHHHJ" [X] 48 "{4}" 0
  1791. 6 3
  1792. 15
  1793. 9
  1794. 14 CopyData
  1795. 0 42 "{0}" 20
  1796. 13
  1797. 11 00000110
  1798. 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1020 &4 80
  1799. 10 00000388
  1800. 0 42 "{0}" 21
  1801. 13
  1802. 11 00000207
  1803. 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1021 &4 80
  1804. 10 00000388
  1805. 0 42 "{0}" 22
  1806. 13
  1807. 11 00000304
  1808. 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1022 &4 80
  1809. 10 00000388
  1810. 0 42 "{0}" 23
  1811. 13
  1812. 11 00000388
  1813. 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1023 &4 80
  1814. 0 1038 "{4}" 1
  1815. 0 284 "user,PostMessage,HHHHHH" "{0}" 273 2 0 0
  1816. 6 3
  1817. 15
  1818. 9
  1819. 14 DataBox
  1820. 0 1037 1
  1821. 13
  1822. 8 2
  1823. 0 31 8000 "{2}"
  1824. 0 26 "." "Data"
  1825. 13
  1826. 8 4
  1827. 6 4
  1828. 5 1
  1829. 18 1
  1830. 11 00000115
  1831. 5 0
  1832. 15
  1833. 9
  1834. 0 27 8000
  1835. 13
  1836. 8 5
  1837. 0 1038 "{5}" 1
  1838. 16 DataDlg "{0}" "{1}" "{2}"
  1839. 6 3
  1840. 15
  1841. 9
  1842. DIALOG QuickStat
  1843. -2134376448 13 131 27 152 107 "" "AmiDialog" "QuickStats" 
  1844. FONT 8 "Helv" 
  1845. 108 3 40 14 1 1342373889 "button" "Done" 0 
  1846. 108 19 40 14 40 1342373888 "button" "Copy" 0 
  1847. 108 35 40 14 41 1342373888 "button" "&Data..." 0 
  1848. 6 4 35 10 20 1342242825 "button" "&Sum" 0 
  1849. 6 16 40 10 21 1342242825 "button" "&Average" 0 
  1850. 6 28 50 10 22 1342242825 "button" "&Maximum" 0 
  1851. 6 40 50 10 23 1342242825 "button" "Mi&nimum" 0 
  1852. 6 52 142 33 1000 1342177280 "static" "text" 0 
  1853. 6 84 145 19 1001 1342177280 "static" "text" 0 
  1854. 60 4 34 8 1020 1342177282 "static" "text" 0 
  1855. 60 16 34 8 1021 1342177282 "static" "text" 0 
  1856. 60 28 34 8 1022 1342177282 "static" "text" 0 
  1857. 60 40 34 8 1023 1342177282 "static" "text" 0 
  1858. DIALOG Data
  1859. -2134376448 4 80 51 207 107 "" "AmiDialog" "Data" 
  1860. FONT 8 "Helv" 
  1861. 6 6 156 96 8000 1350631492 "edit" "" 0 
  1862. 164 4 40 14 1 1342373889 "button" "OK" 0 
  1863. 164 21 40 14 2 1342373888 "button" "Cancel" 0 
  1864. 163 49 40 27 1000 1342177281 "static" "CTRL + M for a new line" 0 
  1865. 00020425
  1866.