;           Q M O D E M  (4 . 2)  M O U S E   S U P P O R T
;
; Along with the standard keyboard program control, this menu provides two
; modes of QMODEM three-button mouse support: 1) A popup menu with most
; functions of the standard program menu (called by the Mid Button), and
; 2) Direct command of ENTER, ESC, PHONE BOOK, BREAK, CAPTURE ON/OFF, and
; HANG UP provided respectively by the Left Button, Right Button, Left+Mid
; Buttons, Left+Right Buttons, Mid+Right Buttons, and All-Buttons.  Mouse
; movement provides the Left, Right, Up, and Down cursor functions as ap-
; propriate.  The Up-Down mouse movements also provide the Scroll-Back
; function not otherwise included in the popup menu (Note: once involked,
; Scroll-Back is released by clicking the Right Button).

BEGIN LB, MB, RB, LM, RM, UM, DM, 30, 40

CHORDS LMB, LRB, MRB, ALLB

LB: TYPE ENTER				; EXECUTE
MB: EXECUTE POP1			; EXECUTE POPUP MENU
RB: TYPE ESC				; ESCAPE
LM: TYPE 0, 75				; LEFT
RM: TYPE 0, 77				; RIGHT
UM: TYPE 0, 72				; UP
DM: TYPE 0, 80				; DOWN
LMB: TYPE 0, 32				; PHONE BOOK
LRB: TYPE 0, 117			; BREAK
MRB: TYPE 0, 119			; CAPTURE ON/OFF
ALLB: TYPE 0, 35			; HANG UP

NOP: NOTHING				; No Function

POP1: POPUP 1, 1, 79

TEXT "******************** Q M O D E M   C O M M A N D   M E N U *********************"
TEXT "                                                                                "
TEXT " --------------------- BEFORE ---------------------  :  ------- TOGGLES ------- "
TEXT " Phone Book ...... Alt-D    Term Emulation .. Alt-G  :  Session Log ..... Alt-0 "
TEXT " --------------------- DURING ---------------------  :  Backspace DEL/^H  Alt-1 "
TEXT " Clear Screen .... Alt-C    Capture File .... ^Home  :  80x25 (EGA/VGA) . Alt-2 "
TEXT " Execute Script .. Alt-F    Send BREAK ...... ^End   :  Debug Status Info Alt-3 "
TEXT " Quick Learn ..... Alt-Q    Upload Files .... PgUp   :  80x43/50 (E/VGA)  Alt-4 "
TEXT " Split Screen .... Alt-S    Download Files .. PgDn   :  Host Mode ....... Alt-5 "
TEXT " Screen Dump ..... Alt-T                             :  Batch Entry Wind  Alt-6 "
TEXT " --------------------- AFTER ----------------------  :  High Bit Strip .. Alt-8 "
TEXT " Hang Up ......... Alt-H    Exit Qmodem ..... Alt-X  :  Printer Echo .... Alt-9 "
TEXT "                                                     :  Beeps & Bells ... Alt-B "
TEXT " --------------------- SETUP ----------------------  :  Half/Full Duplex  Alt-E "
TEXT " Translate Table . Alt-A    Configuration ... Alt-N  :  ANSI Music ...... Alt-M "
TEXT " Function Keys ... Alt-J    Change Baud Rate  Alt-P  :  Scrollback Record Alt-U "
TEXT " Change COM Port . Alt-K                             :  XON/XOFF Flow Ctl Alt-Z "
TEXT " ---------------------- DOS -----------------------  :  DoorWay Mode .... Alt-= "
TEXT " Change Drive .... Alt-L    View/Edit File .. Alt-V  :  Status Lines .... Alt-- "
TEXT " Change Directory  Alt-O    List Directory .. Alt-W  :  CR/CRLF Mode .... ShTab "
TEXT " DOS Shell ....... Alt-R    Delete File ..... Alt-Y  :  Status Line Info AltRtn "
TEXT "****************************** MOUSE BUTTON ACTIONS ****************************"
TEXT "    L=ENTER, M=MENU, R=ESC, L+M=Phone Bk, L+R=Break, M+R=Printer, ALL=Hang Up   "
TEXT "********************************************************************************"

