home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78b98.iso / Smart30 / ENGLISH / PRODUCTS / LOTUS009.DSK / FLWCURVE.SMM < prev    next >
INI File  |  1993-06-25  |  30KB  |  1,816 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _MACRO.STY
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     Apple LaserWriter Plus
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     Curves text in Ami Pro using Freelance
  19.     
  20.     
  21.     
  22.     
  23.     741033415
  24.     45
  25.     731818190
  26.     1779
  27.     7
  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.         200
  61.         0
  62.         16384
  63.     [algn]
  64.         1
  65.         1
  66.         216
  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.         0
  93.         
  94.         0
  95.         1
  96.         1
  97.         0
  98.         16
  99.         0
  100.         0
  101.     [nfmt]
  102.         272
  103.         1
  104.         3
  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.     Function
  169.     4
  170.     [fnt]
  171.         Times New Roman
  172.         240
  173.         0
  174.         16385
  175.     [algn]
  176.         1
  177.         1
  178.         0
  179.         0
  180.         0
  181.     [spc]
  182.         33
  183.         244
  184.         1
  185.         0
  186.         0
  187.         1
  188.         100
  189.     [brk]
  190.         68
  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.         1
  205.         
  206.         0
  207.         1
  208.         1
  209.         0
  210.         0
  211.         0
  212.         0
  213.     [nfmt]
  214.         272
  215.         1
  216.         3
  217.         .
  218.         ,
  219.         $
  220.     Body Text
  221.     0
  222.     0
  223. [tag]
  224.     Outline2
  225.     5
  226.     [fnt]
  227.         Times New Roman
  228.         200
  229.         0
  230.         49152
  231.     [algn]
  232.         1
  233.         1
  234.         216
  235.         0
  236.         0
  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.         2
  261.         
  262.         0
  263.         1
  264.         1
  265.         0
  266.         16
  267.         0
  268.         0
  269.     [nfmt]
  270.         272
  271.         1
  272.         3
  273.         .
  274.         ,
  275.         $
  276.     Outline2
  277.     0
  278.     0
  279. [tag]
  280.     Outline3
  281.     6
  282.     [fnt]
  283.         Times New Roman
  284.         200
  285.         0
  286.         49152
  287.     [algn]
  288.         1
  289.         1
  290.         216
  291.         0
  292.         0
  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.         3
  317.         
  318.         0
  319.         1
  320.         1
  321.         0
  322.         16
  323.         0
  324.         0
  325.     [nfmt]
  326.         272
  327.         1
  328.         3
  329.         .
  330.         ,
  331.         $
  332.     Outline3
  333.     0
  334.     0
  335. [tag]
  336.     Outline4
  337.     7
  338.     [fnt]
  339.         Times New Roman
  340.         200
  341.         0
  342.         49152
  343.     [algn]
  344.         1
  345.         1
  346.         216
  347.         0
  348.         0
  349.     [spc]
  350.         33
  351.         273
  352.         1
  353.         0
  354.         0
  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.         4
  373.         
  374.         0
  375.         1
  376.         1
  377.         0
  378.         16
  379.         0
  380.         0
  381.     [nfmt]
  382.         272
  383.         1
  384.         3
  385.         .
  386.         ,
  387.         $
  388.     Outline4
  389.     0
  390.     0
  391. [tag]
  392.     Outline5
  393.     8
  394.     [fnt]
  395.         Times New Roman
  396.         200
  397.         0
  398.         16384
  399.     [algn]
  400.         1
  401.         1
  402.         216
  403.         0
  404.         0
  405.     [spc]
  406.         33
  407.         273
  408.         1
  409.         0
  410.         0
  411.         1
  412.         100
  413.     [brk]
  414.         4
  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.         5
  429.         
  430.         0
  431.         1
  432.         1
  433.         0
  434.         16
  435.         0
  436.         0
  437.     [nfmt]
  438.         272
  439.         1
  440.         3
  441.         .
  442.         ,
  443.         $
  444.     Outline5
  445.     0
  446.     0
  447. [lay]
  448.     Standard
  449.     516
  450.     [rght]
  451.         16833
  452.         11908
  453.         1
  454.         1440
  455.         1440
  456.         1
  457.         1440
  458.         1440
  459.         0
  460.         1
  461.         0
  462.         1
  463.         0
  464.         2
  465.         1
  466.         1440
  467.         10465
  468.         12
  469.         1
  470.         720
  471.         1
  472.         1440
  473.         1
  474.         2160
  475.         1
  476.         2880
  477.         1
  478.         3600
  479.         1
  480.         4320
  481.         1
  482.         5040
  483.         1
  484.         5760
  485.         1
  486.         6480
  487.         1
  488.         7200
  489.         1
  490.         7920
  491.         1
  492.         8640
  493.     [hrght]
  494.     [lyfrm]
  495.         1
  496.         11208
  497.         0
  498.         0
  499.         11908
  500.         1440
  501.         0
  502.         1
  503.         3
  504.         1 0 0 0 0 0 0
  505.         0
  506.         0
  507.         1
  508.     [frmlay]
  509.         1440
  510.         11908
  511.         1
  512.         1440
  513.         72
  514.         1
  515.         792
  516.         1440
  517.         0
  518.         1
  519.         0
  520.         1
  521.         1
  522.         0
  523.         1
  524.         1440
  525.         10465
  526.         1
  527.         3
  528.         9360
  529.     [txt]
  530. >
  531.     [frght]
  532.     [lyfrm]
  533.         1
  534.         13256
  535.         0
  536.         15393
  537.         11908
  538.         16833
  539.         0
  540.         1
  541.         3
  542.         1 0 0 0 0 0 0
  543.         0
  544.         0
  545.         2
  546.     [frmlay]
  547.         16833
  548.         11908
  549.         1
  550.         1440
  551.         792
  552.         1
  553.         15465
  554.         1440
  555.         0
  556.         1
  557.         0
  558.         1
  559.         1
  560.         0
  561.         1
  562.         1440
  563.         10465
  564.         2
  565.         2
  566.         4680
  567.         3
  568.         9360
  569.     [txt]
  570. >
  571. [elay]
  572. [l1]
  573.     0
  574. [pg]
  575.     1
  576.     56 0 70 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
  577. [edoc]
  578. @Function@<:#284,9025>'declares & defines
  579.  
  580. @Outline2@<:#241,9025>'string defines, to be localized
  581.  
  582. @Outline3@<:#241,9025><:X3,-32768;Include "amixlate.sam!FLWCURVE">define MyAppName    "Ami Pro Curved Text."
  583.  
  584. @Outline3@<:#241,9025>define CurvedTextDlgText    "Curved Text"
  585.  
  586. @Outline3@<:#241,9025>define CurvingStatusMsg    "Now curving {curvelen} characters.  This may take a moment."
  587.  
  588. @Outline3@<:#241,9025>define err_cantfindapp        "Unable to find Freelance for Windows."
  589.  
  590. @Outline3@<:#241,9025>define err_cantfindmenu    "Cannot locate the correct menu."
  591.  
  592. @Outline3@<:#241,9025>define err_cantfindmenubar    "Cannot locate the menu bar."
  593.  
  594. @Outline3@<:#241,9025>define err_cantlaunchapp    "Unable to launch Freelance for Windows."
  595.  
  596. @Outline3@<:#241,9025>define err_notextshaded    "You must first shade some text."
  597.  
  598. @Outline3@<:#241,9025>define pasteformat    "Windows Metafile"
  599.  
  600. @Outline3@<:#241,9025>define FLW_WINDOWMENU    "&Window"
  601.  
  602. @Outline3@<:#241,9025>define apptitle        "Freelance Graphics"<:X~3,-32768;Include "amixlate.sam!FLWCURVE">
  603.  
  604. @Outline3@<:#241,9025>
  605.  
  606. @Outline2@<:#241,9025>'string defines, not localized
  607.  
  608. @Outline3@<:#241,9025>define appclass    "flwapp"
  609.  
  610. @Outline3@<:#241,9025>define appmodule    "FLWMAIN"
  611.  
  612. @Outline3@<:#241,9025>define appname    "FLW"
  613.  
  614. @Outline3@<:#241,9025>define ERR_DIECLEANLY    -2
  615.  
  616. @Outline3@<:#241,9025>define FILE_ALREADYOPEN    1
  617.  
  618. @Outline3@<:#241,9025>define FILE_NOTOPEN        -1
  619.  
  620. @Outline3@<:#241,9025>define LotusAppSection    "Lotus Applications"
  621.  
  622. @Outline3@<:#241,9025>define LotusIniFile    "lotus.ini"
  623.  
  624. @Outline3@<:#241,9025>define orgfilename    "ONEORG.PRE"
  625.  
  626. @Outline3@<:#241,9025>define salesmsgsmm    lotuspal.smm!salesmsg
  627.  
  628. @Outline3@<:#241,9025>define helpfile        "HELPPACK.HLP"
  629.  
  630. @Outline3@<:#241,9025>define helpnum    125
  631.  
  632. @Outline2@<:#241,9025>'private functions
  633.  
  634. @Outline3@<:#241,9025>declare box2(hdlg, id, val)
  635.  
  636. @Outline3@<:#241,9025>declare done()
  637.  
  638. @Outline3@<:#241,9025>declare onmenu(menu, item, casc)
  639.  
  640. @Outline3@<:#241,9025>declare freeglobals()
  641.  
  642. @Outline3@<:#241,9025>declare GetChildHandle(parentclass, childclass);
  643.  
  644. @Outline3@<:#241,9025>declare h_LoadLotusApp(Name, Module);
  645.  
  646. @Outline3@<:#241,9025>declare hideami(rect)
  647.  
  648. @Outline3@<:#241,9025>declare insertdata(hdlg, id, val)
  649.  
  650. @Outline3@<:#241,9025>define IsOKToRun(menuname)    GetInfo(217, 24, %1);
  651.  
  652. @Outline3@<:#241,9025>define MsgBox(msgtext)    Message(%1, myappname)
  653.  
  654. @Outline3@<:#241,9025>declare modframe()
  655.  
  656. @Outline3@<:#241,9025>declare newnow()
  657.  
  658. @Outline3@<:#241,9025>declare openfile()
  659.  
  660. @Outline3@<:#241,9025>declare setpagelayout()
  661.  
  662. @Outline3@<:#241,9025>declare showami(rect)
  663.  
  664. @Outline3@<:#241,9025>declare winproc(hdlg, id, val)
  665.  
  666. @Outline3@<:#241,9025>define WinHelp(hWnd, file, cmd, ptr)    DllCall("user,WinHelp,HHCHJ", %1, %2, %3, %4)
  667.  
  668. @Outline3@<:#241,9025>define HELP_CONTEXT    0x0001
  669.  
  670. @Outline3@<:#241,9025>define VK_F1            112
  671.  
  672. @Outline2@<:#241,9025>'api call defines
  673.  
  674. @Outline3@<:#482,9025>declare MyPostMessage(hwnd, msg, wparam, lparam)    'DllCall("User,PostMessage,HHHHJ",%1,%2,%3,%4)
  675.  
  676. @Outline3@<:#241,9025>Define EnableWindow() DllCall("user,EnableWindow,HHH", %1, %2)
  677.  
  678. @Outline3@<:#241,9025>Define FindWindow() DllCall("user,FindWindow,HCC", %1, %2)
  679.  
  680. @Outline3@<:#241,9025>Define GetActiveWindow() DllCall("user,GetActiveWindow,H")
  681.  
  682. @Outline3@<:#241,9025>Define GetClassName(hwnd, name, len) dllcall("user,GetClassName,HHCH", %1, %2, %3)
  683.  
  684. @Outline3@<:#241,9025>Define Getfocus() DllCall("user,GetFocus,H")
  685.  
  686. @Outline3@<:#241,9025>define GetMenu(HWND)    DllCall("user,GetMenu,HH", %1)
  687.  
  688. @Outline3@<:#241,9025>define GetMenuItemCount(HMENU)    DllCall("user,GetMenuItemCount,HH", %1)
  689.  
  690. @Outline3@<:#241,9025>define GetMenuItemID(HMENU, int)    DllCall("user,GetMenuItemID,LHH", %1, %2)
  691.  
  692. @Outline3@<:#482,9025>define GetMenuString(HMENU, WORD, LPSTR, int, WORD)    DllCall("user,GetMenuString,HHHFHH", %1, %2, %3, %4, %5)
  693.  
  694. @Outline3@<:#241,9025>Define GetModuleHandle() DllCall("kernel,GetModuleHandle,HC", %1)
  695.  
  696. @Outline3@<:#241,9025>define GetParent(hWnd) DllCall("user,GetParent,HH", %1)
  697.  
  698. @Outline3@<:#241,9025>define GetSubMenu(HMENU, int)    DllCall("user,GetSubMenu,HHH", %1, %2)
  699.  
  700. @Outline3@<:#241,9025>Define GetWindow(hwnd, cmd) dllcall("user,GetWindow,HHH", %1, %2)
  701.  
  702. @Outline3@<:#241,9025>DEFINE GetWindowrect()    DllCall("user,GetWindowRect,HHN",%1,%2)
  703.  
  704. @Outline3@<:#241,9025>Define GetWindowText(hwnd, lpsz, cbMax)    dllcall("user,GetWindowText,HHCH", %1, %2, %3)
  705.  
  706. @Outline3@<:#241,9025>define IsIconic(hWnd) DllCall("user,IsIconic,HH", %1)
  707.  
  708. @Outline3@<:#241,9025>define LoadCursor(hwnd, lpcursor)        DllCall("user,LoadCursor,HHC",%1, %2)
  709.  
  710. @Outline3@<:#241,9025>Define MoveWindow() DllCall("User,MoveWindow,HHHHHHA",%1,%2,%3,%4,%5,%6)
  711.  
  712. @Outline3@<:#482,9025>define PeekMessage(lpmsg, hwnd, uFilterFirst, uFilterLast, fuRemove)    DllCall("User,PostMessage,ACHHHH",%1,%2,%3,%4, %5)
  713.  
  714. @Outline3@<:#241,9025>Define PostMessage() DllCall("User,PostMessage,HHHHJ",%1,%2,%3,%4)
  715.  
  716. @Outline3@<:#482,9025>Define SendMessage(hwnd, message, wparam, lparao) Dllcall("user,SendMessage,JHHHJ", %1, %2, %3, %4)
  717.  
  718. @Outline3@<:#482,9025>Define SendMessageC(hwnd, message, wparam, lparao) Dllcall("user,SendMessage,HHHHC", %1, %2, %3, %4)
  719.  
  720. @Outline3@<:#241,9025>define SetCursor(hwnd)        DllCall("user,SetCursor,HH",%1)
  721.  
  722. @Outline3@<:#241,9025>Define SetFocus() DllCall("user,SetFocus,HH",%1)
  723.  
  724. @Outline3@<:#482,9025>define SetWindowPos(hwnd, hwndinsertafter, x, y, cx, cy, wflags) DllCall("user,SetWindowPos,HHHHHHHI", %1, %2, %3, %4, %5, %6, %7)
  725.  
  726. @Outline3@<:#241,9025>Define ShowWindow(hWnd, stuff) DllCall("user,ShowWindow,HHH", %1, %2)
  727.  
  728. @Outline2@<:#241,9025>'menu pick defines
  729.  
  730. @Outline3@<:#241,9025>define FLW_COPY        142
  731.  
  732. @Outline3@<:#241,9025>define FLW_CURVEDTEXT    307
  733.  
  734. @Outline3@<:#241,9025>define FLW_CURRENTPAGE    228
  735.  
  736. @Outline3@<:#241,9025>define FLW_EDITCLEAR    145
  737.  
  738. @Outline3@<:#241,9025>define FLW_INBW        269
  739.  
  740. @Outline3@<:#241,9025>define FLW_INCOLOR        270
  741.  
  742. @Outline3@<:#241,9025>define FLW_NEW        61
  743.  
  744. @Outline3@<:#241,9025>define FLW_NEWPAGE    241
  745.  
  746. @Outline3@<:#241,9025>define FLW_ORGCHART    5202
  747.  
  748. @Outline3@<:#241,9025>define FLW_OUTLINER    230
  749.  
  750. @Outline3@<:#241,9025>define FLW_PAGESORTER    229
  751.  
  752. @Outline3@<:#241,9025>define FLW_PASTE        144
  753.  
  754. @Outline3@<:#241,9025>define FLW_REMOVEPAGE    242
  755.  
  756. @Outline3@<:#241,9025>define FLW_SCREENSHOWRUN    481
  757.  
  758. @Outline3@<:#241,9025>define FLW_SELECTNONE    166
  759.  
  760. @Outline3@<:#241,9025>define FLW_SELECTALL    165
  761.  
  762. @Outline3@<:#241,9025>define FLW_SPEAKERNOTES    253
  763.  
  764. @Outline2@<:#241,9025>'api defines
  765.  
  766. @Outline3@<:#241,9025>Define GW_CHILD        5
  767.  
  768. @Outline3@<:#241,9025>Define GW_HWNDNEXT    2
  769.  
  770. @Outline3@<:#241,9025>define MF_BYPOSITION    0x0400
  771.  
  772. @Outline3@<:#241,9025>define NO_DUPS    0
  773.  
  774. @Outline3@<:#241,9025>define PM_NOREMOVE    0x0000
  775.  
  776. @Outline3@<:#241,9025>define SWP_NOMOVE        0x0002
  777.  
  778. @Outline3@<:#241,9025>define WM_COMMAND    0x0111
  779.  
  780. @Outline3@<:#241,9025>define WM_GETTEXT           0x000D
  781.  
  782. @Outline3@<:#241,9025>define WM_MDIMAXIMIZE    0x0225
  783.  
  784. @Outline3@<:#241,9025>Define WM_SETREDRAW            0x000B
  785.  
  786. @Function@<:#284,9025>function FLWcurve()
  787.  
  788. @Outline2@<:#241,9025>if GetOpenFileCount() << 1
  789.  
  790. @Outline2@<:#241,9025>    exit function
  791.  
  792. @Outline2@<:#241,9025>endif
  793.  
  794. @Outline2@<:#241,9025>TextToCurve=Curshade$()
  795.  
  796. @Outline2@<:#241,9025>rmac=GetRunningMacroFile$()
  797.  
  798. @Outline2@<:#241,9025>DlgKeyInterrupt(VK_F1, "{rmac}!helper")
  799.  
  800. @Outline2@<:#241,9025>filledit (8000, TextToCurve)
  801.  
  802. @Outline2@<:#241,9025>box=dialogbox(".", "curvetext")
  803.  
  804. @Outline2@<:#241,9025>if box = 0
  805.  
  806. @Outline2@<:#241,9025>    exit function
  807.  
  808. @Outline2@<:#241,9025>endif
  809.  
  810. @Outline2@<:#241,9025>TextToCurve=GetDialogField$(8000)
  811.  
  812. @Outline2@<:#241,9025>ClipboardWrite(TextToCurve, 1)
  813.  
  814. @Outline2@<:#241,9025>'if TextToCurve = ""
  815.  
  816. @Outline2@<:#241,9025>'    message(err_notextshaded, MyAppName)
  817.  
  818. @Outline2@<:#241,9025>'    exit function
  819.  
  820. @Outline2@<:#241,9025>'endif
  821.  
  822. @Outline2@<:#241,9025>curvelen=len(TextToCurve)
  823.  
  824. @Outline2@<:#241,9025>onerror endit
  825.  
  826. @Outline2@<:#241,9025>oncancel endit
  827.  
  828. @Outline2@<:#241,9025>ignorekeyboard(2)
  829.  
  830. @Outline2@<:#241,9025>dim rect(4)
  831.  
  832. @Outline2@<:#241,9025>focusnow=GetFocus()
  833.  
  834. @Outline2@<:#241,9025>hFLW = h_LoadLotusApp(appname, appmodule);
  835.  
  836. @Outline2@<:#241,9025>'pause(002)
  837.  
  838. @Outline2@<:#241,9025>'singlestep(1)
  839.  
  840. @Outline2@<:#241,9025>if hFLW = 0
  841.  
  842. @Outline2@<:#241,9025>    return 0
  843.  
  844. @Outline2@<:#241,9025>endif
  845.  
  846. @Outline2@<:#241,9025>rmac = getrunningmacrofile$()
  847.  
  848. @Outline2@<:#241,9025>'get handles to everything
  849.  
  850. @Outline3@<:#241,9025>hwndpro = findwindow("amiprownda", 0)
  851.  
  852. @Outline3@<:#241,9025>hIconBar = FindWindow("SmartIconBar", 0)
  853.  
  854. @Outline3@<:#241,9025>' PMM 5/19/93
  855.  
  856. @Outline3@<:#241,9025>' disable the iconbar
  857.  
  858. @Outline3@<:#241,9025>if isiconic(hFLW)
  859.  
  860. @Outline3@<:#241,9025>    appmaximize(appname)
  861.  
  862. @Outline3@<:#241,9025>endif
  863.  
  864. @Outline3@<+@><:#241,9025>pause(002)
  865.  
  866. @Outline2@<:#241,9025>dim size(4)
  867.  
  868. @Outline2@<:#241,9025>getwindowrect(hFLW, &size)
  869.  
  870. @Outline2@<:#241,9025>movewindow(hFLW, 0, -1160, 768, 80, 1)
  871.  
  872. @Outline2@<:#241,9025>openfile()
  873.  
  874. @Outline2@<:#241,9025>EnableWindow(hwndpro, 0)
  875.  
  876. @Outline2@<:#241,9025>EnableWindow(hIconBar, 0)
  877.  
  878. @Outline2@<:#241,9025>activateapp(appname)
  879.  
  880. @Outline2@<:#241,9025>'AppRestore(appname)
  881.  
  882. @Outline2@<:#241,9025>'send the menu picks
  883.  
  884. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_CURRENTPAGE, "")
  885.  
  886. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_SELECTALL, "")
  887.  
  888. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_EDITCLEAR, "")
  889.  
  890. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_SELECTNONE, "")
  891.  
  892. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_PASTE, "")
  893.  
  894. @Outline3@<:#241,9025>statusbarmsg(CurvingStatusMsg)
  895.  
  896. @Outline3@<+@><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_INBW, "")
  897.  
  898. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_CURVEDTEXT, "")
  899.  
  900. @Outline4@<:I0,0,0,0><:S+-1><:#241,9025>pause(005)
  901.  
  902. @Outline4@<:#241,9025>defstr titletext;
  903.  
  904. @Outline4@<:#241,9025>while GetActiveWindow() != hflw
  905.  
  906. @Outline4@<:#241,9025>    hcancel=GetDlgItem(GetActiveWindow(), 2)
  907.  
  908. @Outline4@<:#241,9025>    hpreview=GetDlgItem(GetActiveWindow(), 10)
  909.  
  910. @Outline4@<:#241,9025>    GetWindowText(GetActiveWindow(), &titletext, 50)
  911.  
  912. @Outline4@<:#241,9025>    if titletext = CurvedTextDlgText
  913.  
  914. @Outline4@<:#241,9025>        EnableWindow(hcancel, 0)
  915.  
  916. @Outline4@<:I0,0,0,0><:S+-1><:#241,9025>        EnableWindow(hpreview, 0)
  917.  
  918. @Outline4@<:#241,9025>    endif
  919.  
  920. @Outline4@<:#241,9025>    pause(002)
  921.  
  922. @Outline4@<:#241,9025>wend
  923.  
  924. @Outline3@<:#241,9025>pause(005)
  925.  
  926. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>pause(005)
  927.  
  928. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_COPY, "")
  929.  
  930. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>PostMessage(hFLW, WM_COMMAND, FLW_INCOLOR, "")
  931.  
  932. @Outline3@<+@><:I0,0,0,0><:S+-1><:#241,9025>sendkeys("<[>esc]")
  933.  
  934. @Outline2@<:#241,9025>pause(008)
  935.  
  936. @Outline2@<:#241,9025>if curshade$()
  937.  
  938. @Outline2@<:#241,9025>    type("<[>del]")    'get rid of selected text
  939.  
  940. @Outline2@<:#241,9025>endif
  941.  
  942. @Outline2@<:#241,9025>type("<[>esc]<[>esc]<[>esc]")    'if we're in something (like a frame) get us out.
  943.  
  944. @Outline2@<+@><:I0,0,0,0><:S+-1><:#241,9025>pastespecial(pasteformat)
  945.  
  946. @Outline2@<:#241,9025>FrameModInit( )
  947.  
  948. @Outline2@<:#241,9025>FrameModLines(0 1 1 0 16777215 0 0 0 0 0  )
  949.  
  950. @Outline2@<:#241,9025>FrameModType(536871040 0 ""   )
  951.  
  952. @Outline2@<:#241,9025>FrameModFinish( )
  953.  
  954. @Outline2@<+@><:#241,9025>endit:
  955.  
  956. @Outline2@<+@><:#241,9025>activateapp("")
  957.  
  958. @Outline2@<:#241,9025>cx = size(3) - size(1)
  959.  
  960. @Outline2@<:#241,9025>cy = size(4) - size(2)
  961.  
  962. @Outline2@<:#241,9025>movewindow(hFLW, size(1), size(2), cx, cy, 1)
  963.  
  964. @Outline2@<+@><:I0,0,0,0><:S+-1><:#241,9025>EnableWindow(hwndpro, 1)
  965.  
  966. @Outline2@<+@><:I0,0,0,0><:S+-1><:#241,9025>EnableWindow(hIconBar, 1)    ' pmm 5/19/03 -  enable the icon bar
  967.  
  968. @Outline2@<+@><:I0,0,0,0><:S+-1><:#241,9025>SetFocus(focusnow)
  969.  
  970. @Outline2@<:I0,0,0,0><:S+-1><:#241,9025>statusbarmsg("")
  971.  
  972. @Outline2@<+@><:I0,0,0,0><:S+-1><:#241,9025>end function
  973.  
  974. @Function@<:#284,9025>function h_LoadLotusApp(name, module)
  975.  
  976. @Outline2@<:#241,9025>onerror endit
  977.  
  978. @Outline2@<:#241,9025>oncancel endit
  979.  
  980. @Outline2@<:#241,9025>hwnd =  findwindow(appclass, 0)
  981.  
  982. @Outline2@<:#241,9025>if hwnd = 0
  983.  
  984. @Outline2@<:#241,9025>    app = GetProfileString$(LotusAppSection, name, LotusIniFile)
  985.  
  986. @Outline2@<:#241,9025>    if app <<<;> ""
  987.  
  988. @Outline2@<:#241,9025>        offset1stspace=strchr(1, app, " ")
  989.  
  990. @Outline2@<:#241,9025>        app = strfield$(app, 1, " ")
  991.  
  992. @Outline2@<:#241,9025>        lotusappname=MID$(app, offset1stspace, len(app))    'DEZ
  993.  
  994. @Outline2@<:#241,9025>        'lotusappname = strfield$(app, 2, " ")
  995.  
  996. @Outline2@<:#241,9025>        if exec(app, "/q") << 32
  997.  
  998. @Outline2@<:#241,9025>            'MsgBox(err_cantlaunchapp)
  999.  
  1000. @Outline2@<:#241,9025>            call salesmsgsmm(3)
  1001.  
  1002. @Outline2@<:#241,9025>            return 0
  1003.  
  1004. @Outline2@<:#241,9025>        endif
  1005.  
  1006. @Outline2@<:#241,9025>        pause(004)
  1007.  
  1008. @Outline2@<:#241,9025>    endif
  1009.  
  1010. @Outline2@<:#241,9025>    hwnd = findwindow(appclass, 0)
  1011.  
  1012. @Outline2@<:#241,9025>    if hwnd = 0
  1013.  
  1014. @Outline2@<:#241,9025>        call salesmsgsmm(3)
  1015.  
  1016. @Outline2@<:#241,9025>    endif
  1017.  
  1018. @Outline2@<:#241,9025>    return hwnd
  1019.  
  1020. @Outline2@<:#241,9025>endif
  1021.  
  1022. @Outline2@<:#241,9025>endit:
  1023.  
  1024. @Outline2@<:#241,9025>return hwnd
  1025.  
  1026. @Outline2@<:#241,9025>end function
  1027.  
  1028. @Function@<:#284,9025>function openfile()
  1029.  
  1030. @Outline2@<:#241,9025>'set variables
  1031.  
  1032. @Outline3@<:#241,9025>hflw=findwindow(appclass, 0)
  1033.  
  1034. @Outline3@<:#241,9025>isitopen=onmenu(FLW_WINDOWMENU, orgfilename, 0)
  1035.  
  1036. @Outline3@<:#241,9025>amidir=GetAmiDirectory$()
  1037.  
  1038. @Outline3@<:#241,9025>dde_openit = strcat$("<[><[>StdOpenDocument(", amidir, orgfilename, ")]")
  1039.  
  1040. @Outline3@<:#241,9025>dde_maxit = strcat$("<[><[>Maximize(", amidir, orgfilename, ")]")
  1041.  
  1042. @Outline2@<:#241,9025>ID = DDEInitiate(appname, "system")
  1043.  
  1044. @Outline2@<:#241,9025>if isitopen = FILE_ALREADYOPEN
  1045.  
  1046. @Outline2@<:#241,9025>    goto maxit
  1047.  
  1048. @Outline2@<:#241,9025>endif
  1049.  
  1050. @Outline2@<:#241,9025>res = DDEExecute(id, dde_openit) ' comm
  1051.  
  1052. @Outline2@<:#241,9025>maxit:
  1053.  
  1054. @Outline2@<:#241,9025>pause(003)
  1055.  
  1056. @Outline2@<:#241,9025>res = DDEExecute(id, dde_maxit) ' comm
  1057.  
  1058. @Outline2@<:#241,9025>if id <;> 0
  1059.  
  1060. @Outline2@<:#241,9025>    DDETerminate(id)
  1061.  
  1062. @Outline2@<:#241,9025>endif
  1063.  
  1064. @Outline2@<:#241,9025>'childfocus=GetFocus()
  1065.  
  1066. @Outline2@<:#241,9025>'mdiclient=GetParent(childfocus)
  1067.  
  1068. @Outline2@<:#241,9025>'AppSendMessage(mdiclient, WM_MDIMAXIMIZE, childfocus, "")
  1069.  
  1070. @Outline2@<:#241,9025>end function
  1071.  
  1072. @Function@<:#284,9025>function MyPostMessage(hwnd, msg, wparam, lparam)
  1073.  
  1074. @Outline2@<:#241,9025>hflw=findwindow(appclass, 0)
  1075.  
  1076. @Outline2@<:#241,9025>PostMessage(hwnd, msg, wparam, lparam)
  1077.  
  1078. @Outline2@<:#241,9025>pause(005)
  1079.  
  1080. @Outline2@<:#241,9025>while GetActiveWindow() != hflw
  1081.  
  1082. @Outline2@<:#241,9025>    pause(002)
  1083.  
  1084. @Outline2@<:#241,9025>wend
  1085.  
  1086. @Outline2@<:#241,9025>end function
  1087.  
  1088. @Function@<:#284,9025>function onmenu(menu, item, casc)
  1089.  
  1090. @Outline2@<:#241,9025>isthistheone=0
  1091.  
  1092. @Outline2@<:#241,9025>defstr menuitemnum;
  1093.  
  1094. @Outline2@<:#241,9025>defstr cascmenuitemnum;
  1095.  
  1096. @Outline2@<:#241,9025>hwnd=findwindow(appclass, 0)
  1097.  
  1098. @Outline2@<:#241,9025>hmenubar=GetMenu(hwnd)
  1099.  
  1100. @Outline2@<:#241,9025>'get handle to menu
  1101.  
  1102. @Outline3@<:#241,9025>nummenus=getmenuitemcount(hmenubar)
  1103.  
  1104. @Outline3@<:#241,9025>if nummenus << 1
  1105.  
  1106. @Outline3@<:#241,9025>    msgbox(err_cantfindmenubar)
  1107.  
  1108. @Outline3@<:#241,9025>    goto out
  1109.  
  1110. @Outline3@<:#241,9025>endif
  1111.  
  1112. @Outline3@<:#241,9025>for i = 0 to nummenus - 1
  1113.  
  1114. @Outline3@<:#241,9025>    GetMenuString(hmenubar, i, &isthistheone,  25, MF_BYPOSITION)
  1115.  
  1116. @Outline3@<:#241,9025>    menulen=len(menu)
  1117.  
  1118. @Outline3@<:#241,9025>    if ucase$(left$(isthistheone, menulen)) = ucase$(left$(menu, menulen))
  1119.  
  1120. @Outline3@<:#241,9025>        menunum=i
  1121.  
  1122. @Outline3@<:#241,9025>    endif
  1123.  
  1124. @Outline3@<:#241,9025>next
  1125.  
  1126. @Outline3@<:#241,9025>hmenu=getsubmenu(hmenubar, menunum)
  1127.  
  1128. @Outline2@<:#241,9025>'get position or handle of item
  1129.  
  1130. @Outline3@<:#241,9025>'get position of item
  1131.  
  1132. @Outline4@<:#241,9025>    extra = 0
  1133.  
  1134. @Outline4@<:#241,9025>    menuitemnum = 0
  1135.  
  1136. @Outline4@<:#241,9025>    cascmenuitemnum = 0
  1137.  
  1138. @Outline4@<:#241,9025>    nummenuitems=getmenuitemcount(hmenu)
  1139.  
  1140. @Outline4@<:#241,9025>    if nummenuitems << 1
  1141.  
  1142. @Outline4@<:#241,9025>        msgbox(err_cantfindmenu)
  1143.  
  1144. @Outline4@<:#241,9025>        goto out
  1145.  
  1146. @Outline4@<:#241,9025>    endif
  1147.  
  1148. @Outline4@<:#241,9025>    for i= 0 to (nummenuitems - 1)
  1149.  
  1150. @Outline4@<:#241,9025>        GetMenuString(hmenu, i, &isthistheone,  25, MF_BYPOSITION)
  1151.  
  1152. @Outline4@<:#241,9025>        itemlen=len(item)
  1153.  
  1154. @Outline4@<:#241,9025>        length=len(isthistheone)
  1155.  
  1156. @Outline4@<:#241,9025>        if length << 1 and menuitemnum = 0
  1157.  
  1158. @Outline4@<:#241,9025>            extra=extra + 1
  1159.  
  1160. @Outline4@<:#241,9025>        endif
  1161.  
  1162. @Outline4@<:#241,9025>        text=ucase$(isthistheone)
  1163.  
  1164. @Outline4@<:#241,9025>        pattern=ucase$(item)
  1165.  
  1166. @Outline4@<:#241,9025>        'if ucase$(left$(item, itemlen)) = ucase$(left$(isthistheone, itemlen))
  1167.  
  1168. @Outline4@<:#241,9025>        if Instr(1, Text, Pattern) != 0
  1169.  
  1170. @Outline4@<:#241,9025>            return FILE_ALREADYOPEN
  1171.  
  1172. @Outline4@<:#241,9025>            menuitemnum=i
  1173.  
  1174. @Outline4@<:#241,9025>            break
  1175.  
  1176. @Outline4@<:#241,9025>        endif
  1177.  
  1178. @Outline4@<:#241,9025>    next
  1179.  
  1180. @Outline4@<:#241,9025>    'couldn't find it
  1181.  
  1182. @Outline4@<:#241,9025>    return FILE_NOTOPEN
  1183.  
  1184. @Outline4@<:#241,9025>    menuitemnum=menuitemnum - extra
  1185.  
  1186. @Outline3@<:#241,9025>'get handle to casc menu
  1187.  
  1188. @Outline4@<:#241,9025>numcascmenus=getmenuitemcount(hmenu)
  1189.  
  1190. @Outline4@<:#241,9025>if numcascmenus << 1
  1191.  
  1192. @Outline4@<:#241,9025>    goto out
  1193.  
  1194. @Outline4@<:#241,9025>endif
  1195.  
  1196. @Outline4@<:#241,9025>for i = 0 to numcascmenus - 1
  1197.  
  1198. @Outline4@<:#241,9025>    GetMenuString(hmenu, i, &isthistheone,  25, MF_BYPOSITION)
  1199.  
  1200. @Outline4@<:#241,9025>    cascmenulen=len(item)
  1201.  
  1202. @Outline4@<:#241,9025>    if ucase$(left$(isthistheone, cascmenulen)) = ucase$(left$(item, cascmenulen))
  1203.  
  1204. @Outline4@<:#241,9025>        cascmenunum=i
  1205.  
  1206. @Outline4@<:#241,9025>    endif
  1207.  
  1208. @Outline4@<:#241,9025>next
  1209.  
  1210. @Outline4@<:#241,9025>hcascmenu=getsubmenu(hmenu, cascmenunum)
  1211.  
  1212. @Outline3@<:#241,9025>'get position of casc item
  1213.  
  1214. @Outline4@<:#241,9025>    extra = 0
  1215.  
  1216. @Outline4@<:#241,9025>    numcascmenuitems=getmenuitemcount(hcascmenu)
  1217.  
  1218. @Outline4@<:#241,9025>    if numcascmenuitems << 1
  1219.  
  1220. @Outline4@<:#241,9025>        goto out
  1221.  
  1222. @Outline4@<:#241,9025>    endif
  1223.  
  1224. @Outline4@<:#241,9025>    for i= 0 to (numcascmenuitems - 1)
  1225.  
  1226. @Outline4@<:#241,9025>        GetMenuString(hcascmenu, i, &isthistheone,  25, MF_BYPOSITION)
  1227.  
  1228. @Outline4@<:#241,9025>        cascitemlen=len(casc)
  1229.  
  1230. @Outline4@<:#241,9025>        length=len(isthistheone)
  1231.  
  1232. @Outline4@<:#241,9025>        if length << 1 and cascmenuitemnum = 0
  1233.  
  1234. @Outline4@<:#241,9025>            extra=extra + 1
  1235.  
  1236. @Outline4@<:#241,9025>        endif
  1237.  
  1238. @Outline4@<:#241,9025>        if ucase$(left$(casc, cascitemlen)) = ucase$(left$(isthistheone, cascitemlen))
  1239.  
  1240. @Outline4@<:#241,9025>            cascmenuitemnum=i
  1241.  
  1242. @Outline4@<:#241,9025>            break
  1243.  
  1244. @Outline4@<:#241,9025>        endif
  1245.  
  1246. @Outline4@<:#241,9025>    next
  1247.  
  1248. @Outline4@<:#241,9025>    cascmenuitemnum=cascmenuitemnum - extra
  1249.  
  1250. @Outline2@<:#241,9025>'return numbers
  1251.  
  1252. @Outline3@<:#241,9025>out:
  1253.  
  1254. @Outline3@<:#241,9025>getdist=strcat$(menuitemnum, ", ", cascmenuitemnum, ",",  casc)
  1255.  
  1256. @Outline3@<:#241,9025>hourglass(0)
  1257.  
  1258. @Outline2@<:#241,9025>end function<:>
  1259.  
  1260. @Function@<:#284,9025>function helper()
  1261.  
  1262. @Outline2@<:#241,9025>prohWnd = FindWindow("AmiProWndA", 0)
  1263.  
  1264. @Outline2@<:#241,9025>fullhelpfile = strcat$(GetAmiDirectory$(), helpfile)
  1265.  
  1266. @Outline2@<:#241,9025>WinHelp (prohWnd, fullhelpfile, HELP_CONTEXT, helpnum)    
  1267.  
  1268. @Outline2@<:#241,9025>end function
  1269.  
  1270. @Function@<:#284,9025>DIALOG    curvetext
  1271.  
  1272. @Outline2@<:#241,9025>-2134376448    4    52    64    190    44    ""    "AmiDialog"    "Curved Text"
  1273.  
  1274. @Outline2@<:#241,9025>FONT 8 "Helv"
  1275.  
  1276. @Outline2@<:#241,9025>6    20    126    12    8000    1350631552    "edit"    ""    0 
  1277.  
  1278. @Outline2@<:#241,9025>144    4    40    14    1    1342373889    "button"    "OK"    0 
  1279.  
  1280. @Outline2@<:#241,9025>144    22    40    14    2    1342373888    "button"    "Cancel"    0 
  1281.  
  1282. @Outline2@<:#241,9025>6    6    114    10    1000    1342177280    "static"    "Type the text you wish to curve."    0 
  1283.  
  1284. @Outline2@<:#241,9025>END DIALOG
  1285.  
  1286. >
  1287.  
  1288. [Embedded]
  1289. 00023999
  1290. >
  1291. [macsum] 7
  1292. FLWcurve 0 0 16 104
  1293. h_LoadLotusApp 2266 2 5 198
  1294. openfile 2814 0 8 225
  1295. MyPostMessage 3238 4 2 247
  1296. onmenu 3468 3 24 255
  1297. helper 5769 0 3 341
  1298. curvetext 5936 0 -1 346
  1299. [macse]
  1300. 14 FLWcurve
  1301. 0 1050
  1302. 13
  1303. 5 1
  1304. 18 5
  1305. 11 00000061
  1306. 6 0
  1307. 15
  1308. 9
  1309. 0 24
  1310. 13
  1311. 8 1
  1312. 0 802
  1313. 13
  1314. 8 2
  1315. 0 47 112 "{2}!helper"
  1316. 0 31 8000 "{1}"
  1317. 0 26 "." "curvetext"
  1318. 13
  1319. 8 3
  1320. 6 3
  1321. 5 0
  1322. 18 0
  1323. 11 00000204
  1324. 6 0
  1325. 15
  1326. 9
  1327. 0 27 8000
  1328. 13
  1329. 8 1
  1330. 0 1038 "{1}" 1
  1331. 0 14 "{1}"
  1332. 13
  1333. 8 4
  1334. 20 00001968
  1335. 19 00001968
  1336. 0 32 2
  1337. 5 4
  1338. 21 5 [X]
  1339. 0 284 "user,GetFocus,H"
  1340. 13
  1341. 8 6
  1342. 16 h_LoadLotusApp "FLW" "FLWMAIN"
  1343. 13
  1344. 8 7
  1345. 6 7
  1346. 5 0
  1347. 18 0
  1348. 11 00000429
  1349. 5 0
  1350. 15
  1351. 9
  1352. 0 802
  1353. 13
  1354. 8 2
  1355. 0 284 "user,FindWindow,HCC" "amiprownda" 0
  1356. 13
  1357. 8 8
  1358. 0 284 "user,FindWindow,HCC" "SmartIconBar" 0
  1359. 13
  1360. 8 9
  1361. 0 284 "user,IsIconic,HH" "{7}"
  1362. 13
  1363. 11 00000616
  1364. 0 1029 "FLW"
  1365. 0 274 002
  1366. 5 4
  1367. 21 10 [X]
  1368. 0 284 "user,GetWindowRect,HHN" "{7}" &10
  1369. 0 284 "User,MoveWindow,HHHHHHA" "{7}" 0 -1160 768 80 1
  1370. 16 openfile
  1371. 0 284 "user,EnableWindow,HHH" "{8}" 0
  1372. 0 284 "user,EnableWindow,HHH" "{9}" 0
  1373. 0 38 "FLW"
  1374. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 228 ""
  1375. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 165 ""
  1376. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 145 ""
  1377. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 166 ""
  1378. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 144 ""
  1379. 0 789 "Now curving {4} characters.  This may take a moment."
  1380. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 269 ""
  1381. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 307 ""
  1382. 0 274 005
  1383. 0 284 "user,GetActiveWindow,H"
  1384. 13
  1385. 6 7
  1386. 18 1
  1387. 11 00001663
  1388. 0 284 "user,GetActiveWindow,H"
  1389. 13
  1390. 0 44 [X] 2
  1391. 13
  1392. 8 12
  1393. 0 284 "user,GetActiveWindow,H"
  1394. 13
  1395. 0 44 [X] 10
  1396. 13
  1397. 8 13
  1398. 0 284 "user,GetActiveWindow,H"
  1399. 13
  1400. 0 284 "user,GetWindowText,HHCH" [X] &11 50
  1401. 6 11
  1402. 7 "Curved Text"
  1403. 18 0
  1404. 11 00001639
  1405. 0 284 "user,EnableWindow,HHH" "{12}" 0
  1406. 0 284 "user,EnableWindow,HHH" "{13}" 0
  1407. 0 274 002
  1408. 10 00001260
  1409. 0 274 005
  1410. 0 274 005
  1411. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 142 ""
  1412. 0 284 "User,PostMessage,HHHHJ" "{7}" 273 270 ""
  1413. 0 36 "[27]"
  1414. 0 274 008
  1415. 0 24
  1416. 13
  1417. 11 00001842
  1418. 0 6 "[46]"
  1419. 0 6 "[27][27][27]"
  1420. 2 588 1 "Windows Metafile"
  1421. 2 421 1
  1422. 2 416 1 0 1 1 0 16777215 0 0 0 0 0
  1423. 2 417 1 536871040 0 ""
  1424. 2 420 1
  1425. 0 38 ""
  1426. 5 3
  1427. 22 10
  1428. 5 1
  1429. 22 10
  1430. 3 1
  1431. 8 14
  1432. 5 4
  1433. 22 10
  1434. 5 2
  1435. 22 10
  1436. 3 1
  1437. 8 15
  1438. 5 1
  1439. 22 10
  1440. 5 2
  1441. 22 10
  1442. 0 284 "User,MoveWindow,HHHHHHA" "{7}" [X] [X] "{14}" "{15}" 1
  1443. 0 284 "user,EnableWindow,HHH" "{8}" 1
  1444. 0 284 "user,EnableWindow,HHH" "{9}" 1
  1445. 0 284 "user,SetFocus,HH" "{6}"
  1446. 0 789 ""
  1447. 6 0
  1448. 15
  1449. 9
  1450. 14 h_LoadLotusApp
  1451. 20 00000524
  1452. 19 00000524
  1453. 0 284 "user,FindWindow,HCC" "flwapp" 0
  1454. 13
  1455. 8 3
  1456. 6 3
  1457. 5 0
  1458. 18 0
  1459. 11 00000524
  1460. 0 286 "Lotus Applications" "{0}" "lotus.ini"
  1461. 13
  1462. 8 4
  1463. 6 4
  1464. 7 ""
  1465. 18 1
  1466. 11 00000406
  1467. 0 13 1 "{4}" " "
  1468. 13
  1469. 8 5
  1470. 0 20 "{4}" 1 " "
  1471. 13
  1472. 8 4
  1473. 0 14 "{4}"
  1474. 13
  1475. 0 15 "{4}" "{5}" [X]
  1476. 13
  1477. 8 6
  1478. 0 22 "{4}" "/q"
  1479. 13
  1480. 5 32
  1481. 18 5
  1482. 11 00000395
  1483. 16 lotuspal.smm!salesmsg 3
  1484. 5 0
  1485. 15
  1486. 9
  1487. 0 274 004
  1488. 0 284 "user,FindWindow,HCC" "flwapp" 0
  1489. 13
  1490. 8 3
  1491. 6 3
  1492. 5 0
  1493. 18 0
  1494. 11 00000512
  1495. 16 lotuspal.smm!salesmsg 3
  1496. 6 3
  1497. 15
  1498. 9
  1499. 6 3
  1500. 15
  1501. 9
  1502. 6 2
  1503. 15
  1504. 9
  1505. 14 openfile
  1506. 0 284 "user,FindWindow,HCC" "flwapp" 0
  1507. 13
  1508. 8 1
  1509. 16 onmenu "&Window" "ONEORG.PRE" 0
  1510. 13
  1511. 8 2
  1512. 0 798
  1513. 13
  1514. 8 3
  1515. 0 16 "[[StdOpenDocument(" "{3}" "ONEORG.PRE" ")]"
  1516. 13
  1517. 8 4
  1518. 0 16 "[[Maximize(" "{3}" "ONEORG.PRE" ")]"
  1519. 13
  1520. 8 5
  1521. 0 8 "FLW" "system"
  1522. 13
  1523. 8 6
  1524. 6 2
  1525. 5 1
  1526. 18 0
  1527. 11 00000307
  1528. 10 00000334
  1529. 0 11 "{6}" "{4}"
  1530. 13
  1531. 8 7
  1532. 0 274 003
  1533. 0 11 "{6}" "{5}"
  1534. 13
  1535. 8 7
  1536. 6 6
  1537. 5 0
  1538. 18 3
  1539. 11 00000412
  1540. 0 9 "{6}"
  1541. 6 0
  1542. 15
  1543. 9
  1544. 14 MyPostMessage
  1545. 0 284 "user,FindWindow,HCC" "flwapp" 0
  1546. 13
  1547. 8 5
  1548. 0 284 "User,PostMessage,HHHHJ" "{0}" "{1}" "{2}" "{3}"
  1549. 0 274 005
  1550. 0 284 "user,GetActiveWindow,H"
  1551. 13
  1552. 6 5
  1553. 18 1
  1554. 11 00000218
  1555. 0 274 002
  1556. 10 00000134
  1557. 6 4
  1558. 15
  1559. 9
  1560. 14 onmenu
  1561. 5 0
  1562. 8 4
  1563. 0 284 "user,FindWindow,HCC" "flwapp" 0
  1564. 13
  1565. 8 7
  1566. 0 284 "user,GetMenu,HH" "{7}"
  1567. 13
  1568. 8 8
  1569. 0 284 "user,GetMenuItemCount,HH" "{8}"
  1570. 13
  1571. 8 9
  1572. 6 9
  1573. 5 1
  1574. 18 5
  1575. 11 00000259
  1576. 0 3 "Cannot locate the menu bar." "Ami Pro Curved Text."
  1577. 10 00002237
  1578. 5 0
  1579. 8 10
  1580. 6 9
  1581. 5 1
  1582. 3 1
  1583. 6 10
  1584. 18 2
  1585. 12 00000358
  1586. 10 00000559
  1587. 5 1
  1588. 6 10
  1589. 3 0
  1590. 8 10
  1591. 10 00000270
  1592. 0 284 "user,GetMenuString,HHHFHH" "{8}" "{10}" &4 25 1024
  1593. 0 14 "{0}"
  1594. 13
  1595. 8 11
  1596. 0 806 "{4}" "{11}"
  1597. 13
  1598. 0 18 [X]
  1599. 13
  1600. 0 806 "{0}" "{11}"
  1601. 13
  1602. 0 18 [X]
  1603. 13
  1604. 18 0
  1605. 11 00000546
  1606. 6 10
  1607. 8 12
  1608. 10 00000323
  1609. 0 284 "user,GetSubMenu,HHH" "{8}" "{12}"
  1610. 13
  1611. 8 13
  1612. 5 0
  1613. 8 14
  1614. 5 0
  1615. 8 5
  1616. 5 0
  1617. 8 6
  1618. 0 284 "user,GetMenuItemCount,HH" "{13}"
  1619. 13
  1620. 8 15
  1621. 6 15
  1622. 5 1
  1623. 18 5
  1624. 11 00000798
  1625. 0 3 "Cannot locate the correct menu." "Ami Pro Curved Text."
  1626. 10 00002237
  1627. 5 0
  1628. 8 10
  1629. 6 15
  1630. 5 1
  1631. 3 1
  1632. 6 10
  1633. 18 2
  1634. 12 00000898
  1635. 10 00001219
  1636. 5 1
  1637. 6 10
  1638. 3 0
  1639. 8 10
  1640. 10 00000809
  1641. 0 284 "user,GetMenuString,HHHFHH" "{13}" "{10}" &4 25 1024
  1642. 0 14 "{1}"
  1643. 13
  1644. 8 16
  1645. 0 14 "{4}"
  1646. 13
  1647. 8 17
  1648. 6 17
  1649. 5 1
  1650. 18 5
  1651. 6 5
  1652. 5 0
  1653. 18 0
  1654. 1 1
  1655. 11 00001075
  1656. 6 14
  1657. 5 1
  1658. 3 0
  1659. 8 14
  1660. 0 18 "{4}"
  1661. 13
  1662. 8 18
  1663. 0 18 "{1}"
  1664. 13
  1665. 8 19
  1666. 0 808 1 "{18}" "{19}"
  1667. 13
  1668. 5 0
  1669. 18 1
  1670. 11 00001206
  1671. 5 1
  1672. 15
  1673. 9
  1674. 6 10
  1675. 8 5
  1676. 10 00001219
  1677. 10 00000863
  1678. 5 -1
  1679. 15
  1680. 9
  1681. 6 5
  1682. 6 14
  1683. 3 1
  1684. 8 5
  1685. 0 284 "user,GetMenuItemCount,HH" "{13}"
  1686. 13
  1687. 8 20
  1688. 6 20
  1689. 5 1
  1690. 18 5
  1691. 11 00001347
  1692. 10 00002237
  1693. 5 0
  1694. 8 10
  1695. 6 20
  1696. 5 1
  1697. 3 1
  1698. 6 10
  1699. 18 2
  1700. 12 00001447
  1701. 10 00001649
  1702. 5 1
  1703. 6 10
  1704. 3 0
  1705. 8 10
  1706. 10 00001358
  1707. 0 284 "user,GetMenuString,HHHFHH" "{13}" "{10}" &4 25 1024
  1708. 0 14 "{1}"
  1709. 13
  1710. 8 21
  1711. 0 806 "{4}" "{21}"
  1712. 13
  1713. 0 18 [X]
  1714. 13
  1715. 0 806 "{1}" "{21}"
  1716. 13
  1717. 0 18 [X]
  1718. 13
  1719. 18 0
  1720. 11 00001636
  1721. 6 10
  1722. 8 22
  1723. 10 00001412
  1724. 0 284 "user,GetSubMenu,HHH" "{13}" "{22}"
  1725. 13
  1726. 8 23
  1727. 5 0
  1728. 8 14
  1729. 0 284 "user,GetMenuItemCount,HH" "{23}"
  1730. 13
  1731. 8 24
  1732. 6 24
  1733. 5 1
  1734. 18 5
  1735. 11 00001807
  1736. 10 00002237
  1737. 5 0
  1738. 8 10
  1739. 6 24
  1740. 5 1
  1741. 3 1
  1742. 6 10
  1743. 18 2
  1744. 12 00001907
  1745. 10 00002216
  1746. 5 1
  1747. 6 10
  1748. 3 0
  1749. 8 10
  1750. 10 00001818
  1751. 0 284 "user,GetMenuString,HHHFHH" "{23}" "{10}" &4 25 1024
  1752. 0 14 "{2}"
  1753. 13
  1754. 8 25
  1755. 0 14 "{4}"
  1756. 13
  1757. 8 17
  1758. 6 17
  1759. 5 1
  1760. 18 5
  1761. 6 6
  1762. 5 0
  1763. 18 0
  1764. 1 1
  1765. 11 00002084
  1766. 6 14
  1767. 5 1
  1768. 3 0
  1769. 8 14
  1770. 0 806 "{2}" "{25}"
  1771. 13
  1772. 0 18 [X]
  1773. 13
  1774. 0 806 "{4}" "{25}"
  1775. 13
  1776. 0 18 [X]
  1777. 13
  1778. 18 0
  1779. 11 00002203
  1780. 6 10
  1781. 8 6
  1782. 10 00002216
  1783. 10 00001872
  1784. 6 6
  1785. 6 14
  1786. 3 1
  1787. 8 6
  1788. 0 16 "{5}" ", " "{6}" "," "{2}"
  1789. 13
  1790. 8 26
  1791. 0 296 0
  1792. 6 3
  1793. 15
  1794. 9
  1795. 14 helper
  1796. 0 284 "user,FindWindow,HCC" "AmiProWndA" 0
  1797. 13
  1798. 8 1
  1799. 0 798
  1800. 13
  1801. 0 16 [X] "HELPPACK.HLP"
  1802. 13
  1803. 8 2
  1804. 0 284 "user,WinHelp,HHCHJ" "{1}" "{2}" 1 125
  1805. 6 0
  1806. 15
  1807. 9
  1808. DIALOG curvetext
  1809. -2134376448 4 52 64 190 44 "" "AmiDialog" "Curved Text" 
  1810. FONT 8 "Helv" 
  1811. 6 20 126 12 8000 1350631552 "edit" "" 0 
  1812. 144 4 40 14 1 1342373889 "button" "OK" 0 
  1813. 144 22 40 14 2 1342373888 "button" "Cancel" 0 
  1814. 6 6 114 10 1000 1342177280 "static" "Type the text you wish to curve." 0 
  1815. 00024024
  1816.