home *** CD-ROM | disk | FTP | other *** search
/ Phoenix CD 2.0 / Phoenix_CD.cdr / 15a / ffm352.zip / F.DEF next >
Text File  |  1986-05-26  |  4KB  |  140 lines
  1.  
  2. BEGIN lb,rb,bb,lm,rm,um,dm,40,4
  3.  
  4. ;------------------------------BOTH BUTTONS----------------------------------
  5.  
  6. bb:     EXECUTE RETURN
  7.  
  8. ;------------------------------LEFT BUTTON-----------------------------------
  9.  
  10. lb:     EXECUTE CURSOR
  11.  
  12. ;------------------------------RIGHT BUTTON----------------------------------
  13.  
  14. rb:     EXECUTE F9
  15.  
  16. ;------------------------------LEFT MOTION-----------------------------------
  17.  
  18. lm:     EXECUTE TB
  19.  
  20. ;------------------------------RIGHT MOTION----------------------------------
  21. rm:     EXECUTE BKTB
  22.  
  23. ;------------------------------UP MOTION-------------------------------------
  24.  
  25. um:     EXECUTE UP
  26. uma:    EXECUTE PGUP
  27. ;------------------------------DOWN MOTION-----------------------------------
  28.  
  29. dm:    EXECUTE DOWN
  30. dma:   EXECUTE PGDN
  31. ;------------------------------MENUS-----------------------------------------
  32.  
  33. CURSOR: MENU "CURSOR:",1,1,INVERSE
  34.         OPTION "PAGE UP/PAGE DOWN",PAGE
  35.         OPTION "LINE UP/LINE DOWN",LINE
  36.         OPTION "ACTIVATE LEFT WINDOW",LEFT
  37.         OPTION "ACTIVATE RIGHT WINDOW",RIGHT
  38.         OPTION "COMMANDS",WIND
  39.         OPTION "WINDOW PATH",CONTROL
  40.         MEND
  41.  
  42. CONTROL: MENU "WINDOW PATH",1,1,INVERSE
  43.         OPTION "DRIVE A: LEFT",DRIVEAL
  44.         OPTION "DRIVE A: RIGHT",DRIVEAR
  45.         OPTION "DRIVE C: LEFT", DRIVECL
  46.         OPTION "DRIVE C: RIGHT",DRIVECR
  47.         OPTION "DRIVE D: LEFT",DRIVEDL
  48.         OPTION "DRIVE D: RIGHT",DRIVEDR
  49.         MEND
  50.  
  51. WIND: popup 3,2,INVERSE
  52.       text "╔══════ COMMANDS ═══════╗"
  53.       text "║ Help left             ║"
  54.       text "║ Help right            ║"
  55.       text "║ Display subdir left   ║"
  56.       text "║ Display subdir right  ║"
  57.       text "║ Prompt for path left  ║"
  58.       text "║ Prompt for path right ║"
  59.       text "║ Sort current  by NAME ║"
  60.       text "║ Sort current  by EXT  ║"
  61.       text "║ Sort current  by SIZE ║"
  62.       text "║ Sort current  by DATE ║"
  63.       text "║ Create a new subdir   ║"
  64.       text "║ Hide current entry    ║"
  65.       text "║ Unhide entry          ║"
  66.       text "║ Protect entry         ║"
  67.       text "║ Unprotect entry       ║"
  68.       text "╚═══════════════════════╝"
  69.       select 2,3,21,F1
  70.       select 3,3,21,F2
  71.       select 4,3,21,F3
  72.       select 5,3,21,F4
  73.       select 6,3,21,F5
  74.       select 7,3,21,F6
  75.       select 8,3,21,F7
  76.       select 9,3,21,F8
  77.       select 10,3,21,SF7
  78.       select 11,3,21,SF8
  79.       select 12,3,21,F10
  80.       select 13,3,21,SF3
  81.       select 14,3,21,SF4
  82.       select 15,3,21,SF5
  83.       select 16,3,21,SF6
  84.       pend
  85.  
  86. DRIVEAL: TYPE 0,63,"A:\",13
  87.  
  88. DRIVEAR: TYPE 0,64,"A:\",13
  89.  
  90. DRIVECL: TYPE 0,63,"C:\",13
  91.  
  92. DRIVECR: TYPE 0,64,"C:\",13
  93.  
  94. DRIVEDL: TYPE 0,63,"D:\",13
  95.  
  96. DRIVEDR: TYPE 0,64,"D:\",13
  97.  
  98. LINE: ASSIGN lb,rb,bb,lm,rm,um,dm,40,4
  99. PAGE: ASSIGN lb,rb,bb,lm,rm,uma,dma,40,4
  100. ;------------------------------KEYS------------------------------------------
  101.  
  102. NUL:           NOTHING
  103. RETURN:        TYPE 13
  104. ESCAPE:        TYPE 27
  105. SLASH:         TYPE "/"
  106. CANCEL:        TYPE 27,27,27,27,27,27,27,27
  107. PERIOD:        TYPE "."
  108. F1:            TYPE 0,59
  109. F2:            TYPE 0,60
  110. F3:            TYPE 0,61
  111. F4:            TYPE 0,62
  112. F5:            TYPE 0,63
  113. F6:            TYPE 0,64
  114. F7:            TYPE 0,65
  115. F8:            TYPE 0,66
  116. F9:            TYPE 0,67
  117. F10:           TYPE 0,68
  118. SF1:           TYPE 0,84
  119. SF2:           TYPE 0,85
  120. SF3:           TYPE 0,86
  121. SF4:           TYPE 0,87
  122. SF5:           TYPE 0,88
  123. SF6:           TYPE 0,89
  124. SF7:           TYPE 0,90
  125. SF8:           TYPE 0,91
  126. SF9:           TYPE 0,92
  127. SF10:          TYPE 0,93
  128. HOME:          TYPE 0,71
  129. END:           TYPE 0,79
  130. ENDHOME:       TYPE 0,79,0,71
  131. BKTB:          TYPE 0,15                                    ;BACK TAB
  132. TB:            TYPE 9
  133. PGUP:          TYPE 0,73
  134. PGDN:          TYPE 0,81
  135. LEFT:          TYPE 0,75
  136. RIGHT:         TYPE 0,77
  137. UP:            TYPE 0,72
  138. DOWN:          TYPE 0,80
  139.  
  140.