SELECT 2, 2, 23, NOP
SELECT 4, 2, 23, DIAL
SELECT 6, 2, 23, CLR
SELECT 7, 2, 23, SCRP
SELECT 8, 2, 23, QKLN
SELECT 9, 2, 23, SPSC
SELECT 10, 2, 23, SCDP
SELECT 12, 2, 23, HANG
SELECT 15, 2, 23, XLAT
SELECT 16, 2, 23, FNKY
SELECT 17, 2, 23, CMPT
SELECT 19, 2, 23, CHDV
SELECT 20, 2, 23, CHDR
SELECT 21, 2, 23, DOS
SELECT 4, 29, 23, TERM
SELECT 6, 29, 23, CAPF
SELECT 7, 29, 23, BRK
SELECT 8, 29, 23, UPLD
SELECT 9, 29, 23, DNLD
SELECT 12, 29, 23, EXIT
SELECT 15, 29, 23, CNFG
SELECT 16, 29, 23, BAUD
SELECT 19, 29, 23, EDIT
SELECT 20, 29, 23, LSTD
SELECT 21, 29, 23, DELF
SELECT 4, 57, 23, LOG
SELECT 5, 57, 23, BKSP
SELECT 6, 57, 23, LOVG
SELECT 7, 57, 23, DBUG
SELECT 8, 57, 23, HIVG
SELECT 9, 57, 23, HOST
SELECT 10, 57, 23, BATW
SELECT 11, 57, 23, HIBT
SELECT 12, 57, 23, PRN
SELECT 13, 57, 23, BEEP
SELECT 14, 57, 23, DUPX
SELECT 15, 57, 23, ANSI
SELECT 16, 57, 23, SCRL
SELECT 17, 57, 23, XON
SELECT 18, 57, 23, DOOR
SELECT 19, 57, 23, STLN
SELECT 20, 57, 23, CRLF
SELECT 21, 57, 23, STIN
PEND

DIAL: TYPE 0, 32		; Alt-D
CLR: TYPE 0, 46			; Alt-C
SCRP: TYPE 0, 33		; Alt-F
QKLN: TYPE 0, 16		; Alt-Q
SPSC: TYPE 0, 31		; Alt-S
SCDP: TYPE 0, 20		; Alt-T
HANG: TYPE 0, 35		; Alt-H
XLAT: TYPE 0, 30		; Alt-A
FNKY: TYPE 0, 36		; Alt-J
CMPT: TYPE 0, 37		; Alt-K
CHDV: TYPE 0, 38		; Alt-L
CHDR: TYPE 0, 24		; Alt-O
DOS: TYPE 0, 19			; Alt-R
TERM: TYPE 0, 34		; Alt-G
CAPF: TYPE 0, 119		; ^Home
BRK: TYPE 0, 117		; ^End
UPLD: TYPE 0, 73		; PgUp
DNLD: TYPE 0, 81		; PgDn
EXIT: TYPE 0, 45		; Alt-X
CNFG: TYPE 0, 49		; Alt-N
BAUD: TYPE 0, 25		; Alt-P
EDIT: TYPE 0, 47		; Alt-V
LSTD: TYPE 0, 17		; Alt-W
DELF: TYPE 0, 21		; Alt-Y
LOG: TYPE 0, 129		; Alt-0
BKSP: TYPE 0, 120		; AlT-1
LOVG: TYPE 0, 121		; Alt-2
DBUG: TYPE 0, 122		; Alt-3
HIVG: TYPE 0, 123		; Alt-4
HOST: TYPE 0, 124		; Alt-5
BATW: TYPE 0, 125		; Alt-6
HIBT: TYPE 0, 127		; Alt-8
PRN: TYPE 0, 128		; Alt-9
BEEP: TYPE 0, 48		; Alt-B
DUPX: TYPE 0, 18		; Alt-E
ANSI: TYPE 0, 50		; Alt-M
SCRL: TYPE 0, 22		; Alt-U
XON: TYPE 0, 44			; Alt-Z
DOOR: TYPE 0, 131		; Alt-=
STLN: TYPE 0, 130		; Alt--
CRLF: TYPE 0, 15		; ShTab
STIN: TYPE 0, 28		; AltRtn
