;----------------------------------------------------------- ; ; Xetrion Source Code ; ; (c) NeXO Software, Benoit SCHERRER ; e-mail : p.c.scherrer@wanadoo.fr ; ; ; File> keyboard.mdl ; Utility> Function for keyboard management ; ;----------------------------------------------------------- ;----------------------------------------------------------- ; Definition of keys ;----------------------------------------------------------- ; KEY_2ND equ $1000 already definited in preos ;#ifdef TIPLUS ;#else KEY_DIAMOND equ 8160 ;#endif ;#ifdef TI89 KM_FILE_COPY equ KEY_DIAMOND+')' ;<>C KM_FILE_MOVE equ KEY_DIAMOND+'5' ;<>M KM_FILE_RENAME equ KEY_DIAMOND+'2' ;<>R KM_FILE_DELETE equ 257 ;'<-' KM_FILE_NEWFOLDER equ KEY_DIAMOND+'6' ;<>N KM_FILE_ARCHIVE equ KEY_DIAMOND+'=' ;<> A KM_FILE_UNARCHIVE equ KEY_2ND+'+' ;2nd U KM_FILE_EXIT equ 264 ;ESC KM_LINK_SEND equ KEY_DIAMOND+'2' ;<>2 KM_SECURE_HIDE equ KEY_DIAMOND+'8' KM_SECURE_LOCK equ KEY_DIAMOND+'4' KM_SECURE_PROTECT equ KEY_DIAMOND+258 KM_TOOLS_SELECT equ 272 ;F5 KASSO_SIGN equ KEY_DIAMOND+'3' KASSO_PARAM equ KEY_DIAMOND+258 KASSO_ADD equ '=' KLINK_KEEPFOLDER equ 'o' ;#else KM_FILE_COPY equ KEY_DIAMOND+'C' ;<>C KM_FILE_MOVE equ KEY_DIAMOND+'M' ;<>M KM_FILE_RENAME equ KEY_DIAMOND+'R' ;<>R KM_FILE_DELETE equ 257 ;'<-' KM_FILE_NEWFOLDER equ KEY_DIAMOND+'N' ;<>N KM_FILE_ARCHIVE equ KEY_DIAMOND+'A' KM_FILE_UNARCHIVE equ KEY_DIAMOND+'U' KM_FILE_EXIT equ 264 ;ESC KM_LINK_SEND equ KEY_DIAMOND+'R' ;<>R KM_SECURE_HIDE equ KEY_DIAMOND+'H' KM_SECURE_LOCK equ KEY_DIAMOND+'L' KM_SECURE_PROTECT equ KEY_DIAMOND+'P' KM_TOOLS_SELECT equ 272 ;F5 KASSO_SIGN equ KEY_DIAMOND+'S' KASSO_PARAM equ KEY_DIAMOND+'P' KASSO_ADD equ 'a' KLINK_KEEPFOLDER equ 'o' ;#endif