forked from KolibriOS/kolibrios
169 lines
4.6 KiB
PHP
169 lines
4.6 KiB
PHP
|
KMENUITEM_NORMAL equ 0
|
||
|
|
KMENUITEM_SUBMENU equ 1
|
||
|
|
KMENUITEM_SEPARATOR equ 2
|
||
|
|
|
||
|
|
init_main_menu:
|
||
|
|
stdcall [kmenu_init], syscolors
|
||
|
|
|
||
|
|
stdcall [ksubmenu_new]
|
||
|
|
mov [main_menu], eax
|
||
|
|
|
||
|
|
stdcall [ksubmenu_new]
|
||
|
|
mov [main_menu_file], eax
|
||
|
|
stdcall [ksubmenu_new]
|
||
|
|
mov [main_menu_edit], eax
|
||
|
|
stdcall [ksubmenu_new]
|
||
|
|
mov [main_menu_instr], eax
|
||
|
|
|
||
|
|
; init 'File' menu
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_New, 0x71
|
||
|
|
stdcall [ksubmenu_add], [main_menu_file], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_Open, 0x72
|
||
|
|
stdcall [ksubmenu_add], [main_menu_file], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_Save, 0x73
|
||
|
|
stdcall [ksubmenu_add], [main_menu_file], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_SaveAs, 0x74
|
||
|
|
stdcall [ksubmenu_add], [main_menu_file], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_SEPARATOR, 0, 0
|
||
|
|
stdcall [ksubmenu_add], [main_menu_file], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_Exit, 0x75
|
||
|
|
stdcall [ksubmenu_add], [main_menu_file], eax
|
||
|
|
|
||
|
|
; add 'File' menu to main
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_File, [main_menu_file]
|
||
|
|
stdcall [ksubmenu_add], [main_menu], eax
|
||
|
|
|
||
|
|
; init 'Edit' menu
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Edit_Undo, 0x61
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Edit_Redo, 0x62
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_SEPARATOR, 0, 0
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Edit_Copy, 0x63
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Edit_Paste, 0x64
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Edit_Cut, 0x65
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_SEPARATOR, 0, 0
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Edit_ClS, 0x66
|
||
|
|
stdcall [ksubmenu_add], [main_menu_edit], eax
|
||
|
|
|
||
|
|
; add 'Edit' menu to main
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Edit, [main_menu_edit]
|
||
|
|
stdcall [ksubmenu_add], [main_menu], eax
|
||
|
|
|
||
|
|
; init 'Edit' menu
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Instr_Pencil, 0x51
|
||
|
|
stdcall [ksubmenu_add], [main_menu_instr], eax
|
||
|
|
|
||
|
|
; add 'Instruments' menu to main
|
||
|
|
stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Instr, [main_menu_instr]
|
||
|
|
stdcall [ksubmenu_add], [main_menu], eax
|
||
|
|
|
||
|
|
ret
|
||
|
|
|
||
|
|
put_main_menu:
|
||
|
|
stdcall [kmainmenu_draw], [main_menu]
|
||
|
|
ret
|
||
|
|
|
||
|
|
button_handler_main_menu:
|
||
|
|
cmp eax, 0x71
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 7
|
||
|
|
mov [number_menu], 1
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x72
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 7
|
||
|
|
mov [number_menu], 2
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x73
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 7
|
||
|
|
mov [number_menu], 3
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x74
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 7
|
||
|
|
mov [number_menu], 4
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x75
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 7
|
||
|
|
mov [number_menu], 5
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x61
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 6
|
||
|
|
mov [number_menu], 1
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x62
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 6
|
||
|
|
mov [number_menu], 2
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x63
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 6
|
||
|
|
mov [number_menu], 3
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x64
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 6
|
||
|
|
mov [number_menu], 4
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x65
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 6
|
||
|
|
mov [number_menu], 5
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x66
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 6
|
||
|
|
mov [number_menu], 6
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
cmp eax, 0x51
|
||
|
|
jne @f
|
||
|
|
mov [number_panel], 5
|
||
|
|
mov [number_menu], 1
|
||
|
|
jmp TakeInstruments
|
||
|
|
@@:
|
||
|
|
.end_handler:
|
||
|
|
ret
|
||
|
|
|
||
|
|
main_menu dd 0
|
||
|
|
main_menu_file dd 0
|
||
|
|
main_menu_edit dd 0
|
||
|
|
main_menu_instr dd 0
|
||
|
|
|
||
|
|
sz_main_menu_File db 'File', 0
|
||
|
|
sz_main_menu_File_New db 'New', 0
|
||
|
|
sz_main_menu_File_Open db 'Open', 0
|
||
|
|
sz_main_menu_File_Save db 'Save', 0
|
||
|
|
sz_main_menu_File_SaveAs db 'Save as', 0
|
||
|
|
sz_main_menu_File_Exit db 'Exit', 0
|
||
|
|
|
||
|
|
sz_main_menu_Edit db 'Edit', 0
|
||
|
|
sz_main_menu_Edit_Undo db 'Undo', 0
|
||
|
|
sz_main_menu_Edit_Redo db 'Redo', 0
|
||
|
|
sz_main_menu_Edit_Copy db 'Copy', 0
|
||
|
|
sz_main_menu_Edit_Paste db 'Paste', 0
|
||
|
|
sz_main_menu_Edit_Cut db 'Cut', 0
|
||
|
|
sz_main_menu_Edit_ClS db 'Clear screen', 0
|
||
|
|
|
||
|
|
sz_main_menu_Instr db 'Instruments', 0
|
||
|
|
sz_main_menu_Instr_Pencil db 'Pencil', 0
|