home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / m / msh_ut11.zip / MYDEFS.ZIP / JENS.MSH < prev    next >
Text File  |  1992-05-10  |  6KB  |  180 lines
  1. |
  2. | Menu-Definitions
  3. |  ┌──────────────────────────┐
  4. |  │ Menus for Archive-files  │
  5. |  └──────────────────────────┘
  6. |
  7. (("arj x "current.name &exec)
  8.  ("shez "current.name &exec)
  9.  ("arj l "current.name &exec)
  10.  ("arj f "current.name &exec)
  11.  ("fv "current.name"/r"&&exec)
  12. "  ARJ-Menu
  13.   %extract% archive
  14.   %shez% archive
  15.   %list% archive-content
  16.   %freshen% archive
  17.   %reset time%"
  18.  () "-1" "-1" temp_bordered_menu)arjmenu!
  19. |
  20. (("arc x "current.name &exec)
  21.  ("zzap " current.name &exec)
  22.  ("arc l "current.name &exec)
  23.  ("arc f "current.name &exec)
  24.  ("fv "current.name"/r"&&exec)
  25. "  ARC-Menu
  26.   %extract% archive
  27.   %convert% archive
  28.   %list% archive-content
  29.   %freshen% archive
  30.   %reset time%"
  31.  () "-1" "-1" temp_bordered_menu)arcmenu!
  32. |
  33. (("lharc x "current.name &exec)
  34.  ("zzap " current.name &exec)
  35.  ("lharc v "current.name &exec)
  36.  ("lharc f "current.name &exec)
  37.  ("fv "current.name"/r"&&exec)
  38. "  LHARC-Menu
  39.   %extract% archive
  40.   %convert% archive
  41.   %list% archive-content
  42.   %freshen% archive
  43.   %reset time%"
  44.  () "-1" "-1" temp_bordered_menu)lzhmenu!
  45. |
  46. (("zoo e// "current.name &exec)
  47.  ("zzap " current.name &exec)
  48.  ("zoo v "current.name &exec)
  49.  ("fv "current.name"/r"&&exec)
  50. "  ZOO-Menu
  51.   %extract% archive
  52.   %convert% archive
  53.   %list% archive-content
  54.   %reset time%"
  55.  () "-1" "-1" temp_bordered_menu)zoomenu!
  56. |
  57. (("pkunzip -d "current.name &exec)
  58.  ("shez "current.name &exec)
  59.  ("zzap " current.name &exec)
  60.  ("pkunzip -v "current.name &exec)
  61.  ("pkzip -f "current.name &exec)
  62.  ("fv "current.name"/r"&&exec)
  63. "  ZIP-Menu
  64.   %extract% archive
  65.   %shez% archive
  66.   %convert% archive
  67.   %list% archive-content
  68.   %freshen% archive
  69.   %reset time%"
  70.  () "-1" "-1" temp_bordered_menu)zipmenu!
  71. |
  72. |    ┌──────────┐
  73. |    │ TeX-Menu │
  74. |    └──────────┘
  75. (("tex &lplaing "current.name&(exec)with_magic)
  76. ("tex &plaing "current.name&(exec)with_magic)
  77. ("tex &lplain "current.name&(exec)with_magic)
  78. ("tex &plain "current.name&(exec)with_magic)
  79. ("v " current.name & "." cutlast drop ".dvi" &exec)
  80. "  TeX-Menu
  81.   %German-LaTeX% file
  82.   %German-TeX%   file
  83.   %LaTeX% file
  84.   %TeX%   file
  85.   %View%  DVI"
  86.  () "-1" "-1" temp_bordered_menu)texmenu!
  87. |
  88. |    ┌─────────────┐
  89. |    │ Pascal-Menu │
  90. |    └─────────────┘
  91. (("turbo " current.name& exec)
  92.  ("epb " current.name " beauty.$$$" & & execute | Beautify and make backup
  93.   "mv -f " current.name dup " " swap &&& "." cutlast drop ".bak" &execute |
  94.   "rename beauty.$$$ " current.name & exec)
  95. "  Pascal-Menu
  96.   %Turbo-Pascal% file
  97.   %Beautify% pascal-file "
  98.  () "-1" "-1" temp_bordered_menu)pasmenu!
  99. |
  100. |    ┌─────────────────┐
  101. |    │ PostScript-Menu │
  102. |    └─────────────────┘
  103. ("-sOUTPUTFILE=" current.name & "." cutlast drop ".gif " &)gifname!
  104. (("gs -q -sDEVICE=gif8 " gifname & current.name & (exec)with_magic)
  105.  ("gs -q -sDEVICE=gifmono " gifname & current.name & (exec)with_magic)
  106.  ("gs -q -sDEVICE=gifmono -r150 " gifname & current.name & (exec)with_magic)
  107.  ("gs -q -sDEVICE=epson -r180 " current.name& (exec)with_magic)
  108.  ("gs -q -sDEVICE=epson -r360 " current.name& (exec)with_magic)
  109.  ("gs -q -sDEVICE=ljet2p -r300 " current.name& (exec)with_magic)
  110. "  PostScript-Menu
  111.   %Save% as GIF (color)
  112.   %Save% as GIF (mono)
  113.   %Save% as GIF (mono 150dpi)
  114.   %Print% on Epson (180dpi)
  115.   %Print% on Epson (360dpi)
  116.   %Print% on LaserJet-2P"
  117.  () "-1" "-1" temp_bordered_menu)psmenu!
  118. |
  119. |    ┌─────────────┐
  120. |    │ Execom-Menu │
  121. |    └─────────────┘
  122. (("pklite " current.name& exec)
  123.  ("pklite -x " current.name& exec)
  124. "  Executable-Menu
  125.   %Compress% executable
  126.   %Expand% executable "
  127.  () "-1" "-1" temp_bordered_menu)exemenu!
  128. |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
  129. | Extension-Definitions
  130. ("shez "current.name&execute refresh)extension_arc!
  131. |(extension_arc)extension_zip!
  132. |(panel.pattern dirpart current.name&"\\*.*"&panel.pattern!)extension_zip!
  133. (extension_arc)extension_zoo!
  134. (extension_arc)extension_lzh!
  135. |(extension_arc)extension_arj!
  136. (arjmenu)extension2_arj!
  137. (arcmenu)extension2_arc!
  138. (lzhmenu)extension2_lzh!
  139. (zipmenu)extension2_zip!
  140. (zoomenu)extension2_zoo!
  141. |
  142. | TeX and dvi files, and associated printer files
  143. |
  144. ("texshell "current.name&(exec)with_magic)extension_tex!
  145. (texmenu)extension2_tex!
  146. ("v "current.name&execute)extension_dvi!
  147. |("dvihp "current.name&execute)extension2_dvi!
  148. |
  149. | pascal programs
  150. |
  151. ("tpcx "current.name&(exec)with_magic)extension_pas!
  152. (pasmenu)extension2_pas!
  153. (pasmenu)extension2_inc!
  154. ("tasm "current.name&(exec)with_magic)extension_asm!
  155. |
  156. | two viewers for .gif files, and .gl, .fli  and .jpg files
  157. |
  158. ("gws"(execute)with_magic)extension2_gif!             | Graphic Workshop
  159. (extension2_gif)extension2_pcx!                       |
  160. (extension2_gif)extension2_bmp!                       |
  161. (extension2_gif)extension2_bmp!                       |
  162. (extension2_gif)extension2_img!                       |
  163. (extension2_gif)extension_img!                        |
  164. ("vpic "current.name&execute)extension_gif!           |
  165. (extension_gif)extension_pcx!                         |
  166. (extension_gif)extension_bmp!                         |
  167. ("alchemy -v "current.name&(execute)with_magic)extension_jpg!
  168. |
  169. | various other things...
  170. |
  171. ("printgl "current.name&" /FV"&(exec)with_magic)extension_pgl! |HPGL-Viewer
  172. (extension_pgl)extension_plt!                         |HPGL-Viewer
  173. ("gs -sDEVICE=tseng -g800x600 -q "current.name&(exec)with_magic)extension_c00!    |Ghostscript
  174. (extension_c00)extension_ps!                          |Ghostscript
  175. (extension_c00)extension_eps!                         |Ghostscript
  176. (psmenu)extension2_ps!
  177. (extension2_ps)extension2_eps!
  178. ("qmac " current.name & "." cutlast drop ".mac " & current.name & " /b /a-" &execute)extension_qm! | Qedit-macros
  179. |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
  180.