| 0,0 → 1,169 |
|---|
| 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 |