
;******************************************************************************
;                                                                             *
;                                                                             *
;                                                                             *
;  DBASE MOUSE HELP MENU SOURCE FILE, FUTURE ADDITION WITHOUT ANY NOTICE.     *
;                                                   Huai-Yeu Chang 1988,12,27 *
;******************************************************************************

BEGIN   lbtn, rbtn, mbtn, lmov, rmov, umov, dmov,50,40

lbtn:   TYPE    13
mbtn:   TYPE    27
;rbtn:   type    13
rbtn:   match   23,1,inverse,"Command",main,nul
lmov:   TYPE    0,75
rmov:   TYPE    0,77
umov:   TYPE    0,72
dmov:   TYPE    0,80

main:   menu    "    Main Menu    ",13,57,inverse
        option  "    Help Menu",main1
        option  "  Back to ASSIST",main2
        option  "   List Data",main3
        option  "   List files",main4
        option  "Display Structure",main5
        option  " Display Status",main6
        option  " Display Memory",main7
        option  "     Display",main8
        option  "   Append File",main9
        option  "    Edit File",main10
        option  "    Mouse Help",main11
        mend

main11: popup   8,20,inverse
        text    "7===========  Mouse Help Menu  ===========9"
        text    "|                                         |"
        text    "|  This sample is used under DBASE III,   |"
        text    "|    following are the key definition:    |"
        text    "4-----------------------------------------6"
        text    "| Left Button -- ENTER key                |"
        text    "4-----------------------------------------6"
        text    "| Middle Button -- ESC key                |"
        text    "4-----------------------------------------6"
        text    "| Right Button -- Main Menu Display       |"
        text    "1=========================================3"
        select  1,15,15,nul
        pend

;main1:  type    "help",13
;main2:  type    "assist",13
;main3:  type    "list",13
;main4:  type    "dir",13
;main5:  type    "display structure",13
;main6:  type    "display status",13
;main7:  type    "display memory",13
;main8:  type    "display",13
;main9:  type    "append",13
;main10: type    "edit",13

main1:  type 0,59
main2:  type 0,60
main3:  type 0,61
main4:  type 0,62
main5:  type 0,63
main6:  type 0,64
main7:  type 0,65
main8:  type 0,66
main9:  type 0,67
main10: type 0,68
enter:  type 13
nul:    NOTHING
