CNC Control UI: add combobox for port (button + kmenu)

git-svn-id: svn://kolibrios.org@7440 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
theonlymirage 2018-10-08 12:41:59 +00:00
parent a2eabdbf4a
commit 840f6b865f
1 changed files with 121 additions and 6 deletions

View File

@ -2,6 +2,7 @@
;Igor Afanasyev (aka IgorA) and Sergey Efremenkov (aka theonlymirage), 2018
;02.10.18 - Only prototype UI
;08.10.18 - Add ComboBox (Button + KMenu), small text
format binary as ""
use32
@ -19,8 +20,12 @@ include 'lang.inc'
include 'cnc_control.inc'
include '../../develop/info3ds/info_fun_float.inc'
KMENUITEM_NORMAL equ 0
KMENUITEM_SUBMENU equ 1
KMENUITEM_SEPARATOR equ 2
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
caption db 'CNC Control 02.10.18',0 ;¯®¤¯¨áì ®ª­ 
caption db 'CNC Control 08.10.18',0 ;¯®¤¯¨áì ®ª­ 
run_file_70 FileInfoBlock
@ -65,7 +70,7 @@ start:
;call but_new_file
option_boxes_set_sys_color sc,opt_grlist1
;progress bar trash
;progress bar
mov [pb.left], dword 50
mov [pb.top], dword 30
mov [pb.width], dword 350
@ -77,6 +82,24 @@ start:
mov [pb.progress_color], dword 8072B7EBh
mov [pb.frame_color], dword 00406175h
;port menu
stdcall [kmenu_init], sc ;kmenu initialisation
;stdcall [ksubmenu_new]
;mov [main_menu], eax
stdcall [ksubmenu_new]
mov [port_menu], eax
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_COMport, 110
stdcall [ksubmenu_add], [port_menu], eax
stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_USBport, 111
stdcall [ksubmenu_add], [port_menu], eax
;stdcall [kmenuitem_new], KMENUITEM_SEPARATOR, 0, 0
;stdcall [ksubmenu_add], [port_menu], eax
;stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_OTHERport, 112
;stdcall [ksubmenu_add], [port_menu], eax
stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_PortMenu, [port_menu]
;stdcall [ksubmenu_add], [main_menu], eax
align 4
red_win:
call draw_window
@ -118,6 +141,7 @@ mouse:
stdcall [option_box_mouse], opt_grlist1
stdcall [edit_box_mouse], editFileName
stdcall [edit_box_mouse], editCommand
stdcall [kmainmenu_dispatch_cursorevent], [port_menu] ;[main_menu]
push eax ebx ecx
mcall SF_MOUSE_GET,SSF_BUTTON_EXT
@ -289,6 +313,9 @@ proc timer_funct
ret
endp
WINDOW_WIDTH = 775
WINDOW_HEIGHT = 445
align 4
draw_window:
pushad
@ -298,7 +325,7 @@ pushad
mov edx,[sc.work]
or edx,0x33000000
mov edi,caption
mcall SF_CREATE_WINDOW,(20 shl 16)+775,(20 shl 16)+445
mcall SF_CREATE_WINDOW,(20 shl 16)+WINDOW_WIDTH,(20 shl 16)+WINDOW_HEIGHT
;;mcall SF_THREAD_INFO,procinfo,-1
;;mov eax,dword[procinfo.box.height]
@ -351,9 +378,10 @@ pushad
; ***
mov ecx,[sc.work_text]
or ecx,0x81000000
mcall SF_DRAW_TEXT,(15 shl 16)+5,,txt_preview
mcall ,(424 shl 16)+5,,txt_port
or ecx,0x80000000 ;0x81000000
textYcoord = 13;5
mcall SF_DRAW_TEXT,(15 shl 16)+textYcoord,,txt_preview
mcall ,(424 shl 16)+textYcoord,,txt_port
mov ecx,[sc.work_button_text]
or ecx,0x81000000
mcall ,(440 shl 16)+381,,txt_but_cancel
@ -375,6 +403,29 @@ pushad
stdcall [buf2d_draw], buf_0
;delete port button, if it exist
mov edx, 0x80000008
mcall 8
;draw button PORT
buttonPortX = 433
buttonPortY = 27 ;50
buttonPortTextXoffset = 5
mov ebx, buttonPortX*65536 + 95 ;X + Width
mov ecx, buttonPortY*65536 + 20 ;Y + Height
mov edx, 0x00000008 ;button id
mov esi, 0x00AABBCC ;color button
mcall 8
;draw text for button PORT
mov ebx, (buttonPortX+buttonPortTextXoffset) * 65536 + (buttonPortY+6) ;(x, y)
mov ecx, 0xFFFFFF
mov edx, sz_PortMenu
mov esi, 11
mcall 4
;stdcall [kmainmenu_draw], [main_menu]
;mov word[coord.x], 0
;mov word[coord.y], 0
;stdcall [ksubmenu_draw], [port_menu], coord
mcall SF_REDRAW,SSF_END_DRAW
popad
ret
@ -404,6 +455,7 @@ key:
align 4
button:
mcall SF_GET_BUTTON
cmp ah,3
jne @f
call but_open_file
@ -414,7 +466,22 @@ button:
call but_restore_zoom
jmp still
@@:
cmp ah, 8
jne @f
push eax ebx ecx
mcall 9, pi, -1 ;get window coord
mov eax, dword[pi+34]
add eax, buttonPortX + 5
mov word[coord.x], ax
mov eax, dword[pi+38]
add eax, buttonPortY + 42
mov word[coord.y], ax
stdcall [ksubmenu_draw], [port_menu], coord
pop ecx ebx eax
@@:
;cmp ah,5
;jne @f
;call but_...
@ -666,6 +733,20 @@ db 'PNG',0
db 0
;[
;for test
main_menu dd 0
port_menu dd 0
sz_PortMenu db 'COM 12 ',0
sz_COMport db 'COM port 12',0
sz_USBport db 'USB port ',0
sz_OTHERport db 'Other port ',0
coord:
.x dw 100
.y dw 200
;]
head_f_i:
head_f_l db '‘¨á⥬­ ï ®è¨¡ª ',0
@ -690,6 +771,11 @@ lib_name_3 db 'box_lib.obj',0
err_msg_found_lib_3 db '<27>¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'box_lib.obj',39,0
err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib',39,0
system_dir_4 db '/sys/lib/'
lib_name_4 db 'kmenu.obj',0
err_msg_found_lib_4 db '<27>¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'kmenu.obj',39,0
err_msg_import_4 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'kmenu',39,0
l_libs_start:
lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
@ -699,6 +785,8 @@ l_libs_start:
err_msg_found_lib_2,head_f_l,import_buf2d,err_msg_import_2,head_f_i
lib_3 l_libs lib_name_3, sys_path, file_name, system_dir_3,\
err_msg_found_lib_3, head_f_l, import_box_lib,err_msg_import_3,head_f_i
lib_4 l_libs lib_name_4, sys_path, file_name, system_dir_4,\
err_msg_found_lib_4, head_f_l, import_libkmenu,err_msg_import_4,head_f_i
l_libs_end:
align 4
@ -861,6 +949,32 @@ import_box_lib:
sz_progressbar_draw db 'progressbar_draw', 0
sz_progressbar_progress db 'progressbar_progress', 0
align 4
import_libkmenu:
kmenu_init dd akmenu_init
kmainmenu_draw dd akmainmenu_draw
kmainmenu_dispatch_cursorevent dd akmainmenu_dispatch_cursorevent
ksubmenu_new dd aksubmenu_new
ksubmenu_delete dd aksubmenu_delete
ksubmenu_draw dd aksubmenu_draw
ksubmenu_add dd aksubmenu_add
kmenuitem_new dd akmenuitem_new
kmenuitem_delete dd akmenuitem_delete
kmenuitem_draw dd akmenuitem_draw
dd 0,0
akmenu_init db 'kmenu_init',0
akmainmenu_draw db 'kmainmenu_draw',0
akmainmenu_dispatch_cursorevent db 'kmainmenu_dispatch_cursorevent',0
aksubmenu_new db 'ksubmenu_new',0
aksubmenu_delete db 'ksubmenu_delete',0
aksubmenu_draw db 'ksubmenu_draw',0
aksubmenu_add db 'ksubmenu_add',0
akmenuitem_new db 'kmenuitem_new',0
akmenuitem_delete db 'kmenuitem_delete',0
akmenuitem_draw db 'kmenuitem_draw',0
button_press dd 0 ;for kmenu
align 4
mouse_dd dd 0
last_time dd 0
@ -985,5 +1099,6 @@ stacktop:
plugin_path rb 4096
openfile_path rb 4096
filename_area rb 256
pi rb 1024
mem: