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