Subversion Repositories Kolibri OS

Rev

Rev 1636 | Rev 3951 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
255 heavyiron 1 
;-----------------------------------------------------------
2 
;-----------instruments of menu-----------------------------
3 
;-----------------------------------------------------------
4 
TakeInstruments:
1643 mario79 5 
;|||||||||||||||||||FILE||||||||||||||||||||||
6 
	cmp	[number_panel],7
7 
	jne	no_file
255 heavyiron 8 
 
1643 mario79 9 
;<<<<>>>>>>
10 
	cmp	[number_menu],1
11 
	jne	no_new
255 heavyiron 12 
 
1643 mario79 13 
	mov	eax,80
14 
	mov	ebx,100
15 
	mov	ecx,150
16 
	mov	edx,90
17 
	mov	 esi,1
18 
	call	draw_volume_rectangle
255 heavyiron 19 
 
1643 mario79 20 
	mov	eax,177
21 
	mov	ebx,115
22 
	mov	ecx,40
23 
	mov	edx,14
24 
	mov	 esi,4
25 
	call	draw_volume_rectangle
255 heavyiron 26 
 
1643 mario79 27 
	mov	eax,177
28 
	mov	ebx,115+24
29 
	mov	ecx,40
30 
	mov	edx,14
31 
	mov	 esi,4
32 
	call	draw_volume_rectangle
255 heavyiron 33 
 
1643 mario79 34 
	mov	eax,175
35 
	mov	ebx,170
36 
	mov	ecx,40
37 
	mov	edx,15
38 
	mov	esi,1
39 
	call	draw_volume_rectangle
255 heavyiron 40 
 
1643 mario79 41 
	mov	eax,90
42 
	mov	ebx,118
43 
	mov	ecx,0xffffff
44 
	mov	edx,new_text1
45 
	mov	esi,14
46 
	call	print_text
255 heavyiron 47 
 
1643 mario79 48 
	mov	eax,90
49 
	mov	ebx,118+24
50 
	mov	ecx,0xffffff
51 
	mov	edx,new_text2
52 
	mov	esi,14
53 
	call	print_text
255 heavyiron 54 
 
1643 mario79 55 
	mov	eax,185
56 
	mov	ebx,175
57 
	mov	ecx,0xffffff
58 
	mov	edx,ok_text
59 
	mov	esi,2
60 
	call	print_text
255 heavyiron 61 
 
1643 mario79 62 
	mov	edx,1000000000000000000000000000000b+1000
63 
	mcall	8,<177,40>,<115,14>,
255 heavyiron 64 
 
1643 mario79 65 
	mov	edx,1000000000000000000000000000000b+1001
66 
	mcall	,,<139,14>,
255 heavyiron 67 
 
1643 mario79 68 
	mov	edx,1000000000000000000000000000000b+1002
69 
	mcall	,<175,40>,<170,15>
255 heavyiron 70 
 
1643 mario79 71 
no_activate_space:
72 
	mcall	10
255 heavyiron 73 
 
1643 mario79 74 
	cmp	eax,1
75 
	je	exit_new
255 heavyiron 76 
 
1643 mario79 77 
	cmp	eax,3
78 
	jne	no_activate_space
255 heavyiron 79 
 
1643 mario79 80 
	mcall	17
81 
	shr	eax,8
255 heavyiron 82 
 
1643 mario79 83 
	cmp	eax,1000
84 
	jl	no_activate_space
255 heavyiron 85 
 
1643 mario79 86 
	cmp	eax,1000
87 
	jne	no_picture_size_x
255 heavyiron 88 
 
1643 mario79 89 
	mov	eax,180
90 
	mov	ebx,119
91 
	mov	ecx,5
92 
	call	dialog_line
255 heavyiron 93 
 
1643 mario79 94 
	mov	eax,string_
95 
	mov	ebx,13
96 
	call	find_symvol
255 heavyiron 97 
 
1643 mario79 98 
	dec	eax
99 
	mov	[length_number],eax
100 
	mov	eax,string_
101 
	call	value
255 heavyiron 102 
 
1643 mario79 103 
	mov	[Picture_SizeX],eax
