Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 3627 → Rev 3628

/programs/system/MyKey/trunk/MyKey.asm
19,6 → 19,8
dd 0x0
dd app_path
 
include 'lang.inc' ;language support
 
include 'ASPAPI.INC'
include 'string.inc'
include 'macros.inc'
896,7 → 898,11
clc
ret
.err_out:
if lang eq it
print "Impossibile caricare il programma"
else
print "Can't load program"
end if
popa
stc
ret
912,7 → 918,11
;########### Input Thread data start ############
 
; Input Thread Title
if lang eq it
it_labelt db "Inserisci hotkey e nome "
else
it_labelt db "Input hotkey and it's name"
end if
;labellen:
it_edit edit_box 180, 20, 30, 0xffffff, 0xAA80, 0x0000ff, 0x0, 0x0, 31, it_buf_cmd_line, 0, 0
it_buf_cmd_line dd 0 ;db MAX_HOTKEYS_NUM*32 dup(0) ; !Make it dynamic!!!
920,17 → 930,28
it_alive db 0 ; Flag of the input thread existance
it_keycode db 0
it_hotkey_addr dd 0
if lang eq it
it_hint db 'o premi Esc per cancellare',0
else
it_hint db 'or press Esc to cancel',0
end if
;########### Input Thread data end ############
 
;Button names
if lang eq it
AddKeyText db 'Aggiungi',0
ReloadKeyText db 'Ricarica',0
SaveKeyText db 'Salva',0
;DeleteKeyText db 'Delete',0
;ManageKeyText db 'Manage',0
else
AddKeyText db 'Add',0
ReloadKeyText db 'Reload',0
SaveKeyText db 'Save',0
;DeleteKeyText db 'Delete',0
;ManageKeyText db 'Manage',0
end if
 
 
hotkeys_num db 0;15
;keyboard_mode db 0 ; Scan or ASCII keys to send ? 0 - ASCII , 1 - Scan
butt db FIRST_ITEM_BUTTON_ID ; Pressed button ID
947,11 → 968,17
system_dir0 db '/sys/lib/'
boxlib_name db 'box_lib.obj',0
 
if lang eq it
err_message_found_lib db "Non trovo box_lib.obj",0
head_f_i:
head_f_l db 'Errore di sistema',0
err_message_import db 'Error di importazione di box_lib.obj',0
else
err_message_found_lib db "Can't find box_lib.obj",0
head_f_i:
head_f_l db 'System error',0
err_message_import db 'Error on import box_lib.obj',0
 
end if
align 4
myimport:
edit_box_draw dd aEdit_box_draw
/programs/system/MyKey/trunk/makefile
0,0 → 1,19
#!gmake
 
# Macro
FASM=/opt/bin/fasm
KPACK=/opt/bin/kpack
LANG=lang.inc
FILE=MyKey
SOURCE=${FILE}.asm
OUT=${FILE}.bin
 
en:
echo "lang fix en" > ${LANG}
${FASM} ${SOURCE} ${OUT}
it:
echo "lang fix it" > ${LANG}
${FASM} ${SOURCE} ${OUT}
 
clean:
rm -f ${LANG} ${OUT}
/programs/system/MyKey/trunk/mykey.ini
27,7 → 27,12
path=games/mine
param=
[hotkey4]
if lang eq it
name=Cartella giochi
else
name=Games directory
end if
 
keycode=8226
keycode_name=RAlt + g
path=file managers/eolite
39,7 → 44,11
path=file managers/kfm
param=
[hotkey6]
if lang eq it
name=Messaggi di sistema
else
name=System Message Board
end if
keycode=4127
keycode_name=LAlt + s
path=develop/board