home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d1xx / d178 / rexxarplib.lha / RexxArpLib / rexx / startup.txed < prev   
Text File  |  1989-02-04  |  1KB  |  35 lines
  1. /* my new startup.txed  */
  2. OPTIONS results
  3. STATUS F
  4. parse var result name '.' extension
  5.  
  6.  
  7. ARChive 2
  8. COLor 0
  9. WRap 1
  10. RM 71
  11. MSG My New TxEd
  12. menu 5 ' ' '"send this to TeX  [F1]"' "TxEdStuff/txedtexify"
  13. menu 5 ' ' '"go to TeX error   [F2]"' "TxEdStuff/toerror"
  14. menu 5 ' ' '"Send chunk to Tex [F4]"' "TxEdStuff/viewchunk"
  15. menu 5 ' ' '"Print this in Tex     "' "TxEdStuff/timatex"
  16. menu 5 ' ' '"send to ibm       [F5]"' "rexx:Amiga_to_IBM.vlt"
  17. menu 5 ' ' '"get from flist    [F6]"' "rexx:Filelist_to_Amiga.vlt"
  18. menu 5 ' ' '"Ascii send on     [F7]"' "rexx:asciisend.txed"
  19. menu 5 ' ' '"VLT to front      [F8]"' "'x=screentofront(""VLT"")'"
  20. macro 1 "TxEdStuff/txedtexify"
  21. macro 2 "TxEdStuff/toerror"
  22. macro 4 "TxEdStuff/viewchunk"
  23. macro 5 "rexx:Amiga_to_IBM.vlt"
  24. macro 6 "rexx:Filelist_to_Amiga.vlt"
  25. macro 7 "rexx:asciisend.txed"
  26. macro 8 "'x=screentofront(""VLT"")'"
  27.  
  28. if extension = "MYCARDS" | extension = "MYKEEP" then do
  29.    MACRO S "TxEdStuff/serialize"
  30. end
  31. if extension = "mycards" | extension = "mykeep" then do
  32.     MACRO S "TxEdStuff/serialize"
  33. end
  34. exit
  35.