104 
	jmp	no_activate_space
105 
;---------------------------------------------------------------------
106 
no_picture_size_x:
107 
	cmp	eax,1001
108 
	jne	no_picture_size_y
255 heavyiron 109 
 
1643 mario79 110 
	mov	eax,180
111 
	mov	ebx,119+24
112 
	mov	ecx,5
113 
	call	dialog_line
255 heavyiron 114 
 
1643 mario79 115 
	mov	eax,string_
116 
	mov	ebx,13
117 
	call	find_symvol
255 heavyiron 118 
 
1643 mario79 119 
	dec	eax
120 
	mov	[length_number],eax
121 
	mov	eax,string_
122 
	call	value
255 heavyiron 123 
 
1643 mario79 124 
	mov	[Picture_SizeY],eax
125 
	jmp	no_activate_space
126 
;---------------------------------------------------------------------
127 
no_picture_size_y:
128 
	cmp	eax,1002
129 
	jne	no_activate_space
255 heavyiron 130 
 
1643 mario79 131 
exit_new:
132 
	mov	edx,11100000000000000000000000000000b+1002
133 
	mcall	8,<175,40>,<170,15>
255 heavyiron 134 
 
1643 mario79 135 
	mov	edx,11100000000000000000000000000000b+1001
136 
	mcall	,<177,40>,<139,14>
255 heavyiron 137 
 
1643 mario79 138 
	mov	edx,11100000000000000000000000000000b+1000
139 
	mcall	,,<115,14>
255 heavyiron 140 
 
1643 mario79 141 
;get memory for new picture
142 
	call	GetMemory
255 heavyiron 143 
 
1643 mario79 144 
	and	[save_flag],0
145 
	and	[number_panel],0
146 
	and	[number_menu],0
255 heavyiron 147 
 
1643 mario79 148 
	call	cleare_work_arrea
149 
	call	drawwin
150 
	jmp	still
151 
;---------------------------------------------------------------------
152 
no_new:
153 
;<<<<>>>>>>
154 
	cmp	[number_menu],2
155 
	jne	no_open
255 heavyiron 156 
 
1643 mario79 157 
;	opendialog drawwin,open_1,open_2,file_path
1632 mario79 158 
;---------------------------------------------------------------------
159 
	mov	[OpenDialog_data.type],0 ; open
160 
 
161 
	push    dword OpenDialog_data
162 
	call    [OpenDialog_Start]
163 
 
164 
	cmp	[OpenDialog_data.status],1
165 
	jne	still
166 
;---------------------------------------------------------------------
1643 mario79 167 
open_1:
168 
	mcall	40,100111b
1632 mario79 169 
 
1643 mario79 170 
	mov	eax,file_path
171 
	mov	ebx,[ScreenPointer]
172 
	add	ebx,0x10000
255 heavyiron 173 
 
1643 mario79 174 
	call	load_heading_of_file
255 heavyiron 175 
 
1643 mario79 176 
	mov	esi,[ScreenPointer]
177 
	add	esi,0x10000
178 
;-------------is this BMP file ?----------------
179 
	xor	eax,eax
180 
	mov	ax,[esi]
181 
	mov	[type],ax
255 heavyiron 182 
 
1643 mario79 183 
	cmp	[type],word 'BM'
184 
	jne	no_bmp_file
255 heavyiron 185 
 
1643 mario79 186 
	xor	eax,eax
187 
	xor	ebx,ebx
188 
	mov	eax,[esi+18]
189 
	mov	ebx,[esi+22]
190 
	mov	[Picture_SizeX],eax
191 
	mov	[Picture_SizeY],ebx
192 
	jmp	exit_type
193 
;---------------------------------------------------------------------
194 
no_bmp_file:
195 
;-------------is this GIF file ?----------------
196 
	xor	eax,eax
197 
	mov	ax,[esi]
198 
	mov	[type],ax
255 heavyiron 199 
 
1643 mario79 200 
	cmp	[type],'GI'
201 
	jne	no_gif_file
255 heavyiron 202 
 
1643 mario79 203 
	add	esi,6