home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Product / Product.zip / WORDPRO6.EXE / AUTOSTY.SMZ / AUTOSTY.SMM
INI File  |  1993-11-10  |  42KB  |  3,115 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     
  5. [charset]
  6.     82
  7.     ANSI (Windows, IBM CP 1252)
  8. [PanoseFontTable]
  9.     4
  10.     5
  11.     TimesNewRomanPS
  12.     257
  13.     257
  14.     257
  15.     257
  16.     257
  17.     Helvetica
  18.     2818
  19.     1029
  20.     514
  21.     514
  22.     1026
  23.     Helv
  24.     2818
  25.     1029
  26.     514
  27.     770
  28.     1026
  29.     Times New Roman
  30.     514
  31.     774
  32.     1029
  33.     517
  34.     1027
  35. [revisions]
  36.     0
  37. [recfile]
  38.     
  39.     *
  40.     1
  41.     1
  42.     3
  43.     8
  44.     0
  45.     0
  46. [lang]
  47.     1
  48. [desc]
  49.     Automated style sheet engine
  50.     
  51.     
  52.     
  53.     
  54.     752974265
  55.     14
  56.     750620291
  57.     62
  58.     0
  59.     0
  60.     0
  61.     0
  62.     0
  63.     
  64.     
  65.     
  66.     
  67.     
  68.     
  69.     1
  70. [prn]
  71.     QMS-PS 810
  72. [port]
  73.     NW:\\SPEEDY\QMS
  74. [fopts]
  75.     0
  76.     1
  77.     0
  78.     0
  79. [lnopts]
  80.     2
  81.     Body Text
  82.     1
  83. [docopts]
  84.     5
  85.     2
  86. [GramStyle]
  87.     
  88. [tag]
  89.     Function
  90.     1
  91.     [fnt]
  92.         Times New Roman
  93.         240
  94.         0
  95.         49153
  96.     [algn]
  97.         1
  98.         1
  99.         0
  100.         0
  101.         0
  102.     [spc]
  103.         33
  104.         0
  105.         1
  106.         0
  107.         0
  108.         1
  109.         100
  110.     [brk]
  111.         68
  112.     [line]
  113.         8
  114.         0
  115.         1
  116.         0
  117.         0
  118.         1
  119.         1
  120.         144
  121.         144
  122.         1
  123.     [spec]
  124.         0
  125.         1
  126.         
  127.         0
  128.         1
  129.         1
  130.         0
  131.         0
  132.         0
  133.         0
  134.     [nfmt]
  135.         272
  136.         1
  137.         3
  138.         .
  139.         ,
  140.         $
  141.     Body Text
  142.     0
  143.     0
  144. [tag]
  145.     Outline1
  146.     1
  147.     [fnt]
  148.         Times New Roman
  149.         240
  150.         0
  151.         49153
  152.     [algn]
  153.         1
  154.         1
  155.         0
  156.         0
  157.         0
  158.     [spc]
  159.         33
  160.         0
  161.         1
  162.         72
  163.         0
  164.         1
  165.         100
  166.     [brk]
  167.         16
  168.     [line]
  169.         8
  170.         0
  171.         1
  172.         0
  173.         0
  174.         1
  175.         1
  176.         144
  177.         144
  178.         1
  179.     [spec]
  180.         0
  181.         1
  182.         
  183.         0
  184.         1
  185.         1
  186.         0
  187.         0
  188.         0
  189.         0
  190.     [nfmt]
  191.         272
  192.         1
  193.         2
  194.         .
  195.         ,
  196.         $
  197.     Outline1
  198.     0
  199.     0
  200. [tag]
  201.     Outline2
  202.     1
  203.     [fnt]
  204.         Times New Roman
  205.         200
  206.         0
  207.         49152
  208.     [algn]
  209.         1
  210.         1
  211.         216
  212.         0
  213.         0
  214.     [spc]
  215.         33
  216.         0
  217.         1
  218.         0
  219.         0
  220.         1
  221.         100
  222.     [brk]
  223.         4
  224.     [line]
  225.         8
  226.         0
  227.         1
  228.         0
  229.         0
  230.         1
  231.         1
  232.         144
  233.         144
  234.         1
  235.     [spec]
  236.         0
  237.         2
  238.         
  239.         0
  240.         1
  241.         1
  242.         0
  243.         16
  244.         0
  245.         0
  246.     [nfmt]
  247.         272
  248.         1
  249.         3
  250.         .
  251.         ,
  252.         $
  253.     Outline2
  254.     0
  255.     0
  256. [tag]
  257.     Outline3
  258.     30
  259.     [fnt]
  260.         Times New Roman
  261.         200
  262.         0
  263.         49152
  264.     [algn]
  265.         1
  266.         1
  267.         432
  268.         0
  269.         0
  270.     [spc]
  271.         33
  272.         0
  273.         1
  274.         0
  275.         0
  276.         1
  277.         100
  278.     [brk]
  279.         4
  280.     [line]
  281.         8
  282.         0
  283.         1
  284.         0
  285.         0
  286.         1
  287.         1
  288.         144
  289.         144
  290.         1
  291.     [spec]
  292.         0
  293.         3
  294.         
  295.         0
  296.         1
  297.         1
  298.         0
  299.         0
  300.         0
  301.         0
  302.     [nfmt]
  303.         272
  304.         1
  305.         2
  306.         .
  307.         ,
  308.         $
  309.     Outline3
  310.     0
  311.     0
  312. [tag]
  313.     Outline4
  314.     1
  315.     [fnt]
  316.         Times New Roman
  317.         200
  318.         0
  319.         49152
  320.     [algn]
  321.         1
  322.         1
  323.         648
  324.         0
  325.         0
  326.     [spc]
  327.         33
  328.         0
  329.         1
  330.         0
  331.         0
  332.         1
  333.         100
  334.     [brk]
  335.         4
  336.     [line]
  337.         8
  338.         0
  339.         1
  340.         0
  341.         0
  342.         1
  343.         1
  344.         144
  345.         144
  346.         1
  347.     [spec]
  348.         0
  349.         4
  350.         
  351.         0
  352.         1
  353.         1
  354.         0
  355.         0
  356.         0
  357.         0
  358.     [nfmt]
  359.         272
  360.         1
  361.         2
  362.         .
  363.         ,
  364.         $
  365.     Outline4
  366.     0
  367.     0
  368. [tag]
  369.     Outline5
  370.     1
  371.     [fnt]
  372.         Times New Roman
  373.         200
  374.         0
  375.         49152
  376.     [algn]
  377.         1
  378.         1
  379.         864
  380.         0
  381.         0
  382.     [spc]
  383.         33
  384.         0
  385.         1
  386.         0
  387.         0
  388.         1
  389.         100
  390.     [brk]
  391.         4
  392.     [line]
  393.         8
  394.         0
  395.         1
  396.         0
  397.         0
  398.         1
  399.         1
  400.         144
  401.         144
  402.         1
  403.     [spec]
  404.         0
  405.         5
  406.         
  407.         0
  408.         1
  409.         1
  410.         0
  411.         0
  412.         0
  413.         0
  414.     [nfmt]
  415.         272
  416.         1
  417.         2
  418.         .
  419.         ,
  420.         $
  421.     Outline5
  422.     0
  423.     0
  424. [tag]
  425.     Outline6
  426.     1
  427.     [fnt]
  428.         Times New Roman
  429.         200
  430.         0
  431.         49152
  432.     [algn]
  433.         1
  434.         1
  435.         1080
  436.         0
  437.         0
  438.     [spc]
  439.         33
  440.         0
  441.         1
  442.         0
  443.         0
  444.         1
  445.         100
  446.     [brk]
  447.         4
  448.     [line]
  449.         8
  450.         0
  451.         1
  452.         0
  453.         0
  454.         1
  455.         1
  456.         144
  457.         144
  458.         1
  459.     [spec]
  460.         0
  461.         6
  462.         
  463.         0
  464.         1
  465.         1
  466.         0
  467.         0
  468.         0
  469.         0
  470.     [nfmt]
  471.         272
  472.         1
  473.         2
  474.         .
  475.         ,
  476.         $
  477.     Outline6
  478.     0
  479.     0
  480. [tag]
  481.     Outline7
  482.     1
  483.     [fnt]
  484.         Times New Roman
  485.         200
  486.         0
  487.         49152
  488.     [algn]
  489.         1
  490.         1
  491.         1296
  492.         0
  493.         0
  494.     [spc]
  495.         33
  496.         0
  497.         1
  498.         0
  499.         0
  500.         1
  501.         100
  502.     [brk]
  503.         4
  504.     [line]
  505.         8
  506.         0
  507.         1
  508.         0
  509.         0
  510.         1
  511.         1
  512.         144
  513.         144
  514.         1
  515.     [spec]
  516.         0
  517.         7
  518.         
  519.         0
  520.         1
  521.         1
  522.         0
  523.         0
  524.         0
  525.         0
  526.     [nfmt]
  527.         272
  528.         1
  529.         2
  530.         .
  531.         ,
  532.         $
  533.     Outline7
  534.     0
  535.     0
  536. [tag]
  537.     Outline8
  538.     1
  539.     [fnt]
  540.         Times New Roman
  541.         200
  542.         0
  543.         49152
  544.     [algn]
  545.         1
  546.         1
  547.         1512
  548.         0
  549.         0
  550.     [spc]
  551.         33
  552.         0
  553.         1
  554.         0
  555.         0
  556.         1
  557.         100
  558.     [brk]
  559.         4
  560.     [line]
  561.         8
  562.         0
  563.         1
  564.         0
  565.         0
  566.         1
  567.         1
  568.         144
  569.         144
  570.         1
  571.     [spec]
  572.         0
  573.         8
  574.         
  575.         0
  576.         1
  577.         1
  578.         0
  579.         0
  580.         0
  581.         0
  582.     [nfmt]
  583.         272
  584.         1
  585.         2
  586.         .
  587.         ,
  588.         $
  589.     Outline8
  590.     0
  591.     0
  592. [tag]
  593.     Footer
  594.     11
  595.     [fnt]
  596.         Times New Roman
  597.         240
  598.         0
  599.         49152
  600.     [algn]
  601.         1
  602.         1
  603.         0
  604.         0
  605.         0
  606.     [spc]
  607.         33
  608.         0
  609.         1
  610.         0
  611.         0
  612.         1
  613.         100
  614.     [brk]
  615.         4
  616.     [line]
  617.         8
  618.         0
  619.         1
  620.         0
  621.         0
  622.         1
  623.         1
  624.         144
  625.         144
  626.         1
  627.     [spec]
  628.         0
  629.         0
  630.         
  631.         0
  632.         1
  633.         1
  634.         0
  635.         0
  636.         0
  637.         0
  638.     [nfmt]
  639.         280
  640.         1
  641.         2
  642.         .
  643.         ,
  644.         $
  645.     Footer
  646.     0
  647.     0
  648. [tag]
  649.     Header
  650.     9
  651.     [fnt]
  652.         Times New Roman
  653.         240
  654.         0
  655.         49152
  656.     [algn]
  657.         1
  658.         1
  659.         0
  660.         0
  661.         0
  662.     [spc]
  663.         33
  664.         0
  665.         1
  666.         0
  667.         0
  668.         1
  669.         100
  670.     [brk]
  671.         4
  672.     [line]
  673.         8
  674.         0
  675.         1
  676.         0
  677.         0
  678.         1
  679.         1
  680.         144
  681.         144
  682.         1
  683.     [spec]
  684.         0
  685.         0
  686.         
  687.         0
  688.         1
  689.         1
  690.         0
  691.         0
  692.         0
  693.         0
  694.     [nfmt]
  695.         280
  696.         1
  697.         2
  698.         .
  699.         ,
  700.         $
  701.     Header
  702.     0
  703.     0
  704. [tag]
  705.     Title
  706.     8
  707.     [fnt]
  708.         Helvetica
  709.         280
  710.         0
  711.         49153
  712.     [algn]
  713.         1
  714.         1
  715.         0
  716.         0
  717.         0
  718.     [spc]
  719.         33
  720.         0
  721.         1
  722.         144
  723.         72
  724.         1
  725.         100
  726.     [brk]
  727.         16
  728.     [line]
  729.         8
  730.         0
  731.         1
  732.         0
  733.         0
  734.         1
  735.         1
  736.         144
  737.         144
  738.         1
  739.     [spec]
  740.         0
  741.         1
  742.         
  743.         0
  744.         1
  745.         1
  746.         0
  747.         0
  748.         0
  749.         0
  750.     [nfmt]
  751.         272
  752.         1
  753.         2
  754.         .
  755.         ,
  756.         $
  757.     Title
  758.     0
  759.     0
  760. [tag]
  761.     Subhead
  762.     7
  763.     [fnt]
  764.         Times New Roman
  765.         240
  766.         0
  767.         49155
  768.     [algn]
  769.         1
  770.         1
  771.         0
  772.         0
  773.         0
  774.     [spc]
  775.         33
  776.         0
  777.         1
  778.         72
  779.         72
  780.         1
  781.         100
  782.     [brk]
  783.         4
  784.     [line]
  785.         8
  786.         0
  787.         1
  788.         0
  789.         0
  790.         1
  791.         1
  792.         144
  793.         144
  794.         1
  795.     [spec]
  796.         0
  797.         2
  798.         
  799.         0
  800.         1
  801.         1
  802.         0
  803.         0
  804.         0
  805.         0
  806.     [nfmt]
  807.         272
  808.         1
  809.         2
  810.         .
  811.         ,
  812.         $
  813.     Subhead
  814.     0
  815.     0
  816. [tag]
  817.     Number List
  818.     6
  819.     [fnt]
  820.         Times New Roman
  821.         240
  822.         0
  823.         49152
  824.     [algn]
  825.         1
  826.         1
  827.         360
  828.         360
  829.         360
  830.     [spc]
  831.         33
  832.         0
  833.         1
  834.         0
  835.         0
  836.         1
  837.         100
  838.     [brk]
  839.         4
  840.     [line]
  841.         8
  842.         0
  843.         1
  844.         0
  845.         0
  846.         1
  847.         1
  848.         144
  849.         144
  850.         1
  851.     [spec]
  852.         0
  853.         0
  854.         <*:>.
  855.         0
  856.         1
  857.         1
  858.         0
  859.         16
  860.         0
  861.         0
  862.     [nfmt]
  863.         272
  864.         1
  865.         2
  866.         .
  867.         ,
  868.         $
  869.     Number List
  870.     0
  871.     0
  872. [tag]
  873.     Bullet 1
  874.     5
  875.     [fnt]
  876.         Times New Roman
  877.         240
  878.         0
  879.         49152
  880.     [algn]
  881.         1
  882.         1
  883.         288
  884.         288
  885.         288
  886.     [spc]
  887.         33
  888.         0
  889.         1
  890.         0
  891.         0
  892.         1
  893.         100
  894.     [brk]
  895.         4
  896.     [line]
  897.         8
  898.         0
  899.         1
  900.         0
  901.         0
  902.         1
  903.         1
  904.         144
  905.         144
  906.         1
  907.     [spec]
  908.         0
  909.         0
  910.         <*5>
  911.         0
  912.         1
  913.         1
  914.         0
  915.         0
  916.         0
  917.         0
  918.     [nfmt]
  919.         280
  920.         1
  921.         2
  922.         .
  923.         ,
  924.         $
  925.     Bullet 1
  926.     0
  927.     0
  928. [tag]
  929.     Bullet
  930.     4
  931.     [fnt]
  932.         Times New Roman
  933.         240
  934.         0
  935.         49152
  936.     [algn]
  937.         1
  938.         1
  939.         0
  940.         288
  941.         288
  942.     [spc]
  943.         33
  944.         0
  945.         1
  946.         0
  947.         0
  948.         1
  949.         100
  950.     [brk]
  951.         4
  952.     [line]
  953.         8
  954.         0
  955.         1
  956.         0
  957.         0
  958.         1
  959.         1
  960.         144
  961.         144
  962.         1
  963.     [spec]
  964.         0
  965.         0
  966.         <*0>
  967.         0
  968.         1
  969.         1
  970.         0
  971.         0
  972.         0
  973.         0
  974.     [nfmt]
  975.         272
  976.         1
  977.         2
  978.         .
  979.         ,
  980.         $
  981.     Bullet
  982.     0
  983.     0
  984. [tag]
  985.     Body Single
  986.     3
  987.     [fnt]
  988.         Times New Roman
  989.         240
  990.         0
  991.         49152
  992.     [algn]
  993.         1
  994.         1
  995.         0
  996.         0
  997.         0
  998.     [spc]
  999.         33
  1000.         0
  1001.         1
  1002.         0
  1003.         0
  1004.         1
  1005.         100
  1006.     [brk]
  1007.         4
  1008.     [line]
  1009.         8
  1010.         0
  1011.         1
  1012.         0
  1013.         0
  1014.         1
  1015.         1
  1016.         144
  1017.         144
  1018.         1
  1019.     [spec]
  1020.         0
  1021.         0
  1022.         
  1023.         0
  1024.         1
  1025.         1
  1026.         0
  1027.         0
  1028.         0
  1029.         0
  1030.     [nfmt]
  1031.         280
  1032.         1
  1033.         2
  1034.         .
  1035.         ,
  1036.         $
  1037.     Body Single
  1038.     0
  1039.     0
  1040. [tag]
  1041.     Body Text
  1042.     2
  1043.     [fnt]
  1044.         Times New Roman
  1045.         240
  1046.         0
  1047.         49152
  1048.     [algn]
  1049.         1
  1050.         1
  1051.         0
  1052.         0
  1053.         0
  1054.     [spc]
  1055.         33
  1056.         0
  1057.         1
  1058.         0
  1059.         0
  1060.         1
  1061.         100
  1062.     [brk]
  1063.         4
  1064.     [line]
  1065.         8
  1066.         0
  1067.         1
  1068.         0
  1069.         0
  1070.         1
  1071.         1
  1072.         144
  1073.         144
  1074.         1
  1075.     [spec]
  1076.         0
  1077.         0
  1078.         
  1079.         0
  1080.         1
  1081.         1
  1082.         0
  1083.         0
  1084.         0
  1085.         0
  1086.     [nfmt]
  1087.         280
  1088.         1
  1089.         2
  1090.         .
  1091.         ,
  1092.         $
  1093.     Body Text
  1094.     0
  1095.     0
  1096. [lay]
  1097.     Standard
  1098.     513
  1099.     [rght]
  1100.         15840
  1101.         12240
  1102.         1
  1103.         1440
  1104.         1440
  1105.         1
  1106.         1440
  1107.         1440
  1108.         0
  1109.         1
  1110.         0
  1111.         1
  1112.         0
  1113.         2
  1114.         1
  1115.         1440
  1116.         10800
  1117.         12
  1118.         1
  1119.         720
  1120.         1
  1121.         1440
  1122.         1
  1123.         2160
  1124.         1
  1125.         2880
  1126.         1
  1127.         3600
  1128.         1
  1129.         4320
  1130.         1
  1131.         5040
  1132.         1
  1133.         5760
  1134.         1
  1135.         6480
  1136.         1
  1137.         7200
  1138.         1
  1139.         7920
  1140.         1
  1141.         8640
  1142.     [frght]
  1143.     [lyfrm]
  1144.         0
  1145.         13184
  1146.         0
  1147.         14400
  1148.         12240
  1149.         15840
  1150.         0
  1151.         1
  1152.         1
  1153.         0 0 0 0 0 0 0
  1154.         0
  1155.         16777215
  1156.         0
  1157.     [frmlay]
  1158.         15840
  1159.         12240
  1160.         1
  1161.         1440
  1162.         792
  1163.         1
  1164.         14472
  1165.         1440
  1166.         0
  1167.         1
  1168.         0
  1169.         0
  1170.         0
  1171.         0
  1172.         1
  1173.         1440
  1174.         10800
  1175.         2
  1176.         2
  1177.         4680
  1178.         3
  1179.         9360
  1180.     [txt]
  1181. <:s>
  1182.  
  1183. >
  1184.     [hrght]
  1185.     [lyfrm]
  1186.         0
  1187.         11136
  1188.         0
  1189.         0
  1190.         12240
  1191.         1440
  1192.         0
  1193.         1
  1194.         1
  1195.         0 0 0 0 0 0 0
  1196.         0
  1197.         16777215
  1198.         0
  1199.     [frmlay]
  1200.         1440
  1201.         12240
  1202.         1
  1203.         1440
  1204.         72
  1205.         1
  1206.         792
  1207.         1440
  1208.         0
  1209.         1
  1210.         0
  1211.         0
  1212.         0
  1213.         0
  1214.         1
  1215.         1440
  1216.         10800
  1217.         2
  1218.         2
  1219.         4680
  1220.         3
  1221.         9360
  1222.     [txt]
  1223. <:s>
  1224.  
  1225. >
  1226. [elay]
  1227. [lay]
  1228.     1
  1229.     1537
  1230.     [rght]
  1231.         15840
  1232.         12240
  1233.         1
  1234.         1440
  1235.         1440
  1236.         1
  1237.         1440
  1238.         1440
  1239.         0
  1240.         0
  1241.         16777215
  1242.         1
  1243.         0
  1244.         2
  1245.         1
  1246.         1440
  1247.         10800
  1248.         12
  1249.         1
  1250.         720
  1251.         1
  1252.         1440
  1253.         1
  1254.         2160
  1255.         1
  1256.         2880
  1257.         1
  1258.         3600
  1259.         1
  1260.         4320
  1261.         1
  1262.         5040
  1263.         1
  1264.         5760
  1265.         1
  1266.         6480
  1267.         1
  1268.         7200
  1269.         1
  1270.         7920
  1271.         1
  1272.         8640
  1273.     [frght]
  1274.     [lyfrm]
  1275.         0
  1276.         13184
  1277.         0
  1278.         14400
  1279.         12240
  1280.         15840
  1281.         0
  1282.         1
  1283.         1
  1284.         0 0 0 0 0 0 0
  1285.         0
  1286.         16777215
  1287.         0
  1288.     [frmlay]
  1289.         15840
  1290.         12240
  1291.         1
  1292.         1440
  1293.         792
  1294.         1
  1295.         14472
  1296.         1440
  1297.         0
  1298.         0
  1299.         16777215
  1300.         0
  1301.         0
  1302.         0
  1303.         1
  1304.         1440
  1305.         10800
  1306.         2
  1307.         2
  1308.         4680
  1309.         3
  1310.         9360
  1311.     [txt]
  1312. <:s><:#P30670848,P943718>
  1313.  
  1314. >
  1315.     [hrght]
  1316.     [lyfrm]
  1317.         0
  1318.         11136
  1319.         0
  1320.         0
  1321.         12240
  1322.         1440
  1323.         0
  1324.         1
  1325.         1
  1326.         0 0 0 0 0 0 0
  1327.         0
  1328.         16777215
  1329.         0
  1330.     [frmlay]
  1331.         1440
  1332.         12240
  1333.         1
  1334.         1440
  1335.         144
  1336.         1
  1337.         648
  1338.         1440
  1339.         0
  1340.         0
  1341.         16777215
  1342.         0
  1343.         0
  1344.         0
  1345.         1
  1346.         1440
  1347.         10800
  1348.         1
  1349.         3
  1350.         9360
  1351.     [txt]
  1352. <:s><:#P30670848,P943718>Automated Style Sheet Macro    
  1353.  
  1354. >
  1355. [elay]
  1356. [l1]
  1357.     1
  1358. [edoc]
  1359. @Outline1@<:s><:#P30670848,P943718>'declares & defines
  1360.  
  1361. @Outline2@<:s><:#P30670848,P786432><:X3,0;Include "amixlate.sam!autosty">'declares and defines
  1362.  
  1363. @Outline2@<:s>declare fillboxfields(target);
  1364.  
  1365. @Outline2@<:s>declare torchfields(target);
  1366.  
  1367. @Outline2@<:s>declare initcapit(string);
  1368.  
  1369. @Outline2@<:s>declare freeglobs(target);
  1370.  
  1371. @Outline2@<:s>declare collect.smm!main() alias collecto
  1372.  
  1373. @Outline2@<:s>define AS_ADDRESS1TXT    "address2"
  1374.  
  1375. @Outline2@<:s>define AS_ADDRESS2TXT    "address1"
  1376.  
  1377. @Outline2@<:s>define AS_ASPREFIX    "as_"
  1378.  
  1379. @Outline2@<:s>define AS_DEFPREFIX    "as_def"
  1380.  
  1381. @Outline2@<:s>define AS_ECHOTXT    "echo"
  1382.  
  1383. @Outline2@<:s>define AS_USERPREFIX    "as_user"
  1384.  
  1385. @Outline2@<:s>define BKMK_STARTTEXT    "as_starttext"
  1386.  
  1387. @Outline2@<:s>define COLLECT_MACRO    "collect.smm"
  1388.  
  1389. @Outline2@<:s>define DLGTITLE_DEFINFO    "Personal Information"
  1390.  
  1391. @Outline2@<:s>define DLGTITLE_OPTINFO    "Optional Information"
  1392.  
  1393. @Outline2@<:s>define ERR_NOTINNEWDOC    "This macro is for automated style sheets.  To use it, choose File/New and leave Run macro selected."
  1394.  
  1395. @Outline2@<:s>define GVAR_NUMGLOBS    "numglobs"
  1396.  
  1397. @Outline2@<:s>define GVAR_TARGET    "target"
  1398.  
  1399. @Outline2@<:s>define INIFILE    "AMIPRO2.INI"
  1400.  
  1401. @Outline2@<:s>define INIKEY_AUTOSTY    "AutoStyleSheets"
  1402.  
  1403. @Outline2@<:s>define INISECT_DATAGOOD    "DataGood"
  1404.  
  1405. @Outline2@<:s>define INISECT_NOQUEST    "NoQuestions"
  1406.  
  1407. @Outline2@<:s>define DEFBOX_HELPTEXT_1    "Type the information that you want to appear each time "
  1408.  
  1409. @Outline2@<:s>define DEFBOX_HELPTEXT_2    "you create this type of document.  Choose OK to insert this information "
  1410.  
  1411. @Outline2@<:s>define DEFBOX_HELPTEXT_3    "into the current document only.  Choose Save As to save this "
  1412.  
  1413. @Outline2@<:s>define DEFBOX_HELPTEXT_4    "information to a new style sheet."
  1414.  
  1415. @Outline2@<:s>define DEFBOX_HELPTEXT_5    ""
  1416.  
  1417. @Outline2@<:s>define DEFBOX_HELPSTRING    "{L1}{L2}{L3}{L4}{L5}"
  1418.  
  1419. @Outline2@<:s>define OPTBOX_HELPTEXT_1    "Type the information you want to appear "
  1420.  
  1421. @Outline2@<:s>define OPTBOX_HELPTEXT_2    "in this document."
  1422.  
  1423. @Outline2@<:s>define OPTBOX_HELPTEXT_3    ""
  1424.  
  1425. @Outline2@<:s>define OPTBOX_HELPTEXT_4    ""
  1426.  
  1427. @Outline2@<:s>define OPTBOX_HELPTEXT_5    ""
  1428.  
  1429. @Outline2@<:s>define OPTBOX_HELPSTRING    "{L1}{L2}{L3}{L4}{L5}"    
  1430.  
  1431. @Outline2@<:s>define PFTXT_HERE    " here"
  1432.  
  1433. @Outline2@<:s>define PFTXT_SSN    " SSN "
  1434.  
  1435. @Outline2@<:s>define PFTXT_TYPE    "type "<:X~3,0;Include "amixlate.sam!autosty">
  1436.  
  1437. @Outline1@<:s><:#P30670848,P943718>function main()
  1438.  
  1439. @Outline2@<:s><:#P30670848,P786432>goto debug
  1440.  
  1441. @Outline2@<:s><:#P30670848,P786432>'verify this is a clean untitled
  1442.  
  1443. @Outline3@<:s><:#P30670848,P786432>if GetOpenFileName$() !="" or Filechanged(0,0) != 0
  1444.  
  1445. @Outline3@<:s><:#P30670848,P786432>    message(ERR_NOTINNEWDOC)
  1446.  
  1447. @Outline3@<:s><:#P30670848,P786432>    exit function
  1448.  
  1449. @Outline3@<:s><:#P30670848,P786432>endif
  1450.  
  1451. @Outline2@<:s><:#P30670848,P786432>hourglass(1)
  1452.  
  1453. @Outline2@<:s><:#P30670848,P786432>debug:
  1454.  
  1455. @Outline2@<:s><:#P30670848,P786432>ignorekeyboard(2)
  1456.  
  1457. @Outline2@<:s><:#P30670848,P786432>FieldShow(0)
  1458.  
  1459. @Outline2@<:s><:#P30670848,P786432>rmac=getrunningmacrofile$()
  1460.  
  1461. @Outline2@<:s><:#P30670848,P786432>'burn power fields if entry is in AMIPRO2.INI
  1462.  
  1463. @Outline3@<:s><:#P30670848,P786432>burnfields=getprofilestring$(INIKEY_AUTOSTY, INISECT_NOQUEST, INIFILE)
  1464.  
  1465. @Outline3@<:s><:#P30670848,P786432>if burnfields = 1
  1466.  
  1467. @Outline3@<:s><:#P30670848,P786432>    torchfields(AS_ASPREFIX)
  1468.  
  1469. @Outline3@<:s><:#P30670848,P786432>    exit function
  1470.  
  1471. @Outline3@<:s><:#P30670848,P786432>elseif burnfields = ""
  1472.  
  1473. @Outline3@<:s><:#P30670848,P786432>    writeprofilestring(INIKEY_AUTOSTY, INISECT_NOQUEST, 0, INIFILE)
  1474.  
  1475. @Outline3@<:s><:#P30670848,P786432>endif
  1476.  
  1477. @Outline2@<:s><:#P30670848,P786432>datagood=getprofilestring$(INIKEY_AUTOSTY, INISECT_DATAGOOD, INIFILE)
  1478.  
  1479. @Outline2@<:s><:#P30670848,P786432>if datagood != 1
  1480.  
  1481. @Outline2@<:s><:#P30670848,P786432>    collector= COLLECT_MACRO
  1482.  
  1483. @Outline2@<:s><:#P30670848,P786432>    calli collector()
  1484.  
  1485. @Outline2@<:s><:#P30670848,P786432>endif
  1486.  
  1487. @Outline2@<:s><:#P30670848,P786432>cnt = GetPowerFieldCount(0)
  1488.  
  1489. @Outline2@<:s><:#P30670848,P786432>if (0 != cnt)
  1490.  
  1491. @Outline2@<:s><:#P30670848,P786432>    result=fillboxfields(AS_DEFPREFIX)
  1492.  
  1493. @Outline2@<:s><:#P30670848,P786432>    if result=0 or result = 2
  1494.  
  1495. @Outline3@<:s><:#P30670848,P786432>        goto blowout
  1496.  
  1497. @Outline3@<:s><:#P30670848,P786432>    endif
  1498.  
  1499. @Outline2@<:s><:#P30670848,P786432>    result = fillboxfields(AS_USERPREFIX)
  1500.  
  1501. @Outline3@<:s><:#P30670848,P786432>    if result=0 or result = 2
  1502.  
  1503. @Outline3@<:s><:#P30670848,P786432>        goto blowout
  1504.  
  1505. @Outline3@<:s><:#P30670848,P786432>    endif
  1506.  
  1507. @Outline2@<:s><:#P30670848,P786432>else
  1508.  
  1509. @Outline2@<:s><:#P30670848,P786432>'    message("No fields")
  1510.  
  1511. @Outline2@<:s><:#P30670848,P786432>endif
  1512.  
  1513. @Outline2@<:s><:#P30670848,P786432>blowout:
  1514.  
  1515. @Outline2@<:s><:#P30670848,P786432>torchfields(AS_ASPREFIX)
  1516.  
  1517. @Outline2@<:s><:#P30670848,P786432>mark=BKMK_STARTTEXT
  1518.  
  1519. @Outline2@<:s><:#P30670848,P786432>result=MarkBookMark(mark, 4002  )
  1520.  
  1521. @Outline2@<:s><:#P30670848,P786432>MarkBookMark(mark, 4004  )
  1522.  
  1523. @Outline2@<:s><:#P30670848,P786432>DocInfo(""  ""  1  )
  1524.  
  1525. @Outline2@<:s><:#P30670848,P786432>hourglass(0)
  1526.  
  1527. @Outline2@<:s><:#P30670848,P786432>end function
  1528.  
  1529. @Outline1@<:s><:#P30670848,P943718>FUNCTION fillboxfields(target)
  1530.  
  1531. @Outline2@<:s><:#P30670848,P786432>'onerror blowout
  1532.  
  1533. @Outline2@<:s><:#P30670848,P786432>cnt = GetPowerFieldCount(0)
  1534.  
  1535. @Outline3@<:s><:#P30670848,P786432>if cnt = 0
  1536.  
  1537. @Outline3@<:s><:#P30670848,P786432>    exit function
  1538.  
  1539. @Outline3@<:s><:#P30670848,P786432>endif
  1540.  
  1541. @Outline2@<:s><:#P30670848,P786432>rmac=getrunningmacrofile$()
  1542.  
  1543. @Outline2@<:s><:#P30670848,P786432>allocglobalvar(GVAR_TARGET, 1)
  1544.  
  1545. @Outline2@<:s><:#P30670848,P786432>setglobalvar(GVAR_TARGET, target)
  1546.  
  1547. @Outline2@<:s><:#P30670848,P786432>dim fields(cnt)
  1548.  
  1549. @Outline2@<:s><:#P30670848,P786432>dim globvars(1)
  1550.  
  1551. @Outline2@<:s><:#P30670848,P786432>dim echovars(1)
  1552.  
  1553. @Outline2@<:s><:#P30670848,P786432>numglobs=0
  1554.  
  1555. @Outline2@<:s><:#P30670848,P786432>GetPowerFields(0, &fields)
  1556.  
  1557. @Outline2@<:s><:#P30670848,P786432>'load &globvars
  1558.  
  1559. @Outline3@<:s><:#P30670848,P786432>mergefieldspresent=0
  1560.  
  1561. @Outline3@<:s><:#P30670848,P786432>for i = 1 to cnt
  1562.  
  1563. @Outline3@<:s><:#P30670848,P786432>    pftype = StrField$(fields(i), 2, ",")        'get the power field type
  1564.  
  1565. @Outline3@<:s><:#P30670848,P786432>    if pftype=12    'there is a merge field in the doc.
  1566.  
  1567. @Outline3@<:s><:#P30670848,P786432>        mergefieldspresent=1
  1568.  
  1569. @Outline3@<:s><:#P30670848,P786432>    endif
  1570.  
  1571. @Outline3@<:s><:#P30670848,P786432>    pffield = StrField$(fields(i), 3, ",")        'get the power field
  1572.  
  1573. @Outline3@<:s><:#P30670848,P786432>    varname=StrField$(pffield, 3, " ")        'get the name of the variable in the PF
  1574.  
  1575. @Outline3@<:s><:#P30670848,P786432>    showtype=strfield$(varname, 6, "_")
  1576.  
  1577. @Outline3@<:s><:#P30670848,P786432>    if lcase$(showtype)=AS_ADDRESS1TXT
  1578.  
  1579. @Outline3@<:s><:#P30670848,P786432>        secondaddressline=1
  1580.  
  1581. @Outline3@<:s><:#P30670848,P786432>    endif
  1582.  
  1583. @Outline3@<:s><:#P30670848,P1572864>    echovar=strcat$(strfield$(varname, 1, "_"), "_", strfield$(varname, 2, "_"), "_", strfield$(varname, 3, "_"), "_", strfield$(varname, 4, "_"), "_", strfield$(varname, 5, "_"), "_", "echo_")
  1584.  
  1585. @Outline3@<:s><:#P30670848,P786432>    targlen=len(target)
  1586.  
  1587. @Outline3@<:s><:#P30670848,P786432>    if left$(varname, targlen)=target and showtype !=  AS_ECHOTXT
  1588.  
  1589. @Outline3@<:s><:#P30670848,P786432>    numglobs=numglobs+1
  1590.  
  1591. @Outline3@<:s><:#P30670848,P786432>        result=arrayinsert(&globvars, numglobs, fields(i))
  1592.  
  1593. @Outline3@<:s><:#P30670848,P786432>        if result = 0
  1594.  
  1595. @Outline3@<:s><:#P30670848,P786432>            goto blowout
  1596.  
  1597. @Outline3@<:s><:#P30670848,P786432>        arrayinsert(&echovars, numglobs, echovar)
  1598.  
  1599. @Outline3@<:s><:#P30670848,P786432>        endif
  1600.  
  1601. @Outline3@<:s><:#P30670848,P786432>    endif
  1602.  
  1603. @Outline3@<:s><:#P30670848,P786432>next    
  1604.  
  1605. @Outline3@<:s><:#P30670848,P786432>'determine if we have any suitable PFs
  1606.  
  1607. @Outline4@<:s><:#P30670848,P786432>if numglobs=0
  1608.  
  1609. @Outline4@<:s><:#P30670848,P786432>    fillboxfields = 3 'this attempt failed, but don't blow out completely
  1610.  
  1611. @Outline4@<:s><:#P30670848,P786432>    exit function
  1612.  
  1613. @Outline4@<:s><:#P30670848,P786432>endif
  1614.  
  1615. @Outline2@<:s><:#P30670848,P786432>'fill dialog box with labels & pre-build
  1616.  
  1617. @Outline3@<:s><:#P30670848,P786432>allocglobalvar(GVAR_NUMGLOBS, 1)
  1618.  
  1619. @Outline3@<:s><:#P30670848,P786432>setglobalvar(GVAR_NUMGLOBS, numglobs)
  1620.  
  1621. @Outline3@<:s><:#P30670848,P786432>arraysort(&globvars, 3, "_")                'sort the array on varnum
  1622.  
  1623. @Outline3@<:s><:#P30670848,P786432>for i = 1 to numglobs
  1624.  
  1625. @Outline3@<:s><:#P30670848,P786432>    pffield = StrField$(globvars(i), 3, ",")        'get the power field
  1626.  
  1627. @Outline3@<:s><:#P30670848,P786432>    varname=StrField$(pffield, 3, " ")        'get the name of the variable in the PF
  1628.  
  1629. @Outline3@<:s><:#P30670848,P786432>    quotechar=chr$(34)
  1630.  
  1631. @Outline3@<:s><:#P30670848,P786432>    varlabel=StrField$(globvars(i), 2, quotechar)        'get the label for the variable
  1632.  
  1633. @Outline3@<:s><:#P30670848,P786432>    showtype=strfield$(varname, 6, "_")
  1634.  
  1635. @Outline3@<:s><:#P30670848,P786432>    profilestringstuff=""
  1636.  
  1637. @Outline3@<:s><:#P30670848,P786432>    if showtype != (-1) and showtype != AS_ECHOTXT and showtype != ""
  1638.  
  1639. @Outline3@<:s><:#P30670848,P786432>        profilestringstuff=getprofilestring$(INIKEY_AUTOSTY, showtype, INIFILE)
  1640.  
  1641. @Outline3@<:s><:#P30670848,P786432>        if lcase$(showtype) = AS_ADDRESS2TXT and secondaddressline !=1
  1642.  
  1643. @Outline3@<:s><:#P30670848,P786432>            address2=getprofilestring$(INIKEY_AUTOSTY, "Address2", INIFILE)
  1644.  
  1645. @Outline3@<:s><:#P30670848,P786432>            if address2 != ""
  1646.  
  1647. @Outline3@<:s><:#P30670848,P786432>                profilestringstuff=strcat$(profilestringstuff, ", " address2)
  1648.  
  1649. @Outline3@<:s><:#P30670848,P786432>            endif
  1650.  
  1651. @Outline3@<:s><:#P30670848,P786432>        endif
  1652.  
  1653. @Outline3@<:s><:#P30670848,P786432>    endif
  1654.  
  1655. @Outline3@<:s><:#P30670848,P786432>    allocglobalvar(varname, 1)
  1656.  
  1657. @Outline3@<:s><:#P30670848,P1572864>    echovar=strcat$(strfield$(varname, 1, "_"), "_", strfield$(varname, 2, "_"), "_", strfield$(varname, 3, "_"), "_", strfield$(varname, 4, "_"), "_", strfield$(varname, 5, "_"), "_", "echo_")
  1658.  
  1659. @Outline3@<:s><:#P30670848,P786432>    allocglobalvar(echovar, 1)
  1660.  
  1661. @Outline3@<:s><:#P30670848,P786432>    if lcase$(left$(varlabel, 5)) = PFTXT_TYPE
  1662.  
  1663. @Outline3@<:s><:#P30670848,P786432>        lenwithouttype=len(varlabel) - 5
  1664.  
  1665. @Outline3@<:s><:#P30670848,P786432>        varlabel=right$(varlabel, lenwithouttype)
  1666.  
  1667. @Outline3@<:s><:#P30670848,P786432>    endif
  1668.  
  1669. @Outline3@<:s><:#P30670848,P786432>    if lcase$(right$(varlabel, 5)) = PFTXT_HERE
  1670.  
  1671. @Outline3@<:s><:#P30670848,P786432>        lenwithouthere=len(varlabel) - 5
  1672.  
  1673. @Outline3@<:s><:#P30670848,P786432>        varlabel=left$(varlabel, lenwithouthere)
  1674.  
  1675. @Outline3@<:s><:#P30670848,P786432>    endif
  1676.  
  1677. @Outline3@<:s><:#P30670848,P786432>    varlabel=initcapit(varlabel)
  1678.  
  1679. @Outline3@<:s><:#P30670848,P786432>    filledit(1000 + i, "{varlabel}:")
  1680.  
  1681. @Outline3@<:s><:#P30670848,P786432>    filledit(8000 + i, profilestringstuff)
  1682.  
  1683. @Outline3@<:s><:#P30670848,P786432>next
  1684.  
  1685. @Outline3@<:s><:#P30670848,P786432>SetDlgCallBack(0,"{rmac}!PreBuild")
  1686.  
  1687. @Outline2@<:s><:#P30670848,P786432><:ZDDE_BookMark6>amidir=GetAmiDirectory$()
  1688.  
  1689. @Outline2@<:s><:#P30670848,P786432>boxnum= numglobs
  1690.  
  1691. @Outline2@<:s><:#P30670848,P786432>'message("boxnum={boxnum}")
  1692.  
  1693. @Outline2@<:s><:#P30670848,P786432>box=dialogbox("{amidir}autosty.dlg"<:Z~DDE_BookMark6>, "autostyl{boxnum}")
  1694.  
  1695. @Outline2@<:s><:#P30670848,P786432>fillboxfields = box    'set this function's return value to the ID returned by the box
  1696.  
  1697. @Outline2@<:s><:#P30670848,P786432>if box= 0 or box =2 
  1698.  
  1699. @Outline2@<:s><:#P30670848,P786432>    goto blowout
  1700.  
  1701. @Outline2@<:s><:#P30670848,P786432>endif
  1702.  
  1703. @Outline2@<:s><:#P30670848,P786432>'set global vars & update fields
  1704.  
  1705. @Outline3@<:s><:#P30670848,P786432>for i = 1 to numglobs
  1706.  
  1707. @Outline3@<:s><:#P30670848,P786432>    contents=getdialogfield$(8000 +i)
  1708.  
  1709. @Outline3@<:s><:#P30670848,P786432>    pfid = StrField$(globvars(i), 1, ",")        'get the power field id
  1710.  
  1711. @Outline3@<:s><:#P30670848,P786432>    pftype = StrField$(globvars(i), 2, ",")        'get the power field type
  1712.  
  1713. @Outline3@<:s><:#P30670848,P786432>    pffield = StrField$(globvars(i), 3, ",")        'get the power field
  1714.  
  1715. @Outline3@<:s><:#P30670848,P786432>    varname=StrField$(pffield, 3, " ")        'get the name of the variable in the PF
  1716.  
  1717. @Outline3@<:s><:#P30670848,P1572864>    echovar=strcat$(strfield$(varname, 1, "_"), "_", strfield$(varname, 2, "_"), "_", strfield$(varname, 3, "_"), "_", strfield$(varname, 4, "_"), "_", strfield$(varname, 5, "_"), "_", "echo_")
  1718.  
  1719. @Outline3@<:s><:#P30670848,P786432>    setglobalvar(echovar, contents)
  1720.  
  1721. @Outline3@<:s><:#P30670848,P786432>    setglobalvar(varname, contents)
  1722.  
  1723. @Outline3@<:s><:#P30670848,P786432>    if mergefieldspresent=1
  1724.  
  1725. @Outline3@<:s><:#P30670848,P786432>        result=GoToPowerField(pfid, pftype)
  1726.  
  1727. @Outline3@<:s><:#P30670848,P786432>        FieldUpdate(pfid, pftype, pffield)
  1728.  
  1729. @Outline3@<:s><:#P30670848,P786432>        FieldEvaluate()
  1730.  
  1731. @Outline3@<:s><:#P30670848,P786432>    endif
  1732.  
  1733. @Outline3@<:s><:#P30670848,P786432>next
  1734.  
  1735. @Outline3@<:s><:#P30670848,P786432>if mergefieldspresent = 0
  1736.  
  1737. @Outline3@<:s><:#P30670848,P786432>    fieldupdateall()
  1738.  
  1739. @Outline3@<:s><:#P30670848,P786432>endif
  1740.  
  1741. @Outline2@<:s><:#P30670848,P786432>blowout:
  1742.  
  1743. @Outline3@<:s><:#P30670848,P786432>    call torchfields(target)
  1744.  
  1745. @Outline3@<:s><:#P30670848,P786432>    call freeglobs(target)
  1746.  
  1747. @Outline3@<:s><:#P30670848,P786432>    freeglobalvar(GVAR_TARGET)
  1748.  
  1749. @Outline3@<:s><:#P30670848,P786432>    freeglobalvar(GVAR_NUMGLOBS)
  1750.  
  1751. @Outline2@<:s><:#P30670848,P786432>if box=3
  1752.  
  1753. @Outline2@<:s><:#P30670848,P786432>'    pause(008)
  1754.  
  1755. @Outline2@<:s><:#P30670848,P786432>    setdlgcallback(0, "{rmac}!SaveAsStyleInit")
  1756.  
  1757. @Outline2@<:s><:#P30670848,P786432>    'result = SaveAsNewStyle
  1758.  
  1759. @Outline2@<:s><:#P30670848,P786432>    result = SubClassDialog(305, 1022)
  1760.  
  1761. @Outline2@<:s><:#P30670848,P786432>
  1762.  
  1763. @Outline2@<:s><:#P30670848,P786432>endif
  1764.  
  1765. @Outline2@<:s><:#P30670848,P786432>END FUNCTION
  1766.  
  1767. @Outline1@<:s><:#P30670848,P943718>function SaveAsStyleInit(hdlg, id, value)
  1768.  
  1769. @Outline2@<:s><:#P30670848,P786432>CB_withcontents=25550
  1770.  
  1771. @Outline2@<:s><:#P30670848,P786432>CB_runmacro=25551
  1772.  
  1773. @Outline2@<:s><:#P30670848,P786432>EB_runmacro=667
  1774.  
  1775. @Outline2@<:s><:#P30670848,P786432>setdlgitemtext(hdlg, cb_withcontents, 1)
  1776.  
  1777. @Outline2@<:s><:#P30670848,P786432>dlgenablecontrol(hdlg, cb_withcontents, 0)
  1778.  
  1779. @Outline2@<:s><:#P30670848,P786432>setdlgitemtext(hdlg, cb_runmacro, 1)
  1780.  
  1781. @Outline2@<:s><:#P30670848,P786432>dlgenablecontrol(hdlg, cb_runmacro, 0)
  1782.  
  1783. @Outline2@<:s><:#P30670848,P786432>setdlgitemtext(hdlg, EB_runmacro, "autosty.smm")
  1784.  
  1785. @Outline2@<:s><:#P30670848,P786432>dlgenablecontrol(hdlg, EB_runmacro, 0)
  1786.  
  1787. @Outline2@<:s><:#P30670848,P786432>end function
  1788.  
  1789. @Outline1@<:s><:#P30670848,P943718>FUNCTION freeglobs(target)
  1790.  
  1791. @Outline2@<:s><:#P30670848,P786432>'singlestep(0)
  1792.  
  1793. @Outline2@<:s><:#P30670848,P786432>targlen=len(target)
  1794.  
  1795. @Outline2@<:s><:#P30670848,P786432>numglobs=getglobalvarcount()
  1796.  
  1797. @Outline2@<:s><:#P30670848,P786432>dim globnuke(numglobs)
  1798.  
  1799. @Outline2@<:s><:#P30670848,P786432>getglobalvarnames(&globnuke)
  1800.  
  1801. @Outline2@<:s><:#P30670848,P786432>for i = 1 to numglobs
  1802.  
  1803. @Outline2@<:s><:#P30670848,P786432>    if left$(globnuke(i), targlen)=target
  1804.  
  1805. @Outline2@<:s><:#P30670848,P786432>        freeglobalvar(globnuke(i))
  1806.  
  1807. @Outline2@<:s><:#P30670848,P786432>    endif
  1808.  
  1809. @Outline2@<:s><:#P30670848,P786432>next
  1810.  
  1811. @Outline2@<:s><:#P30670848,P786432>end function
  1812.  
  1813. @Outline1@<:s><:#P30670848,P943718><:ZDDE_BookMark1>FUNCTION torchfields(target)
  1814.  
  1815. @Outline2@<:s><:#P30670848,P786432>'singlestep(0)
  1816.  
  1817. @Outline2@<:s><:#P30670848,P786432>cnt = GetPowerFieldCount(0)
  1818.  
  1819. @Outline2@<:s><:#P30670848,P786432>if (0 != cnt)
  1820.  
  1821. @Outline2@<:s><:#P30670848,P786432>    dim fields(cnt)
  1822.  
  1823. @Outline2@<:s><:#P30670848,P786432>    GetPowerFields(0, &fields)
  1824.  
  1825. @Outline2@<:s><:#P30670848,P786432>    for i = 1 to cnt
  1826.  
  1827. @Outline2@<:s><:#P30670848,P786432>        pfid = StrField$(fields(i), 1, ",")
  1828.  
  1829. @Outline2@<:s><:#P30670848,P786432>        pftype = StrField$(fields(i), 2, ",")
  1830.  
  1831. @Outline2@<:s><:#P30670848,P786432>        pffield = StrField$(fields(i), 3, ",")        'get the power field
  1832.  
  1833. @Outline2@<:s><:#P30670848,P786432>        varname=StrField$(pffield, 3, " ")        'get the name of the variable in the PF
  1834.  
  1835. @Outline2@<:s><:#P30670848,P786432>        targlen=len(target)
  1836.  
  1837. @Outline2@<:s><:#P30670848,P786432>        if left$(varname, targlen)=target
  1838.  
  1839. @Outline2@<:s><:#P30670848,P786432>            'message("FieldRemove({pfid},{pftype})", "Debug")
  1840.  
  1841. @Outline2@<:s><:#P30670848,P786432>            FieldRemove(pfid, pftype);
  1842.  
  1843. @Outline2@<:s><:#P30670848,P786432>        endif
  1844.  
  1845. @Outline2@<:s><:#P30670848,P786432>    next
  1846.  
  1847. @Outline2@<:s><:#P30670848,P786432>else
  1848.  
  1849. @Outline2@<:s><:#P30670848,P786432>'    message("No fields")
  1850.  
  1851. @Outline2@<:s><:#P30670848,P786432>endif
  1852.  
  1853. @Outline2@<:s><:#P30670848,P786432>END FUNCTION<:Z~DDE_BookMark1>
  1854.  
  1855. <:s><:#P30670848,P943718>
  1856.  
  1857. <:s><:#P30670848,P943718>
  1858.  
  1859. <:s><:#P30670848,P943718>
  1860.  
  1861. <:s><:#P30670848,P943718>
  1862.  
  1863. @Outline1@<:s><:#P30670848,P943718>Function PreBuild(Hdlg,id,dummy)
  1864.  
  1865. @Outline2@<:s><:#P30670848,P786432>target=getglobalvar$(GVAR_TARGET)
  1866.  
  1867. @Outline2@<:s><:#P30670848,P786432>numglobs=getglobalvar$(GVAR_NUMGLOBS)
  1868.  
  1869. @Outline2@<:s><:#P30670848,P786432>'name the box and show the right buttons and static text
  1870.  
  1871. @Outline3@<:s><:#P30670848,P786432>CurStyleSheet = GetDocInfo$(3)
  1872.  
  1873. @Outline3@<:s><:#P30670848,P786432>CurStyleSheet = ucase$(CurStyleSheet)
  1874.  
  1875. @Outline3@<:s><:#P30670848,P786432>lb=chr$(091)
  1876.  
  1877. @Outline3@<:s><:#P30670848,P786432>rb=chr$(093)
  1878.  
  1879. @Outline3@<:s><:#P30670848,P786432>CurStyleSheet = strcat$(lb, CurStyleSheet, rb)
  1880.  
  1881. @Outline3@<:s><:#P30670848,P786432>if target =AS_DEFPREFIX
  1882.  
  1883. @Outline3@<:s><:#P30670848,P786432>    DlgSetCaption(hdlg, DLGTITLE_DEFINFO)
  1884.  
  1885. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(Hdlg, 3, 0) ' show the save as button
  1886.  
  1887. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(hdlg, 1060, 1) ' hide the 1060 field static text
  1888.  
  1889. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(hdlg, 1050, 0)
  1890.  
  1891. @Outline3@<:s><:#P30670848,P786432>    L1=DEFBOX_HELPTEXT_1
  1892.  
  1893. @Outline3@<:s><:#P30670848,P786432>    L2=DEFBOX_HELPTEXT_2
  1894.  
  1895. @Outline3@<:s><:#P30670848,P786432>    L3=DEFBOX_HELPTEXT_3
  1896.  
  1897. @Outline3@<:s><:#P30670848,P786432>    L4=DEFBOX_HELPTEXT_4
  1898.  
  1899. @Outline3@<:s><:#P30670848,P786432>    L5=DEFBOX_HELPTEXT_5
  1900.  
  1901. @Outline3@<:s><:#P30670848,P786432>    helptext=DEFBOX_HELPSTRING
  1902.  
  1903. @Outline3@<:s><:#P30670848,P786432>    setdlgitemtext(hdlg, 1050, helptext)
  1904.  
  1905. @Outline3@<:s><:#P30670848,P786432>else
  1906.  
  1907. @Outline3@<:s><:#P30670848,P786432>    DlgSetCaption(hdlg, DLGTITLE_OPTINFO)
  1908.  
  1909. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(Hdlg, 3, 1) ' hide the save as button
  1910.  
  1911. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(hdlg, 1050, 1) ' hide the 1050 field static text
  1912.  
  1913. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(hdlg, 1060, 0)
  1914.  
  1915. @Outline3@<:s><:#P30670848,P786432>    L1=OPTBOX_HELPTEXT_1
  1916.  
  1917. @Outline3@<:s><:#P30670848,P786432>    L2=OPTBOX_HELPTEXT_2
  1918.  
  1919. @Outline3@<:s><:#P30670848,P786432>    L3=OPTBOX_HELPTEXT_3
  1920.  
  1921. @Outline3@<:s><:#P30670848,P786432>    L4=OPTBOX_HELPTEXT_4
  1922.  
  1923. @Outline3@<:s><:#P30670848,P786432>    L5=OPTBOX_HELPTEXT_5
  1924.  
  1925. @Outline3@<:s><:#P30670848,P786432>    helptext=OPTBOX_HELPSTRING
  1926.  
  1927. @Outline3@<:s><:#P30670848,P786432>    setdlgitemtext(hdlg, 1060, helptext)
  1928.  
  1929. @Outline3@<:s><:#P30670848,P786432>endif
  1930.  
  1931. @Outline2@<:s><:#P30670848,P786432>'hide static text and edit fields
  1932.  
  1933. @Outline3@<:s><:#P30670848,P786432>for i = (numglobs + 1) to 9
  1934.  
  1935. @Outline3@<:s><:#P30670848,P786432>    stid=1000 + i
  1936.  
  1937. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(hdlg, stid, 1)
  1938.  
  1939. @Outline3@<:s><:#P30670848,P786432>    ebid=8000 + i
  1940.  
  1941. @Outline3@<:s><:#P30670848,P786432>    DlgHideControl(hdlg, ebid, 1)
  1942.  
  1943. @Outline3@<:s><:#P30670848,P786432>next    
  1944.  
  1945. @Outline2@<:s><:#P30670848,P786432>'size the box
  1946.  
  1947. @Outline3@<:s><:#P30670848,P786432>DIM rect(4)
  1948.  
  1949. @Outline3@<:s><:#P30670848,P786432>'GetWindowRect(hDlg,&rect)
  1950.  
  1951. @Outline3@<:s><:#P30670848,P786432>x=rect(1)
  1952.  
  1953. @Outline3@<:s><:#P30670848,P786432>y=rect(2)
  1954.  
  1955. @Outline3@<:s><:#P30670848,P786432>xL=rect(3)
  1956.  
  1957. @Outline3@<:s><:#P30670848,P786432>yL=rect(4)
  1958.  
  1959. @Outline3@<:s><:#P30670848,P786432>MoveBase=24
  1960.  
  1961. @Outline3@<:s><:#P30670848,P786432>moveshrink=MoveBase * (9-numglobs)
  1962.  
  1963. @Outline4@<:s><:#P30670848,P786432>if target=AS_DEFPREFIX
  1964.  
  1965. @Outline4@<:s><:#P30670848,P786432>    moveshrink=moveshrink + 22
  1966.  
  1967. @Outline4@<:s><:#P30670848,P786432>    max=145
  1968.  
  1969. @Outline4@<:s><:#P30670848,P786432>else
  1970.  
  1971. @Outline4@<:s><:#P30670848,P786432>    moveshrink=moveshrink + 50    'shrink extra amount for less 1050 text
  1972.  
  1973. @Outline4@<:s><:#P30670848,P786432>    max=217
  1974.  
  1975. @Outline4@<:s><:#P30670848,P786432>endif
  1976.  
  1977. @Outline4@<:s><:#P30670848,P786432>if moveshrink <;> max
  1978.  
  1979. @Outline4@<:s><:#P30670848,P786432>    moveshrink = max
  1980.  
  1981. @Outline4@<:s><:#P30670848,P786432>endif
  1982.  
  1983. @Outline2@<:s><:#P30670848,P786432>'move the helptext box
  1984.  
  1985. @Outline3@<:s><:#P30670848,P786432>'hwndCtrl=GetDlgItem(hdlg, 1050)
  1986.  
  1987. @Outline3@<:s><:#P30670848,P786432>DIM rect2(4)
  1988.  
  1989. @Outline3@<:s><:#P30670848,P786432>DIM rect3(4)
  1990.  
  1991. @Outline3@<:s><:#P30670848,P786432>'GetWindowRect(hwndCtrl,&rect2)
  1992.  
  1993. @Outline3@<:s><:#P30670848,P786432>'ScreenToClient(hDlg, &rect2)    'convert 1050's screen-relative coordinates to hdlg-relative coordinates
  1994.  
  1995. @Outline3@<:s><:#P30670848,P786432>'GetClientRect(hwndCtrl, &rect3)    'get xL & yL numbers (length & width of 1050)
  1996.  
  1997. @Outline3@<:s><:#P30670848,P786432>x=rect2(1)
  1998.  
  1999. @Outline3@<:s><:#P30670848,P786432>y=rect2(2)
  2000.  
  2001. @Outline3@<:s><:#P30670848,P786432>xL=rect3(3)
  2002.  
  2003. @Outline3@<:s><:#P30670848,P786432>yL=rect3(4)
  2004.  
  2005. @Outline3@<:s><:#P30670848,P786432>moveshrink=MoveBase * (9-numglobs)
  2006.  
  2007. @Outline4@<:s><:#P30670848,P786432>if target=AS_DEFPREFIX
  2008.  
  2009. @Outline4@<:s><:#P30670848,P786432>    max=137
  2010.  
  2011. @Outline4@<:s><:#P30670848,P786432>else
  2012.  
  2013. @Outline4@<:s><:#P30670848,P786432>    max=167
  2014.  
  2015. @Outline4@<:s><:#P30670848,P786432>endif
  2016.  
  2017. @Outline4@<:s><:#P30670848,P786432>if moveshrink <;> max
  2018.  
  2019. @Outline4@<:s><:#P30670848,P786432>    moveshrink = max
  2020.  
  2021. @Outline4@<:s><:#P30670848,P786432>endif
  2022.  
  2023. @Outline2@<:s><:#P30670848,P786432>END FUNCTION
  2024.  
  2025. @Outline1@<:s><:#P30670848,P943718>function initcapit(string)
  2026.  
  2027. @Outline2@<:s><:#P30670848,P786432>if instr(0, PFTXT_SSN, string) != 0
  2028.  
  2029. @Outline2@<:s><:#P30670848,P786432>    initcapit=string
  2030.  
  2031. @Outline2@<:s><:#P30670848,P786432>    exit function
  2032.  
  2033. @Outline2@<:s><:#P30670848,P786432>endif
  2034.  
  2035. @Outline2@<:s><:#P30670848,P786432>firstchar=left$(string, 1)
  2036.  
  2037. @Outline2@<:s><:#P30670848,P786432>restchars=lcase$(right$(string, (len(string) - 1)))
  2038.  
  2039. @Outline2@<:s><:#P30670848,P786432>initcapit=strcat$(firstchar, restchars)
  2040.  
  2041. @Outline2@<:s><:#P30670848,P786432>end function
  2042.  
  2043. @Outline2@<:s><:#P30670848,P786432>
  2044. >
  2045.  
  2046. [Embedded]
  2047. 00031396
  2048. >
  2049. [macsum4] 7 76
  2050. main 0 0 8 39
  2051. fillboxfields 1374 1 28 85
  2052. SaveAsStyleInit 5695 3 4 204
  2053. freeglobs 6072 1 5 215
  2054. torchfields 6466 1 9 227
  2055. PreBuild 7127 3 25 252
  2056. initcapit 9572 1 3 333
  2057. [macse]
  2058. 14 main
  2059. 29 0 main
  2060. 17 1
  2061. 10 00000283
  2062. 17 3
  2063. 16 _$$2GetOpenFileName$
  2064. 13
  2065. 7 ""
  2066. 18 1
  2067. 16 _$$2FileChanged 0 0
  2068. 13
  2069. 5 0
  2070. 18 1
  2071. 1 2
  2072. 11 00000268
  2073. 17 4
  2074. 0 3 "This macro is for automated style sheets.  To use it, choose File/New and leave Run macro selected."
  2075. 6 0
  2076. 15
  2077. 9
  2078. 17 7
  2079. 0 296 1
  2080. 17 9
  2081. 0 32 2
  2082. 17 10
  2083. 16 _$$4FieldShow 0
  2084. 17 11
  2085. 29 1 rmac
  2086. 0 802
  2087. 13
  2088. 8 1
  2089. 17 13
  2090. 29 2 burnfields
  2091. 0 286 "AutoStyleSheets" "NoQuestions" "AMIPRO2.INI"
  2092. 13
  2093. 8 2
  2094. 17 14
  2095. 6 2
  2096. 5 1
  2097. 18 0
  2098. 11 00000534
  2099. 17 15
  2100. 16 torchfields "as_"
  2101. 6 0
  2102. 15
  2103. 9
  2104. 10 00000633
  2105. 17 17
  2106. 6 2
  2107. 7 ""
  2108. 18 0
  2109. 11 00000633
  2110. 17 18
  2111. 0 287 "AutoStyleSheets" "NoQuestions" 0 "AMIPRO2.INI"
  2112. 17 20
  2113. 29 3 datagood
  2114. 0 286 "AutoStyleSheets" "DataGood" "AMIPRO2.INI"
  2115. 13
  2116. 8 3
  2117. 17 21
  2118. 6 3
  2119. 5 1
  2120. 18 1
  2121. 11 00000812
  2122. 17 22
  2123. 29 4 collector
  2124. 7 "collect.smm"
  2125. 8 4
  2126. 17 23
  2127. 16 "{4}"
  2128. 17 25
  2129. 29 5 cnt
  2130. 0 1304 0
  2131. 13
  2132. 8 5
  2133. 17 26
  2134. 5 0
  2135. 6 5
  2136. 18 1
  2137. 11 00001151
  2138. 17 27
  2139. 29 6 result
  2140. 16 fillboxfields "as_def"
  2141. 13
  2142. 8 6
  2143. 17 28
  2144. 6 6
  2145. 5 0
  2146. 18 0
  2147. 6 6
  2148. 5 2
  2149. 18 0
  2150. 1 2
  2151. 11 00001017
  2152. 17 29
  2153. 10 00001151
  2154. 17 31
  2155. 16 fillboxfields "as_user"
  2156. 13
  2157. 8 6
  2158. 17 32
  2159. 6 6
  2160. 5 0
  2161. 18 0
  2162. 6 6
  2163. 5 2
  2164. 18 0
  2165. 1 2
  2166. 11 00001138
  2167. 17 33
  2168. 10 00001151
  2169. 10 00001151
  2170. 17 39
  2171. 16 torchfields "as_"
  2172. 17 40
  2173. 29 7 mark
  2174. 7 "as_starttext"
  2175. 8 7
  2176. 17 41
  2177. 16 _$$4MarkBookMark "{7}" 4002
  2178. 13
  2179. 8 6
  2180. 17 42
  2181. 16 _$$4MarkBookMark "{7}" 4004
  2182. 17 43
  2183. 16 _$$1DocInfo "" "" 1
  2184. 17 44
  2185. 0 296 0
  2186. 6 0
  2187. 15
  2188. 17 45
  2189. 9
  2190. 14 fillboxfields
  2191. 29 0 target
  2192. 29 1 fillboxfields
  2193. 17 2
  2194. 29 2 cnt
  2195. 0 1304 0
  2196. 13
  2197. 8 2
  2198. 17 3
  2199. 6 2
  2200. 5 0
  2201. 18 0
  2202. 11 00000133
  2203. 6 1
  2204. 15
  2205. 9
  2206. 17 6
  2207. 29 3 rmac
  2208. 0 802
  2209. 13
  2210. 8 3
  2211. 17 7
  2212. 0 271 "target" 1
  2213. 17 8
  2214. 0 264 "target" "{0}"
  2215. 17 9
  2216. 6 2
  2217. 29 4 fields
  2218. 21 4 [X]
  2219. 17 10
  2220. 5 1
  2221. 29 5 globvars
  2222. 21 5 [X]
  2223. 17 11
  2224. 5 1
  2225. 29 6 echovars
  2226. 21 6 [X]
  2227. 17 12
  2228. 29 7 numglobs
  2229. 5 0
  2230. 8 7
  2231. 17 13
  2232. 0 1305 0 &4
  2233. 17 15
  2234. 29 8 mergefieldspresent
  2235. 5 0
  2236. 8 8
  2237. 29 9 i
  2238. 5 1
  2239. 8 9
  2240. 17 16
  2241. 6 2
  2242. 6 9
  2243. 18 2
  2244. 12 00000520
  2245. 10 00001414
  2246. 5 1
  2247. 6 9
  2248. 3 0
  2249. 8 9
  2250. 10 00000438
  2251. 17 17
  2252. 29 10 pftype
  2253. 6 9
  2254. 22 4
  2255. 0 20 [X] 2 ","
  2256. 13
  2257. 8 10
  2258. 17 18
  2259. 6 10
  2260. 5 12
  2261. 18 0
  2262. 11 00000633
  2263. 17 19
  2264. 5 1
  2265. 8 8
  2266. 17 21
  2267. 29 11 pffield
  2268. 6 9
  2269. 22 4
  2270. 0 20 [X] 3 ","
  2271. 13
  2272. 8 11
  2273. 17 22
  2274. 29 12 varname
  2275. 0 20 "{11}" 3 " "
  2276. 13
  2277. 8 12
  2278. 17 23
  2279. 29 13 showtype
  2280. 0 20 "{12}" 6 "_"
  2281. 13
  2282. 8 13
  2283. 17 24
  2284. 0 17 "{13}"
  2285. 13
  2286. 7 "address2"
  2287. 18 0
  2288. 11 00000895
  2289. 17 25
  2290. 29 14 secondaddressline
  2291. 5 1
  2292. 8 14
  2293. 17 27
  2294. 29 15 echovar
  2295. 0 20 "{12}" 1 "_"
  2296. 13
  2297. 0 20 "{12}" 2 "_"
  2298. 13
  2299. 0 20 "{12}" 3 "_"
  2300. 13
  2301. 0 20 "{12}" 4 "_"
  2302. 13
  2303. 0 20 "{12}" 5 "_"
  2304. 13
  2305. 0 16 [X] "_" [X] "_" [X] "_" [X] "_" [X] "_" "echo_"
  2306. 13
  2307. 8 15
  2308. 17 28
  2309. 29 16 targlen
  2310. 0 14 "{0}"
  2311. 13
  2312. 8 16
  2313. 17 29
  2314. 0 806 "{12}" "{16}"
  2315. 13
  2316. 6 0
  2317. 18 0
  2318. 6 13
  2319. 7 "echo"
  2320. 18 1
  2321. 1 1
  2322. 11 00001401
  2323. 17 30
  2324. 6 7
  2325. 5 1
  2326. 3 0
  2327. 8 7
  2328. 17 31
  2329. 29 17 result
  2330. 6 9
  2331. 22 4
  2332. 0 1041 &5 "{7}" [X]
  2333. 13
  2334. 8 17
  2335. 17 32
  2336. 6 17
  2337. 5 0
  2338. 18 0
  2339. 11 00001401
  2340. 17 33
  2341. 10 00004084
  2342. 17 34
  2343. 0 1041 &6 "{7}" "{15}"
  2344. 10 00000487
  2345. 17 39
  2346. 6 7
  2347. 5 0
  2348. 18 0
  2349. 11 00001479
  2350. 17 40
  2351. 5 3
  2352. 8 1
  2353. 6 1
  2354. 15
  2355. 9
  2356. 17 44
  2357. 0 271 "numglobs" 1
  2358. 17 45
  2359. 0 264 "numglobs" "{7}"
  2360. 17 46
  2361. 0 1043 &5 3 "_"
  2362. 5 1
  2363. 8 9
  2364. 17 47
  2365. 6 7
  2366. 6 9
  2367. 18 2
  2368. 12 00001653
  2369. 10 00003023
  2370. 5 1
  2371. 6 9
  2372. 3 0
  2373. 8 9
  2374. 10 00001571
  2375. 17 48
  2376. 6 9
  2377. 22 5
  2378. 0 20 [X] 3 ","
  2379. 13
  2380. 8 11
  2381. 17 49
  2382. 0 20 "{11}" 3 " "
  2383. 13
  2384. 8 12
  2385. 17 50
  2386. 29 18 quotechar
  2387. 0 39 34
  2388. 13
  2389. 8 18
  2390. 17 51
  2391. 29 19 varlabel
  2392. 6 9
  2393. 22 5
  2394. 0 20 [X] 2 "{18}"
  2395. 13
  2396. 8 19
  2397. 17 52
  2398. 0 20 "{12}" 6 "_"
  2399. 13
  2400. 8 13
  2401. 17 53
  2402. 29 20 profilestringstuff
  2403. 7 ""
  2404. 8 20
  2405. 17 54
  2406. 6 13
  2407. 5 -1
  2408. 18 1
  2409. 6 13
  2410. 7 "echo"
  2411. 18 1
  2412. 6 13
  2413. 7 ""
  2414. 18 1
  2415. 1 1
  2416. 1 1
  2417. 11 00002313
  2418. 17 55
  2419. 0 286 "AutoStyleSheets" "{13}" "AMIPRO2.INI"
  2420. 13
  2421. 8 20
  2422. 17 56
  2423. 0 17 "{13}"
  2424. 13
  2425. 7 "address1"
  2426. 18 0
  2427. 6 14
  2428. 5 1
  2429. 18 1
  2430. 1 1
  2431. 11 00002313
  2432. 17 57
  2433. 29 21 address2
  2434. 0 286 "AutoStyleSheets" "Address2" "AMIPRO2.INI"
  2435. 13
  2436. 8 21
  2437. 17 58
  2438. 6 21
  2439. 7 ""
  2440. 18 1
  2441. 11 00002313
  2442. 17 59
  2443. 0 16 "{20}" ", " "{21}"
  2444. 13
  2445. 8 20
  2446. 17 63
  2447. 0 271 "{12}" 1
  2448. 17 64
  2449. 0 20 "{12}" 1 "_"
  2450. 13
  2451. 0 20 "{12}" 2 "_"
  2452. 13
  2453. 0 20 "{12}" 3 "_"
  2454. 13
  2455. 0 20 "{12}" 4 "_"
  2456. 13
  2457. 0 20 "{12}" 5 "_"
  2458. 13
  2459. 0 16 [X] "_" [X] "_" [X] "_" [X] "_" [X] "_" "echo_"
  2460. 13
  2461. 8 15
  2462. 17 65
  2463. 0 271 "{15}" 1
  2464. 17 66
  2465. 0 806 "{19}" 5
  2466. 13
  2467. 0 17 [X]
  2468. 13
  2469. 7 "type "
  2470. 18 0
  2471. 11 00002716
  2472. 17 67
  2473. 29 22 lenwithouttype
  2474. 0 14 "{19}"
  2475. 13
  2476. 5 5
  2477. 3 1
  2478. 8 22
  2479. 17 68
  2480. 0 807 "{19}" "{22}"
  2481. 13
  2482. 8 19
  2483. 17 70
  2484. 0 807 "{19}" 5
  2485. 13
  2486. 0 17 [X]
  2487. 13
  2488. 7 " here"
  2489. 18 0
  2490. 11 00002887
  2491. 17 71
  2492. 29 23 lenwithouthere
  2493. 0 14 "{19}"
  2494. 13
  2495. 5 5
  2496. 3 1
  2497. 8 23
  2498. 17 72
  2499. 0 806 "{19}" "{23}"
  2500. 13
  2501. 8 19
  2502. 17 74
  2503. 16 initcapit "{19}"
  2504. 13
  2505. 8 19
  2506. 17 75
  2507. 5 1000
  2508. 6 9
  2509. 3 0
  2510. 0 31 [X] "{19}:"
  2511. 17 76
  2512. 5 8000
  2513. 6 9
  2514. 3 0
  2515. 0 31 [X] "{20}"
  2516. 10 00001620
  2517. 17 78
  2518. 0 41 0 "{3}!PreBuild"
  2519. 17 79
  2520. 29 24 amidir
  2521. 0 798
  2522. 13
  2523. 8 24
  2524. 17 80
  2525. 29 25 boxnum
  2526. 6 7
  2527. 8 25
  2528. 17 82
  2529. 29 26 box
  2530. 0 26 "{24}autosty.dlg" "autostyl{25}"
  2531. 13
  2532. 8 26
  2533. 17 83
  2534. 6 26
  2535. 8 1
  2536. 17 84
  2537. 6 26
  2538. 5 0
  2539. 18 0
  2540. 6 26
  2541. 5 2
  2542. 18 0
  2543. 1 2
  2544. 11 00003287
  2545. 17 85
  2546. 10 00004084
  2547. 5 1
  2548. 8 9
  2549. 17 88
  2550. 6 7
  2551. 6 9
  2552. 18 2
  2553. 12 00003379
  2554. 10 00004030
  2555. 5 1
  2556. 6 9
  2557. 3 0
  2558. 8 9
  2559. 10 00003297
  2560. 17 89
  2561. 29 27 contents
  2562. 5 8000
  2563. 6 9
  2564. 3 0
  2565. 0 27 [X]
  2566. 13
  2567. 8 27
  2568. 17 90
  2569. 29 28 pfid
  2570. 6 9
  2571. 22 5
  2572. 0 20 [X] 1 ","
  2573. 13
  2574. 8 28
  2575. 17 91
  2576. 6 9
  2577. 22 5
  2578. 0 20 [X] 2 ","
  2579. 13
  2580. 8 10
  2581. 17 92
  2582. 6 9
  2583. 22 5
  2584. 0 20 [X] 3 ","
  2585. 13
  2586. 8 11
  2587. 17 93
  2588. 0 20 "{11}" 3 " "
  2589. 13
  2590. 8 12
  2591. 17 94
  2592. 0 20 "{12}" 1 "_"
  2593. 13
  2594. 0 20 "{12}" 2 "_"
  2595. 13
  2596. 0 20 "{12}" 3 "_"
  2597. 13
  2598. 0 20 "{12}" 4 "_"
  2599. 13
  2600. 0 20 "{12}" 5 "_"
  2601. 13
  2602. 0 16 [X] "_" [X] "_" [X] "_" [X] "_" [X] "_" "echo_"
  2603. 13
  2604. 8 15
  2605. 17 95
  2606. 0 264 "{15}" "{27}"
  2607. 17 96
  2608. 0 264 "{12}" "{27}"
  2609. 17 97
  2610. 6 8
  2611. 5 1
  2612. 18 0
  2613. 11 00004017
  2614. 17 98
  2615. 16 _$$5GotoPowerField "{28}" "{10}"
  2616. 13
  2617. 8 17
  2618. 17 99
  2619. 16 _$$5FieldUpdate "{28}" "{10}" "{11}"
  2620. 17 100
  2621. 2 571 1
  2622. 10 00003346
  2623. 17 103
  2624. 6 8
  2625. 5 0
  2626. 18 0
  2627. 11 00004084
  2628. 17 104
  2629. 2 267 1
  2630. 17 107
  2631. 16 torchfields "{0}"
  2632. 17 108
  2633. 16 freeglobs "{0}"
  2634. 17 109
  2635. 0 266 "target"
  2636. 17 110
  2637. 0 266 "numglobs"
  2638. 17 111
  2639. 6 26
  2640. 5 3
  2641. 18 0
  2642. 11 00004301
  2643. 17 113
  2644. 0 41 0 "{3}!SaveAsStyleInit"
  2645. 17 115
  2646. 0 71 305 1022
  2647. 13
  2648. 8 17
  2649. 6 1
  2650. 15
  2651. 17 118
  2652. 9
  2653. 14 SaveAsStyleInit
  2654. 29 0 hdlg
  2655. 29 1 id
  2656. 29 2 value
  2657. 29 3 SaveAsStyleInit
  2658. 17 1
  2659. 29 4 CB_withcontents
  2660. 5 25550
  2661. 8 4
  2662. 17 2
  2663. 29 5 CB_runmacro
  2664. 5 25551
  2665. 8 5
  2666. 17 3
  2667. 29 6 EB_runmacro
  2668. 5 667
  2669. 8 6
  2670. 17 4
  2671. 0 43 "{0}" "{4}" 1
  2672. 17 5
  2673. 0 53 "{0}" "{4}" 0
  2674. 17 6
  2675. 0 43 "{0}" "{5}" 1
  2676. 17 7
  2677. 0 53 "{0}" "{5}" 0
  2678. 17 8
  2679. 0 43 "{0}" "{6}" "autosty.smm"
  2680. 17 9
  2681. 0 53 "{0}" "{6}" 0
  2682. 6 3
  2683. 15
  2684. 17 10
  2685. 9
  2686. 14 freeglobs
  2687. 29 0 target
  2688. 29 1 freeglobs
  2689. 17 2
  2690. 29 2 targlen
  2691. 0 14 "{0}"
  2692. 13
  2693. 8 2
  2694. 17 3
  2695. 29 3 numglobs
  2696. 0 299
  2697. 13
  2698. 8 3
  2699. 17 4
  2700. 6 3
  2701. 29 4 globnuke
  2702. 21 4 [X]
  2703. 17 5
  2704. 0 300 &4
  2705. 29 5 i
  2706. 5 1
  2707. 8 5
  2708. 17 6
  2709. 6 3
  2710. 6 5
  2711. 18 2
  2712. 12 00000272
  2713. 10 00000375
  2714. 5 1
  2715. 6 5
  2716. 3 0
  2717. 8 5
  2718. 10 00000191
  2719. 17 7
  2720. 6 5
  2721. 22 4
  2722. 0 806 [X] "{2}"
  2723. 13
  2724. 6 0
  2725. 18 0
  2726. 11 00000362
  2727. 17 8
  2728. 6 5
  2729. 22 4
  2730. 0 266 [X]
  2731. 10 00000239
  2732. 6 1
  2733. 15
  2734. 17 11
  2735. 9
  2736. 14 torchfields
  2737. 29 0 target
  2738. 29 1 torchfields
  2739. 17 2
  2740. 29 2 cnt
  2741. 0 1304 0
  2742. 13
  2743. 8 2
  2744. 17 3
  2745. 5 0
  2746. 6 2
  2747. 18 1
  2748. 11 00000642
  2749. 17 4
  2750. 6 2
  2751. 29 3 fields
  2752. 21 3 [X]
  2753. 17 5
  2754. 0 1305 0 &3
  2755. 29 4 i
  2756. 5 1
  2757. 8 4
  2758. 17 6
  2759. 6 2
  2760. 6 4
  2761. 18 2
  2762. 12 00000269
  2763. 10 00000629
  2764. 5 1
  2765. 6 4
  2766. 3 0
  2767. 8 4
  2768. 10 00000188
  2769. 17 7
  2770. 29 5 pfid
  2771. 6 4
  2772. 22 3
  2773. 0 20 [X] 1 ","
  2774. 13
  2775. 8 5
  2776. 17 8
  2777. 29 6 pftype
  2778. 6 4
  2779. 22 3
  2780. 0 20 [X] 2 ","
  2781. 13
  2782. 8 6
  2783. 17 9
  2784. 29 7 pffield
  2785. 6 4
  2786. 22 3
  2787. 0 20 [X] 3 ","
  2788. 13
  2789. 8 7
  2790. 17 10
  2791. 29 8 varname
  2792. 0 20 "{7}" 3 " "
  2793. 13
  2794. 8 8
  2795. 17 11
  2796. 29 9 targlen
  2797. 0 14 "{0}"
  2798. 13
  2799. 8 9
  2800. 17 12
  2801. 0 806 "{8}" "{9}"
  2802. 13
  2803. 6 0
  2804. 18 0
  2805. 11 00000616
  2806. 17 14
  2807. 16 _$$5FieldRemove "{5}" "{6}"
  2808. 10 00000236
  2809. 10 00000642
  2810. 6 1
  2811. 15
  2812. 17 20
  2813. 9
  2814. 14 PreBuild
  2815. 29 0 Hdlg
  2816. 29 1 id
  2817. 29 2 dummy
  2818. 29 3 PreBuild
  2819. 17 1
  2820. 29 4 target
  2821. 0 265 "target"
  2822. 13
  2823. 8 4
  2824. 17 2
  2825. 29 5 numglobs
  2826. 0 265 "numglobs"
  2827. 13
  2828. 8 5
  2829. 17 4
  2830. 29 6 CurStyleSheet
  2831. 16 _$$1GetDocInfo$ 3
  2832. 13
  2833. 8 6
  2834. 17 5
  2835. 0 18 "{6}"
  2836. 13
  2837. 8 6
  2838. 17 6
  2839. 29 7 lb
  2840. 0 39 091
  2841. 13
  2842. 8 7
  2843. 17 7
  2844. 29 8 rb
  2845. 0 39 093
  2846. 13
  2847. 8 8
  2848. 17 8
  2849. 0 16 "{7}" "{6}" "{8}"
  2850. 13
  2851. 8 6
  2852. 17 9
  2853. 6 4
  2854. 7 "as_def"
  2855. 18 0
  2856. 11 00000964
  2857. 17 10
  2858. 0 75 "{0}" "Personal Information"
  2859. 17 11
  2860. 0 56 "{0}" 3 0
  2861. 17 12
  2862. 0 56 "{0}" 1060 1
  2863. 17 13
  2864. 0 56 "{0}" 1050 0
  2865. 17 14
  2866. 29 9 L1
  2867. 7 "Type the information that you want to appear each time "
  2868. 8 9
  2869. 17 15
  2870. 29 10 L2
  2871. 7 "you create this type of document.  Choose OK to insert this information "
  2872. 8 10
  2873. 17 16
  2874. 29 11 L3
  2875. 7 "into the current document only.  Choose Save As to save this "
  2876. 8 11
  2877. 17 17
  2878. 29 12 L4
  2879. 7 "information to a new style sheet."
  2880. 8 12
  2881. 17 18
  2882. 29 13 L5
  2883. 7 ""
  2884. 8 13
  2885. 17 19
  2886. 29 14 helptext
  2887. 7 "{9}{10}{11}{12}{13}"
  2888. 8 14
  2889. 17 20
  2890. 0 43 "{0}" 1050 "{14}"
  2891. 10 00001301
  2892. 17 22
  2893. 0 75 "{0}" "Optional Information"
  2894. 17 23
  2895. 0 56 "{0}" 3 1
  2896. 17 24
  2897. 0 56 "{0}" 1050 1
  2898. 17 25
  2899. 0 56 "{0}" 1060 0
  2900. 17 26
  2901. 7 "Type the information you want to appear "
  2902. 8 9
  2903. 17 27
  2904. 7 "in this document."
  2905. 8 10
  2906. 17 28
  2907. 7 ""
  2908. 8 11
  2909. 17 29
  2910. 7 ""
  2911. 8 12
  2912. 17 30
  2913. 7 ""
  2914. 8 13
  2915. 17 31
  2916. 7 "{9}{10}{11}{12}{13}"
  2917. 8 14
  2918. 17 32
  2919. 0 43 "{0}" 1060 "{14}"
  2920. 29 15 i
  2921. 6 5
  2922. 5 1
  2923. 3 0
  2924. 8 15
  2925. 17 35
  2926. 5 9
  2927. 6 15
  2928. 18 2
  2929. 12 00001416
  2930. 10 00001573
  2931. 5 1
  2932. 6 15
  2933. 3 0
  2934. 8 15
  2935. 10 00001331
  2936. 17 36
  2937. 29 16 stid
  2938. 5 1000
  2939. 6 15
  2940. 3 0
  2941. 8 16
  2942. 17 37
  2943. 0 56 "{0}" "{16}" 1
  2944. 17 38
  2945. 29 17 ebid
  2946. 5 8000
  2947. 6 15
  2948. 3 0
  2949. 8 17
  2950. 17 39
  2951. 0 56 "{0}" "{17}" 1
  2952. 10 00001381
  2953. 17 42
  2954. 5 4
  2955. 29 18 rect
  2956. 21 18 [X]
  2957. 17 44
  2958. 29 19 x
  2959. 5 1
  2960. 22 18
  2961. 8 19
  2962. 17 45
  2963. 29 20 y
  2964. 5 2
  2965. 22 18
  2966. 8 20
  2967. 17 46
  2968. 29 21 xL
  2969. 5 3
  2970. 22 18
  2971. 8 21
  2972. 17 47
  2973. 29 22 yL
  2974. 5 4
  2975. 22 18
  2976. 8 22
  2977. 17 48
  2978. 29 23 MoveBase
  2979. 5 24
  2980. 8 23
  2981. 17 49
  2982. 29 24 moveshrink
  2983. 6 23
  2984. 5 9
  2985. 6 5
  2986. 3 1
  2987. 4 0
  2988. 8 24
  2989. 17 50
  2990. 6 4
  2991. 7 "as_def"
  2992. 18 0
  2993. 11 00001955
  2994. 17 51
  2995. 6 24
  2996. 5 22
  2997. 3 0
  2998. 8 24
  2999. 17 52
  3000. 29 25 max
  3001. 5 145
  3002. 8 25
  3003. 10 00002005
  3004. 17 54
  3005. 6 24
  3006. 5 50
  3007. 3 0
  3008. 8 24
  3009. 17 55
  3010. 5 217
  3011. 8 25
  3012. 17 57
  3013. 6 24
  3014. 6 25
  3015. 18 3
  3016. 11 00002062
  3017. 17 58
  3018. 6 25
  3019. 8 24
  3020. 17 62
  3021. 5 4
  3022. 29 26 rect2
  3023. 21 26 [X]
  3024. 17 63
  3025. 5 4
  3026. 29 27 rect3
  3027. 21 27 [X]
  3028. 17 67
  3029. 5 1
  3030. 22 26
  3031. 8 19
  3032. 17 68
  3033. 5 2
  3034. 22 26
  3035. 8 20
  3036. 17 69
  3037. 5 3
  3038. 22 27
  3039. 8 21
  3040. 17 70
  3041. 5 4
  3042. 22 27
  3043. 8 22
  3044. 17 71
  3045. 6 23
  3046. 5 9
  3047. 6 5
  3048. 3 1
  3049. 4 0
  3050. 8 24
  3051. 17 72
  3052. 6 4
  3053. 7 "as_def"
  3054. 18 0
  3055. 11 00002349
  3056. 17 73
  3057. 5 137
  3058. 8 25
  3059. 10 00002369
  3060. 17 75
  3061. 5 167
  3062. 8 25
  3063. 17 77
  3064. 6 24
  3065. 6 25
  3066. 18 3
  3067. 11 00002426
  3068. 17 78
  3069. 6 25
  3070. 8 24
  3071. 6 3
  3072. 15
  3073. 17 80
  3074. 9
  3075. 14 initcapit
  3076. 29 0 string
  3077. 29 1 initcapit
  3078. 17 1
  3079. 0 808 0 " SSN " "{0}"
  3080. 13
  3081. 5 0
  3082. 18 1
  3083. 11 00000128
  3084. 17 2
  3085. 6 0
  3086. 8 1
  3087. 6 1
  3088. 15
  3089. 9
  3090. 17 5
  3091. 29 2 firstchar
  3092. 0 806 "{0}" 1
  3093. 13
  3094. 8 2
  3095. 17 6
  3096. 29 3 restchars
  3097. 0 14 "{0}"
  3098. 13
  3099. 5 1
  3100. 3 1
  3101. 0 807 "{0}" [X]
  3102. 13
  3103. 0 17 [X]
  3104. 13
  3105. 8 3
  3106. 17 7
  3107. 0 16 "{2}" "{3}"
  3108. 13
  3109. 8 1
  3110. 6 1
  3111. 15
  3112. 17 8
  3113. 9
  3114. 00031421
  3115.