home *** CD-ROM | disk | FTP | other *** search
/ Amiga Times / AmigaTimes.iso / programme / trionbbs110 / Trion / menus / readmsgs.src < prev    next >
Encoding:
Text File  |  1998-10-06  |  2.0 KB  |  123 lines
  1.  
  2. ; Menu to select a methode of reading messages
  3.  
  4. Menu "ReadMsgs.menu"
  5.  
  6. flags  hotkeyable
  7. level  0 - 255 , "ReadMsgs.Ansi"
  8. prompt 0 , 0 - 255 , "|Read Menu : "
  9. prompt 1 , 0 - 255 , "|Read Menu : "
  10.  
  11. BEGIN     ; Start the command definitions
  12.  
  13.  
  14. Cmd "N"
  15.    ReadNew
  16.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  17. EndCmd
  18.  
  19. Cmd "F"
  20.    ReadForward
  21.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  22. EndCmd
  23.  
  24. Cmd "R"
  25.    ReadReverse
  26.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  27. EndCmd
  28.  
  29. Cmd "1"
  30.    ReadToUser
  31.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  32. EndCmd
  33.  
  34. Cmd "2"
  35.    ReadFromUser
  36.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  37. EndCmd
  38.  
  39. Cmd "3"
  40.    ReadToFromUser
  41.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  42. EndCmd
  43.  
  44. Cmd "4"
  45.    ReadSubject
  46.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  47. EndCmd
  48.  
  49. Cmd "5"
  50.    ReadToFromSubject
  51.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  52. EndCmd
  53.  
  54.  
  55.  
  56. Cmd "6"
  57.    ClrScr
  58.    ReadToYou
  59.    PreviousMenu                 ;   GotoMenu "Mail.Menu"
  60. EndCmd
  61.  
  62. Cmd "7"
  63.    ClrScr
  64.    ReadFromYou
  65.    PreviousMenu                 ;   GotoMenu "Mail.Menu"
  66. EndCmd
  67.  
  68. Cmd "8"
  69.    ClrScr
  70.    ReadToOrFromYou
  71.    PreviousMenu                 ;   GotoMenu "Mail.Menu"
  72. EndCmd
  73.  
  74. Cmd "9"
  75.    ClrScr
  76.    ReadReverseToYou
  77.    PreviousMenu                 ;   GotoMenu "Mail.Menu"
  78. EndCmd
  79.  
  80. Cmd "A"
  81.    ClrScr
  82.    ReadReverseFromYou
  83.    PreviousMenu                 ;   GotoMenu "Mail.Menu"
  84. EndCmd
  85.  
  86. Cmd "B"
  87.    ClrScr
  88.    ReadReverseToOrFromYou
  89.    PreviousMenu                 ;   GotoMenu "Mail.Menu"
  90. EndCmd
  91.  
  92.  
  93. Cmd "Z" , 0-255
  94.    ReadGlobalNew
  95.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  96. EndCmd
  97.  
  98. Cmd "W" , 0-255
  99.    ReadWaitingMail
  100.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  101. EndCmd
  102.  
  103. Cmd "M" , 0-255
  104.    ReadMarkedMessages
  105.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  106. EndCmd
  107.  
  108.  
  109.  
  110.  
  111. Cmd ""
  112.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  113. EndCmd
  114.  
  115.  
  116. Cmd "Q"
  117.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  118. EndCmd
  119.  
  120.  
  121. END
  122.  
  123.