Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 6364 → Rev 6365

/programs/media/animage/trunk/panel_engen.inc
1,66 → 1,4
;---------------------------------------------------------
;-----draw panel menu(main engin of panel)----------------
;---------------------------------------------------------
print_panel_menu:
;delit main buttons(some time)
mov [counter],10
 
next_icon_delit1:
mov edx,[counter]
add edx,11100000000000000000000000000000b
mcall SF_DEFINE_BUTTON
inc [counter]
cmp [counter],30
jl next_icon_delit1
 
;delit buttons of brushes
mov [counter],40
 
next_icon_delit2:
mov edx,[counter]
add edx,11100000000000000000000000000000b
mcall SF_DEFINE_BUTTON
inc [counter]
cmp [counter],45
jl next_icon_delit2
 
;delit buttons of zoom
mov [counter],45
 
next_icon_delit3:
mov edx,[counter]
add edx,11100000000000000000000000000000b
mcall SF_DEFINE_BUTTON
inc [counter]
cmp [counter],50
jl next_icon_delit3
 
;delit buttons of palette
mov edx,51
add edx,11100000000000000000000000000000b
mcall SF_DEFINE_BUTTON
 
;delit buttons of color
mov edx,52
add edx,11100000000000000000000000000000b
mcall SF_DEFINE_BUTTON
 
call GetMouseCoordinats
 
and [menu_counter],0
and [counter_11],0
 
mcall SF_SLEEP,15
 
pusha
call drawwin
popa
 
mov [number_panel],0
 
jmp TakeInstruments
 
;---------------------------------------------------------
;------print mouse position on panel----------------------
;---------------------------------------------------------
PrintMousePos: