home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / DISK1 / MACROS.CMZ / TYPECHAR.SMM < prev    next >
INI File  |  1993-03-14  |  24KB  |  1,677 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.     PostScript Printer
  13. [port]
  14.     FILE:
  15. [lang]
  16.     1
  17. [desc]
  18.     Wstawienie znak<\s>w ANSI do tekstu dokumentu.
  19.     Lotus Word Processing Division
  20.     Intermediate
  21.     OnKey, MenuItems
  22.     AutoRun
  23.     731032189
  24.     25
  25.     679901472
  26.     185
  27.     7
  28.     1205
  29.     7618
  30.     23
  31.     26
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     0
  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 Single
  57.     5
  58.     [fnt]
  59.         TimesNewRomanPS
  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.         0
  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 Single
  109.     0
  110.     0
  111. [tag]
  112.     Bullet
  113.     6
  114.     [fnt]
  115.         TimesNewRomanPS
  116.         240
  117.         0
  118.         49152
  119.     [algn]
  120.         1
  121.         1
  122.         0
  123.         288
  124.         288
  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.         <*0>
  150.         360
  151.         1
  152.         1
  153.         0
  154.         0
  155.         0
  156.         0
  157.     [nfmt]
  158.         272
  159.         1
  160.         2
  161.         .
  162.         ,
  163.         $
  164.     Bullet
  165.     0
  166.     0
  167. [tag]
  168.     Bullet 1
  169.     7
  170.     [fnt]
  171.         TimesNewRomanPS
  172.         240
  173.         0
  174.         49152
  175.     [algn]
  176.         1
  177.         1
  178.         288
  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.         <*5>
  206.         0
  207.         1
  208.         1
  209.         0
  210.         0
  211.         0
  212.         0
  213.     [nfmt]
  214.         280
  215.         1
  216.         2
  217.         .
  218.         ,
  219.         $
  220.     Bullet 1
  221.     0
  222.     0
  223. [tag]
  224.     Number List
  225.     8
  226.     [fnt]
  227.         TimesNewRomanPS
  228.         240
  229.         0
  230.         49152
  231.     [algn]
  232.         1
  233.         1
  234.         360
  235.         360
  236.         360
  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.         <*:>.
  262.         360
  263.         1
  264.         1
  265.         0
  266.         0
  267.         0
  268.         0
  269.     [nfmt]
  270.         272
  271.         1
  272.         2
  273.         .
  274.         ,
  275.         $
  276.     Number List
  277.     0
  278.     0
  279. [tag]
  280.     Subhead
  281.     9
  282.     [fnt]
  283.         TimesNewRomanPS
  284.         240
  285.         0
  286.         49155
  287.     [algn]
  288.         1
  289.         1
  290.         0
  291.         0
  292.         0
  293.     [spc]
  294.         33
  295.         273
  296.         1
  297.         72
  298.         72
  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.         2
  317.         
  318.         0
  319.         1
  320.         1
  321.         0
  322.         0
  323.         0
  324.         0
  325.     [nfmt]
  326.         272
  327.         1
  328.         2
  329.         .
  330.         ,
  331.         $
  332.     Subhead
  333.     0
  334.     0
  335. [tag]
  336.     Title
  337.     11
  338.     [fnt]
  339.         Arial MT
  340.         360
  341.         0
  342.         16385
  343.     [algn]
  344.         4
  345.         1
  346.         0
  347.         0
  348.         0
  349.     [spc]
  350.         33
  351.         446
  352.         1
  353.         144
  354.         72
  355.         1
  356.         100
  357.     [brk]
  358.         16
  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.     Title
  389.     0
  390.     0
  391. [lay]
  392.     Standard
  393.     513
  394.     [rght]
  395.         15840
  396.         12240
  397.         1
  398.         1440
  399.         1440
  400.         1
  401.         1440
  402.         1440
  403.         0
  404.         0
  405.         0
  406.         0
  407.         0
  408.         1
  409.         1
  410.         1440
  411.         10800
  412.         13
  413.         1
  414.         720
  415.         1
  416.         1440
  417.         1
  418.         2160
  419.         1
  420.         2880
  421.         1
  422.         3600
  423.         1
  424.         4320
  425.         1
  426.         5040
  427.         1
  428.         5760
  429.         1
  430.         6480
  431.         1
  432.         7200
  433.         1
  434.         7920
  435.         1
  436.         8640
  437.         1
  438.         9360
  439.     [hrght]
  440.     [lyfrm]
  441.         1
  442.         11200
  443.         0
  444.         0
  445.         12240
  446.         1440
  447.         0
  448.         1
  449.         3
  450.         1 0 0 0 0 0 0
  451.         0
  452.         0
  453.         3
  454.     [frmlay]
  455.         1440
  456.         12240
  457.         1
  458.         1440
  459.         0
  460.         1
  461.         360
  462.         1440
  463.         0
  464.         1
  465.         0
  466.         1
  467.         1
  468.         0
  469.         1
  470.         1440
  471.         10800
  472.         0
  473.     [txt]
  474. Modified by Marek G. B</y>czek from UNICORN Poland
  475.  
  476. >
  477.     [frght]
  478.     [lyfrm]
  479.         1
  480.         13248
  481.         0
  482.         14400
  483.         12240
  484.         15840
  485.         0
  486.         1
  487.         3
  488.         1 0 0 0 0 0 0
  489.         0
  490.         0
  491.         4
  492.     [frmlay]
  493.         15840
  494.         12240
  495.         1
  496.         1440
  497.         360
  498.         1
  499.         14400
  500.         1440
  501.         0
  502.         1
  503.         0
  504.         1
  505.         1
  506.         0
  507.         1
  508.         1440
  509.         10800
  510.         0
  511.     [txt]
  512. >
  513. [elay]
  514. [l1]
  515.     0
  516. [pg]
  517.     7
  518.     48 0 16 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
  519.     96 0 5 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
  520.     140 0 5 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
  521.     188 0 12 0 1 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  522.     233 0 22 0 1 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  523.     276 0 0 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
  524.     292 0 0 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
  525. [edoc]
  526. @Function@<:#278,9360>FUNCTION ANSICharacters()
  527.  
  528. <:#240,9360>ONERROR toast
  529.  
  530. <:#240,9360>ONCANCEL toast
  531.  
  532. <:#240,9360>IgnoreKeyboard(1)
  533.  
  534. <:#240,9360>DECLARE AddtoMenu(hdlg, id, text)
  535.  
  536. <:#240,9360>DECLARE AddShortcuts(hdlg, id, text)
  537.  
  538. <:#240,9360>DECLARE ClearMenu(hdlg, id, text)
  539.  
  540. <:#240,9360>DECLARE ClearShortcuts(hdlg, id, text)
  541.  
  542. <:#240,9360>DECLARE GenerateMenu()
  543.  
  544. <:#240,9360>DECLARE InsertChar(x)
  545.  
  546. <:#240,9360>DECLARE Replaceit(x)
  547.  
  548. <:#240,9360>define GetActiveWindow()    DllCall("user,GetActiveWindow,H")
  549.  
  550. <:#240,9360>define SetWindowText()        DllCall("user,SetWindowText,IHC", %1, %2)
  551.  
  552. <:#240,9360>define TitleBarMsg()        SetWindowText(GetActiveWindow(), %1)
  553.  
  554. <:#240,9360>define GetWindowText()        DllCall("user,GetWindowText,HHFH", %1, %2, %3)
  555.  
  556. <:#240,9360>StatusBarMsg("Dodaj<\j> nowe menu.")
  557.  
  558. <:#240,9360>GenerateMenu()
  559.  
  560. <:#240,9360>toast:
  561.  
  562. <:#240,9360>StatusBarMsg("")
  563.  
  564. <:#240,9360>'TitleBarMsg("Ami Pro")
  565.  
  566. <:#240,9360>HourGlass(0)
  567.  
  568. <:#240,9360>StatusBarMsg("")
  569.  
  570. @Function@<:#278,9360>END FUNCTION
  571.  
  572. <:#240,9360>
  573.  
  574. <:#240,9360>
  575.  
  576. @Function@<:#278,9360>FUNCTION ShowBox()
  577.  
  578. <:#240,9360>ONERROR toast
  579.  
  580. <:#240,9360>ONCANCEL toast
  581.  
  582. <:#240,9360>IgnoreKeyboard(1)
  583.  
  584. <:#240,9360>HourGlass(1)
  585.  
  586. <:#240,9360>StatusBarMsg("Znaki ANSI...")
  587.  
  588. <:#240,9360>MacName = GetRunningMacroFile$()
  589.  
  590. <:#240,9360>DIM Chars(256)
  591.  
  592. <:#240,9360>FOR I = 161 to 214
  593.  
  594. <:#240,9360>    Chars(I) = CHR$(I)
  595.  
  596. <:#240,9360>NEXT
  597.  
  598. <:#240,9360>FOR I = 216 to 246
  599.  
  600. <:#240,9360>    Chars(I) = CHR$(I)
  601.  
  602. <:#240,9360>NEXT
  603.  
  604. <:#240,9360>FOR I = 248 to 254
  605.  
  606. <:#240,9360>    Chars(I) = CHR$(I)
  607.  
  608. <:#240,9360>NEXT
  609.  
  610. <:#240,9360>Chars(255) = "<\>"
  611.  
  612. <:#240,9360>again:
  613.  
  614. <:#240,9360>HourGlass(1)
  615.  
  616. <:#240,9360>FillEdit(9000, &Chars)
  617.  
  618. <:#240,9360>HourGlass(0)
  619.  
  620. <:#240,9360>StatusBarMsg("")
  621.  
  622. <:#240,9360>SetDlgCallBack(53, "{MacName}!InsertaChar")
  623.  
  624. <:#240,9360>SetDlgCallBack(54, "{MacName}!AddtoMenu")
  625.  
  626. <:#240,9360>SetDlgCallBack(55, "{MacName}!ClearMenu")
  627.  
  628. <:#240,9360>SetDlgCallBack(57, "{MacName}!AddShortcuts")
  629.  
  630. <:#240,9360>Box = DialogBox(".", "ANSIBox")
  631.  
  632. <:#240,9360>x = GetDialogField$(9000)
  633.  
  634. <:#240,9360>IF Box = -1
  635.  
  636. <:#240,9360>    Message("Nie mog<\j> otworzy<\f> okna dialogowego!")
  637.  
  638. <:#240,9360>    GoTo toast
  639.  
  640. <:#240,9360>ELSEIF Box = 0
  641.  
  642. <:#240,9360>    GoTo toast
  643.  
  644. <:#240,9360>ELSEIF Box = 6
  645.  
  646. <:#240,9360>    Replaceit(x)
  647.  
  648. <:#240,9360>    GoTo again
  649.  
  650. <:#240,9360>ELSE
  651.  
  652. <:#240,9360>    InsertChar(x)
  653.  
  654. <:#240,9360>ENDIF
  655.  
  656. <:#240,9360>toast:
  657.  
  658. <:#240,9360>HourGlass(0)
  659.  
  660. <:#240,9360>StatusBarMsg("")
  661.  
  662. <:#240,9360>IgnoreKeyboard(0)
  663.  
  664. @Function@<:#278,9360>END FUNCTION
  665.  
  666. <:#240,9360>
  667.  
  668. <:#240,9360>
  669.  
  670. @Function@<:#278,9360>FUNCTION InsertaChar(hdlg, id, text)
  671.  
  672. <:#240,9360>ONCANCEL toast
  673.  
  674. <:#240,9360>ONERROR toast
  675.  
  676. <:#240,9360>IgnoreKeyboard(1)
  677.  
  678. <:#240,9360>x = GetDlgItemText(hdlg, 9000)
  679.  
  680. <:#240,9360>InsertChar(x)
  681.  
  682. <:#240,9360>toast:
  683.  
  684. <:#240,9360>HourGlass(0)
  685.  
  686. <:#240,9360>StatusBarMsg("")
  687.  
  688. @Function@<:#278,9360>END FUNCTION
  689.  
  690. <:#240,9360>
  691.  
  692. <:#240,9360>
  693.  
  694. @Function@<:#278,9360>FUNCTION AddShortcuts(hdlg, id, text)
  695.  
  696. <:#240,9360>MacFile = GetRunningMacroFile$()
  697.  
  698. <:#240,9360>x = GetDlgItemText(hdlg, 9000)
  699.  
  700. <:#240,9360>FillEdit(8001, "Wybierz klawisz aktywuj</y>cy dla {x}.")
  701.  
  702. <:#240,9360>SetDlgCallBack(53, "{MacFile}!ClearShortcuts")
  703.  
  704. <:#240,9360>ShortcutBox = DialogBox(".", "ShortcutBox")
  705.  
  706. <:#240,9360>IF ShortcutBox = -1
  707.  
  708. <:#240,9360>    Message("Nie mog<\j> otworzy<\f> okna dialogowego!")
  709.  
  710. <:#240,9360>    EXIT FUNCTION
  711.  
  712. <:#240,9360>ELSEIF ShortcutBox = 0
  713.  
  714. <:#240,9360>    Return (-1)
  715.  
  716. <:#240,9360>ENDIF
  717.  
  718. <:#240,9360>Ctrl = GetDialogField$(50)
  719.  
  720. <:#240,9360>Alt = GetDialogField$(51)
  721.  
  722. <:#240,9360>Shift = GetDialogField$(52)
  723.  
  724. <:#240,9360>Key = UCASE$(GetDialogField$(8000))
  725.  
  726. <:#240,9360>IF len(Key) <;> 1
  727.  
  728. <:#240,9360>    Message("Tylko pierwszy znak ""{Key}"" zostanie u</>yty.")
  729.  
  730. <:#240,9360>    Key = Left$(Key, 1)
  731.  
  732. <:#240,9360>ENDIF
  733.  
  734. <:#240,9360>used = FALSE
  735.  
  736. <:#240,9360>NumShortcuts = GetProfileString$("ANSIx", "NumShortcuts", "AMIPRO2.INI")
  737.  
  738. <:#240,9360>IF NumShortcuts <;>0 OR NumShortcuts != ""
  739.  
  740. <:#240,9360>    FOR I = 1 to NumShortcuts
  741.  
  742. <:#240,9360>        Shortcut = GetProfileString$("ANSIx", "Shortcut{I}", "AMIPRO2.INI")
  743.  
  744. <:#240,9360>        y = strfield$(Shortcut, 2, "</p>")
  745.  
  746. <:#240,9360>        Shortcut = strfield$(Shortcut, 1, "</p>")
  747.  
  748. <:#240,9360>        IF Shortcut = "{Key}{Ctrl}{Alt}{Shift}"
  749.  
  750. <:#240,9360>            used = TRUE
  751.  
  752. <:#240,9360>            IF Decide("Te klawisze zosta</s>y ju</> przydzielone dla  {y}.  Zamieni<\f>?")
  753.  
  754. <:#480,9360>                WriteProfileString("ANSIx", "Shortcut{I}", "{Key}</p>{Ctrl}</p>{Alt}</p>{Shift}</p>{x}", "AMIPRO2.INI")
  755.  
  756. <:#240,9360>            ELSE
  757.  
  758. <:#240,9360>                NumShortcuts = NumShortcuts + 1
  759.  
  760. <:#480,9360>                WriteProfileString("ANSIx", "NumShortcuts", NumShortcuts, "AMIPRO2.INI")
  761.  
  762. <:#480,9360>                WriteProfileString("ANSIx", "Shortcut{NumShortcuts}", "{Key}</p>{Ctrl}</p>{Alt}</p>{Shift}</p>{x}", "AMIPRO2.INI")
  763.  
  764. <:#240,9360>            ENDIF
  765.  
  766. <:#240,9360>        ENDIF
  767.  
  768. <:#240,9360>    NEXT
  769.  
  770. <:#240,9360>ELSE
  771.  
  772. <:#240,9360>    NumShortcuts = 0
  773.  
  774. <:#240,9360>ENDIF
  775.  
  776. <:#240,9360>IF not used
  777.  
  778. <:#240,9360>    NumShortcuts = NumShortcuts + 1
  779.  
  780. <:#240,9360>    WriteProfileString("ANSIx", "NumShortcuts", NumShortcuts, "AMIPRO2.INI")
  781.  
  782. <:#480,9360>            WriteProfileString("ANSIx", "Shortcut{NumShortcuts}", "{Key}</p>{Ctrl}</p>{Alt}</p>{Shift}</p>{x}", "AMIPRO2.INI")
  783.  
  784. <:#240,9360>ENDIF
  785.  
  786. <:#240,9360>Message("Klawisze aktywizuj</y>ce zosta</s>y zapisane.")
  787.  
  788. <:#240,9360>GenerateMenu()
  789.  
  790. @Function@<:#278,9360>END FUNCTION
  791.  
  792. <:#240,9360>
  793.  
  794. <:#240,9360>
  795.  
  796. @Function@<:#278,9360>FUNCTION ClearMenu(hdlg, id, text)
  797.  
  798. <:#240,9360>IF Decide("Usuniesz wszystkie dodatkowe komendy menu Znaki.  Czy chcesz tego?")
  799.  
  800. <:#240,9360>    WriteProfileString("ANSIx", "NumMenuItems", "", "AMIPRO2.INI")
  801.  
  802. <:#240,9360>    GenerateMenu()
  803.  
  804. ENDIF
  805.  
  806. @Function@<:#278,9360>END FUNCTION
  807.  
  808. <:#240,9360>
  809.  
  810. <:#240,9360>
  811.  
  812. @Function@<:#278,9360>FUNCTION Replaceit(x)
  813.  
  814. <:#240,9360>Ready:
  815.  
  816. <:#240,9360>y = CurShade$()
  817.  
  818. <:#240,9360>IF y != ""
  819.  
  820. <:#240,9360>    IF Decide("Czy chcesz zamieni<\f> wszystkie {y} z {x}?")
  821.  
  822. <:#240,9360>        Flag = ReplaceAll + FindFromPage1
  823.  
  824. <:#240,9360>        TYPE("<[>Left]")
  825.  
  826. <:#240,9360>        Replace(0, 0, Flag, "{y}", "{x}")
  827.  
  828. <:#240,9360>    ELSE
  829.  
  830. <:#240,9360>        InsertChar(x)
  831.  
  832. <:#240,9360>    ENDIF
  833.  
  834. <:#240,9360>ELSE
  835.  
  836. <:#240,9360>    UserControl("Zaznacz, kt<\s>re chcesz zamieni<\f> z {x}.")
  837.  
  838. <:#240,9360>    GoTo ready
  839.  
  840. <:#240,9360>ENDIF
  841.  
  842. @Function@<:#278,9360>END FUNCTION
  843.  
  844. <:#240,9360>
  845.  
  846. <:#240,9360>
  847.  
  848. @Function@<:#278,9360>FUNCTION AddtoMenu(hdlg, id, text)
  849.  
  850. <:#240,9360>x = GetDlgItemText(hdlg, 9000)
  851.  
  852. <:#240,9360>NumMenuItems = GetProfileString$("ANSIx", "NumMenuItems", "AMIPRO2.INI")
  853.  
  854. <:#240,9360>IF NumMenuItems <;> 0 OR NumMenuItems != ""
  855.  
  856. <:#240,9360>    FOR I = 1 to NumMenuItems
  857.  
  858. <:#240,9360>        MenuItem = GetProfileString$("ANSIx", "MenuItem{I}", "AMIPRO2.INI")
  859.  
  860. <:#240,9360>        IF MenuItem = x
  861.  
  862. <:#240,9360>            IF not Decide("Ten symbol znajduje si<\j> ju</> w menu. Kontynuowa<\f>?")
  863.  
  864. <:#240,9360>                EXIT FUNCTION
  865.  
  866. <:#240,9360>            ENDIF
  867.  
  868. <:#240,9360>        ENDIF
  869.  
  870. <:#240,9360>    NEXT
  871.  
  872. <:#240,9360>ELSE
  873.  
  874. <:#240,9360>    DIM MenuItems(1)
  875.  
  876. <:#240,9360>    NumMenuItems = 0
  877.  
  878. <:#240,9360>    I = 1
  879.  
  880. <:#240,9360>ENDIF
  881.  
  882. <:#240,9360>WriteProfileString("ANSIx", "NumMenuItems", (NumMenuItems + 1), "AMIPRO2.INI")
  883.  
  884. <:#240,9360>WriteProfileString("ANSIx", "MenuItem{I}", "{x}", "AMIPRO2.INI")
  885.  
  886. <:#240,9360>GenerateMenu()
  887.  
  888. @Function@<:#278,9360>END FUNCTION
  889.  
  890.  
  891.  
  892. @Function@FUNCTION ExitMacro()
  893.  
  894. MenuName = "&Znaki"
  895.  
  896. DeleteMenu(1, MenuName)
  897.  
  898. @Function@<:#278,9360>END FUNCTION
  899.  
  900. <:#240,9360>
  901.  
  902. <:#240,9360>
  903.  
  904. @Function@<:#278,9360>FUNCTION GenerateMenu()
  905.  
  906. <:#240,9360>MacName = GetRunningMacroFile$()
  907.  
  908. <:#240,9360>MenuName = "&Znaki"
  909.  
  910. <:#240,9360>NumShortcuts = GetProfileString$("ANSIx", "NumShortcuts", "AMIPRO2.INI")
  911.  
  912. <:#240,9360>IF NumShortcuts <;> 0 OR NumShortcuts != ""
  913.  
  914. <:#240,9360>    FOR I = 1 to NumShortcuts
  915.  
  916. <:#240,9360>        SC = GetProfileString$("ANSIx", "Shortcut{I}", "AMIPRO2.INI")
  917.  
  918. <:#240,9360>        Key = strfield$(SC, 1, "</p>")
  919.  
  920. <:#240,9360>        Key = ASC(Key)
  921.  
  922. <:#240,9360>        Ctrl = strfield$(SC, 2, "</p>")
  923.  
  924. <:#240,9360>        Alt = strfield$(SC, 3, "</p>")
  925.  
  926. <:#240,9360>        Shift = strfield$(SC, 4, "</p>")
  927.  
  928. <:#240,9360>        Char = strfield$(SC, 5, "</p>")
  929.  
  930. <:#240,9360>        IF Ctrl
  931.  
  932. <:#240,9360>            Key = Key | 0x4000
  933.  
  934. <:#240,9360>        ENDIF
  935.  
  936. <:#240,9360>        IF Alt
  937.  
  938. <:#240,9360>            Key = Key | 0x2000
  939.  
  940. <:#240,9360>        ENDIF
  941.  
  942. <:#240,9360>        IF Shift
  943.  
  944. <:#240,9360>            Key = Key | 0x1000
  945.  
  946. <:#240,9360>        ENDIF
  947.  
  948. <:#240,9360>        OnKey(Key, 0, "{MacName}!InsertChar({Char})")
  949.  
  950. <:#240,9360>    NEXT
  951.  
  952. <:#240,9360>ENDIF
  953.  
  954. <:#240,9360>DeleteMenu(1, MenuName)
  955.  
  956. <:#240,9360>AddMenu(1, MenuName)
  957.  
  958. AddMenuItem(1, MenuName, "&Wybierz znaki...", "{MacName}!ShowBox()", "Wybranie znak<\s>w ANSI.")
  959.  
  960. <:#480,9360>AddMenuItem(1, MenuName, "&Usu<\q> {MenuName}", "{MacName}!ExitMacro()", "Usuni<\j>cie menu {MenuName}.")
  961.  
  962. <:#240,9360>NumMenuItems = GetProfileString$("ANSIx", "NumMenuItems", "AMIPRO2.INI")
  963.  
  964. <:#240,9360>IF NumMenuItems = "" OR NumMenuItems = 0
  965.  
  966. <:#240,9360>    EXIT FUNCTION
  967.  
  968. <:#240,9360>ENDIF
  969.  
  970. <:#240,9360>AddMenuItem(1, MenuName, "-", "")
  971.  
  972. <:#240,9360>DIM MenuItems(NumMenuItems)
  973.  
  974. <:#240,9360>FOR I = 1 to NumMenuItems
  975.  
  976. <:#240,9360>    MI = GetProfileString$("ANSIx", "MenuItem{I}", "AMIPRO2.INI")
  977.  
  978. <:#480,9360>    AddMenuItem(1, MenuName, "&{I}    {MI}", "{MacName}!InsertChar({MI})", "Wstawienie znaku {MI} w miejscu kursora tekstu.")
  979.  
  980. NEXT
  981.  
  982. @Function@END FUNCTION
  983.  
  984.  
  985.  
  986. @Function@FUNCTION InsertChar(x)
  987.  
  988. <:#278,9360>    TYPE(x)
  989.  
  990. @Function@<:#278,9360>END FUNCTION
  991.  
  992. <:#278,9360>
  993.  
  994. <:#278,9360>
  995.  
  996. @Function@<:#278,9360>FUNCTION ClearShortcuts(hdlg, id, text)
  997.  
  998. <:#556,9360>IF Decide("Usuniesz wszystkie klawisze aktywuj</y>ce dla znak<\s>w ANSI. Kontynuowa<\f>?")
  999.  
  1000. <:#278,9360>    NumShortcuts = GetProfileString$("ANSIx", "NumShortcuts", "AMIPRO2.INI")
  1001.  
  1002. <:#278,9360>    FOR I = 1 to NumShortcuts
  1003.  
  1004. <:#278,9360>        SC = GetProfileString$("ANSIx", "Shortcut{I}", "AMIPRO2.INI")
  1005.  
  1006. <:#278,9360>        Key = strfield$(SC, 1, "</p>")
  1007.  
  1008. <:#278,9360>        Ctrl = strfield$(SC, 2, "</p>")
  1009.  
  1010. <:#278,9360>        Alt = strfield$(SC, 3, "</p>")
  1011.  
  1012. <:#278,9360>        Shift = strfield$(SC, 4, "</p>")
  1013.  
  1014. <:#278,9360>        Char = strfield$(SC, 5, "</p>")
  1015.  
  1016. <:#278,9360>        IF Ctrl
  1017.  
  1018. <:#278,9360>            Key = Key | 0x4000
  1019.  
  1020. <:#278,9360>        ENDIF
  1021.  
  1022. <:#278,9360>        IF Alt
  1023.  
  1024. <:#240,9360>            Key = Key | 0x2000
  1025.  
  1026. <:#278,9360>        ENDIF
  1027.  
  1028. <:#278,9360>        IF Shift
  1029.  
  1030. <:#278,9360>            Key = Key | 0x1000
  1031.  
  1032. <:#240,9360>        ENDIF
  1033.  
  1034. <:#278,9360>        OnKey(Key, 0, "")
  1035.  
  1036. <:#278,9360>    NEXT
  1037.  
  1038. <:#278,9360>    WriteProfileString("ANSIx", "NumShortcuts", "", "AMIPRO2.INI")
  1039.  
  1040. <:#278,9360>ENDIF
  1041.  
  1042. @Function@<:#278,9360>END FUNCTION
  1043.  
  1044. <:#278,9360>
  1045.  
  1046. <:#278,9360>
  1047.  
  1048. @Function@<:#278,9360>DIALOG    ANSIBox
  1049.  
  1050. @Function@<:#278,9360>-2134376448    8    136    38    94    176    ""    ""    "Znaki ANSI"
  1051.  
  1052. @Function@<:#278,9360>FONT    8    "Helv"
  1053.  
  1054. @Function@<:#278,9360>4    4    22    166    9000    1352859651    "listbox"    ""    0 
  1055.  
  1056. @Function@<:#278,9360>50    4    40    14    1    1342373889    "button"    "OK"    0 
  1057.  
  1058. @Function@<:#278,9360>50    20    40    14    2    1342373888    "button"    "Anuluj"    0 
  1059.  
  1060. @Function@<:#278,9360>50    36    40    14    53    1342373888    "button"    "&Wstaw"    0 
  1061.  
  1062. @Function@<:#278,9360>30    56    60    14    54    1342373888    "button"    "&Dodaj do menu"    0 
  1063.  
  1064. @Function@<:#278,9360>30    72    60    14    55    1342373888    "button"    "&Usu<\q>"    0 
  1065.  
  1066. @Function@<:#278,9360>30    88    60    14    6    1342373888    "button"    "&Wymie<\q>"    0 
  1067.  
  1068. @Function@<:#278,9360>30    104    60    14    57    1342373888    "button"    "&Klawisze..."    0 
  1069.  
  1070. @Function@<:#278,9360>END DIALOG
  1071.  
  1072.  
  1073. <:#278,9360>
  1074.  
  1075. @Function@<:#278,9360>DIALOG    ShortcutBox
  1076.  
  1077. @Function@<:#278,9360>-2134376448    10    119    62    160    68    ""    ""    "Klawisze Aktywuj</y>ce"
  1078.  
  1079. @Function@<:#278,9360>FONT    6    "Helv"
  1080.  
  1081. @Function@<:#278,9360>4    0    38    52    10    1342242823    "button"    ""    0 
  1082.  
  1083. @Function@<:#278,9360>10    10    26    12    50    1342242819    "button"    "&Ctrl"    0 
  1084.  
  1085. @Function@<:#278,9360>10    22    24    12    51    1342242819    "button"    "&Alt"    0 
  1086.  
  1087. @Function@<:#278,9360>10    34    30    12    52    1342242819    "button"    "&Shift"    0 
  1088.  
  1089. @Function@<:#278,9360>45    18    31    8    1000    1342177280    "static"    "Klawisz:"    0 
  1090.  
  1091. @Function@<:#278,9360>80    16    30    12    8000    1350631552    "edit"    ""    0 
  1092.  
  1093. @Function@<:#278,9360>116    4    40    14    1    1342242817    "button"    "OK"    0 
  1094.  
  1095. @Function@<:#278,9360>116    20    40    14    2    1342242816    "button"    "Anuluj"    0 
  1096.  
  1097. @Function@<:#278,9360>116    36    40    14    53    1342242816    "button"    "&Usu<\q>"    0 
  1098.  
  1099. @Function@<:#278,9360>4    56    152    8    8001    1342177281    "static"    "text"    0 
  1100.  
  1101. @Function@<:#278,9360>END DIALOG
  1102.  
  1103. @Body Single@<:#279,9360>
  1104.  
  1105. >
  1106.  
  1107. [Embedded]
  1108. 00016695
  1109. >
  1110. [macsum] 13
  1111. ANSICharacters 0 0 1 0
  1112. ShowBox 141 0 6 25
  1113. InsertaChar 1153 3 2 72
  1114. AddShortcuts 1281 3 13 84
  1115. ClearMenu 2824 3 1 135
  1116. Replaceit 3005 1 3 143
  1117. AddtoMenu 3324 3 6 161
  1118. ExitMacro 3935 0 2 184
  1119. GenerateMenu 3993 0 14 190
  1120. InsertChar 5239 1 1 232
  1121. ClearShortcuts 5277 3 9 237
  1122. ANSIBox 5960 0 -1 263
  1123. ShortcutBox 6428 0 -1 277
  1124. [macse]
  1125. 14 ANSICharacters
  1126. 20 00000100
  1127. 19 00000100
  1128. 0 32 1
  1129. 0 789 "Dodaj<\j> nowe menu."
  1130. 16 GenerateMenu
  1131. 0 789 ""
  1132. 0 296 0
  1133. 0 789 ""
  1134. 6 0
  1135. 15
  1136. 9
  1137. 14 ShowBox
  1138. 20 00000973
  1139. 19 00000973
  1140. 0 32 1
  1141. 0 296 1
  1142. 0 789 "Znaki ANSI..."
  1143. 0 802
  1144. 13
  1145. 8 1
  1146. 5 256
  1147. 21 2 [X]
  1148. 5 161
  1149. 8 3
  1150. 5 214
  1151. 6 3
  1152. 18 2
  1153. 12 00000200
  1154. 10 00000240
  1155. 5 1
  1156. 6 3
  1157. 3 0
  1158. 8 3
  1159. 10 00000123
  1160. 6 3
  1161. 0 39 "{3}"
  1162. 13
  1163. 23 2
  1164. 10 00000167
  1165. 5 216
  1166. 8 3
  1167. 5 246
  1168. 6 3
  1169. 18 2
  1170. 12 00000329
  1171. 10 00000369
  1172. 5 1
  1173. 6 3
  1174. 3 0
  1175. 8 3
  1176. 10 00000252
  1177. 6 3
  1178. 0 39 "{3}"
  1179. 13
  1180. 23 2
  1181. 10 00000296
  1182. 5 248
  1183. 8 3
  1184. 5 254
  1185. 6 3
  1186. 18 2
  1187. 12 00000458
  1188. 10 00000498
  1189. 5 1
  1190. 6 3
  1191. 3 0
  1192. 8 3
  1193. 10 00000381
  1194. 6 3
  1195. 0 39 "{3}"
  1196. 13
  1197. 23 2
  1198. 10 00000425
  1199. 5 255
  1200. 7 "<\>"
  1201. 23 2
  1202. 0 296 1
  1203. 0 31 9000 &2
  1204. 0 296 0
  1205. 0 789 ""
  1206. 0 41 53 "{1}!InsertaChar"
  1207. 0 41 54 "{1}!AddtoMenu"
  1208. 0 41 55 "{1}!ClearMenu"
  1209. 0 41 57 "{1}!AddShortcuts"
  1210. 0 26 "." "ANSIBox"
  1211. 13
  1212. 8 4
  1213. 0 27 9000
  1214. 13
  1215. 8 5
  1216. 6 4
  1217. 5 -1
  1218. 18 0
  1219. 11 00000822
  1220. 0 3 "Nie mog<\j> otworzy<\f> okna dialogowego!"
  1221. 10 00000973
  1222. 10 00000973
  1223. 6 4
  1224. 5 0
  1225. 18 0
  1226. 11 00000877
  1227. 10 00000973
  1228. 10 00000973
  1229. 6 4
  1230. 5 6
  1231. 18 0
  1232. 11 00000952
  1233. 16 Replaceit "{5}"
  1234. 10 00000521
  1235. 10 00000973
  1236. 16 InsertChar "{5}"
  1237. 0 296 0
  1238. 0 789 ""
  1239. 0 32 0
  1240. 6 0
  1241. 15
  1242. 9
  1243. 14 InsertaChar
  1244. 19 00000097
  1245. 20 00000097
  1246. 0 32 1
  1247. 0 42 "{0}" 9000
  1248. 13
  1249. 8 4
  1250. 16 InsertChar "{4}"
  1251. 0 296 0
  1252. 0 789 ""
  1253. 6 3
  1254. 15
  1255. 9
  1256. 14 AddShortcuts
  1257. 0 802
  1258. 13
  1259. 8 4
  1260. 0 42 "{0}" 9000
  1261. 13
  1262. 8 5
  1263. 0 31 8001 "Wybierz klawisz aktywuj</y>cy dla {5}."
  1264. 0 41 53 "{4}!ClearShortcuts"
  1265. 0 26 "." "ShortcutBox"
  1266. 13
  1267. 8 6
  1268. 6 6
  1269. 5 -1
  1270. 18 0
  1271. 11 00000278
  1272. 0 3 "Nie mog<\j> otworzy<\f> okna dialogowego!"
  1273. 6 3
  1274. 15
  1275. 9
  1276. 10 00000320
  1277. 6 6
  1278. 5 0
  1279. 18 0
  1280. 11 00000320
  1281. 5 -1
  1282. 15
  1283. 9
  1284. 0 27 50
  1285. 13
  1286. 8 7
  1287. 0 27 51
  1288. 13
  1289. 8 8
  1290. 0 27 52
  1291. 13
  1292. 8 9
  1293. 0 27 8000
  1294. 13
  1295. 0 18 [X]
  1296. 13
  1297. 8 10
  1298. 0 14 "{10}"
  1299. 13
  1300. 5 1
  1301. 18 3
  1302. 11 00000531
  1303. 0 3 "Tylko pierwszy znak ""{10}"" zostanie u</>yty."
  1304. 0 806 "{10}" 1
  1305. 13
  1306. 8 10
  1307. 5 0
  1308. 8 11
  1309. 0 286 "ANSIx" "NumShortcuts" "AMIPRO2.INI"
  1310. 13
  1311. 8 12
  1312. 6 12
  1313. 5 0
  1314. 18 3
  1315. 6 12
  1316. 7 ""
  1317. 18 1
  1318. 1 2
  1319. 11 00001274
  1320. 5 1
  1321. 8 13
  1322. 6 12
  1323. 6 13
  1324. 18 2
  1325. 12 00000739
  1326. 10 00001261
  1327. 5 1
  1328. 6 13
  1329. 3 0
  1330. 8 13
  1331. 10 00000660
  1332. 0 286 "ANSIx" "Shortcut{13}" "AMIPRO2.INI"
  1333. 13
  1334. 8 14
  1335. 0 20 "{14}" 2 "</p>"
  1336. 13
  1337. 8 15
  1338. 0 20 "{14}" 1 "</p>"
  1339. 13
  1340. 8 14
  1341. 6 14
  1342. 7 "{10}{7}{8}{9}"
  1343. 18 0
  1344. 11 00001248
  1345. 5 1
  1346. 8 11
  1347. 0 2 "Te klawisze zosta</s>y ju</> przydzielone dla  {15}.  Zamieni<\f>?"
  1348. 13
  1349. 11 00001096
  1350. 0 287 "ANSIx" "Shortcut{13}" "{10}</p>{7}</p>{8}</p>{9}</p>{5}" "AMIPRO2.INI"
  1351. 10 00001248
  1352. 6 12
  1353. 5 1
  1354. 3 0
  1355. 8 12
  1356. 0 287 "ANSIx" "NumShortcuts" "{12}" "AMIPRO2.INI"
  1357. 0 287 "ANSIx" "Shortcut{12}" "{10}</p>{7}</p>{8}</p>{9}</p>{5}" "AMIPRO2.INI"
  1358. 10 00000704
  1359. 10 00001285
  1360. 5 0
  1361. 8 12
  1362. 6 11
  1363. 1 3
  1364. 11 00001461
  1365. 6 12
  1366. 5 1
  1367. 3 0
  1368. 8 12
  1369. 0 287 "ANSIx" "NumShortcuts" "{12}" "AMIPRO2.INI"
  1370. 0 287 "ANSIx" "Shortcut{12}" "{10}</p>{7}</p>{8}</p>{9}</p>{5}" "AMIPRO2.INI"
  1371. 0 3 "Klawisze aktywizuj</y>ce zosta</s>y zapisane."
  1372. 16 GenerateMenu
  1373. 6 3
  1374. 15
  1375. 9
  1376. 14 ClearMenu
  1377. 0 2 "Usuniesz wszystkie dodatkowe komendy menu Znaki.  Czy chcesz tego?"
  1378. 13
  1379. 11 00000169
  1380. 0 287 "ANSIx" "NumMenuItems" "" "AMIPRO2.INI"
  1381. 16 GenerateMenu
  1382. 6 3
  1383. 15
  1384. 9
  1385. 14 Replaceit
  1386. 0 24
  1387. 13
  1388. 8 2
  1389. 6 2
  1390. 7 ""
  1391. 18 1
  1392. 11 00000243
  1393. 0 2 "Czy chcesz zamieni<\f> wszystkie {2} z {0}?"
  1394. 13
  1395. 11 00000209
  1396. 5 1024
  1397. 5 8192
  1398. 3 0
  1399. 8 3
  1400. 0 6 "[37]"
  1401. 2 488 1 0 0 "{3}" "{2}" "{0}"
  1402. 10 00000230
  1403. 16 InsertChar "{0}"
  1404. 10 00000307
  1405. 0 7 "Zaznacz, kt<\s>re chcesz zamieni<\f> z {0}."
  1406. 10 00000014
  1407. 6 1
  1408. 15
  1409. 9
  1410. 14 AddtoMenu
  1411. 0 42 "{0}" 9000
  1412. 13
  1413. 8 4
  1414. 0 286 "ANSIx" "NumMenuItems" "AMIPRO2.INI"
  1415. 13
  1416. 8 5
  1417. 6 5
  1418. 5 0
  1419. 18 3
  1420. 6 5
  1421. 7 ""
  1422. 18 1
  1423. 1 2
  1424. 11 00000435
  1425. 5 1
  1426. 8 6
  1427. 6 5
  1428. 6 6
  1429. 18 2
  1430. 12 00000229
  1431. 10 00000422
  1432. 5 1
  1433. 6 6
  1434. 3 0
  1435. 8 6
  1436. 10 00000154
  1437. 0 286 "ANSIx" "MenuItem{6}" "AMIPRO2.INI"
  1438. 13
  1439. 8 7
  1440. 6 7
  1441. 6 4
  1442. 18 0
  1443. 11 00000409
  1444. 0 2 "Ten symbol znajduje si<\j> ju</> w menu. Kontynuowa<\f>?"
  1445. 13
  1446. 1 3
  1447. 11 00000409
  1448. 6 3
  1449. 15
  1450. 9
  1451. 10 00000196
  1452. 10 00000470
  1453. 5 1
  1454. 21 8 [X]
  1455. 5 0
  1456. 8 5
  1457. 5 1
  1458. 8 6
  1459. 6 5
  1460. 5 1
  1461. 3 0
  1462. 0 287 "ANSIx" "NumMenuItems" [X] "AMIPRO2.INI"
  1463. 0 287 "ANSIx" "MenuItem{6}" "{4}" "AMIPRO2.INI"
  1464. 16 GenerateMenu
  1465. 6 3
  1466. 15
  1467. 9
  1468. 14 ExitMacro
  1469. 7 "&Znaki"
  1470. 8 1
  1471. 0 521 1 "{1}"
  1472. 6 0
  1473. 15
  1474. 9
  1475. 14 GenerateMenu
  1476. 0 802
  1477. 13
  1478. 8 1
  1479. 7 "&Znaki"
  1480. 8 2
  1481. 0 286 "ANSIx" "NumShortcuts" "AMIPRO2.INI"
  1482. 13
  1483. 8 3
  1484. 6 3
  1485. 5 0
  1486. 18 3
  1487. 6 3
  1488. 7 ""
  1489. 18 1
  1490. 1 2
  1491. 11 00000643
  1492. 5 1
  1493. 8 4
  1494. 6 3
  1495. 6 4
  1496. 18 2
  1497. 12 00000239
  1498. 10 00000643
  1499. 5 1
  1500. 6 4
  1501. 3 0
  1502. 8 4
  1503. 10 00000164
  1504. 0 286 "ANSIx" "Shortcut{4}" "AMIPRO2.INI"
  1505. 13
  1506. 8 5
  1507. 0 20 "{5}" 1 "</p>"
  1508. 13
  1509. 8 6
  1510. 0 40 "{6}"
  1511. 13
  1512. 8 6
  1513. 0 20 "{5}" 2 "</p>"
  1514. 13
  1515. 8 7
  1516. 0 20 "{5}" 3 "</p>"
  1517. 13
  1518. 8 8
  1519. 0 20 "{5}" 4 "</p>"
  1520. 13
  1521. 8 9
  1522. 0 20 "{5}" 5 "</p>"
  1523. 13
  1524. 8 10
  1525. 6 7
  1526. 11 00000506
  1527. 6 6
  1528. 5 16384
  1529. 25 2
  1530. 8 6
  1531. 6 8
  1532. 11 00000548
  1533. 6 6
  1534. 5 8192
  1535. 25 2
  1536. 8 6
  1537. 6 9
  1538. 11 00000590
  1539. 6 6
  1540. 5 4096
  1541. 25 2
  1542. 8 6
  1543. 2 422 1 "{6}" 0 "{1}!InsertChar({10})"
  1544. 10 00000206
  1545. 0 521 1 "{2}"
  1546. 0 515 1 "{2}"
  1547. 0 516 1 "{2}" "&Wybierz znaki..." "{1}!ShowBox()" "Wybranie znak<\s>w ANSI."
  1548. 0 516 1 "{2}" "&Usu<\q> {2}" "{1}!ExitMacro()" "Usuni<\j>cie menu {2}."
  1549. 0 286 "ANSIx" "NumMenuItems" "AMIPRO2.INI"
  1550. 13
  1551. 8 11
  1552. 6 11
  1553. 7 ""
  1554. 18 0
  1555. 6 11
  1556. 5 0
  1557. 18 0
  1558. 1 2
  1559. 11 00000943
  1560. 6 0
  1561. 15
  1562. 9
  1563. 0 516 1 "{2}" "-" ""
  1564. 6 11
  1565. 21 12 [X]
  1566. 5 1
  1567. 8 4
  1568. 6 11
  1569. 6 4
  1570. 18 2
  1571. 12 00001068
  1572. 10 00001234
  1573. 5 1
  1574. 6 4
  1575. 3 0
  1576. 8 4
  1577. 10 00000992
  1578. 0 286 "ANSIx" "MenuItem{4}" "AMIPRO2.INI"
  1579. 13
  1580. 8 13
  1581. 0 516 1 "{2}" "&{4}    {13}" "{1}!InsertChar({13})" "Wstawienie znaku {13} w miejscu kursora tekstu."
  1582. 10 00001035
  1583. 6 0
  1584. 15
  1585. 9
  1586. 14 InsertChar
  1587. 0 6 "{0}"
  1588. 6 1
  1589. 15
  1590. 9
  1591. 14 ClearShortcuts
  1592. 0 2 "Usuniesz wszystkie klawisze aktywuj</y>ce dla znak<\s>w ANSI. Kontynuowa<\f>?"
  1593. 13
  1594. 11 00000671
  1595. 0 286 "ANSIx" "NumShortcuts" "AMIPRO2.INI"
  1596. 13
  1597. 8 4
  1598. 5 1
  1599. 8 5
  1600. 6 4
  1601. 6 5
  1602. 18 2
  1603. 12 00000259
  1604. 10 00000624
  1605. 5 1
  1606. 6 5
  1607. 3 0
  1608. 8 5
  1609. 10 00000184
  1610. 0 286 "ANSIx" "Shortcut{5}" "AMIPRO2.INI"
  1611. 13
  1612. 8 6
  1613. 0 20 "{6}" 1 "</p>"
  1614. 13
  1615. 8 7
  1616. 0 20 "{6}" 2 "</p>"
  1617. 13
  1618. 8 8
  1619. 0 20 "{6}" 3 "</p>"
  1620. 13
  1621. 8 9
  1622. 0 20 "{6}" 4 "</p>"
  1623. 13
  1624. 8 10
  1625. 0 20 "{6}" 5 "</p>"
  1626. 13
  1627. 8 11
  1628. 6 8
  1629. 11 00000506
  1630. 6 7
  1631. 5 16384
  1632. 25 2
  1633. 8 7
  1634. 6 9
  1635. 11 00000548
  1636. 6 7
  1637. 5 8192
  1638. 25 2
  1639. 8 7
  1640. 6 10
  1641. 11 00000591
  1642. 6 7
  1643. 5 4096
  1644. 25 2
  1645. 8 7
  1646. 2 422 1 "{7}" 0 ""
  1647. 10 00000226
  1648. 0 287 "ANSIx" "NumShortcuts" "" "AMIPRO2.INI"
  1649. 6 3
  1650. 15
  1651. 9
  1652. DIALOG ANSIBox
  1653. -2134376448 8 136 38 94 176 "" "" "Znaki ANSI" 
  1654. FONT 8 "Helv" 
  1655. 4 4 22 166 9000 1352859651 "listbox" "" 0 
  1656. 50 4 40 14 1 1342373889 "button" "OK" 0 
  1657. 50 20 40 14 2 1342373888 "button" "Anuluj" 0 
  1658. 50 36 40 14 53 1342373888 "button" "&Wstaw" 0 
  1659. 30 56 60 14 54 1342373888 "button" "&Dodaj do menu" 0 
  1660. 30 72 60 14 55 1342373888 "button" "&Usu±" 0 
  1661. 30 88 60 14 6 1342373888 "button" "&Wymie±" 0 
  1662. 30 104 60 14 57 1342373888 "button" "&Klawisze..." 0 
  1663. DIALOG ShortcutBox
  1664. -2134376448 10 119 62 160 68 "" "" "Klawisze Aktywuj╣ce" 
  1665. FONT 6 "Helv" 
  1666. 4 0 38 52 10 1342242823 "button" "" 0 
  1667. 10 10 26 12 50 1342242819 "button" "&Ctrl" 0 
  1668. 10 22 24 12 51 1342242819 "button" "&Alt" 0 
  1669. 10 34 30 12 52 1342242819 "button" "&Shift" 0 
  1670. 45 18 31 8 1000 1342177280 "static" "Klawisz:" 0 
  1671. 80 16 30 12 8000 1350631552 "edit" "" 0 
  1672. 116 4 40 14 1 1342242817 "button" "OK" 0 
  1673. 116 20 40 14 2 1342242816 "button" "Anuluj" 0 
  1674. 116 36 40 14 53 1342242816 "button" "&Usu±" 0 
  1675. 4 56 152 8 8001 1342177281 "static" "text" 0 
  1676. 00016720
  1677.