WebSVN – Kolibri OS – Diff – /programs/media/animage/trunk/animage.asm


;*******************************************************
;**************GRAPHICS EDITOR ANIMAGE *****************
;*******************************************************
 
 
; version 1.1  year      9.12.2006
 
; AUTORS:
; programming by andrew_programmer
; design      by golus
 
use32
org 0x0
 
      db  'MENUET01'
      dd  0x1
      dd  START
      dd  I_END
      dd  0x19000;100 kb
      dd  0x19000;
      dd  parameters,0x0
 
 
  include '..\..\..\macros.inc'
  COLOR_ORDER equ MENUETOS
  include 'gif_lite.inc'
  include 'bmplib.inc'
  include 'dialog.inc'
  include 'dialog2.inc'
  include 'design.inc'
  include 'graphlib.inc'
 
  include 'cursors.inc'
 
  include 'load_from_parameters.inc'
 
START:
 
;--------------------------------------------------------
;---------------set events mask--------------------------
;--------------------------------------------------------
   mov eax,40
   mov ebx,1100111b
   mcall
;---------------------------------------------------------
;-----------------------init data-------------------------
;---------------------------------------------------------
   include 'init_data.inc'
;----------------------------------------------------------
;--------get memory and draw window of program-------------
;----------------------------------------------------------
   call GetMemory
   call cleare_work_arrea
   call load_icons
 
   ;load cursors
   mov eax,CursorsID
   call load_cursors
 
   call drawwin
;---------------------------------------------------------
;---------Check loading of file from psrsmeters-----------
;---------------------------------------------------------
  
   mov eax,parameters
   mov ebx,file_path
   call check_loading_from_parameters
 
;----------------------------------------------------------
;---------------------MAIN LOOP----------------------------
;----------------------------------------------------------
 
   still:
 
   call event
 
   cmp eax,1
   jne no_redraw_window
 
   call drawwin
   jmp still
 
   no_redraw_window:
 
   cmp eax,2
   je keys
 
   cmp eax,3
   je buttons
 
   cmp eax,6
   je mouse
 
   jmp still
;---------------------------------------------------------
;---------------------------------------------------------
;---------------------------------------------------------
 
   include 'events.inc'
   include 'events_of_window.inc'
   include 'events_of_keys.inc'
   include 'events_of_buttons.inc'
   include 'events_of_mouse.inc'
   include 'panel_engen.inc'
   include 'screen.inc'
   include 'menu_instruments.inc'
   include 'icons_instruments.inc'
   include 'icons.inc'
   include 'sprites.inc'
   include 'string.inc'
   include 'palette.inc'
   include 'files.inc'
   include 'time.inc'
   include 'memory.inc'
 
;-----------------------------------------------------------
;------------variables and data of program------------------
;-----------------------------------------------------------
 
CursorsID	     rd 10
 
parameters           rb 257
 
file_path:
times 1024+16	     db 0
 
time		     dd 0
sound_havent_memory  db 150,64,0
PosX		     dd 0
PosY		     dd 0
PointerToIcons	     dd 0
ScreenPointer	     dd 0
PointerToPicture     dd 0
PointerToCopyPicture dd 0
PointerToCopyPicture2 dd 0
PointerToEditBufer   dd 0
PointerToSpriteBufer dd 0
PointerToPalette     dd 0
Color		     dd 0
Number_Brush	     dd 0
Brush_SizeX	     dd 0
Brush_SizeY	     dd 0
Current_instrument   dd 0
Last_instrument      dd 0
Activate_instrument  db 0
SColor		     dd 0
OldX		     dd 0
OldY		     dd 0
 
MouseX		     dd 0
MouseY		     dd 0
Window_SizeX	     dd 0
Window_SizeY	     dd 0
Window_CordinatX     dd 0
Window_CordinatY     dd 0
Picture_SizeX	     dd 0
Picture_SizeY	     dd 0
ScreenX 	     dd 0
ScreenY 	     dd 0
WorkScreen_SizeX     dd 0
WorkScreen_SizeY     dd 0
MaxWorkScreen_SizeX  dd 0
MaxWorkScreen_SizeY  dd 0
k		     dd 0
IPC_table	     rd 256
ReserveArray	     dd 0
register	     dd 0
CounterX	     dd 0
CounterY	     dd 0
OffsetYPicture	     dd 0
OffsetYWorkScreen    dd 0
OffsetYBigPixel      dd 0
 
