heed: fix open & edit null file
git-svn-id: svn://kolibrios.org@8255 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
IgorA
parent
3a31a46d90
commit
4f3226cf94
@ -38,7 +38,7 @@
|
||||
; <20> ¬ïâì ¯¥à¥à á¯à¥¤¥«ï¥âáï 㢥«¨ç¥¨¥ i umen'shenie.
|
||||
; ” ©« § £à㦠¥âáï 楫¨ª®¬.
|
||||
|
||||
; Œ ªà®áë load_lib.mac, editbox_ex ¨ ¡¨¡«¨®â¥ªã box_lib.obj ᮧ¤ «¨:
|
||||
; Œ ªà®áë load_lib.mac ¨ ¡¨¡«¨®â¥ªã box_lib.obj ᮧ¤ «¨:
|
||||
; <Lrz> - Alexey Teplov / €«¥ªá¥© ’¥¯«®¢
|
||||
; Mario79, Mario - Marat Zakiyanov / Œ à â ‡ ª¨ï®¢
|
||||
; Diamondz - Evgeny Grechnikov / …¢£¥¨© ƒà¥ç¨ª®¢ ¨ ¤à.
|
||||
@ -47,9 +47,9 @@
|
||||
; babalbes@yandex.ru
|
||||
;--------------------------------------------------------------------
|
||||
use32
|
||||
org 0x0
|
||||
org 0
|
||||
db 'MENUET01'
|
||||
dd 0x1
|
||||
dd 1
|
||||
dd START ;program start
|
||||
dd I_END ;program image size
|
||||
dd (D_END+0x600) and not 3 ;required amount of memory
|
||||
@ -91,17 +91,17 @@ FIRST_HEX equ 0*65536+24
|
||||
scroll_width_size equ 15
|
||||
;--------------------------------------------------------------------
|
||||
struct f70
|
||||
func_n rd 1
|
||||
param1 rd 1
|
||||
param2 rd 1
|
||||
param3 rd 1
|
||||
param4 rd 1
|
||||
Function rd 1
|
||||
Position rd 1
|
||||
Flags rd 1
|
||||
Count rd 1
|
||||
Buffer rd 1
|
||||
rezerv rb 1
|
||||
name rd 1
|
||||
FileName rd 1
|
||||
ends
|
||||
;--------------------------------------------------------------------
|
||||
START:
|
||||
mcall 68,11
|
||||
mcall SF_SYS_MISC,SSF_HEAP_INIT
|
||||
|
||||
load_libraries l_libs_start,end_l_libs
|
||||
;--------------------------------------------------------------------
|
||||
@ -139,15 +139,15 @@ load_libraries l_libs_start,end_l_libs
|
||||
test eax,eax
|
||||
jnz @b
|
||||
|
||||
mcall 40,0x27
|
||||
mcall SF_SET_EVENTS_MASK,0x27
|
||||
|
||||
mcall 68,12,32*1024 ;áâà ¨çë© ¡ãä¥à
|
||||
mcall SF_SYS_MISC,SSF_MEM_ALLOC,32*1024 ;áâà ¨çë© ¡ãä¥à
|
||||
mov [screen_table],eax
|
||||
mcall 68,12,4*1024
|
||||
mcall SF_SYS_MISC,SSF_MEM_ALLOC,4*1024
|
||||
|
||||
mov [file_buffer],eax
|
||||
|
||||
mcall 68,12,1024
|
||||
mcall SF_SYS_MISC,SSF_MEM_ALLOC,1024
|
||||
mov [copy_buf],eax
|
||||
|
||||
|
||||
@ -165,16 +165,16 @@ load_libraries l_libs_start,end_l_libs
|
||||
mov [edit1.size],esi
|
||||
|
||||
;®¡é¥á¨áâ¥¬ë¥ ª« ¢¨è¨ ¤«ï Shift+ªãàá®àë
|
||||
; mcall 66,4,75,1
|
||||
; mcall 66,,77
|
||||
; mcall 66,,72
|
||||
; mcall 66,,80
|
||||
; mcall SF_KEYBOARD,SSF_SET_SYS_HOTKEY,75,1
|
||||
; mcall SF_KEYBOARD,,77
|
||||
; mcall SF_KEYBOARD,,72
|
||||
; mcall SF_KEYBOARD,,80
|
||||
|
||||
call ready_screen_buffer
|
||||
; jmp open_file
|
||||
mcall 9,procinfo,-1
|
||||
mcall SF_THREAD_INFO,procinfo,-1
|
||||
mov ecx,[ebx+30] ; PID
|
||||
mcall 18,21
|
||||
mcall SF_SYSTEM,SSF_GET_THREAD_SLOT
|
||||
mov [active_process],eax ; WINDOW SLOT
|
||||
;--------------------------------------------------------------------
|
||||
; open the file if program has a file path, when it was launched
|
||||
@ -185,7 +185,7 @@ redraw_all:
|
||||
call control_minimal_window_size
|
||||
call draw_window_1
|
||||
still:
|
||||
mcall 10
|
||||
mcall SF_WAIT_EVENT
|
||||
|
||||
cmp eax,6
|
||||
je mouse
|
||||
@ -199,7 +199,7 @@ still:
|
||||
;---------------------------------------------------------------------
|
||||
control_minimal_window_size:
|
||||
pusha
|
||||
mcall 9,procinfo,-1
|
||||
mcall SF_THREAD_INFO,procinfo,-1
|
||||
mov eax,[ebx+70]
|
||||
test eax,10b
|
||||
jnz .end
|
||||
@ -213,7 +213,7 @@ control_minimal_window_size:
|
||||
cmp eax,299
|
||||
jae @f
|
||||
mov esi,299
|
||||
mcall 67,-1,ebx,ebx
|
||||
mcall SF_CHANGE_WINDOW,-1,ebx,ebx
|
||||
@@:
|
||||
mov edx,-1
|
||||
mov eax,procinfo
|
||||
@ -221,7 +221,7 @@ control_minimal_window_size:
|
||||
cmp eax,399
|
||||
jae @f
|
||||
mov edx,399
|
||||
mcall 67,-1,ebx,,ebx
|
||||
mcall SF_CHANGE_WINDOW,-1,ebx,,ebx
|
||||
@@:
|
||||
.end:
|
||||
popa
|
||||
@ -251,7 +251,7 @@ draw_window_1:
|
||||
ret
|
||||
;---------------------------------------------------------------------
|
||||
key:
|
||||
mcall 2
|
||||
mcall SF_GET_KEY
|
||||
dec al
|
||||
jz still
|
||||
dec al
|
||||
@ -360,7 +360,7 @@ key:
|
||||
jmp still
|
||||
;--------------------------------------------------------------------
|
||||
button:
|
||||
mcall 17
|
||||
mcall SF_GET_BUTTON
|
||||
dec ah
|
||||
jnz still
|
||||
|
||||
@ -368,11 +368,11 @@ button:
|
||||
;--------------------------------------------------------------------
|
||||
align 4
|
||||
mouse:
|
||||
mcall 18,7
|
||||
mcall SF_SYSTEM,SSF_GET_ACTIVE_WINDOW
|
||||
cmp [active_process],eax
|
||||
jne still
|
||||
|
||||
mcall 37,7
|
||||
mcall SF_MOUSE_GET,SSF_SCROLL_DATA
|
||||
test eax,eax
|
||||
jz .menu_bar_1;.mouse
|
||||
bt eax,15
|
||||
@ -474,7 +474,7 @@ mouse:
|
||||
jmp still
|
||||
;--------------------------------------------------------------------
|
||||
.scroll_bar:
|
||||
; mcall 37,2
|
||||
; mcall SF_MOUSE_GET,SSF_BUTTON
|
||||
; test eax,eax
|
||||
; jnz @f
|
||||
; btr [flags],5
|
||||
@ -483,7 +483,7 @@ mouse:
|
||||
|
||||
.mouse:
|
||||
.vertical:
|
||||
mcall 37,2
|
||||
mcall SF_MOUSE_GET,SSF_BUTTON
|
||||
test eax,eax
|
||||
jnz @f
|
||||
btr [flags],5
|
||||
@ -496,7 +496,7 @@ mouse:
|
||||
bt [flags],7
|
||||
jc .horizontal_0
|
||||
|
||||
mcall 37,1
|
||||
mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
|
||||
shr eax,16
|
||||
cmp ax,[scroll_bar_data_vertical.start_x]
|
||||
jb .horizontal
|
||||
@ -566,7 +566,7 @@ mouse:
|
||||
cmp eax,[scroll_bar_data_horizontal.cur_area]
|
||||
jbe .other
|
||||
|
||||
mcall 37,1
|
||||
mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
|
||||
cmp ax,[scroll_bar_data_horizontal.start_y]
|
||||
jb still
|
||||
sub ax,[scroll_bar_data_horizontal.start_y]
|
||||
@ -575,7 +575,7 @@ mouse:
|
||||
|
||||
; mouse event for Horizontal ScrollBar
|
||||
.horizontal_0:
|
||||
; mcall 37,2
|
||||
; mcall SF_MOUSE_GET,SSF_BUTTON
|
||||
; test eax,eax
|
||||
; jnz @f
|
||||
; btr [flags],5
|
||||
@ -584,7 +584,7 @@ mouse:
|
||||
;@@:; bt [flags],7
|
||||
; jc @f
|
||||
|
||||
; mcall 37,1
|
||||
; mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
|
||||
; shr eax,16
|
||||
; cmp ax,[scroll_bar_data_vertical.start_x]
|
||||
; jb .horizontal
|
||||
@ -951,7 +951,7 @@ main_area:
|
||||
div ecx
|
||||
mov [scroll_bar_data_vertical.position],eax
|
||||
|
||||
mcall 37,2 ;ª¯®¯ª ¬ëè¨ ¦ â - ¥â á¬ëá« ¯¥à¥à¨á®¢ë¢ âì ScrollBar
|
||||
mcall SF_MOUSE_GET,SSF_BUTTON ;ª¯®¯ª ¬ëè¨ ¦ â - ¥â á¬ëá« ¯¥à¥à¨á®¢ë¢ âì ScrollBar
|
||||
test eax,eax
|
||||
jnz .4
|
||||
push dword scroll_bar_data_vertical
|
||||
@ -995,7 +995,7 @@ main_area:
|
||||
add ebx,font_buffer
|
||||
mov ecx,8*65536+16
|
||||
mov ebp,0
|
||||
mcall 65
|
||||
mcall SF_PUT_IMAGE_EXT
|
||||
pop edi
|
||||
|
||||
add edi,2
|
||||
@ -1046,7 +1046,7 @@ main_area:
|
||||
shl ebx,16
|
||||
mov bx,ax
|
||||
mov cx,16
|
||||
mcall 13,,,frgrd_color
|
||||
mcall SF_DRAW_RECT,,,frgrd_color
|
||||
.ls1:
|
||||
popad
|
||||
jmp @f
|
||||
@ -1076,7 +1076,7 @@ main_area:
|
||||
.no_inc_ebx:
|
||||
sub ecx,2*65536
|
||||
mov cx,2
|
||||
mcall 13
|
||||
mcall SF_DRAW_RECT
|
||||
popad
|
||||
|
||||
pushad
|
||||
@ -1097,7 +1097,7 @@ main_area:
|
||||
jnz .no_inc_ebx_2
|
||||
inc ebx
|
||||
.no_inc_ebx_2:
|
||||
mcall 13,,,frgrd_color
|
||||
mcall SF_DRAW_RECT,,,frgrd_color
|
||||
.10:
|
||||
popad
|
||||
jmp @f
|
||||
@ -1227,7 +1227,7 @@ show_current_offset:
|
||||
shl ebx,4
|
||||
add ebx,font_buffer
|
||||
push eax
|
||||
mcall 65
|
||||
mcall SF_PUT_IMAGE_EXT
|
||||
pop eax
|
||||
sub edx,8*65536
|
||||
dec dword [esp]
|
||||
@ -1268,7 +1268,7 @@ hex_output: ;
|
||||
xchg eax,ebx
|
||||
mov edi,palitra.5
|
||||
mov ebp,0
|
||||
mcall 65
|
||||
mcall SF_PUT_IMAGE_EXT
|
||||
add edx,8*65536
|
||||
pop edi
|
||||
inc edi
|
||||
@ -1357,7 +1357,7 @@ raspred_mem:
|
||||
mul ecx
|
||||
add ecx,eax
|
||||
.1:
|
||||
mcall 68,20,,[file_buffer]
|
||||
mcall SF_SYS_MISC,SSF_MEM_REALLOC,,[file_buffer]
|
||||
.ret:
|
||||
popad
|
||||
ret
|
||||
@ -1394,8 +1394,8 @@ align 4
|
||||
draw_window:
|
||||
call create_title
|
||||
xor esi,esi
|
||||
mcall 0,100*65536+653,100*65536+360,((0x73 shl 24) + frgrd_color),,title_buf ;title
|
||||
mcall 9,threath_buf,-1
|
||||
mcall SF_CREATE_WINDOW,100*65536+653,100*65536+360,((0x73 shl 24) + frgrd_color),,title_buf ;title
|
||||
mcall SF_THREAD_INFO,threath_buf,-1
|
||||
; cmp byte [threath_buf+70],3 ;®ª® á¢ñàãâ® ¢ § £®«®¢®ª?
|
||||
; jnae @f
|
||||
mov eax,[threath_buf+70]
|
||||
@ -1413,7 +1413,7 @@ draw_window:
|
||||
mov esi,dword [threath_buf+46]
|
||||
sub esi,dword [threath_buf+66]
|
||||
add esi,24*4
|
||||
mcall 67,-1,-1,-1,
|
||||
mcall SF_CHANGE_WINDOW,-1,-1,-1,
|
||||
jmp .@d
|
||||
;--------------------------------------
|
||||
@@:
|
||||
@ -1422,7 +1422,7 @@ draw_window:
|
||||
mov edx,dword [threath_buf+42]
|
||||
sub edx,dword [threath_buf+62]
|
||||
add edx,26*6
|
||||
mcall 67,-1,-1,,-1
|
||||
mcall SF_CHANGE_WINDOW,-1,-1,,-1
|
||||
jmp .@d
|
||||
;--------------------------------------
|
||||
@@:
|
||||
@ -1468,12 +1468,12 @@ draw_window:
|
||||
ror ecx,16
|
||||
mov cx,18
|
||||
ror ecx,16
|
||||
mcall 13,,,frgrd_color ;¯®«®á ᢥàåã
|
||||
mcall SF_DRAW_RECT,,,frgrd_color ;¯®«®á ᢥàåã
|
||||
|
||||
mcall ,,18,panel_clr1 ;¢¥àåïï ¯ ¥«ì
|
||||
|
||||
dec ebx
|
||||
mcall 38,,<18,18>,panel_clr2
|
||||
mcall SF_DRAW_LINE,,<18,18>,panel_clr2
|
||||
mov ecx,dword [threath_buf+66]
|
||||
sub cx,18
|
||||
push cx
|
||||
@ -1483,7 +1483,7 @@ draw_window:
|
||||
inc ebx
|
||||
add ecx,1*65536
|
||||
mov cx,18
|
||||
mcall 13,,,panel_clr1
|
||||
mcall SF_DRAW_RECT,,,panel_clr1
|
||||
|
||||
|
||||
mov eax,dword [threath_buf+62]
|
||||
@ -1520,7 +1520,7 @@ draw_window:
|
||||
sub ecx,1*65536
|
||||
movzx ebx, word [scroll_bar_data_vertical.start_x]
|
||||
inc ebx
|
||||
mcall 13,,,frgrd_color
|
||||
mcall SF_DRAW_RECT,,,frgrd_color
|
||||
|
||||
pop eax
|
||||
|
||||
@ -1610,15 +1610,15 @@ draw_window:
|
||||
;--------------------------------------------------------------------
|
||||
align 4
|
||||
start_draw:
|
||||
mcall 12,1
|
||||
mcall SF_REDRAW,SSF_BEGIN_DRAW
|
||||
ret
|
||||
;--------------------------------------------------------------------
|
||||
end_draw:
|
||||
mcall 12,2
|
||||
mcall SF_REDRAW,SSF_END_DRAW
|
||||
ret
|
||||
;--------------------------------------------------------------------
|
||||
close_prog:
|
||||
mcall -1
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
;--------------------------------------------------------------------
|
||||
change_codepage: ;¬¥ï¥¬ ¢â®àãî ¯®«®¢¨ã â ¡«¨æë
|
||||
test ah,ah
|
||||
@ -1672,7 +1672,7 @@ show_codepage:
|
||||
shl bx,4
|
||||
add ebx,font_buffer
|
||||
mov edi,palitra.5
|
||||
mcall 65
|
||||
mcall SF_PUT_IMAGE_EXT
|
||||
add edx,8*65536
|
||||
pop edi
|
||||
inc edi
|
||||
@ -1702,7 +1702,7 @@ show_insert: ;
|
||||
.2:
|
||||
add ebx,font_buffer
|
||||
mov edi,palitra.5
|
||||
mcall 65
|
||||
mcall SF_PUT_IMAGE_EXT
|
||||
add edx,8*65536
|
||||
pop edi
|
||||
inc edi
|
||||
@ -1716,17 +1716,17 @@ create_help_window:
|
||||
pushad
|
||||
cmp [help_is_open_already], 1
|
||||
jne @f
|
||||
mov ECX, [help_window_pid]
|
||||
mcall 18, 21
|
||||
xchg EAX, ECX
|
||||
mcall 18, 3
|
||||
mov ecx, [help_window_pid]
|
||||
mcall SF_SYSTEM, SSF_GET_THREAD_SLOT
|
||||
xchg eax, ecx
|
||||
mcall SF_SYSTEM, SSF_FOCUS_WINDOW
|
||||
popad
|
||||
ret
|
||||
;---------------------------------------------------------------------
|
||||
@@:
|
||||
mcall 51,1,.thread,(.threat_stack+16*4)
|
||||
mcall SF_CREATE_THREAD,1,.thread,(.threat_stack+16*4)
|
||||
mov [help_is_open_already], 1
|
||||
mov [help_window_pid], EAX
|
||||
mov [help_window_pid], eax
|
||||
popad
|
||||
ret
|
||||
;--------------------------------------------------------------------
|
||||
@ -1734,7 +1734,7 @@ create_help_window:
|
||||
call .window
|
||||
;--------------------------------------------------------------------
|
||||
.still:
|
||||
mcall 10
|
||||
mcall SF_WAIT_EVENT
|
||||
dec al
|
||||
jz .red
|
||||
dec al
|
||||
@ -1744,13 +1744,13 @@ create_help_window:
|
||||
jmp .still
|
||||
;--------------------------------------------------------------------
|
||||
and [help_is_open_already], 0
|
||||
mcall -1
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
.button:
|
||||
mcall 17,1
|
||||
mcall SF_GET_BUTTON
|
||||
cmp ah,1
|
||||
jne @f
|
||||
and [help_is_open_already], 0
|
||||
mcall -1
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
@@:
|
||||
cmp ah,2
|
||||
jne @f
|
||||
@ -1771,7 +1771,7 @@ create_help_window:
|
||||
jmp .red
|
||||
;--------------------------------------------------------------------
|
||||
.key:
|
||||
mcall 2
|
||||
mcall SF_GET_KEY
|
||||
jmp .still
|
||||
;--------------------------------------------------------------------
|
||||
.red:
|
||||
@ -1780,9 +1780,9 @@ create_help_window:
|
||||
;--------------------------------------------------------------------
|
||||
.window:
|
||||
pushad
|
||||
mcall 12,1
|
||||
mcall 0,50*65536+320,0x70*65536+240,0x13000000,,help_but_text
|
||||
mcall 8,<130,20>,<6,12>,2,0xaaaaaa
|
||||
mcall SF_REDRAW,SSF_BEGIN_DRAW
|
||||
mcall SF_CREATE_WINDOW,50*65536+320,0x70*65536+240,0x13000000,,help_but_text
|
||||
mcall SF_DEFINE_BUTTON,<130,20>,<6,12>,2,0xaaaaaa
|
||||
mcall ,<150,20>,,3,
|
||||
mov ebx,8*65536+15
|
||||
mov ecx,0x00DDDDDD
|
||||
@ -1794,107 +1794,63 @@ create_help_window:
|
||||
mul si
|
||||
mov edx,help_text
|
||||
add edx,eax
|
||||
mov eax,4
|
||||
mov eax,SF_DRAW_TEXT
|
||||
@@:
|
||||
add ebx,0x10
|
||||
mcall
|
||||
add edx,51
|
||||
dec edi
|
||||
jnz @b
|
||||
mcall 12,2
|
||||
mcall SF_REDRAW,SSF_END_DRAW
|
||||
popad
|
||||
ret
|
||||
;--------------------------------------------------------------------
|
||||
.threat_stack: times 16 dd 0
|
||||
;--------------------------------------------------------------------
|
||||
open_file:
|
||||
mov [func_70.func_n],5
|
||||
mov [func_70.param1],0
|
||||
mov [func_70.param2],0
|
||||
mov [func_70.param3],0
|
||||
mov [func_70.param4],bufferfinfo
|
||||
mov [func_70.Function],SSF_GET_INFO
|
||||
mov [func_70.Position],0
|
||||
mov [func_70.Flags],0
|
||||
mov [func_70.Count],0
|
||||
mov [func_70.Buffer],bufferfinfo
|
||||
mov [func_70.rezerv],0
|
||||
mov [func_70.name],file_name
|
||||
mcall 70,func_70
|
||||
mov [func_70.FileName],file_name
|
||||
mcall SF_FILE,func_70
|
||||
|
||||
test al,al ;ä ©« ©¤¥?
|
||||
jz @f
|
||||
mcall 4,400*65536+31,0x80CC0000,error_open_file_string
|
||||
mcall SF_DRAW_TEXT,400*65536+31,0x80CC0000,error_open_file_string
|
||||
jmp open_file
|
||||
;--------------------------------------------------------------------
|
||||
@@:
|
||||
; mov edx,[blocks_counter]
|
||||
; mov edi,[blocks_table]
|
||||
; @@: mov ecx,[edi] ;¢ë᢮¡®¦¤ ¥¬:
|
||||
; mcall 68,13 ;¡«®ª¨ ä ©«
|
||||
; add edi,8
|
||||
; dec edx
|
||||
; jnz @b
|
||||
; mcall 68,13,[blocks_table] ;â ¡«¨æã
|
||||
|
||||
mov eax, dword [bufferfinfo+32] ;ª®¯¨à㥬 à §¬¥à ä ©«
|
||||
mov [file_size],eax
|
||||
|
||||
; mov ebx,65536 ;64Š<34> ¡«®ª
|
||||
; xor edx,edx
|
||||
; div ebx
|
||||
; push dx ;¤«¨ ¯®á«¥¤¥£® ¡«®ª
|
||||
; test dx,dx
|
||||
; jz @f
|
||||
; inc eax
|
||||
; @@: test eax,eax
|
||||
; jnz @f
|
||||
; inc eax
|
||||
; @@: mov [blocks_counter],eax
|
||||
; sal eax,3;*8 ;à §¬¥à â ¡«¨æë á ¨¤¥ªá ¬¨ ¡«®ª®¢
|
||||
;; add eax,32 ;à¥è ¥¬ ¯à®¡«¥¬ã á 32Œ<32> ä ©« ¬¨
|
||||
|
||||
; mov ecx,eax ;¢ë¤¥«ï¥¬ ¯ ¬ïâì:
|
||||
; mcall 68,12 ;¯®¤ â ¡«¨æã
|
||||
; mov [blocks_table],eax
|
||||
; mov edi,eax
|
||||
; mov ecx,[blocks_counter]
|
||||
; @@: mov dword [edi+4],65536
|
||||
; add edi,8
|
||||
; loop @b
|
||||
; xor edx,edx
|
||||
; pop dx ;¤«¨ ¯®á«¥¤¥£® ¡«®ª
|
||||
; mov dword [edi-4],edx
|
||||
|
||||
; mov edx,[blocks_counter]
|
||||
; mov edi,[blocks_table]
|
||||
;@@: mcall 68,12,[edi+4] ;¯®¤ ¡«®ª
|
||||
; mov [edi],eax
|
||||
; add edi,8
|
||||
; dec edx
|
||||
; jnz @b
|
||||
|
||||
mcall 68,13,[file_buffer]
|
||||
mcall SF_SYS_MISC,SSF_MEM_FREE,[file_buffer]
|
||||
test eax,eax
|
||||
jnz @f
|
||||
;§¤¥áì ®è¨¡ª ¥ ®á¢®¡®¦¤¥¨¥ ¡«®ª
|
||||
@@:
|
||||
mcall 68,12,[file_size]
|
||||
mov ecx,[file_size]
|
||||
or ecx,ecx
|
||||
jnz @f
|
||||
inc ecx ;¥á«¨ à §¬¥à ä ©« 0 ¡ ©â
|
||||
@@:
|
||||
mcall SF_SYS_MISC,SSF_MEM_ALLOC
|
||||
mov [file_buffer],eax
|
||||
|
||||
;;¨¬¥¥¬ â ¡«¨æã: [ DWORD 㪠§ â¥«ì ¯¥à¢ë© í«¥¬¥â ¡«®ª : DWORD ¤«¨ ¡«®ª ]
|
||||
|
||||
; mov ecx,[blocks_counter] ;®âªàë¢ ¥¬ ä ©«
|
||||
; mov edi,[blocks_table]
|
||||
mov [func_70.func_n],0
|
||||
mov [func_70.param1],0
|
||||
mov [func_70.param2],0
|
||||
mov [func_70.Function],SSF_READ_FILE
|
||||
mov [func_70.Position],0
|
||||
mov [func_70.Flags],0
|
||||
mov [func_70.rezerv],0
|
||||
mov [func_70.name],file_name
|
||||
;@@:
|
||||
mov [func_70.FileName],file_name
|
||||
push dword [file_size];dword [edi+4]
|
||||
pop dword [func_70.param3]
|
||||
pop dword [func_70.Count]
|
||||
push dword [file_buffer];dword [edi]
|
||||
pop dword [func_70.param4]
|
||||
mcall 70,func_70
|
||||
; add edi,8
|
||||
; add dword [func_70.param1],65536
|
||||
; loop @b
|
||||
pop dword [func_70.Buffer]
|
||||
mcall SF_FILE,func_70
|
||||
|
||||
test eax,eax
|
||||
jz @f
|
||||
@ -1911,8 +1867,6 @@ open_dialog_save:
|
||||
call [OpenDialog_Start]
|
||||
|
||||
; cmp [OpenDialog_data.status],2 ; OpenDialog does not start
|
||||
;; je .sysxtree ; some kind of alternative, instead OpenDialog
|
||||
; je save_file
|
||||
cmp [OpenDialog_data.status],1
|
||||
jne still
|
||||
mov esi,fname_buf
|
||||
@ -1932,28 +1886,28 @@ open_dialog_save:
|
||||
; jmp save_file
|
||||
;-------------------------------------------------------------------------------
|
||||
save_file: ;á®åà 塞 ä ©«
|
||||
mov [func_70.func_n],2
|
||||
mov [func_70.param1],0
|
||||
mov [func_70.param2],0
|
||||
mov [func_70.Function],SSF_CREATE_FILE
|
||||
mov [func_70.Position],0
|
||||
mov [func_70.Flags],0
|
||||
push [file_size]
|
||||
pop [func_70.param3]
|
||||
pop [func_70.Count]
|
||||
push [file_buffer]
|
||||
pop [func_70.param4]
|
||||
pop [func_70.Buffer]
|
||||
mov [func_70.rezerv],0
|
||||
mov [func_70.name],file_name
|
||||
mcall 70,func_70
|
||||
mov [func_70.FileName],file_name
|
||||
mcall SF_FILE,func_70
|
||||
cmp al,0 ;á®åà ñ 㤠ç®?
|
||||
je redraw_all
|
||||
mcall 4,400*65536+31,0x80CC0000,error_save_file_string
|
||||
mcall SF_DRAW_TEXT,400*65536+31,0x80CC0000,error_save_file_string
|
||||
jmp save_file
|
||||
;-------------------------------------------------------------------------------
|
||||
draw_ed_box: ;à¨á®¢ ¨¥ edit box'
|
||||
.1:
|
||||
push eax ebx ecx edx
|
||||
mcall 13,180*65536+220,25*65536+70,0xaaaaaa
|
||||
mcall SF_DRAW_RECT,180*65536+220,25*65536+70,0xaaaaaa
|
||||
bt [flags],9
|
||||
jnc @f
|
||||
mcall 4,246*65536+35,0x80ffffff,sel_text
|
||||
mcall SF_DRAW_TEXT,246*65536+35,0x80ffffff,sel_text
|
||||
@@:
|
||||
bt [flags],2
|
||||
jnc @f
|
||||
@ -1974,7 +1928,7 @@ draw_ed_box: ;
|
||||
loop @b
|
||||
pop edx ecx ebx eax
|
||||
.2:
|
||||
mcall 10
|
||||
mcall SF_WAIT_EVENT
|
||||
cmp al,6
|
||||
je .mouse
|
||||
cmp al,3
|
||||
@ -2018,7 +1972,7 @@ draw_ed_box: ;
|
||||
jmp .2
|
||||
;--------------------------------------------------------------------
|
||||
.keys:
|
||||
mcall 2
|
||||
mcall SF_GET_KEY
|
||||
cmp ah,13
|
||||
je .4
|
||||
cmp ah,27
|
||||
@ -2184,7 +2138,7 @@ draw_ed_box: ;
|
||||
jmp .2
|
||||
;--------------------------------------------------------------------
|
||||
.button:
|
||||
mcall 17
|
||||
mcall SF_GET_BUTTON
|
||||
cmp ah,1
|
||||
jne .2
|
||||
jmp close_prog
|
||||
@ -2194,7 +2148,7 @@ draw_ed_box: ;
|
||||
add esp,4
|
||||
jmp redraw_all
|
||||
.4:
|
||||
mcall 13,180*65536+220,25*65536+70,frgrd_color
|
||||
mcall SF_DRAW_RECT,180*65536+220,25*65536+70,frgrd_color
|
||||
ret
|
||||
;--------------------------------------------------------------------
|
||||
strtohex:
|
||||
@ -2756,7 +2710,7 @@ copy_to_buf:
|
||||
inc eax
|
||||
mov ecx,eax
|
||||
mov [copy_len],eax
|
||||
mcall 68,20,,[copy_buf]
|
||||
mcall SF_SYS_MISC,SSF_MEM_REALLOC,,[copy_buf]
|
||||
mov esi,[shblock_beg]
|
||||
mov edi,[copy_buf]
|
||||
add esi,[file_buffer]
|
||||
@ -2915,7 +2869,6 @@ open_dialog:
|
||||
call [OpenDialog_Start]
|
||||
|
||||
; cmp [OpenDialog_data.status],2 ; OpenDialog does not start
|
||||
; je .sysxtree ; some kind of alternative, instead OpenDialog
|
||||
cmp [OpenDialog_data.status],1
|
||||
jne still
|
||||
.start:
|
||||
|
||||
@ -10,6 +10,7 @@ include '../../proc32.inc'
|
||||
include '../../KOSfuncs.inc'
|
||||
include '../../develop/libraries/libs-dev/libimg/libimg.inc'
|
||||
include '../../load_img.inc'
|
||||
include '../../load_lib.mac'
|
||||
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
|
||||
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
|
||||
include 'lang.inc'
|
||||
@ -18,7 +19,7 @@ include 'info_menu.inc'
|
||||
include 'data.inc'
|
||||
include 'convert_stl_3ds.inc'
|
||||
|
||||
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
||||
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
||||
|
||||
ID_ICON_CHUNK_MAIN equ 0 ;¨ª®ª £« ¢®£® ¡«®ª
|
||||
ID_ICON_CHUNK_NOT_FOUND equ 1 ;¨ª®ª ¥ ¨§¢¥á⮣® ¡«®ª
|
||||
@ -1074,58 +1075,15 @@ lib_name_5 db 'tinygl.obj',0
|
||||
system_dir_6 db '/sys/lib/'
|
||||
lib_name_6 db 'libini.obj',0
|
||||
|
||||
if lang eq ru
|
||||
head_f_i:
|
||||
head_f_l db '"‘¨á⥬ ï ®è¨¡ª ',0
|
||||
err_msg_found_lib_0 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'proc_lib.obj',39,'" -tE',0
|
||||
err_msg_import_0 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,'" -tW',0
|
||||
err_msg_found_lib_1 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'libimg.obj',39,'" -tE',0
|
||||
err_msg_import_1 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,'" -tW',0
|
||||
err_msg_found_lib_2 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'box_lib.obj',39,'" -tE',0
|
||||
err_msg_import_2 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib',39,'" -tW',0
|
||||
err_msg_found_lib_3 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'buf2d.obj',39,'" -tE',0
|
||||
err_msg_import_3 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,'" -tW',0
|
||||
err_msg_found_lib_4 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'kmenu.obj',39,'" -tE',0
|
||||
err_msg_import_4 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'kmenu',39,'" -tW',0
|
||||
err_msg_found_lib_5 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'tinygl.obj',39,'" -tE',0
|
||||
err_msg_import_5 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'tinygl',39,'" -tW',0
|
||||
err_msg_found_lib_6 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'libini.obj',39,'" -tE',0
|
||||
err_msg_import_6 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libini',39,'" -tW',0
|
||||
else
|
||||
head_f_i:
|
||||
head_f_l db '"System error',0
|
||||
err_msg_found_lib_0 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,'" -tE',0
|
||||
err_msg_import_0 db 'Error on load import library ',39,'proc_lib.obj',39,'" -tW',0
|
||||
err_msg_found_lib_1 db 'Sorry I cannot found library ',39,'libimg.obj',39,'" -tE',0
|
||||
err_msg_import_1 db 'Error on load import library ',39,'libimg.obj',39,'" -tW',0
|
||||
err_msg_found_lib_2 db 'Sorry I cannot found library ',39,'box_lib.obj',39,'" -tE',0
|
||||
err_msg_import_2 db 'Error on load import library ',39,'box_lib.obj',39,'" -tW',0
|
||||
err_msg_found_lib_3 db 'Sorry I cannot found library ',39,'buf2d.obj',39,'" -tE',0
|
||||
err_msg_import_3 db 'Error on load import library ',39,'buf2d.obj',39,'" -tW',0
|
||||
err_msg_found_lib_4 db 'Sorry I cannot found library ',39,'kmenu.obj',39,'" -tE',0
|
||||
err_msg_import_4 db 'Error on load import library ',39,'kmenu.obj',39,'" -tW',0
|
||||
err_msg_found_lib_5 db 'Sorry I cannot found library ',39,'tinygl.obj',39,'" -tE',0
|
||||
err_msg_import_5 db 'Error on load import library ',39,'tinygl',39,'" -tW',0
|
||||
err_msg_found_lib_6 db 'Sorry I cannot found library ',39,'libini.obj',39,'" -tE',0
|
||||
err_msg_import_6 db 'Error on load import library ',39,'libini',39,'" -tW',0
|
||||
end if
|
||||
|
||||
align 4
|
||||
l_libs_start:
|
||||
lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
|
||||
err_msg_found_lib_0, head_f_l, proclib_import,err_msg_import_0,head_f_i
|
||||
lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
|
||||
err_msg_found_lib_1, head_f_l, import_libimg, err_msg_import_1,head_f_i
|
||||
lib_2 l_libs lib_name_2, sys_path, file_name, system_dir_2,\
|
||||
err_msg_found_lib_2, head_f_l, import_box_lib,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_buf2d, 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
|
||||
lib_5 l_libs lib_name_5, sys_path, file_name, system_dir_5,\
|
||||
err_msg_found_lib_5, head_f_l, import_lib_tinygl,err_msg_import_5,head_f_i
|
||||
lib_6 l_libs lib_name_6, sys_path, file_name, system_dir_6,\
|
||||
err_msg_found_lib_6, head_f_l, import_libini, err_msg_import_6,head_f_i
|
||||
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_proclib
|
||||
lib_1 l_libs lib_name_1, file_name, system_dir_1, import_libimg
|
||||
lib_2 l_libs lib_name_2, file_name, system_dir_2, import_box_lib
|
||||
lib_3 l_libs lib_name_3, file_name, system_dir_3, import_buf2d
|
||||
lib_4 l_libs lib_name_4, file_name, system_dir_4, import_libkmenu
|
||||
lib_5 l_libs lib_name_5, file_name, system_dir_5, import_lib_tinygl
|
||||
lib_6 l_libs lib_name_6, file_name, system_dir_6, import_libini
|
||||
l_libs_end:
|
||||
|
||||
align 4
|
||||
@ -1176,7 +1134,7 @@ import_libimg:
|
||||
aimg_draw db 'img_draw',0
|
||||
|
||||
align 4
|
||||
proclib_import:
|
||||
import_proclib:
|
||||
OpenDialog_Init dd aOpenDialog_Init
|
||||
OpenDialog_Start dd aOpenDialog_Start
|
||||
OpenDialog_Set_file_name dd aOpenDialog_Set_file_name
|
||||
|
||||
@ -23,7 +23,7 @@ include 'convert_stl_3ds.inc'
|
||||
3d_wnd_w equ 344
|
||||
3d_wnd_h equ 312
|
||||
|
||||
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
||||
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
||||
|
||||
ID_ICON_CHUNK_MAIN equ 0 ;¨ª®ª £« ¢®£® ¡«®ª
|
||||
ID_ICON_CHUNK_NOT_FOUND equ 1 ;¨ª®ª ¥ ¨§¢¥á⮣® ¡«®ª
|
||||
|
||||
@ -15,6 +15,7 @@ include '../../proc32.inc'
|
||||
include '../../macros.inc'
|
||||
include '../../KOSfuncs.inc'
|
||||
include '../../load_img.inc'
|
||||
include '../../load_lib.mac'
|
||||
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
|
||||
include '../../system/skincfg/trunk/kglobals.inc'
|
||||
include '../../system/skincfg/trunk/unpacker.inc'
|
||||
@ -27,7 +28,7 @@ include 'strlen.inc'
|
||||
include 't_draw.inc' ;draw main window functions
|
||||
include 'wnd_k_words.inc'
|
||||
|
||||
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
||||
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
||||
|
||||
align 4
|
||||
icon_tl_sys dd 0 ;㪠§ â¥«ì ¯ ¬ïâì ¤«ï åà ¥¨ï á¨á⥬ëå ¨ª®®ª
|
||||
@ -371,52 +372,14 @@ edit_goto edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0
|
||||
|
||||
unpac_mem dd 0
|
||||
|
||||
if lang eq ru
|
||||
head_f_i:
|
||||
head_f_l db '"‘¨á⥬ ï ®è¨¡ª ',0
|
||||
err_message_found_lib0 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'box_lib.obj',39,'" -tE',0
|
||||
err_message_import0 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib.obj',39,'" -tW',0
|
||||
err_message_found_lib1 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'msgbox.obj',39,'" -tE',0
|
||||
err_message_import1 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'msgbox.obj',39,'" -tW',0
|
||||
err_message_found_lib2 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'proc_lib.obj',39,'" -tE',0
|
||||
err_message_import2 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,'" -tW',0
|
||||
err_message_found_lib_3 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'libimg.obj',39,'" -tE',0
|
||||
err_message_import_3 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,'" -tW',0
|
||||
err_message_found_lib_4 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'libini.obj',39,'" -tE',0
|
||||
err_message_import_4 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libini.obj',39,'" -tW',0
|
||||
err_message_found_lib_5 db '<27>¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'libkmenu.obj',39,'" -tE',0
|
||||
err_message_import_5 db 'Žè¨¡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libkmenu.obj',39,'" -tW',0
|
||||
else
|
||||
head_f_i:
|
||||
head_f_l db '"System error',0
|
||||
err_message_found_lib0 db 'Sorry I cannot found library ',39,'box_lib.obj',39,'" -tE',0
|
||||
err_message_import0 db 'Error on load import library ',39,'box_lib.obj',39,'" -tW',0
|
||||
err_message_found_lib1 db 'Sorry I cannot found library ',39,'msgbox.obj',39,'" -tE',0
|
||||
err_message_import1 db 'Error on load import library ',39,'msgbox.obj',39,'" -tW',0
|
||||
err_message_found_lib2 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,'" -tE',0
|
||||
err_message_import2 db 'Error on load import library ',39,'proc_lib.obj',39,'" -tW',0
|
||||
err_message_found_lib_3 db 'Sorry I cannot found library ',39,'libimg.obj',39,'" -tE',0
|
||||
err_message_import_3 db 'Error on load import library ',39,'libimg.obj',39,'" -tW',0
|
||||
err_message_found_lib_4 db 'Sorry I cannot found library ',39,'libini.obj',39,'" -tE',0
|
||||
err_message_import_4 db 'Error on load import library ',39,'libini.obj',39,'" -tW',0
|
||||
err_message_found_lib_5 db 'Sorry I cannot found library ',39,'libkmenu.obj',39,'" -tE',0
|
||||
err_message_import_5 db 'Error on load import library ',39,'libkmenu.obj',39,'" -tW',0
|
||||
end if
|
||||
|
||||
;library structures
|
||||
l_libs_start:
|
||||
lib0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
|
||||
err_message_found_lib0, head_f_l, import_box_lib,err_message_import0, head_f_i
|
||||
lib1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
|
||||
err_message_found_lib1, head_f_l, import_msgbox_lib, err_message_import1, head_f_i
|
||||
lib2 l_libs lib_name_2, sys_path, file_name, system_dir_2,\
|
||||
err_message_found_lib2, head_f_l, import_proclib, err_message_import2, head_f_i
|
||||
lib3 l_libs lib_name_3, sys_path, file_name, system_dir_3,\
|
||||
err_message_found_lib_3, head_f_l, import_libimg, err_message_import_3, head_f_i
|
||||
lib4 l_libs lib_name_4, sys_path, file_name, system_dir_4,\
|
||||
err_message_found_lib_4, head_f_l, import_libini, err_message_import_4, head_f_i
|
||||
lib5 l_libs lib_name_5, sys_path, file_name, system_dir_5,\
|
||||
err_message_found_lib_5, head_f_l, import_libkmenu, err_message_import_5, head_f_i
|
||||
lib0 l_libs lib_name_0, file_name, system_dir_0, import_box_lib
|
||||
lib1 l_libs lib_name_1, file_name, system_dir_1, import_msgbox_lib
|
||||
lib2 l_libs lib_name_2, file_name, system_dir_2, import_proclib
|
||||
lib3 l_libs lib_name_3, file_name, system_dir_3, import_libimg
|
||||
lib4 l_libs lib_name_4, file_name, system_dir_4, import_libini
|
||||
lib5 l_libs lib_name_5, file_name, system_dir_5, import_libkmenu
|
||||
load_lib_end:
|
||||
|
||||
IncludeIGlobals
|
||||
|
||||
Loading…
Reference in New Issue
Block a user