forked from KolibriOS/kolibrios
191 lines
3.5 KiB
NASM
191 lines
3.5 KiB
NASM
;Hello world example
|
|
|
|
use32
|
|
db 'MENUET01'
|
|
dd 1
|
|
dd start
|
|
dd i_end
|
|
dd 0x1000
|
|
dd 0x1000
|
|
dd 0
|
|
dd 0
|
|
|
|
TRUE = 1
|
|
FALSE = 0
|
|
|
|
include 'libGUI.inc'
|
|
|
|
start:
|
|
;load libGUI labrari
|
|
push NULL ;use default system path to library
|
|
call LoadLibGUI
|
|
;create main window
|
|
CreateWindow
|
|
mov [window],eax
|
|
;change size of main window
|
|
SetWindowSizeRequest [window],320,57
|
|
;set callback function for button close window
|
|
SetCallbackFunction [window],DELETE_EVENT,callback_func_delete_window,NULL
|
|
|
|
;create control Text
|
|
mov [pbdata.x],5
|
|
mov [pbdata.y],5
|
|
mov [pbdata.wight],300;use default system libGUI font
|
|
mov [pbdata.height],25;use background for text
|
|
mov [pbdata.progress],dword 0.0
|
|
CreateProgressBar pbdata
|
|
mov [progress_bar],eax
|
|
|
|
;create timer for update progress level each 50 milliseconds
|
|
SetTimerCallbackForFunction [window],5,progress_bar_callback,[progress_bar]
|
|
|
|
;pack control Text in window
|
|
PackControls [window],[progress_bar]
|
|
|
|
;redraw progress bar automatically each 50 milleseconds
|
|
SetProgressBarPulse [progress_bar],5
|
|
|
|
;start libGUI main loop
|
|
LibGUImain [window]
|
|
|
|
|
|
;void progress_bar_callback(void *data)
|
|
progress_bar_callback:
|
|
|
|
mov eax,[esp+4];pointer to control progress bar
|
|
|
|
mov ecx,[eax+HEADER_SIZE];progress
|
|
mov [progress],ecx
|
|
mov [increment],dword 0.01
|
|
mov [digit],100
|
|
|
|
fld dword[increment]
|
|
fld dword[progress]
|
|
fadd st0,st1
|
|
fst dword [progress]
|
|
fild dword[digit]
|
|
fmul st0,st1
|
|
fistp dword[digit]
|
|
fstp st0 ;free progress
|
|
fstp st0 ;free increment
|
|
|
|
cmp [progress],dword 1.0
|
|
jl no_max_progress
|
|
mov [progress],dword 0.0
|
|
no_max_progress:
|
|
|
|
mov ecx,[progress]
|
|
mov [eax+HEADER_SIZE],ecx ;save new value of progress
|
|
|
|
;print progressvalue in string
|
|
push ebx ;save befor use
|
|
|
|
mov eax,txt
|
|
add eax,9
|
|
mov ebx,eax ;save eax
|
|
|
|
push eax
|
|
push [digit]
|
|
call dec_to_str
|
|
|
|
add ebx,eax
|
|
mov [ebx],byte '%'
|
|
mov [ebx+1],byte 0
|
|
|
|
pop ebx
|
|
|
|
;set text for progress bar
|
|
ProgressBarSetText [progress_bar],txt
|
|
|
|
ret
|
|
|
|
;void callback_func_delete_window(header_t *control,void *data)
|
|
callback_func_delete_window:
|
|
|
|
mov eax,[esp+4] ;control
|
|
|
|
QuitLibGUI eax
|
|
|
|
ret
|
|
|
|
;int dectostr(int digit,char *str)
|
|
dec_to_str:
|
|
mov eax,[esp+4];digit
|
|
mov ecx,[esp+8];string
|
|
|
|
push ebx esi edi ;save befor use
|
|
|
|
cmp eax,10
|
|
jl print_digit
|
|
|
|
mov ebx,eax ;save digit
|
|
mov edi,1
|
|
mov esi,10
|
|
next_i_div:
|
|
cdq ;extend to edx:eax
|
|
idiv esi ;eax=eax/esi
|
|
test eax,eax
|
|
jz no_mul_ten
|
|
imul edi,esi ;edi=edi*10
|
|
no_mul_ten:
|
|
mov eax,edx ;eax=eax % 10
|
|
cmp eax,esi
|
|
jae next_i_div
|
|
|
|
test eax,eax
|
|
jnz no_multyple_10
|
|
;print digit in string
|
|
mov [ecx],byte '1'
|
|
inc ecx
|
|
mov eax,ebx ;eax=digit
|
|
next_i_str_:
|
|
cdq ;extend to edx:eax
|
|
idiv edi ;eax=eax/edi
|
|
|
|
mov [ecx],byte '0'
|
|
|
|
inc ecx
|
|
mov eax,edx ;eax=eax % edi
|
|
cmp eax,10
|
|
jae next_i_str_
|
|
dec ecx
|
|
jmp exit_multyple
|
|
no_multyple_10:
|
|
;print digit in string
|
|
mov eax,ebx ;eax=digit
|
|
next_i_str:
|
|
cdq ;extend to edx:eax
|
|
idiv edi ;eax=eax/edi
|
|
|
|
add al,byte '0' ;al='0'+digit
|
|
mov [ecx],byte al
|
|
|
|
inc ecx
|
|
mov eax,edx ;eax=eax % edi
|
|
cmp eax,10
|
|
jae next_i_str
|
|
print_digit:
|
|
|
|
add al,byte '0'
|
|
mov [ecx],byte al
|
|
|
|
exit_multyple:
|
|
mov eax,ecx
|
|
|
|
pop edi esi ebx
|
|
|
|
sub eax,[esp+8] ;number of printed simbols
|
|
inc eax
|
|
|
|
ret 8
|
|
|
|
align 4
|
|
;----------------data-----------------
|
|
txt db 'PROGRESS ',0,0,0,0,0,0
|
|
pbdata gui_progress_bar_data_t
|
|
window rd 1
|
|
progress_bar rd 1
|
|
progress rd 1
|
|
increment rd 1
|
|
digit rd 1
|
|
i_end: |