Icon_X		     dd 0
Icon_Y		     dd 0
counter 	     dd 0
counter2	     dd 0
Icon_text_x	     dd 0
Icon_text_y	     dd 0
Panel_flag	     db 0
counter_menu	     dd 0
menu_coordinat_x     dd 0
menu_size_x	     dd 0
menu_counter	     dd 0
counter_11	     dd 0
number_panel	     dd 0
number_menu	     dd 0
 
Scroll1CoordinatX    dd 0
Scroll1CoordinatY    dd 0
Scroll1MaxSizeX      dd 0
Scroll1MaxSizeY      dd 0
Scroll1SizeX	     dd 0
Scroll1FreeX	     dd 0
 
Scroll2CoordinatX    dd 0
Scroll2CoordinatY    dd 0
Scroll2MaxSizeX      dd 0
Scroll2MaxSizeY      dd 0
Scroll2SizeY	     dd 0
Scroll2FreeY	     dd 0
 
extended_memory      dd 0
type		     dw 0
x		     dd 0
y		     dd 0
save_flag	     db 0
exit_from_work_arrea db 0
 
Radius		     dd 0
Dx_		     dd 0
Dy_		     dd 0
line_width	     dd 0
lastik_is_active     db 0
a_ellips	     dd 0
b_ellips	     dd 0
instrument_used      db 0
used_OldX	     dd 0
used_OldY	     dd 0
rectangular_shade_x  dd 0
rectangular_shade_y  dd 0
crossing_old_x	     dd 0
crossing_old_y	     dd 0
crossing	     dd 0
finishing_crossing   dd 0
number_undo	     dd 0
DrawSprite_flag      db 0
Paste_flag	     db 0
SpriteSizeX	     dd 0
SpriteSizeY	     dd 0
SpriteCoordinatX     dd 0
SpriteCoordinatY     dd 0
SpriteOldCoordinatX  dd 0
SpriteOldCoordinatY  dd 0
 
   include 'panel_data.inc'
   include 'palitra256.inc'
   include 'brushes.inc'
   include 'spray.inc'
   include 'width_lines.inc'
;----------------------------------------------------------
;-------------------ICON"S picture-------------------------
;----------------------------------------------------------
dd 0
 
panel_picture:
file 'panel_buttons.gif'
 
;****************cursors******************
brush_cursor:
file 'brush.cur'
 
flood_fill_cursor:
file 'flood_fill.cur'
 
lastik_cursor:
file 'lastik.cur'
 
other_cursor:
file 'other.cur'
 
pencil_cursor:
file 'pencil.cur'
 
pipette_cursor:
file 'pipette.cur'
 
spray_cursor:
file 'spray.cur'
 
zoom_cursor:
file 'zoom.cur'
 
;----------------------------------------------------------
 
I_END:
 
IncludeUGlobals

