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

ICON rewritten to 70 function (by SPraid).

Browse Source 
git-svn-id: svn://kolibrios.org@408 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Andrey Halyavin (halyavin) 2007-03-09 15:03:10 +00:00
parent a8971e7f3a
commit 40f80f0302
1 changed files with 14 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
programs/system/icon/trunk/icon.asm
View File

@ -6,6 +6,7 @@
;* *
;********************************
; 22.02.05 was modified for work with new multi-thread ICON.
; 8.03.07 ïåðåõîä íà 70 ôóíêöèþ by SPraid
;******************************************************************************
RAW_SIZE equ 350000
ICON_SIZE equ 32*32*3
@ -32,7 +33,7 @@ include 'gif_lite.inc'
purge newline
;******************************************************************************
START: ; start of execution
mcall 58,finfo
mcall 70,finfo
cmp ebx,GIF_SIZE
ja close
mov esi,gif_file
@ -139,14 +140,14 @@ still:
; (1) save list
mov ebx,finfo
mov dword[ebx],1
mov ebx,finfo ; Change by spraid
mov dword[ebx],2
mov edx,REC_SIZE
imul edx,dword [icons]
mov [ebx+8],edx
mov [ebx+12],edx
mov esi,iconlst
call lst_path
mcall 58
int 0x40
; (2) terminate all icons
mov eax,9
@ -191,16 +192,19 @@ finfo_start:
db 0
dd finfo.path
finfo:
dd 0
dd 0
dd GIF_SIZE/512
dd 0
dd GIF_SIZE
dd gif_file
dd icon_data
.path:
db ICON_STRIP,0
rb 31-($-.path)
all_terminated:
apply_changes:
@ -474,12 +478,11 @@ lst_path:
load_ic:
mov ebx,finfo
mov dword[ebx+8],(48*REC_SIZE)shr 9+1
mov dword[ebx+12],icon_data
mov dword[ebx+16],gif_file
mov dword[ebx+12],48*REC_SIZE
mov dword[ebx+16],icon_data
mov esi,iconlst
call lst_path
mcall 58
mcall 70
lea eax,[ebx+10]
xor edx,edx
mov ebx,REC_SIZE