home *** CD-ROM | disk | FTP | other *** search
/ Windoware / WINDOWARE_1_6.iso / macros / apmac10 / env.smm next >
INI File  |  1991-12-30  |  4KB  |  427 lines

  1. [ver]
  2.     4
  3. [sty]
  4.     
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     PostScript Printer
  13. [lang]
  14.     1
  15. [desc]
  16.     Quickly print an evelope from a shaded address.
  17.     
  18.     
  19.     
  20.     
  21.     689045243
  22.     3
  23.     688344439
  24.     34
  25.     1
  26.     91
  27.     645
  28.     3
  29.     3
  30.     
  31.     
  32.     
  33.     
  34.     
  35.     
  36.     0
  37. [fopts]
  38.     0
  39.     1
  40.     0
  41.     0
  42. [lnopts]
  43.     2
  44.     Body Text
  45.     1
  46. [docopts]
  47.     5
  48.     2
  49. [tag]
  50.     Body Text
  51.     2
  52.     [fnt]
  53.         Courier
  54.         200
  55.         0
  56.         32768
  57.     [algn]
  58.         1
  59.         1
  60.         0
  61.         0
  62.         0
  63.     [spc]
  64.         33
  65.         273
  66.         1
  67.         0
  68.         0
  69.         1
  70.         100
  71.     [brk]
  72.         4
  73.     [line]
  74.         8
  75.         0
  76.         1
  77.         0
  78.         1
  79.         1
  80.         1
  81.         10
  82.         10
  83.         1
  84.     [spec]
  85.         0
  86.         0
  87.         
  88.         0
  89.         1
  90.         1
  91.         0
  92.         0
  93.         0
  94.         0
  95.     [nfmt]
  96.         272
  97.         1
  98.         3
  99.         .
  100.         ,
  101.         $
  102.     Body Text
  103.     0
  104.     0
  105. [tag]
  106.     Function
  107.     3
  108.     [fnt]
  109.         Courier
  110.         200
  111.         0
  112.         32769
  113.     [algn]
  114.         1
  115.         1
  116.         0
  117.         0
  118.         0
  119.     [spc]
  120.         33
  121.         244
  122.         1
  123.         0
  124.         0
  125.         1
  126.         100
  127.     [brk]
  128.         68
  129.     [line]
  130.         8
  131.         0
  132.         1
  133.         0
  134.         1
  135.         1
  136.         1
  137.         10
  138.         10
  139.         1
  140.     [spec]
  141.         0
  142.         0
  143.         
  144.         0
  145.         1
  146.         1
  147.         0
  148.         0
  149.         0
  150.         0
  151.     [nfmt]
  152.         272
  153.         1
  154.         3
  155.         .
  156.         ,
  157.         $
  158.     Body Text
  159.     0
  160.     0
  161. [tag]
  162.     Header
  163.     4
  164.     [fnt]
  165.         Tms Rmn
  166.         200
  167.         0
  168.         49153
  169.     [algn]
  170.         4
  171.         1
  172.         0
  173.         0
  174.         0
  175.     [spc]
  176.         33
  177.         273
  178.         1
  179.         0
  180.         0
  181.         1
  182.         100
  183.     [brk]
  184.         4
  185.     [line]
  186.         8
  187.         0
  188.         1
  189.         0
  190.         1
  191.         1
  192.         1
  193.         10
  194.         10
  195.         1
  196.     [spec]
  197.         0
  198.         0
  199.         
  200.         0
  201.         1
  202.         1
  203.         0
  204.         0
  205.         0
  206.         0
  207.     [nfmt]
  208.         272
  209.         1
  210.         3
  211.         .
  212.         ,
  213.         $
  214.     Header
  215.     0
  216.     0
  217. [lay]
  218.     Standard
  219.     513
  220.     [rght]
  221.         15840
  222.         12240
  223.         1
  224.         720
  225.         1080
  226.         1
  227.         1252
  228.         1440
  229.         2
  230.         1
  231.         0
  232.         1
  233.         1
  234.         2
  235.         1
  236.         720
  237.         10800
  238.         14
  239.         1
  240.         720
  241.         1
  242.         1440
  243.         1
  244.         2160
  245.         1
  246.         2880
  247.         1
  248.         3600
  249.         1
  250.         4320
  251.         1
  252.         5040
  253.         1
  254.         5760
  255.         1
  256.         6480
  257.         1
  258.         7200
  259.         1
  260.         7920
  261.         1
  262.         8640
  263.         1
  264.         9360
  265.         1
  266.         10080
  267.     [hrght]
  268.     [lyfrm]
  269.         1
  270.         11200
  271.         0
  272.         0
  273.         12240
  274.         1252
  275.         0
  276.         1
  277.         3
  278.         1 0 0 0 0 0 0
  279.         0
  280.         0
  281.         1
  282.     [frmlay]
  283.         1252
  284.         12240
  285.         1
  286.         1440
  287.         0
  288.         1
  289.         360
  290.         1440
  291.         0
  292.         1
  293.         0
  294.         1
  295.         1
  296.         0
  297.         1
  298.         1440
  299.         10800
  300.         0
  301.     [txt]
  302. @Header@<:X3,0;GetDocInfo$(1)>ENV.SMM<:X~3,0;GetDocInfo$(1)>
  303.  
  304. @Header@<:X3,0;Description>Quickly print an evelope from a shaded address.<:X~3,0;Description>
  305.  
  306. @Header@By:  Todd E. Fuder, <:X3,0;EditDate %Dd>Thursday, October 24, 1991<:X~3,0;EditDate %Dd> at 
  307. <:X3,0;EditDate %T6>4:17 pm<:X~3,0;EditDate %T6>
  308.  
  309. @Header@
  310. >
  311.     [frght]
  312.     [lyfrm]
  313.         1
  314.         13248
  315.         0
  316.         14760
  317.         12240
  318.         15840
  319.         0
  320.         1
  321.         3
  322.         1 0 0 0 0 0 0
  323.         0
  324.         0
  325.         2
  326.     [frmlay]
  327.         15840
  328.         12240
  329.         1
  330.         1440
  331.         360
  332.         1
  333.         14940
  334.         1440
  335.         0
  336.         1
  337.         0
  338.         1
  339.         1
  340.         0
  341.         1
  342.         1440
  343.         10800
  344.         0
  345.     [txt]
  346. @Header@Revision Number <:X3,0;NumEdits>1<:X~3,0;NumEdits>
  347.  
  348. @Header@<:P10,0,Page > of <:X3,16384;NumPages>1<:X~3,16384;NumPages>
  349.  
  350. >
  351. [elay]
  352. [l1]
  353.     0
  354. [edoc]
  355. @Function@<:#202,10080>FUNCTION Envelope()
  356.  
  357. singlestep(0)
  358.  
  359. <:#202,10080>DEFSTR Address;
  360.  
  361. <:#202,10080>EnvStyle = "~ENV.STY"                    'Envelope Style Sheet to Use
  362.  
  363. WHILE ("" = Assign(&Address, CurShade$()))    'Prompt while address not shaded
  364.  
  365. <:#202,10080>    UserControl("Shade the address, then choose Resume...")
  366.  
  367. <:#202,10080>WEND
  368.  
  369. <:#202,10080>Copy()                            'Copy address to clipboard
  370.  
  371. <:#202,10080>New(EnvStyle, 1, 0)                    'Open new envelope style sheet
  372.  
  373. <:#202,10080>Paste()                            'Paste address from clipboard
  374.  
  375. <:#202,10080>FilePrint(1, 1, 9999, 1537)                'Print envelope
  376.  
  377. <:#202,10080>FileChanged(1, 0)                        'Make file changed flag "clean"
  378.  
  379. <:#202,10080>FileClose()                            'Close envelope window
  380.  
  381. @Function@<:#202,10080>END FUNCTION
  382.  
  383. >
  384.  
  385. [Embedded]
  386. 00003434
  387. >
  388. [macsum] 1
  389. Envelope 0 0 3 0
  390. [macse]
  391. 14 Envelope
  392. 0 4 0
  393. 17 2
  394. 29 1 Address
  395. 17 3
  396. 29 2 EnvStyle
  397. 7 "~ENV.STY"
  398. 8 2
  399. 17 4
  400. 7 ""
  401. 0 24
  402. 13
  403. 0 805 &1 [X]
  404. 13
  405. 18 0
  406. 11 00000206
  407. 17 5
  408. 0 7 "Shade the address, then choose Resume..."
  409. 10 00000080
  410. 17 7
  411. 2 154 1
  412. 17 8
  413. 2 101 1 "{2}" 1 0
  414. 17 9
  415. 2 155 1
  416. 17 10
  417. 2 111 1 1 1 9999 1537
  418. 17 11
  419. 0 34 1 0
  420. 17 12
  421. 2 147 1
  422. 6 0
  423. 15
  424. 17 13
  425. 9
  426. 00003459