home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PROGRAMS / UTILS / MOUSE / MSMOUSE2.ZIP / MENUS.ZIP / MPMS.DEF < prev    next >
Encoding:
Text File  |  1989-02-10  |  7.5 KB  |  162 lines
  1. BEGIN lb,rb,bb,lma,rma,uma,dma,32,16
  2.  
  3. ;------------------------------BOTH BUTTONS----------------------------------
  4.  
  5. bb:     EXECUTE ESCAPE
  6.  
  7. ;------------------------------LEFT BUTTON-----------------------------------
  8.  
  9. lb:     MATCH 24,7,NORMAL,"Y",YES,lb1             ;"Enter Y"
  10. lb1:    MATCH 24,5,NORMAL,"w",YES,lb2             ;"Overwrite"
  11. lb2:    MATCH 24,15,NORMAL,":",YES,lb3            ;"Confirm change:"
  12. lb3:    MATCH 22,1,NORMAL,"H",NUL,MAIN            ;"HELP:" 
  13.  
  14. ;------------------------------RIGHT BUTTON----------------------------------
  15.  
  16. rb:     MATCH 22,7,NORMAL,"D:",RETURN,rb1         ;"COMMAND:" 
  17. rb1:    MATCH 22,4,NORMAL,"Y:",RETURN,rb2         ;"COPY:" 
  18. rb2:    MATCH 22,6,NORMAL,"E:",RETURN,rb3         ;"DELETE:"
  19. rb3:    MATCH 22,7,NORMAL,"T:",RETURN,rb4         ;"FORMAT:" 
  20. rb4:    MATCH 22,14,NORMAL,"T:",RETURN,rb5        ;"FORMAT DEFAULT:" 
  21. rb5:    MATCH 22,4,NORMAL,"O:",RETURN,rb6         ;"GOTO:" 
  22. rb6:    MATCH 22,6,NORMAL,"T:",RETURN,rb7         ;"INSERT:" 
  23. rb7:    MATCH 22,4,NORMAL,"K:",RETURN,rb8         ;"LOCK:" 
  24. rb8:    MATCH 22,4,NORMAL,"E:",RETURN,rb9         ;"MOVE:" 
  25. rb9:    MATCH 22,5,NORMAL,"T:",RETURN,rb10        ;"PRINT:" 
  26. rb10:   MATCH 22,8,NORMAL,"R:",RETURN,rb11        ;"TRANSFER:" 
  27. rb11:   MATCH 22,6,NORMAL,"W:",RETURN,rb12        ;"WINDOW:" 
  28. rb12:   MATCH 22,12,NORMAL,"T:",RETURN,rb13       ;"WINDOW SPLIT:" 
  29. rb13:   MATCH 22,8,NORMAL,"L:",RETURN,rb14        ;"EXTERNAL:" 
  30. rb14:   MATCH 22,1,NORMAL,"H",RETURN,rb15         ;"HELP:" 
  31. rb15:   MATCH 24,7,NORMAL,"Y",YES,rb16            ;"Enter Y"
  32. rb16:   MATCH 24,5,NORMAL,"w",YES,rb17            ;"Overwrite"
  33. rb17:   MATCH 24,15,NORMAL,":",YES,TB             ;"Confirm change:"
  34.  
  35. ;------------------------------LEFT MOTION-----------------------------------
  36.  
  37. lma:    MATCH 22,1,NORMAL,"H",BKSP,lma1           ;"HELP:" 
  38. lma1:   MATCH 24,18,NORMAL,"ty",LEFT,lma2         ;"Select option or type ..."
  39. lma2:   MATCH 24,1,NORMAL,"M",LEFT,lm1            ;"Multiplan ..."
  40.  
  41. lmb:    MATCH 24,18,NORMAL,"ty",BKSP,lmb1         ;"Select option or type ..."
  42. lmb1:   MATCH 24,1,NORMAL,"M",BKSP,lm1            ;"Multiplan ..."
  43.  
  44. lm1:    MATCH 24,1,NORMAL,"Se",BKSP,lm2           ;"Select option"
  45. lm2:    MATCH 24,9,NORMAL,"op",SPBKSP,lm3         ;"Invalid option ..."
  46. lm3:    MATCH 24,23,NORMAL,"w",NUL,lm4            ;"Press any key to redraw ..."
  47. lm4:    MATCH 24,15,NORMAL,":",NUL,lm5            ;"Confirm change:"
  48. lm5:    MATCH 24,7,NORMAL,"Y",NUL,lm6             ;"Enter Y"
  49. lm6:    MATCH 24,5,NORMAL,"w",NUL,LEFT            ;"Overwrite"
  50.  
  51. ;------------------------------RIGHT MOTION----------------------------------
  52.  
  53. rma:    MATCH 22,1,NORMAL,"H",SP,rma1             ;"HELP:" 
  54. rma1:   MATCH 24,18,NORMAL,"ty",RIGHT,rma2        ;"Select option or type ..."
  55. rma2:   MATCH 24,1,NORMAL,"M",RIGHT,rm1           ;"Multiplan ..."
  56.  
  57. rmb:    MATCH 24,18,NORMAL,"ty",SP,rmb1           ;"Select option or type ..."
  58. rmb1:   MATCH 24,1,NORMAL,"M",SP,rm1              ;"Multiplan ..."
  59.  
  60. rm1:    MATCH 24,1,NORMAL,"Se",SP,rm2             ;"Select option"
  61. rm2:    MATCH 24,9,NORMAL,"op",SPBKSP,rm3         ;"Invalid option ..."
  62. rm3:    MATCH 24,23,NORMAL,"w",NUL,rm4            ;"Press any key to redraw ..."
  63. rm4:    MATCH 24,15,NORMAL,":",NUL,rm5            ;"Confirm change:"
  64. rm5:    MATCH 24,7,NORMAL,"Y",NUL,rm6             ;"Enter Y"
  65. rm6:    MATCH 24,5,NORMAL,"w",NUL,RIGHT           ;"Overwrite"
  66.  
  67. ;------------------------------UP MOTION-------------------------------------
  68.  
  69. uma:    MATCH 22,1,NORMAL,"H",NUL,uma1            ;"HELP:" 
  70. uma1:   MATCH 24,18,NORMAL,"ty",UP,uma2           ;"Select option or type ..."
  71. uma2:   MATCH 24,1,NORMAL,"M",UP,um1              ;"Multiplan ..."
  72.  
  73. umb:    MATCH 24,18,NORMAL,"ty",NUL,umb1          ;"Select option or type ..."
  74. umb1:   MATCH 24,1,NORMAL,"M",NUL,um1             ;"Multiplan ..."
  75.  
  76. um1:    MATCH 24,1,NORMAL,"Se",NUL,um2            ;"Select option"
  77. um2:    MATCH 24,9,NORMAL,"op",SPBKSP,um3         ;"Invalid option ..."
  78. um3:    MATCH 24,23,NORMAL,"w",NUL,um4            ;"Press any key to redraw ..."
  79. um4:    MATCH 24,15,NORMAL,":",NUL,um5            ;"Confirm change:"
  80. um5:    MATCH 24,7,NORMAL,"Y",NUL,um6             ;"Enter Y"
  81. um6:    MATCH 24,5,NORMAL,"w",NUL,UP              ;"Overwrite"
  82.  
  83. ;------------------------------DOWN MOTION-----------------------------------
  84.  
  85. dma:    MATCH 22,1,NORMAL,"H",NUL,dma1            ;"HELP:" 
  86. dma1:   MATCH 24,18,NORMAL,"ty",DOWN,dma2         ;"Select option or type ..."
  87. dma2:   MATCH 24,1,NORMAL,"M",DOWN,dm1            ;"Multiplan ..."
  88.  
  89. dmb:    MATCH 24,18,NORMAL,"ty",NUL,dmb1          ;"Select option or type ..."
  90. dmb1:   MATCH 24,1,NORMAL,"M",NUL,dm1             ;"Multiplan ..."
  91. dm1:    MATCH 24,1,NORMAL,"Se",NUL,dm2            ;"Select option"
  92. dm2:    MATCH 24,9,NORMAL,"op",SPBKSP,dm3         ;"Invalid option ..."
  93. dm3:    MATCH 24,23,NORMAL,"w",NUL,dm4            ;"Press any key to redraw ..."
  94. dm4:    MATCH 24,15,NORMAL,":",NUL,dm5            ;"Confirm change:"
  95. dm5:    MATCH 24,7,NORMAL,"Y",NUL,dm6             ;"Enter Y"
  96. dm6:    MATCH 24,5,NORMAL,"w",NUL,DOWN            ;"Overwrite"
  97.  
  98. ;------------------------------MENUS-----------------------------------------
  99.  
  100. MAIN:   popup 19,1,NORMAL
  101. text "────────────────────────────────────────────────────────────────────────────────"
  102. text "MAIN: Enter Cancel Cell Command Reference Recalc  :   ,  Help CURSOR            "
  103. text "────────────────────────────────────────────────────────────────────────────────"
  104. select 2,7,5,RETURN
  105. select 2,13,6,ESCAPE
  106. select 2,20,4,CELL
  107. select 2,25,7,COMMAND
  108. select 2,33,9,REFERENCE
  109. select 2,43,6,RECALC
  110. select 2,50,3,COLON
  111. select 2,54,3,COMMA
  112. select 2,58,4,HELP
  113. select 2,63,6,CURSOR
  114. pend
  115.  
  116. COMMAND:  ASSIGN ,,,lmb,rmb,umb,dmb,,
  117. CELL:     ASSIGN ,,,lma,rma,uma,dma,,
  118.  
  119. CURSOR: popup 19,1,NORMAL
  120. text "────────────────────────────────────────────────────────────────────────────────"
  121. text "CURSOR: MAIN Home End NxtWindow NxtCell PageUp PageDown PageLeft PageRight      "
  122. text "────────────────────────────────────────────────────────────────────────────────"
  123. select 2,9,4,MAIN
  124. select 2,14,4,HOME
  125. select 2,19,3,END
  126. select 2,23,9,NXTWINDOW
  127. select 2,33,7,NXTCELL
  128. select 2,41,6,PGUP
  129. select 2,48,8,PGDOWN
  130. select 2,57,8,PGLEFT
  131. select 2,66,9,PGRIGHT
  132. pend
  133.  
  134. ;------------------------------KEYS------------------------------------------
  135.  
  136. NUL:           NOTHING
  137. BKSP:          TYPE 8                             ;Backspace
  138. TB:            TYPE 9                             ;Tab
  139. RETURN:        TYPE 13                            ;Enter
  140. ESCAPE:        TYPE 27                            ;Esc
  141. HELP:          TYPE 0,68                          ;F10
  142. SP:            TYPE " "
  143. YES:           TYPE "Y"
  144. SPBKSP:        TYPE " ",8                         ;Space,Backspace
  145. NXTWINDOW:     TYPE 0,64                          ;F6
  146. NXTCELL:       TYPE 0,63                          ;F5
  147. REFERENCE:     TYPE 0,65                          ;F7
  148. RECALC:        TYPE 0,66                          ;F8
  149. COLON:         TYPE ":"
  150. COMMA:         TYPE ","
  151. HOME:          TYPE 0,71                          ;Home
  152. END:           TYPE 0,79                          ;End
  153. PGUP:          TYPE 0,73                          ;PgUp
  154. PGDOWN:        TYPE 0,81                          ;PgDn
  155. PGLEFT:        TYPE 0,115                         ;Ctrl-Left
  156. PGRIGHT:       TYPE 0,116                         ;Ctrl-Right
  157. LEFT:          TYPE 0,75                          ;Left
  158. RIGHT:         TYPE 0,77                          ;Right
  159. UP:            TYPE 0,72                          ;Up
  160. DOWN:          TYPE 0,80                          ;Down
  161.  
  162.