ace-dent/kolibrios-gitea
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

Kpack v 0.20

Browse Source 
Added code for packing the kernel.mnt

git-svn-id: svn://kolibrios.org@1713 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Marat Zakiyanov (Mario79)
2010-12-07 14:51:06 +00:00
parent 843504d669
commit f19e882566
9 changed files with 928 additions and 85 deletions
Download Patch File Download Diff File Expand all files Collapse all files

46
programs/other/kpack/trunk/kpack.asm
View File

@@ -1,5 +1,10 @@
; kpack = Kolibri Packer
;---------------------------------------------------------------------
; version: 0.20
; last update: 07/12/2010
; changed by: Marat Zakiyanov aka Mario79, aka Mario
; changes: Added code for packing the kernel.mnt
;---------------------------------------------------------------------
; version: 0.15
; last update: 06/11/2010
; changed by: Marat Zakiyanov aka Mario79, aka Mario
@@ -142,8 +147,29 @@ still:
push dword edit3
call [edit_box_mouse]
push dword check1
call [check_box_mouse]
jmp still
;*********************************************************************
tell_compress_mess:
push compressing_len
pop ecx
mov esi,compressing_str
call write_string
ret
;*********************************************************************
clear_mess_and_displogo:
call refresh_editbox_data
; clear messages
call clear_messages
; display logo
mov esi,info_str
push info_len
pop ecx
call write_string
ret
;*********************************************************************
clear_messages:
xor eax,eax
mov ecx,80*20/4+1
@@ -169,16 +195,24 @@ button:
dec eax
jnz nopack
mov eax,[check1+32]
test eax,10b
jnz @f
call pack
jmp still
;---------------------------------------------------------------------
@@:
call kerpack
jmp still
;---------------------------------------------------------------------
nopack:
dec eax
jnz nounpack
call unpack
jmp still
;---------------------------------------------------------------------
;---------------------------------------------------------------------
but7:
call clear_messages
; display logo
@@ -416,10 +450,15 @@ draw_window:
draw_editbox:
push dword edit1
call [edit_box_draw]
push dword edit2
call [edit_box_draw]
push dword edit3
call [edit_box_draw]
push dword check1
call [check_box_draw]
ret
;*********************************************************************
set_editbox_position:
@@ -508,6 +547,9 @@ include 'lzma_set_dict_size.inc'
;lzma_decompress:
include 'lzma_decompress.inc'
;---------------------------------------------------------------------
;kerpack code:
include 'kerpack.inc'
;---------------------------------------------------------------------
;initialized variables and constants
include 'const_var.inc'
;---------------------------------------------------------------------