home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78b98.iso / Smart30 / ENGLISH / PRODUCTS / LOTUS018.DSK / TOASHORT.SMM < prev    next >
INI File  |  1992-09-14  |  1KB  |  118 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _macro.sty
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     PostScript Printer
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     Mark text for short TOA entry
  19.     
  20.     
  21.     
  22.     
  23.     716498873
  24.     5
  25.     704139151
  26.     3
  27.     1
  28.     0
  29.     0
  30.     0
  31.     0
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     1
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [ParaNum]
  54.     1
  55. [l1]
  56.     0
  57. [pg]
  58.     1
  59.     13 0 12 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  60. [edoc]
  61. @Function@<:#293,9360>Function Test()
  62.  
  63. <:#284,9360>Menu = "Too&ls"
  64.  
  65. <:#284,9360>Item = "&Generate TOA..."
  66.  
  67. <:#284,9360>CheckMenuItem(1, Menu, Item, 1)
  68.  
  69. <:#284,9360>if not CheckMenuItem(1, Menu, Item, 1)
  70.  
  71. <:#284,9360>    ' Toa.smm has not been run.  We need to run it now.
  72.  
  73. <:#284,9360>    Call Toa.smm()
  74.  
  75. <:#284,9360>endif
  76.  
  77. <:#284,9360>CheckMenuItem(1, Menu, Item, 0)
  78.  
  79. <:#284,9360>Mac = GetMacPath$()
  80.  
  81. <:#284,9360>Name = StrCat$(Mac,"Toa.smm!MarkMain")
  82.  
  83. <:#284,9360>Calli Name(2)        ' Mark as Short Entry
  84.  
  85. <:#284,9360>End Function
  86.  
  87. >
  88.  
  89. [Embedded]
  90. 00001065
  91. >
  92. [macsum] 1
  93. Test 0 0 5 0
  94. [macse]
  95. 14 Test
  96. 7 "Too&ls"
  97. 8 1
  98. 7 "&Generate TOA..."
  99. 8 2
  100. 0 518 1 "{1}" "{2}" 1
  101. 0 518 1 "{1}" "{2}" 1
  102. 13
  103. 1 3
  104. 11 00000133
  105. 16 Toa.smm
  106. 0 518 1 "{1}" "{2}" 0
  107. 0 295
  108. 13
  109. 8 3
  110. 0 16 "{3}" "Toa.smm!MarkMain"
  111. 13
  112. 8 4
  113. 16 "{4}" 2
  114. 6 0
  115. 15
  116. 9
  117. 00001090
  118.