Rev 485	Rev 552
1	;*******************************************************	1	;*******************************************************
2	;************GRAPHICS EDITOR ANIMAGE ***************	2	;************GRAPHICS EDITOR ANIMAGE ***************
3	;*******************************************************	3	;*******************************************************
4		4
5		5
6	; version 1.1 year 9.12.2006	6	; version 1.1 year 9.12.2006
7		7
8	; AUTORS:	8	; AUTORS:
9	; programming by andrew_programmer	9	; programming by andrew_programmer
10	; design by golus	10	; design by golus
11		11
12	use32	12	use32
13	org 0x0	13	org 0x0
14		14
15	db 'MENUET01'	15	db 'MENUET01'
16	dd 0x1	16	dd 0x1
17	dd START	17	dd START
18	dd I_END	18	dd I_END
19	dd 0x19000;100 kb	19	dd 0x19000;100 kb
20	dd 0x19000;	20	dd 0x19000;
21	dd parameters,0x0	21	dd parameters,0x0
22		22
23		23
24	include '..\..\..\macros.inc'	24	include '..\..\..\macros.inc'
-		25	COLOR_ORDER equ MENUETOS
25	include 'giflib.inc'	26	include 'gif_lite.inc'
26	include 'bmplib.inc'	27	include 'bmplib.inc'
27	include 'dialog.inc'	28	include 'dialog.inc'
28	include 'dialog2.inc'	29	include 'dialog2.inc'
29	include 'design.inc'	30	include 'design.inc'
30	include 'graphlib.inc'	31	include 'graphlib.inc'
31		32
32	include 'cursors.inc'	33	include 'cursors.inc'
33		34
34	include 'load_from_parameters.inc'	35	include 'load_from_parameters.inc'
35		36
36	START:	37	START:
37		38
38	;--------------------------------------------------------	39	;--------------------------------------------------------
39	;---------------set events mask--------------------------	40	;---------------set events mask--------------------------
40	;--------------------------------------------------------	41	;--------------------------------------------------------
41	mov eax,40	42	mov eax,40
42	mov ebx,1100111b	43	mov ebx,1100111b
43	mcall	44	mcall
44	;---------------------------------------------------------	45	;---------------------------------------------------------
45	;-----------------------init data-------------------------	46	;-----------------------init data-------------------------
46	;---------------------------------------------------------	47	;---------------------------------------------------------
47	include 'init_data.inc'	48	include 'init_data.inc'
48	;----------------------------------------------------------	49	;----------------------------------------------------------
49	;--------get memory and draw window of program-------------	50	;--------get memory and draw window of program-------------
50	;----------------------------------------------------------	51	;----------------------------------------------------------
51	call GetMemory	52	call GetMemory
52	call cleare_work_arrea	53	call cleare_work_arrea
53	call load_icons	54	call load_icons
54		55
55	;load cursors	56	;load cursors
56	mov eax,CursorsID	57	mov eax,CursorsID
57	call load_cursors	58	call load_cursors
58		59
59	call drawwin	60	call drawwin
60	;---------------------------------------------------------	61	;---------------------------------------------------------
61	;---------Check loading of file from psrsmeters-----------	62	;---------Check loading of file from psrsmeters-----------
62	;---------------------------------------------------------	63	;---------------------------------------------------------
63		64
64	mov eax,parameters	65	mov eax,parameters
65	mov ebx,file_path	66	mov ebx,file_path
66	call check_loading_from_parameters	67	call check_loading_from_parameters
67		68
68	;----------------------------------------------------------	69	;----------------------------------------------------------
69	;---------------------MAIN LOOP----------------------------	70	;---------------------MAIN LOOP----------------------------
70	;----------------------------------------------------------	71	;----------------------------------------------------------
71		72
72	still:	73	still:
73		74
74	call event	75	call event
75		76
76	cmp eax,1	77	cmp eax,1
77	jne no_redraw_window	78	jne no_redraw_window
78		79
79	call drawwin	80	call drawwin
80	jmp still	81	jmp still
81		82
82	no_redraw_window:	83	no_redraw_window:
83		84
84	cmp eax,2	85	cmp eax,2
85	je keys	86	je keys
86		87
87	cmp eax,3	88	cmp eax,3
88	je buttons	89	je buttons
89		90
90	cmp eax,6	91	cmp eax,6
91	je mouse	92	je mouse
92		93
93	jmp still	94	jmp still
94	;---------------------------------------------------------	95	;---------------------------------------------------------
95	;---------------------------------------------------------	96	;---------------------------------------------------------
96	;---------------------------------------------------------	97	;---------------------------------------------------------
97		98
98	include 'events.inc'	99	include 'events.inc'
99	include 'events_of_window.inc'	100	include 'events_of_window.inc'
100	include 'events_of_keys.inc'	101	include 'events_of_keys.inc'
101	include 'events_of_buttons.inc'	102	include 'events_of_buttons.inc'
102	include 'events_of_mouse.inc'	103	include 'events_of_mouse.inc'
103	include 'panel_engen.inc'	104	include 'panel_engen.inc'
104	include 'screen.inc'	105	include 'screen.inc'
105	include 'menu_instruments.inc'	106	include 'menu_instruments.inc'
106	include 'icons_instruments.inc'	107	include 'icons_instruments.inc'
107	include 'icons.inc'	108	include 'icons.inc'
108	include 'sprites.inc'	109	include 'sprites.inc'
109	include 'string.inc'	110	include 'string.inc'
110	include 'palette.inc'	111	include 'palette.inc'
111	include 'files.inc'	112	include 'files.inc'
112	include 'time.inc'	113	include 'time.inc'
113	include 'memory.inc'	114	include 'memory.inc'
114		115
115	;-----------------------------------------------------------	116	;-----------------------------------------------------------
116	;------------variables and data of program------------------	117	;------------variables and data of program------------------
117	;-----------------------------------------------------------	118	;-----------------------------------------------------------
118		119
119	CursorsID rd 10	120	CursorsID rd 10
120		121
121	parameters rb 257	122	parameters rb 257
122		123
123	file_path:	124	file_path:
124	times 1024+16 db 0	125	times 1024+16 db 0
125		126
126	time dd 0	127	time dd 0
127	sound_havent_memory db 150,64,0	128	sound_havent_memory db 150,64,0
128	PosX dd 0	129	PosX dd 0
129	PosY dd 0	130	PosY dd 0
130	PointerToIcons dd 0	131	PointerToIcons dd 0
131	ScreenPointer dd 0	132	ScreenPointer dd 0
132	PointerToPicture dd 0	133	PointerToPicture dd 0
133	PointerToCopyPicture dd 0	134	PointerToCopyPicture dd 0
134	PointerToCopyPicture2 dd 0	135	PointerToCopyPicture2 dd 0
135	PointerToEditBufer dd 0	136	PointerToEditBufer dd 0
136	PointerToSpriteBufer dd 0	137	PointerToSpriteBufer dd 0
137	PointerToPalette dd 0	138	PointerToPalette dd 0
138	Color dd 0	139	Color dd 0
139	Number_Brush dd 0	140	Number_Brush dd 0
140	Brush_SizeX dd 0	141	Brush_SizeX dd 0
141	Brush_SizeY dd 0	142	Brush_SizeY dd 0
142	Current_instrument dd 0	143	Current_instrument dd 0
143	Last_instrument dd 0	144	Last_instrument dd 0
144	Activate_instrument db 0	145	Activate_instrument db 0
145	SColor dd 0	146	SColor dd 0
146	OldX dd 0	147	OldX dd 0
147	OldY dd 0	148	OldY dd 0
148		149
149	MouseX dd 0	150	MouseX dd 0
150	MouseY dd 0	151	MouseY dd 0
151	Window_SizeX dd 0	152	Window_SizeX dd 0
152	Window_SizeY dd 0	153	Window_SizeY dd 0
153	Window_CordinatX dd 0	154	Window_CordinatX dd 0
154	Window_CordinatY dd 0	155	Window_CordinatY dd 0
155	Picture_SizeX dd 0	156	Picture_SizeX dd 0
156	Picture_SizeY dd 0	157	Picture_SizeY dd 0
157	ScreenX dd 0	158	ScreenX dd 0
158	ScreenY dd 0	159	ScreenY dd 0
159	WorkScreen_SizeX dd 0	160	WorkScreen_SizeX dd 0
160	WorkScreen_SizeY dd 0	161	WorkScreen_SizeY dd 0
161	MaxWorkScreen_SizeX dd 0	162	MaxWorkScreen_SizeX dd 0
162	MaxWorkScreen_SizeY dd 0	163	MaxWorkScreen_SizeY dd 0
163	k dd 0	164	k dd 0
164	IPC_table rd 256	165	IPC_table rd 256
165	ReserveArray dd 0	166	ReserveArray dd 0
166	register dd 0	167	register dd 0
167	CounterX dd 0	168	CounterX dd 0
168	CounterY dd 0	169	CounterY dd 0
169	OffsetYPicture dd 0	170	OffsetYPicture dd 0
170	OffsetYWorkScreen dd 0	171	OffsetYWorkScreen dd 0
171	OffsetYBigPixel dd 0	172	OffsetYBigPixel dd 0
172		173
173	Icon_X dd 0	174	Icon_X dd 0
174	Icon_Y dd 0	175	Icon_Y dd 0
175	counter dd 0	176	counter dd 0
176	counter2 dd 0	177	counter2 dd 0
177	Icon_text_x dd 0	178	Icon_text_x dd 0
178	Icon_text_y dd 0	179	Icon_text_y dd 0
179	Panel_flag db 0	180	Panel_flag db 0
180	counter_menu dd 0	181	counter_menu dd 0
181	menu_coordinat_x dd 0	182	menu_coordinat_x dd 0
182	menu_size_x dd 0	183	menu_size_x dd 0
183	menu_counter dd 0	184	menu_counter dd 0
184	counter_11 dd 0	185	counter_11 dd 0
185	number_panel dd 0	186	number_panel dd 0
186	number_menu dd 0	187	number_menu dd 0
187		188
188	Scroll1CoordinatX dd 0	189	Scroll1CoordinatX dd 0
189	Scroll1CoordinatY dd 0	190	Scroll1CoordinatY dd 0
190	Scroll1MaxSizeX dd 0	191	Scroll1MaxSizeX dd 0
191	Scroll1MaxSizeY dd 0	192	Scroll1MaxSizeY dd 0
192	Scroll1SizeX dd 0	193	Scroll1SizeX dd 0
193	Scroll1FreeX dd 0	194	Scroll1FreeX dd 0
194		195
195	Scroll2CoordinatX dd 0	196	Scroll2CoordinatX dd 0
196	Scroll2CoordinatY dd 0	197	Scroll2CoordinatY dd 0
197	Scroll2MaxSizeX dd 0	198	Scroll2MaxSizeX dd 0
198	Scroll2MaxSizeY dd 0	199	Scroll2MaxSizeY dd 0
199	Scroll2SizeY dd 0	200	Scroll2SizeY dd 0
200	Scroll2FreeY dd 0	201	Scroll2FreeY dd 0
201		202
202	extended_memory dd 0	203	extended_memory dd 0
203	type dw 0	204	type dw 0
204	x dd 0	205	x dd 0
205	y dd 0	206	y dd 0
206	save_flag db 0	207	save_flag db 0
207	exit_from_work_arrea db 0	208	exit_from_work_arrea db 0
208		209
209	Radius dd 0	210	Radius dd 0
210	Dx_ dd 0	211	Dx_ dd 0
211	Dy_ dd 0	212	Dy_ dd 0
212	line_width dd 0	213	line_width dd 0
213	lastik_is_active db 0	214	lastik_is_active db 0
214	a_ellips dd 0	215	a_ellips dd 0
215	b_ellips dd 0	216	b_ellips dd 0
216	instrument_used db 0	217	instrument_used db 0
217	used_OldX dd 0	218	used_OldX dd 0
218	used_OldY dd 0	219	used_OldY dd 0
219	rectangular_shade_x dd 0	220	rectangular_shade_x dd 0
220	rectangular_shade_y dd 0	221	rectangular_shade_y dd 0
221	crossing_old_x dd 0	222	crossing_old_x dd 0
222	crossing_old_y dd 0	223	crossing_old_y dd 0
223	crossing dd 0	224	crossing dd 0
224	finishing_crossing dd 0	225	finishing_crossing dd 0
225	number_undo dd 0	226	number_undo dd 0
226	DrawSprite_flag db 0	227	DrawSprite_flag db 0
227	Paste_flag db 0	228	Paste_flag db 0
228	SpriteSizeX dd 0	229	SpriteSizeX dd 0
229	SpriteSizeY dd 0	230	SpriteSizeY dd 0
230	SpriteCoordinatX dd 0	231	SpriteCoordinatX dd 0
231	SpriteCoordinatY dd 0	232	SpriteCoordinatY dd 0
232	SpriteOldCoordinatX dd 0	233	SpriteOldCoordinatX dd 0
233	SpriteOldCoordinatY dd 0	234	SpriteOldCoordinatY dd 0
234		235
235	include 'panel_data.inc'	236	include 'panel_data.inc'
236	include 'palitra256.inc'	237	include 'palitra256.inc'
237	include 'brushes.inc'	238	include 'brushes.inc'
238	include 'spray.inc'	239	include 'spray.inc'
239	include 'width_lines.inc'	240	include 'width_lines.inc'
240	;----------------------------------------------------------	241	;----------------------------------------------------------
241	;-------------------ICON"S picture-------------------------	242	;-------------------ICON"S picture-------------------------
242	;----------------------------------------------------------	243	;----------------------------------------------------------
243	dd 0	244	dd 0
244		245
245	panel_picture:	246	panel_picture:
246	file 'panel_buttons.gif'	247	file 'panel_buttons.gif'
247		248
248	;**************cursors****************	249	;**************cursors****************
249	brush_cursor:	250	brush_cursor:
250	file 'brush.cur'	251	file 'brush.cur'
251		252
252	flood_fill_cursor:	253	flood_fill_cursor:
253	file 'flood_fill.cur'	254	file 'flood_fill.cur'
254		255
255	lastik_cursor:	256	lastik_cursor:
256	file 'lastik.cur'	257	file 'lastik.cur'
257		258
258	other_cursor:	259	other_cursor:
259	file 'other.cur'	260	file 'other.cur'
260		261
261	pencil_cursor:	262	pencil_cursor:
262	file 'pencil.cur'	263	file 'pencil.cur'
263		264
264	pipette_cursor:	265	pipette_cursor:
265	file 'pipette.cur'	266	file 'pipette.cur'
266		267
267	spray_cursor:	268	spray_cursor:
268	file 'spray.cur'	269	file 'spray.cur'
269		270
270	zoom_cursor:	271	zoom_cursor:
271	file 'zoom.cur'	272	file 'zoom.cur'
272		273
273	;----------------------------------------------------------	274	;----------------------------------------------------------
274		275
275	I_END:	276	I_END:
276		277
-		278	IncludeUGlobals

Subversion Repositories Kolibri OS

(root)/programs/media/animage/trunk/animage.asm – Rev 485 → 552