Subversion Repositories Kolibri OS

Rev

Rev 6113 | Rev 6164 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6113 Rev 6129
Line 26... Line 26...
26
ends
26
ends
Line 27... Line 27...
27
 
27
 
28
image_data dd 0 ;указатель на временную память, нужен для преобразования изображения
28
image_data dd 0 ;указатель на временную память, нужен для преобразования изображения
29
image_data_toolbar dd 0
29
image_data_toolbar dd 0
30
IMAGE_FILE1_SIZE equ 128*144*3+54 ;размер файла с изображением
30
IMAGE_FILE1_SIZE equ 128*144*3+54 ;размер файла с изображением
31
IMAGE_TOOLBAR_ICON_SIZE equ 256*3
31
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3
Line 32... Line 32...
32
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*3+54
32
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*3+54
33
 
33
 
34
macro load_image_file path,buf,size { ;макрос для загрузки изображений
34
macro load_image_file path,buf,size { ;макрос для загрузки изображений
Line 148... Line 148...
148
	pushad
148
	pushad
149
	mcall SF_REDRAW,SSF_BEGIN_DRAW
149
	mcall SF_REDRAW,SSF_BEGIN_DRAW
150
	mcall SF_CREATE_WINDOW,(50 shl 16)+420,(30 shl 16)+410,0x33ffffff,,caption
150
	mcall SF_CREATE_WINDOW,(50 shl 16)+420,(30 shl 16)+410,0x33ffffff,,caption
Line 151... Line 151...
151
 
151
 
152
	mov esi,[sc.work_button]
152
	mov esi,[sc.work_button]
153
	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3 ;сферы
153
	mcall SF_DEFINE_BUTTON,(6 shl 16)+19,(6 shl 16)+19,3+0x40000000 ;сферы
Line 154... Line 154...
154
	mcall ,(30 shl 16)+20,,4 ;куб
154
	mcall ,(36 shl 16)+19,,4+0x40000000 ;куб
155
 
155
 
156
	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16,(7 shl 16)+7 ;сферы
156
	mcall SF_PUT_IMAGE,[image_data_toolbar],(21 shl 16)+21,(5 shl 16)+5 ;сферы
Line 157... Line 157...
157
	add ebx,2*IMAGE_TOOLBAR_ICON_SIZE
157
	add ebx,2*IMAGE_TOOLBAR_ICON_SIZE
158
	mcall ,,,(32 shl 16)+7 ;куб
158
	mcall ,,,(35 shl 16)+5 ;куб
159
 
159
 
160
	stdcall [kosglSwapBuffers]
160
	stdcall [kosglSwapBuffers]