home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / DISK1 / MACROS.CMZ / SMARTFLD.SMM < prev    next >
INI File  |  1993-03-14  |  29KB  |  1,585 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.     Narz<\j>dzie do budowania Automatycznych List Styl<\s>w
  19.     
  20.     
  21.     
  22.     
  23.     731356537
  24.     5
  25.     708316628
  26.     85
  27.     6
  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.         Arial
  60.         240
  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.         0
  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.         Arial
  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.         Arial
  228.         200
  229.         0
  230.         16384
  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.         0
  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.         Arial
  284.         200
  285.         0
  286.         16384
  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.         0
  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.         Arial
  340.         240
  341.         0
  342.         16384
  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.         0
  379.         0
  380.         0
  381.     [nfmt]
  382.         272
  383.         1
  384.         3
  385.         .
  386.         ,
  387.         $
  388.     Outline4
  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.         1
  405.         0
  406.         1
  407.         0
  408.         2
  409.         1
  410.         1440
  411.         10800
  412.         12
  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.     [hrght]
  438.     [lyfrm]
  439.         1
  440.         11200
  441.         0
  442.         0
  443.         12240
  444.         1440
  445.         0
  446.         1
  447.         3
  448.         1 0 0 0 0 0 0
  449.         0
  450.         0
  451.         1
  452.     [frmlay]
  453.         1440
  454.         12240
  455.         1
  456.         1440
  457.         72
  458.         1
  459.         792
  460.         1440
  461.         0
  462.         1
  463.         0
  464.         1
  465.         1
  466.         0
  467.         1
  468.         1440
  469.         10800
  470.         1
  471.         3
  472.         9360
  473.     [txt]
  474. Modified by Marek G. B</y>czek from UNICORN P.
  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.         2
  492.     [frmlay]
  493.         15840
  494.         12240
  495.         1
  496.         1440
  497.         792
  498.         1
  499.         14472
  500.         1440
  501.         0
  502.         1
  503.         0
  504.         1
  505.         1
  506.         0
  507.         1
  508.         1440
  509.         10800
  510.         2
  511.         2
  512.         4680
  513.         3
  514.         9360
  515.     [txt]
  516. >
  517. [elay]
  518. [l1]
  519.     0
  520. [pg]
  521.     6
  522.     44 0 14 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
  523.     97 0 62 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
  524.     149 0 29 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
  525.     201 0 49 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
  526.     254 0 48 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
  527.     271 0 10 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  528. [edoc]
  529. @Function@<:#278,9360>declares and defines
  530.  
  531. @Outline2@<:#240,9360>DEFINE MoveWindow()    DllCall("user,MoveWindow,HHHHHHH",%1,%2,%3,%4,%5,1)
  532.  
  533. @Outline2@<:#240,9360>DEFINE GetWindowRect()    DllCall("user,GetWindowRect,HHN",%1,%2)
  534.  
  535. @Outline2@<:#240,9360>DEFINE GetClientRect()    DllCall("user,GetClientRect,HHN",%1,%2)
  536.  
  537. @Outline2@<:#240,9360>Define ScreenToClient()    DllCall("user,ScreenToClient,HHN", %1, %2)
  538.  
  539. @Outline2@<:#240,9360>Define ClientToScreen()    DllCall("user,ClientToScreen,HHN", %1, %2)
  540.  
  541. @Outline2@<:#240,9360>Define ShowWindow()    DllCall("User,ShowWindow,AHH",%1,%2)
  542.  
  543. @Outline2@<:#240,9360>Define EnableWindow()    DllCall("User,EnableWindow,AHH",%1,%2)
  544.  
  545. @Outline2@<:#240,9360>define SetFocus()        DllCall("user,SetFocus,HH", %1)
  546.  
  547. @Outline2@<:#240,9360>define HFONT    "Setfont:hFont"
  548.  
  549. @Outline2@<:#480,9360>define SendMessage(hwnd, msg, wpara, lparm)    DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4)
  550.  
  551. @Outline2@<:#240,9360>define WM_SETFONT    0x30
  552.  
  553. @Outline2@<:#480,9360>define CreateFont()    DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14)
  554.  
  555. @Outline2@<:#240,9360>define DeleteObject(handle)    DllCall("gdi,DeleteObject,HH", %1)
  556.  
  557. @Outline2@<:#240,9360>define GetActiveWindow()    DllCall("user,GetActiveWindow,H")
  558.  
  559. @Outline2@<:#240,9360>define SetWindowText()    DllCall("user,SetWindowText,IHC", %1, %2)
  560.  
  561. @Outline2@<:#240,9360>define TitleBarMsg()        SetWindowText(GetActiveWindow(), %1)
  562.  
  563. @Outline2@<:#240,9360>define GetWindowText()    DllCall("user,GetWindowText,HHFH", %1, %2, %3)
  564.  
  565. @Outline2@<:#240,9360>define MapDialogRect()    DllCall("user,MapDialogRect,HHN", %1, %2)
  566.  
  567. @Outline2@<:#240,9360>declare fillboxfields(target);
  568.  
  569. @Outline2@<:#240,9360>declare torchfields(target);
  570.  
  571. @Outline2@<:#240,9360>declare FieldNumToName(num);
  572.  
  573. @Outline2@<:#240,9360>declare insertfields(target, numfields);
  574.  
  575. @Outline2@<:#240,9360>define GetFieldAtInsPt()    GetInfo(177);
  576.  
  577. @Outline2@<:#240,9360>define IsOKToRun(menuname)    GetInfo(217, 24, %1);
  578.  
  579. @Outline2@<:#240,9360>define GetCurFrameDimensions()    GetInfo(102);
  580.  
  581. @Outline2@<:#240,9360>'define GetCurFrameType()    GetInfo(104);
  582.  
  583. @Outline2@<:#240,9360>declare initcapit(string);
  584.  
  585. @Function@<:#278,9360>function menus()
  586.  
  587. @Outline2@<:#240,9360>rmac=GetRunningMacroFile$()
  588.  
  589. @Outline2@<:#240,9360>deletemenu(1, "&Automatyczny Styl")
  590.  
  591. @Outline2@<:#240,9360>addmenu(1, "&Automatyczny Styl")
  592.  
  593. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "&Pierwsze Okno...", "{rmac}!main(""as_def"")", "Utworzenie pierwszego okna dla automatycznej listy styl<\s>w.")
  594.  
  595. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "&Drugie Okno...", "{rmac}!main(""as_user"")", "Utworzenie drugiego okna dla automatycznej listy styl<\s>w.")
  596.  
  597. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "&Ramka...", "{rmac}!frameinsert", "Utworzenie automatycznej ramki.")
  598.  
  599. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "&Kursor...", "{rmac}!bookmarker", "Zaznaczenie miejsca, w kt<\s>rym ma si<\j> ukazywa<\f> kursor tekstowy.")
  600.  
  601. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "&Usu<\q> Okna...", "{rmac}!torchfields(""as_"")", "Usuni<\j>cie przygotowanych okien.")
  602.  
  603. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "&Zapisz...", "{rmac}!savesty", "Zapisanie dokumentu jako automatycznej listy styl<\s>w.")
  604.  
  605. @Outline2@<:#240,9360>addmenuitem (1, "&Automatyczny Styl", "-" "" "")
  606.  
  607. @Outline2@<:#480,9360>addmenuitem(1, "&Automatyczny Styl", "Usu<\q> &Komend<\j>", "{rmac}!removemenuitem", "Usuni<\j>cie menu Automatyczny Styl z Ami Pro.")
  608.  
  609. @Outline2@<:#240,9360>end function
  610.  
  611. @Function@<:#278,9360>function main(target)
  612.  
  613. @Outline2@<:#240,9360>if getopenfilecount() << 1
  614.  
  615. @Outline2@<:#240,9360>    exit function
  616.  
  617. @Outline2@<:#240,9360>endif
  618.  
  619. @Outline2@<:#240,9360>allocglobalvar("target", 1)
  620.  
  621. @Outline2@<:#240,9360>setglobalvar("target", target)
  622.  
  623. @Outline2@<:#240,9360>dim fieldnames(9)
  624.  
  625. @Outline2@<:#240,9360>rmac=GetRunningMacroFile$()
  626.  
  627. @Outline2@<:#240,9360>'font handler
  628.  
  629. @Outline3@<:#240,9360>AllocGlobalVar(HFONT, 1)
  630.  
  631. @Outline3@<:#240,9360>SetGlobalVar(HFONT, 0)
  632.  
  633. @Outline2@<:#240,9360>SetDlgCallBack(0,"{rmac}!InitDlg")
  634.  
  635. @Outline2@<:#240,9360>box=dialogbox(".", "autostyle")
  636.  
  637. @Outline2@<:#240,9360>'drive the box & get field names
  638.  
  639. @Outline2@<:#240,9360>for i = 1 to 9
  640.  
  641. @Outline2@<:#240,9360>    fieldcontents=getdialogfield$(8000 + i)
  642.  
  643. @Outline2@<:#240,9360>    if fieldcontents = ""
  644.  
  645. @Outline2@<:#240,9360>        break
  646.  
  647. @Outline2@<:#240,9360>    endif
  648.  
  649. @Outline2@<:#240,9360>    fieldnames(i)=fieldcontents
  650.  
  651. @Outline2@<:#240,9360>next
  652.  
  653. @Outline2@<:#240,9360>numfields=i - 1 
  654.  
  655. @Outline2@<:#240,9360>allocglobalvar("fieldnames", 9)
  656.  
  657. @Outline2@<:#240,9360>for i= 1 to numfields
  658.  
  659. @Outline2@<:#240,9360>    setglobalarray("fieldnames", i, fieldnames(i))
  660.  
  661. @Outline2@<:#240,9360>next
  662.  
  663. @Outline2@<:#240,9360>insertfields(target, numfields)
  664.  
  665. @Outline2@<:#240,9360>'font bailout
  666.  
  667. @Outline3@<:#240,9360>font = GetGlobalVar$(HFONT)        ' If we created
  668.  
  669. @Outline3@<:#240,9360>if (0 != font)                ' the font.
  670.  
  671. @Outline3@<:#240,9360>    DeleteObject(font)        ' Delete it
  672.  
  673. @Outline3@<:#240,9360>endif
  674.  
  675. @Outline3@<:#240,9360>freeglobalvar(HFONT)
  676.  
  677. @Outline2@<:#240,9360>freeglobalvar("fieldnames")
  678.  
  679. @Outline2@<:#240,9360>freeglobalvar("target")
  680.  
  681. @Outline2@<:#240,9360>end function
  682.  
  683. @Function@<:#278,9360>function initdlg(hdlg, id, target)
  684.  
  685. @Outline2@<:#240,9360>target=getglobalvar$("target")
  686.  
  687. @Outline2@<:#240,9360>'font for static text
  688.  
  689. @Outline3@<:#240,9360>Font = CreateFont(13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 32, "Helv")
  690.  
  691. @Outline3@<:#240,9360>if (Font)
  692.  
  693. @Outline3@<:#240,9360>    hctl = GetDlgItem(hDlg, 1050)
  694.  
  695. @Outline3@<:#240,9360>    hctl2 = GetDlgItem(hDlg, 1060)
  696.  
  697. @Outline3@<:#240,9360>    SendMessage(hctl, WM_SETFONT, font, 0)
  698.  
  699. @Outline3@<:#240,9360>    SendMessage(hctl2, WM_SETFONT, font, 0)
  700.  
  701. @Outline3@<:#240,9360>    SetGlobalVar(HFONT, Font)
  702.  
  703. @Outline3@<:#240,9360>endif 
  704.  
  705. @Outline2@<:#240,9360>'name the box and show the right buttons and static text
  706.  
  707. @Outline3@<:#240,9360>CurStyleSheet = GetDocInfo$(3)
  708.  
  709. @Outline3@<:#240,9360>CurStyleSheet = ucase$(CurStyleSheet)
  710.  
  711. @Outline3@<:#240,9360>lb=chr$(091)
  712.  
  713. @Outline3@<:#240,9360>rb=chr$(093)
  714.  
  715. @Outline3@<:#240,9360>CurStyleSheet = strcat$(lb, CurStyleSheet, rb)
  716.  
  717. @Outline3@<:#240,9360>if target ="as_def"
  718.  
  719. @Outline3@    TitleBarMsg("Informacje G</s><\s>wne")
  720.  
  721. @Outline3@<:#240,9360>    EnableWindow(GetDlgItem(Hdlg,3), 0) ' gray the save as button
  722.  
  723. @Outline3@<:#240,9360>    ShowWindow(GetDlgItem(Hdlg,1060), 0) ' hide the 1060 field static text
  724.  
  725. @Outline3@<:#240,9360>    L1="Wpisz nazwy p<\s>l, kt<\s>re b<\j>d</y> si<\j> pojawia<\f> przy ka</>dym "
  726.  
  727. @Outline3@<:#240,9360>    L2="u</>yciu tworzonej automatycznej listy styl<\s>w.  "
  728.  
  729. @Outline3@<:#240,9360>    L3="Przycisk Zapisz Jako... b<\j>dzie aktywny przy u</>yciu tej listy styl<\s>w."
  730.  
  731. @Outline3@<:#240,9360>    L4=""
  732.  
  733. @Outline3@<:#240,9360>    helptext="{L1}{L2}{L3}{L4}"
  734.  
  735. @Outline3@<:#240,9360>    filledit(1050, helptext)
  736.  
  737. @Outline3@<:#240,9360>else
  738.  
  739. @Outline3@    TitleBarMsg("Informacje Dodatkowe")
  740.  
  741. @Outline3@<:#240,9360>    ShowWindow(GetDlgItem(Hdlg,3), 0) ' hide the save as button
  742.  
  743. @Outline3@<:#240,9360>    ShowWindow(GetDlgItem(Hdlg,1060), 0) ' hide the 1060 field static text
  744.  
  745. @Outline3@<:#240,9360>    L1="Wpisz tekst pomocniczy, kt<\s>ry b<\j>dzie si<\j> pojawia</s> w tym oknie "
  746.  
  747. @Outline3@<:#240,9360>    L2="przy ka</>dym u</>yciu tej listy styl<\s>w."
  748.  
  749. @Outline3@<:#240,9360>    helptext="{L1}{L2}{L3}{L4}"
  750.  
  751. @Outline3@<:#240,9360>    filledit(1050, helptext)
  752.  
  753. @Outline3@<:#240,9360>endif
  754.  
  755. @Outline2@<:#240,9360>end function
  756.  
  757. @Function@<:#278,9360>function insertfields(target, numfields)
  758.  
  759. @Outline2@<:#240,9360>for position = 1 to numfields
  760.  
  761. @Outline2@<:#240,9360>    showntext=getglobalarray$("fieldnames", position)
  762.  
  763. @Outline2@<:#240,9360>    usercontrol("Ustaw kursor tekstowy dla: {showntext} i naci</\>nij Kontynuuj.")
  764.  
  765. @Outline2@<:#240,9360>    fieldtype = "eb"
  766.  
  767. @Outline2@<:#240,9360>    'LabelNoSpaces
  768.  
  769. @Outline3@<:#240,9360>dim word(10)
  770.  
  771. @Outline3@<:#240,9360>for i = 1 to 10
  772.  
  773. @Outline3@<:#240,9360>    word(i)=strfield$(showntext, i, " ")
  774.  
  775. @Outline3@<:#240,9360>    if word(i) = (-1)
  776.  
  777. @Outline3@<:#240,9360>        word(i) = ""
  778.  
  779. @Outline3@<:#240,9360>    endif
  780.  
  781. @Outline3@<:#480,9360>    label=strcat$(word(1), word(2), word(3), word(4), word(5), word(6), word(7), word(8), word(9), word(10))
  782.  
  783. @Outline3@<:#240,9360>'    label=strcat$(label, word(i))
  784.  
  785. @Outline3@<:#240,9360>next
  786.  
  787. @Outline2@<:#240,9360>    fieldname=strcat$(target, "_", position, "_", fieldtype, "_", label, "_")
  788.  
  789. @Outline2@<:#240,9360>    if curshade$() != ""
  790.  
  791. @Outline2@<:#240,9360>        type ("<[>del]")
  792.  
  793. @Outline2@<:#240,9360>    endif
  794.  
  795. @Outline2@<:#240,9360>    FieldAdd("if Defined {fieldname} {fieldname} else ""{showntext}"" endif"   )
  796.  
  797. @Outline2@<:#240,9360>next
  798.  
  799. @Outline2@<:#240,9360>'fldnum=strfield$(GetFieldAtInsPt(), 1, ",")
  800.  
  801. @Outline3@<:#240,9360>'if fldnum != 0
  802.  
  803. @Outline3@<:#240,9360>'    fldname=FieldNumToName(fldnum)
  804.  
  805. @Outline3@<:#240,9360>'    lenvarstart=len(varstart)
  806.  
  807. @Outline3@<:#240,9360>'    if left$(fldname, lenvarstart) = varstart
  808.  
  809. @Outline3@<:#240,9360>'        position = strfield$(fldname, 3, "_")
  810.  
  811. @Outline3@<:#240,9360>'        label = strfield$(fldname, 5, "_")
  812.  
  813. @Outline3@<:#240,9360>'    endif
  814.  
  815. @Outline3@<:#240,9360>'endif
  816.  
  817. @Outline3@<:#240,9360>'FieldRemove(fldnum,  8)
  818.  
  819. @Outline2@<:#240,9360>end function
  820.  
  821. @Function@<:#278,9360>function frameinsert()
  822.  
  823. @Outline2@<:#240,9360>recheck:
  824.  
  825. @Outline2@<:#240,9360>result=IsOKToRun(FrameLayout)
  826.  
  827. @Outline2@<:#240,9360>if result != 1 
  828.  
  829. @Outline2@<:#240,9360>    UserControl("Utw<\s>rz ramk<\j>, zmodyfikuj typografi<\j> i naci</\>nij Kontynuuj.")
  830.  
  831. @Outline2@<:#240,9360>    goto recheck
  832.  
  833. @Outline2@<:#240,9360>endif
  834.  
  835. @Outline2@<:#240,9360>DefStr Length, Wide, Units, Paper, WinDir, INI, in, Fwide, FHigh, Top, Left, LMargin
  836.  
  837. @Outline2@<:#240,9360>DefStr TMargin, RMargin, BMargin, Funits, FType, FRound, FMacName
  838.  
  839. @Outline2@<:#480,9360>GetCurFrameBorders(&FWide, &FHigh, &Top, &Left, &LMargin, &TMargin, &RMargin, &BMargin, &Funits)
  840.  
  841. @Outline2@<:#240,9360>num=right$(Now(), 4)
  842.  
  843. @Outline2@<:#240,9360>MarkBookMark("as_frame{num}"  4003  )
  844.  
  845. @Outline2@<:#240,9360>AddFrame(top, left, FWide, FHigh )
  846.  
  847. @Outline2@<:#240,9360>FrameModInit( )
  848.  
  849. @Outline2@<:#240,9360>FrameModLines(0 1 1 0 16777215 0 0 0 0 0  )
  850.  
  851. @Outline2@<:#240,9360>FrameModType(134218240 18 "framcust.smm({num})"   )
  852.  
  853. @Outline2@<:#240,9360>FrameModBorders(fWide, FHigh, top, left, LMargin, TMargin, RMargin, BMargin,1  )
  854.  
  855. @Outline2@<:#240,9360>FrameModFinish( )
  856.  
  857. @Outline2@<:#240,9360>BringFrameToFront()
  858.  
  859. @Outline2@<:#240,9360>MarkBookMark("as_frame{num}cover"  4003  )
  860.  
  861. @Outline2@<:#240,9360>Type( "<[>Enter]<[>Enter] Naci</\>nij Mysz tutaj, aby wype</s>ni<\f> ramk<\j>." )
  862.  
  863. @Outline2@<:#240,9360>Center()
  864.  
  865. @Outline2@<:#240,9360>Type("<[>esc]")
  866.  
  867. @Outline2@<:#240,9360>end function
  868.  
  869. @Function@<:#278,9360>function FieldNumToName(num)
  870.  
  871. @Outline2@<:#240,9360>cnt = GetPowerFieldCount(0)
  872.  
  873. @Outline2@<:#240,9360>dim fields(cnt)
  874.  
  875. @Outline2@<:#240,9360>GetPowerFields(0, &fields)
  876.  
  877. @Outline2@<:#240,9360>position=ArraySearch(&fields, num, 1, ",")
  878.  
  879. @Outline2@<:#245,9360>    pffield = StrField$(fields(position), 3, ",")        'get the power <+!>field<-!>
  880.  
  881. @Outline2@<:#245,9360>    varname=StrField$(pffield, 3, " ")        'get the name of the <+!>variable 
  882. <-!>in the PF
  883.  
  884. @Outline2@<:#240,9360>FieldNumToName=varname
  885.  
  886. @Outline2@<:#240,9360>end function
  887.  
  888. @Function@<:#278,9360>function savesty()
  889.  
  890. @Outline2@<:#240,9360>if (IsOKToRun(SaveAsNewStyle)) != 1 exit function
  891.  
  892. @Outline2@<:#240,9360>endif
  893.  
  894. @Outline2@<:#240,9360>curstyle="automate.sty"
  895.  
  896. @Outline2@<:#240,9360>stypath=left$(GetStylePath$(), (len(GetStylePath$()) - 1))
  897.  
  898. @Outline2@<:#240,9360>filledit(1004, stypath)
  899.  
  900. @Outline2@<:#240,9360>filledit(8002, curstyle)
  901.  
  902. @Outline2@<:#240,9360>box = dialogbox(".", "savesty")
  903.  
  904. @Outline2@<:#240,9360>if box = 0
  905.  
  906. @Outline2@<:#240,9360>    exit function
  907.  
  908. @Outline2@<:#240,9360>endif
  909.  
  910. @Outline2@<:#240,9360>newstyle=getdialogfield$(8002)
  911.  
  912. @Outline2@<:#240,9360>newdesc=getdialogfield$(8003)
  913.  
  914. @Outline2@<:#240,9360>'SaveAsNewStyle(Name, WithContents, MacroName, RunMacro, Description)
  915.  
  916. @Outline2@<:#240,9360>SaveAsNewStyle(newstyle, 1, "autosty.smm", 1, newdesc)
  917.  
  918. @Outline2@<:#240,9360>end function
  919.  
  920. @Function@<:#278,9360>function bookmarker()
  921.  
  922. @Outline2@<:#240,9360>if (IsOKToRun(MarkBookmark)) != 1 exit function
  923.  
  924. @Outline2@<:#240,9360>endif
  925.  
  926. @Outline2@<:#240,9360>UserControl("Ustaw kursor tekstowy i naci</\>nij Kontynuuj.")
  927.  
  928. @Outline2@<:#240,9360>MarkBookMark("as_starttext" 4004)    'delete the bookmark already in
  929.  
  930. @Outline2@<:#240,9360>MarkBookMark("as_starttext" 4003)    'insert new one
  931.  
  932. @Outline2@<:#240,9360>end function
  933.  
  934. @Function@<:#278,9360>function removemenuitem()
  935.  
  936. @Outline2@<:#240,9360>deletemenu(1, "&Automatyczny Styl")
  937.  
  938. @Outline2@<:#240,9360>end function
  939.  
  940. @Function@<:#278,9360>FUNCTION torchfields(target)
  941.  
  942. @Outline2@<:#240,9360>if (IsOKToRun(FieldRemove)) != 1 exit function
  943.  
  944. @Outline2@<:#240,9360>endif
  945.  
  946. @Outline2@<:#240,9360>'singlestep(0)
  947.  
  948. @Outline2@<:#240,9360>cnt = GetPowerFieldCount(0)
  949.  
  950. @Outline2@<:#240,9360>if (0 != cnt)
  951.  
  952. @Outline2@<:#240,9360>doit=Decide("Czy usun</y><\f> wszystkie okna?")
  953.  
  954. @Outline3@<:#240,9360>if doit = 0
  955.  
  956. @Outline3@<:#240,9360>    exit function
  957.  
  958. @Outline3@<:#240,9360>endif
  959.  
  960. @Outline2@<:#240,9360>    dim fields(cnt)
  961.  
  962. @Outline2@<:#240,9360>    GetPowerFields(0, &fields)
  963.  
  964. @Outline2@<:#240,9360>    for i = 1 to cnt
  965.  
  966. @Outline2@<:#240,9360>        pfid = StrField$(fields(i), 1, ",")
  967.  
  968. @Outline2@<:#240,9360>        pftype = StrField$(fields(i), 2, ",")
  969.  
  970. @Outline2@<:#245,9360>        pffield = StrField$(fields(i), 3, ",")        'get the power <+!>field<-!>
  971.  
  972. @Outline2@<:#245,9360>        varname=StrField$(pffield, 3, " ")        'get the name of the <+!>variable 
  973. <-!>in the PF
  974.  
  975. @Outline2@<:#240,9360>        targlen=len(target)
  976.  
  977. @Outline2@<:#240,9360>        if left$(varname, targlen)=target
  978.  
  979. @Outline2@<:#240,9360>            FieldRemove(pfid, pftype);
  980.  
  981. @Outline2@<:#240,9360>        endif
  982.  
  983. @Outline2@<:#240,9360>    next
  984.  
  985. @Outline2@<:#240,9360>else
  986.  
  987. @Outline2@    message("Nie utworzono okien informacyjnych.", "Usuni<\j>cie Okien")
  988.  
  989. @Outline2@<:#240,9360>endif
  990.  
  991. @Outline2@<:#240,9360>END FUNCTION
  992.  
  993. @Outline2@<:#240,9360>DIALOG    autostyle
  994.  
  995. @Outline2@<:#240,9360>-2134376448    23    116    57    231    185    ""    ""    "_LETTER1.STY Information"
  996.  
  997. @Outline2@<:#240,9360>FONT    8    "Helv"
  998.  
  999. @Outline2@<:#240,9360>78    6    91    12    8001    1350631552    "edit"    ""    0 
  1000.  
  1001. @Outline2@<:#240,9360>78    21    91    12    8002    1350631552    "edit"    ""    0 
  1002.  
  1003. @Outline2@<:#240,9360>78    36    91    12    8003    1350631552    "edit"    ""    0 
  1004.  
  1005. @Outline2@<:#240,9360>78    51    91    12    8004    1350631552    "edit"    ""    0 
  1006.  
  1007. @Outline2@<:#240,9360>78    66    91    12    8005    1350631552    "edit"    ""    0 
  1008.  
  1009. @Outline2@<:#240,9360>78    81    91    12    8006    1350631552    "edit"    ""    0 
  1010.  
  1011. @Outline2@<:#240,9360>78    96    91    12    8007    1350631552    "edit"    ""    0 
  1012.  
  1013. @Outline2@<:#240,9360>78    111    91    12    8008    1350631552    "edit"    ""    0 
  1014.  
  1015. @Outline2@<:#240,9360>78    126    91    12    8009    1350631552    "edit"    ""    0 
  1016.  
  1017. @Outline2@<:#240,9360>173    5    53    14    1    1342373889    "button"    "OK"    0 
  1018.  
  1019. @Outline2@<:#240,9360>173    22    53    14    2    1342373888    "button"    "Anuluj"    0 
  1020.  
  1021. @Outline2@<:#240,9360>173    39    53    14    3    1342373888    "button"    "Zapisz Jako..."    0 
  1022.  
  1023. @Outline2@<:#240,9360>3    8    75    9    1001    1342177280    "static"    "Pole 1:"    0 
  1024.  
  1025. @Outline2@<:#240,9360>3    23    75    9    1002    1342177280    "static"    "Pole 2:"    0 
  1026.  
  1027. @Outline2@<:#240,9360>3    38    75    9    1003    1342177280    "static"    "Pole 3:"    0 
  1028.  
  1029. @Outline2@<:#240,9360>3    53    75    9    1004    1342177280    "static"    "Pole 4:"    0 
  1030.  
  1031. @Outline2@<:#240,9360>3    68    75    9    1005    1342177280    "static"    "Pole 5:"    0 
  1032.  
  1033. @Outline2@<:#240,9360>3    83    75    9    1006    1342177280    "static"    "Pole 6:"    0 
  1034.  
  1035. @Outline2@<:#240,9360>3    98    75    9    1007    1342177280    "static"    "Pole 7:"    0 
  1036.  
  1037. @Outline2@<:#240,9360>3    113    75    9    1008    1342177280    "static"    "Pole 8:"    0 
  1038.  
  1039. @Outline2@<:#240,9360>3    128    75    9    1009    1342177280    "static"    "Pole 9:"    0 
  1040.  
  1041. @Outline2@<:#240,9360>3    144    222    35    1050    1342177280    "static"    "Default box text"    0 
  1042.  
  1043. @Outline2@<:#240,9360>3    143    219    36    1060    1342177280    "static"    "User box text"    0 
  1044.  
  1045. @Outline2@<:#240,9360>END DIALOG
  1046.  
  1047. @Outline2@<:#240,9360>DIALOG    savesty
  1048.  
  1049. @Outline2@<:#480,9360>-2134376448    9    104    54    204    92    ""    ""    "Zapisz Automatyczn</y> List<\j> Styl<\s>w"
  1050.  
  1051. @Outline2@<:#240,9360>FONT    8    "Helv"
  1052.  
  1053. @Outline2@<:#240,9360>64    40    86    12    8002    1350631552    "edit"    ""    0 
  1054.  
  1055. @Outline2@<:#240,9360>52    58    146    26    8003    1350631552    "edit"    ""    0 
  1056.  
  1057. @Outline2@<:#240,9360>159    5    40    14    1    1342373889    "button"    "OK"    0 
  1058.  
  1059. @Outline2@<:#240,9360>159    21    40    14    2    1342373888    "button"    "Anuluj"    0 
  1060.  
  1061. @Outline2@<:#240,9360>4    39    49    10    1000    1342177280    "static"    "&Nazwa listy:"    0 
  1062.  
  1063. @Outline2@<:#240,9360>4    58    44    10    1001    1342177280    "static"    "Opis listy:"    0 
  1064.  
  1065. @Outline2@<:#480,9360>4    3    132    20    1002    1342177280    "static"    "Wpisz nazw<\j> i opis automatycznej listy styl<\s>w."    0 
  1066.  
  1067. @Outline2@<:#240,9360>4    24    56    10    1003    1342177280    "static"    "</L>cie</>ka do list:"    0 
  1068.  
  1069. @Outline2@<:#240,9360>64    24    80    10    1004    1342177280    "static"    "path"    0 
  1070.  
  1071. @Outline2@<:#240,9360>END DIALOG
  1072.  
  1073. >
  1074.  
  1075. [Embedded]
  1076. 00021056
  1077. >
  1078. [macsum] 12
  1079. menus 0 0 2 28
  1080. main 987 1 8 41
  1081. initdlg 1789 3 12 77
  1082. insertfields 3178 2 8 114
  1083. frameinsert 3938 0 22 146
  1084. FieldNumToName 4550 1 6 170
  1085. savesty 4733 0 6 179
  1086. bookmarker 5092 0 1 195
  1087. removemenuitem 5290 0 1 202
  1088. torchfields 5351 1 10 205
  1089. autostyle 6005 0 -1 231
  1090. savesty 7191 0 -1 258
  1091. [macse]
  1092. 14 menus
  1093. 0 802
  1094. 13
  1095. 8 1
  1096. 0 521 1 "&Automatyczny Styl"
  1097. 0 515 1 "&Automatyczny Styl"
  1098. 0 516 1 "&Automatyczny Styl" "&Pierwsze Okno..." "{1}!main(""as_def"")" "Utworzenie pierwszego okna dla automatycznej listy styl<\s>w."
  1099. 0 516 1 "&Automatyczny Styl" "&Drugie Okno..." "{1}!main(""as_user"")" "Utworzenie drugiego okna dla automatycznej listy styl<\s>w."
  1100. 0 516 1 "&Automatyczny Styl" "&Ramka..." "{1}!frameinsert" "Utworzenie automatycznej ramki."
  1101. 0 516 1 "&Automatyczny Styl" "&Kursor..." "{1}!bookmarker" "Zaznaczenie miejsca, w kt<\s>rym ma si<\j> ukazywa<\f> kursor tekstowy."
  1102. 0 516 1 "&Automatyczny Styl" "&Usu<\q> Okna..." "{1}!torchfields(""as_"")" "Usuni<\j>cie przygotowanych okien."
  1103. 0 516 1 "&Automatyczny Styl" "&Zapisz..." "{1}!savesty" "Zapisanie dokumentu jako automatycznej listy styl<\s>w."
  1104. 0 516 1 "&Automatyczny Styl" "-" "" ""
  1105. 0 516 1 "&Automatyczny Styl" "Usu<\q> &Komend<\j>" "{1}!removemenuitem" "Usuni<\j>cie menu Automatyczny Styl z Ami Pro."
  1106. 6 0
  1107. 15
  1108. 9
  1109. 14 main
  1110. 0 1050
  1111. 13
  1112. 5 1
  1113. 18 5
  1114. 11 00000057
  1115. 6 1
  1116. 15
  1117. 9
  1118. 0 271 "target" 1
  1119. 0 264 "target" "{0}"
  1120. 5 9
  1121. 21 2 [X]
  1122. 0 802
  1123. 13
  1124. 8 3
  1125. 0 271 "Setfont:hFont" 1
  1126. 0 264 "Setfont:hFont" 0
  1127. 0 41 0 "{3}!InitDlg"
  1128. 0 26 "." "autostyle"
  1129. 13
  1130. 8 4
  1131. 5 1
  1132. 8 5
  1133. 5 9
  1134. 6 5
  1135. 18 2
  1136. 12 00000316
  1137. 10 00000425
  1138. 5 1
  1139. 6 5
  1140. 3 0
  1141. 8 5
  1142. 10 00000241
  1143. 5 8000
  1144. 6 5
  1145. 3 0
  1146. 0 27 [X]
  1147. 13
  1148. 8 6
  1149. 6 6
  1150. 7 ""
  1151. 18 0
  1152. 11 00000396
  1153. 10 00000425
  1154. 6 5
  1155. 6 6
  1156. 23 2
  1157. 10 00000283
  1158. 6 5
  1159. 5 1
  1160. 3 1
  1161. 8 7
  1162. 0 271 "fieldnames" 9
  1163. 5 1
  1164. 8 5
  1165. 6 7
  1166. 6 5
  1167. 18 2
  1168. 12 00000552
  1169. 10 00000606
  1170. 5 1
  1171. 6 5
  1172. 3 0
  1173. 8 5
  1174. 10 00000477
  1175. 6 5
  1176. 22 2
  1177. 0 272 "fieldnames" "{5}" [X]
  1178. 10 00000519
  1179. 16 insertfields "{0}" "{7}"
  1180. 0 265 "Setfont:hFont"
  1181. 13
  1182. 8 8
  1183. 5 0
  1184. 6 8
  1185. 18 1
  1186. 11 00000731
  1187. 0 284 "gdi,DeleteObject,HH" "{8}"
  1188. 0 266 "Setfont:hFont"
  1189. 0 266 "fieldnames"
  1190. 0 266 "target"
  1191. 6 1
  1192. 15
  1193. 9
  1194. 14 initdlg
  1195. 0 265 "target"
  1196. 13
  1197. 8 2
  1198. 0 284 "gdi,CreateFont,HHHHHHHHHHHHHHC" 13 0 0 0 400 0 0 0 0 0 0 0 0 "Helv"
  1199. 13
  1200. 8 4
  1201. 6 4
  1202. 11 00000319
  1203. 0 44 "{0}" 1050
  1204. 13
  1205. 8 5
  1206. 0 44 "{0}" 1060
  1207. 13
  1208. 8 6
  1209. 0 284 "user,SendMessage,HHHHJ" "{5}" 48 "{4}" 0
  1210. 0 284 "user,SendMessage,HHHHJ" "{6}" 48 "{4}" 0
  1211. 0 264 "Setfont:hFont" "{4}"
  1212. 0 279 3
  1213. 13
  1214. 8 7
  1215. 0 18 "{7}"
  1216. 13
  1217. 8 7
  1218. 0 39 091
  1219. 13
  1220. 8 8
  1221. 0 39 093
  1222. 13
  1223. 8 9
  1224. 0 16 "{8}" "{7}" "{9}"
  1225. 13
  1226. 8 7
  1227. 6 2
  1228. 7 "as_def"
  1229. 18 0
  1230. 11 00000984
  1231. 0 284 "user,GetActiveWindow,H"
  1232. 13
  1233. 0 284 "user,SetWindowText,IHC" [X] "Informacje G</s><\s>wne"
  1234. 0 44 "{0}" 3
  1235. 13
  1236. 0 284 "User,EnableWindow,AHH" [X] 0
  1237. 0 44 "{0}" 1060
  1238. 13
  1239. 0 284 "User,ShowWindow,AHH" [X] 0
  1240. 7 "Wpisz nazwy p<\s>l, kt<\s>re b<\j>d</y> si<\j> pojawia<\f> przy ka</>dym "
  1241. 8 10
  1242. 7 "u</>yciu tworzonej automatycznej listy styl<\s>w.  "
  1243. 8 11
  1244. 7 "Przycisk Zapisz Jako... b<\j>dzie aktywny przy u</>yciu tej listy styl<\s>w."
  1245. 8 12
  1246. 7 ""
  1247. 8 13
  1248. 7 "{10}{11}{12}{13}"
  1249. 8 14
  1250. 0 31 1050 "{14}"
  1251. 10 00001377
  1252. 0 284 "user,GetActiveWindow,H"
  1253. 13
  1254. 0 284 "user,SetWindowText,IHC" [X] "Informacje Dodatkowe"
  1255. 0 44 "{0}" 3
  1256. 13
  1257. 0 284 "User,ShowWindow,AHH" [X] 0
  1258. 0 44 "{0}" 1060
  1259. 13
  1260. 0 284 "User,ShowWindow,AHH" [X] 0
  1261. 7 "Wpisz tekst pomocniczy, kt<\s>ry b<\j>dzie si<\j> pojawia</s> w tym oknie "
  1262. 8 10
  1263. 7 "przy ka</>dym u</>yciu tej listy styl<\s>w."
  1264. 8 11
  1265. 7 "{10}{11}{12}{13}"
  1266. 8 14
  1267. 0 31 1050 "{14}"
  1268. 6 3
  1269. 15
  1270. 9
  1271. 14 insertfields
  1272. 5 1
  1273. 8 3
  1274. 6 1
  1275. 6 3
  1276. 18 2
  1277. 12 00000102
  1278. 10 00000748
  1279. 5 1
  1280. 6 3
  1281. 3 0
  1282. 8 3
  1283. 10 00000027
  1284. 0 273 "fieldnames" "{3}"
  1285. 13
  1286. 8 4
  1287. 0 7 "Ustaw kursor tekstowy dla: {4} i naci</\>nij Kontynuuj."
  1288. 7 "eb"
  1289. 8 5
  1290. 5 10
  1291. 21 6 [X]
  1292. 5 1
  1293. 8 7
  1294. 5 10
  1295. 6 7
  1296. 18 2
  1297. 12 00000315
  1298. 10 00000584
  1299. 5 1
  1300. 6 7
  1301. 3 0
  1302. 8 7
  1303. 10 00000239
  1304. 6 7
  1305. 0 20 "{4}" "{7}" " "
  1306. 13
  1307. 23 6
  1308. 6 7
  1309. 22 6
  1310. 5 -1
  1311. 18 0
  1312. 11 00000405
  1313. 6 7
  1314. 7 ""
  1315. 23 6
  1316. 5 1
  1317. 22 6
  1318. 5 2
  1319. 22 6
  1320. 5 3
  1321. 22 6
  1322. 5 4
  1323. 22 6
  1324. 5 5
  1325. 22 6
  1326. 5 6
  1327. 22 6
  1328. 5 7
  1329. 22 6
  1330. 5 8
  1331. 22 6
  1332. 5 9
  1333. 22 6
  1334. 5 10
  1335. 22 6
  1336. 0 16 [X] [X] [X] [X] [X] [X] [X] [X] [X] [X]
  1337. 13
  1338. 8 8
  1339. 10 00000282
  1340. 0 16 "{0}" "_" "{3}" "_" "{5}" "_" "{8}" "_"
  1341. 13
  1342. 8 9
  1343. 0 24
  1344. 13
  1345. 7 ""
  1346. 18 1
  1347. 11 00000686
  1348. 0 6 "[46]"
  1349. 2 572 1 "if Defined {9} {9} else ""{4}"" endif"
  1350. 10 00000069
  1351. 6 2
  1352. 15
  1353. 9
  1354. 14 frameinsert
  1355. 0 1313 217 24 402
  1356. 13
  1357. 8 1
  1358. 6 1
  1359. 5 1
  1360. 18 1
  1361. 11 00000163
  1362. 0 7 "Utw<\s>rz ramk<\j>, zmodyfikuj typografi<\j> i naci</\>nij Kontynuuj."
  1363. 10 00000016
  1364. 0 795 &9 &10 &11 &12 &13 &14 &15 &16 &17
  1365. 0 772
  1366. 13
  1367. 0 807 [X] 4
  1368. 13
  1369. 8 21
  1370. 2 466 1 "as_frame{21}" 4003
  1371. 2 413 1 "{11}" "{12}" "{9}" "{10}"
  1372. 2 421 1
  1373. 2 416 1 0 1 1 0 16777215 0 0 0 0 0
  1374. 2 417 1 134218240 18 "framcust.smm({21})"
  1375. 2 418 1 "{9}" "{10}" "{11}" "{12}" "{13}" "{14}" "{15}" "{16}" 1
  1376. 2 420 1
  1377. 2 407 1
  1378. 2 466 1 "as_frame{21}cover" 4003
  1379. 0 6 "[13][13] Naci</\>nij Mysz tutaj, aby wype</s>ni<\f> ramk<\j>."
  1380. 2 260 1
  1381. 0 6 "[27]"
  1382. 6 0
  1383. 15
  1384. 9
  1385. 14 FieldNumToName
  1386. 0 1304 0
  1387. 13
  1388. 8 2
  1389. 6 2
  1390. 21 3 [X]
  1391. 0 1305 0 &3
  1392. 0 1044 &3 "{0}" 1 ","
  1393. 13
  1394. 8 4
  1395. 6 4
  1396. 22 3
  1397. 0 20 [X] 3 ","
  1398. 13
  1399. 8 5
  1400. 0 20 "{5}" 3 " "
  1401. 13
  1402. 8 6
  1403. 6 6
  1404. 8 1
  1405. 6 1
  1406. 15
  1407. 9
  1408. 14 savesty
  1409. 0 1313 217 24 305
  1410. 13
  1411. 5 1
  1412. 18 1
  1413. 11 00000071
  1414. 6 0
  1415. 15
  1416. 9
  1417. 7 "automate.sty"
  1418. 8 1
  1419. 0 269
  1420. 13
  1421. 0 269
  1422. 13
  1423. 0 14 [X]
  1424. 13
  1425. 5 1
  1426. 3 1
  1427. 0 806 [X] [X]
  1428. 13
  1429. 8 2
  1430. 0 31 1004 "{2}"
  1431. 0 31 8002 "{1}"
  1432. 0 26 "." "savesty"
  1433. 13
  1434. 8 3
  1435. 6 3
  1436. 5 0
  1437. 18 0
  1438. 11 00000268
  1439. 6 0
  1440. 15
  1441. 9
  1442. 0 27 8002
  1443. 13
  1444. 8 4
  1445. 0 27 8003
  1446. 13
  1447. 8 5
  1448. 2 305 1 "{4}" 1 "autosty.smm" 1 "{5}"
  1449. 6 0
  1450. 15
  1451. 9
  1452. 14 bookmarker
  1453. 0 1313 217 24 466
  1454. 13
  1455. 5 1
  1456. 18 1
  1457. 11 00000074
  1458. 6 0
  1459. 15
  1460. 9
  1461. 0 7 "Ustaw kursor tekstowy i naci</\>nij Kontynuuj."
  1462. 2 466 1 "as_starttext" 4004
  1463. 2 466 1 "as_starttext" 4003
  1464. 6 0
  1465. 15
  1466. 9
  1467. 14 removemenuitem
  1468. 0 521 1 "&Automatyczny Styl"
  1469. 6 0
  1470. 15
  1471. 9
  1472. 14 torchfields
  1473. 0 1313 217 24 227
  1474. 13
  1475. 5 1
  1476. 18 1
  1477. 11 00000075
  1478. 6 1
  1479. 15
  1480. 9
  1481. 0 1304 0
  1482. 13
  1483. 8 2
  1484. 5 0
  1485. 6 2
  1486. 18 1
  1487. 11 00000578
  1488. 0 2 "Czy usun</y><\f> wszystkie okna?"
  1489. 13
  1490. 8 3
  1491. 6 3
  1492. 5 0
  1493. 18 0
  1494. 11 00000213
  1495. 6 1
  1496. 15
  1497. 9
  1498. 6 2
  1499. 21 4 [X]
  1500. 0 1305 0 &4
  1501. 5 1
  1502. 8 5
  1503. 6 2
  1504. 6 5
  1505. 18 2
  1506. 12 00000326
  1507. 10 00000565
  1508. 5 1
  1509. 6 5
  1510. 3 0
  1511. 8 5
  1512. 10 00000251
  1513. 6 5
  1514. 22 4
  1515. 0 20 [X] 1 ","
  1516. 13
  1517. 8 6
  1518. 6 5
  1519. 22 4
  1520. 0 20 [X] 2 ","
  1521. 13
  1522. 8 7
  1523. 6 5
  1524. 22 4
  1525. 0 20 [X] 3 ","
  1526. 13
  1527. 8 8
  1528. 0 20 "{8}" 3 " "
  1529. 13
  1530. 8 9
  1531. 0 14 "{0}"
  1532. 13
  1533. 8 10
  1534. 0 806 "{9}" "{10}"
  1535. 13
  1536. 6 0
  1537. 18 0
  1538. 11 00000552
  1539. 2 227 1 "{6}" "{7}"
  1540. 10 00000293
  1541. 10 00000642
  1542. 0 3 "Nie utworzono okien informacyjnych." "Usuni<\j>cie Okien"
  1543. 6 1
  1544. 15
  1545. 9
  1546. DIALOG autostyle
  1547. -2134376448 23 116 57 231 185 "" "" "_LETTER1.STY Information" 
  1548. FONT 8 "Helv" 
  1549. 78 6 91 12 8001 1350631552 "edit" "" 0 
  1550. 78 21 91 12 8002 1350631552 "edit" "" 0 
  1551. 78 36 91 12 8003 1350631552 "edit" "" 0 
  1552. 78 51 91 12 8004 1350631552 "edit" "" 0 
  1553. 78 66 91 12 8005 1350631552 "edit" "" 0 
  1554. 78 81 91 12 8006 1350631552 "edit" "" 0 
  1555. 78 96 91 12 8007 1350631552 "edit" "" 0 
  1556. 78 111 91 12 8008 1350631552 "edit" "" 0 
  1557. 78 126 91 12 8009 1350631552 "edit" "" 0 
  1558. 173 5 53 14 1 1342373889 "button" "OK" 0 
  1559. 173 22 53 14 2 1342373888 "button" "Anuluj" 0 
  1560. 173 39 53 14 3 1342373888 "button" "Zapisz Jako..." 0 
  1561. 3 8 75 9 1001 1342177280 "static" "Pole 1:" 0 
  1562. 3 23 75 9 1002 1342177280 "static" "Pole 2:" 0 
  1563. 3 38 75 9 1003 1342177280 "static" "Pole 3:" 0 
  1564. 3 53 75 9 1004 1342177280 "static" "Pole 4:" 0 
  1565. 3 68 75 9 1005 1342177280 "static" "Pole 5:" 0 
  1566. 3 83 75 9 1006 1342177280 "static" "Pole 6:" 0 
  1567. 3 98 75 9 1007 1342177280 "static" "Pole 7:" 0 
  1568. 3 113 75 9 1008 1342177280 "static" "Pole 8:" 0 
  1569. 3 128 75 9 1009 1342177280 "static" "Pole 9:" 0 
  1570. 3 144 222 35 1050 1342177280 "static" "Default box text" 0 
  1571. 3 143 219 36 1060 1342177280 "static" "User box text" 0 
  1572. DIALOG savesty
  1573. -2134376448 9 104 54 204 92 "" "" "Zapisz Automatyczn╣ ListΩ Styl≤w" 
  1574. FONT 8 "Helv" 
  1575. 64 40 86 12 8002 1350631552 "edit" "" 0 
  1576. 52 58 146 26 8003 1350631552 "edit" "" 0 
  1577. 159 5 40 14 1 1342373889 "button" "OK" 0 
  1578. 159 21 40 14 2 1342373888 "button" "Anuluj" 0 
  1579. 4 39 49 10 1000 1342177280 "static" "&Nazwa listy:" 0 
  1580. 4 58 44 10 1001 1342177280 "static" "Opis listy:" 0 
  1581. 4 3 132 20 1002 1342177280 "static" "Wpisz nazwΩ i opis automatycznej listy styl≤w." 0 
  1582. 4 24 56 10 1003 1342177280 "static" "îcie┐ka do list:" 0 
  1583. 64 24 80 10 1004 1342177280 "static" "path" 0 
  1584. 00021081
  1585.