Subversion Repositories Kolibri OS

Rev

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

Rev 6362 Rev 6371
Line 24... Line 24...
24
	mov [main_menu_file], eax
24
	mov [main_menu_file], eax
25
	stdcall [ksubmenu_new]
25
	stdcall [ksubmenu_new]
26
	mov [main_menu_edit], eax
26
	mov [main_menu_edit], eax
27
	stdcall [ksubmenu_new]
27
	stdcall [ksubmenu_new]
28
	mov [main_menu_instr], eax
28
	mov [main_menu_instr], eax
-
 
29
	stdcall [ksubmenu_new]
-
 
30
	mov [main_menu_filters], eax
Line 29... Line 31...
29
	
31
	
30
	; init 'File' menu
32
	; init 'File' menu
31
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_New, 0x71
33
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_File_New, 0x71
32
	stdcall [ksubmenu_add], [main_menu_file], eax
34
	stdcall [ksubmenu_add], [main_menu_file], eax
Line 65... Line 67...
65
	
67
	
66
	; add 'Edit' menu to main
68
	; add 'Edit' menu to main
67
	stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Edit, [main_menu_edit]
69
	stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Edit, [main_menu_edit]
Line 68... Line 70...
68
	stdcall [ksubmenu_add], [main_menu], eax
70
	stdcall [ksubmenu_add], [main_menu], eax
69
 
71
 
70
	; init 'Edit' menu
72
	; init 'Instruments' menu
71
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Instr_Pencil, 0x51
73
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Instr_Pencil, 0x51
72
	stdcall [ksubmenu_add], [main_menu_instr], eax
74
	stdcall [ksubmenu_add], [main_menu_instr], eax
73
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Instr_Brush, 0x52
75
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Instr_Brush, 0x52
Line 95... Line 97...
95
 
97
 
96
	; add 'Instruments' menu to main
98
	; add 'Instruments' menu to main
97
	stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Instr, [main_menu_instr]
99
	stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Instr, [main_menu_instr]
Line -... Line 100...
-
 
100
	stdcall [ksubmenu_add], [main_menu], eax
-
 
101
 
-
 
102
	; init 'Reflection' menu
-
 
103
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Filters_ReflectionLR, 0x41
-
 
104
	stdcall [ksubmenu_add], [main_menu_filters], eax
-
 
105
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Filters_ReflectionTB, 0x42
-
 
106
	stdcall [ksubmenu_add], [main_menu_filters], eax
-
 
107
 
-
 
108
	; add 'Reflection' menu to main
98
	stdcall [ksubmenu_add], [main_menu], eax
109
	stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_Filters, [main_menu_filters]
Line 99... Line 110...
99
 
110
	stdcall [ksubmenu_add], [main_menu], eax
100
	ret
111
	ret
101
 
112
 
Line 124... Line 135...
124
	menu_set 0x57, 5,7
135
	menu_set 0x57, 5,7
125
	menu_set 0x58, 5,8
136
	menu_set 0x58, 5,8
126
	menu_set 0x59, 5,9
137
	menu_set 0x59, 5,9
127
	menu_set 0x5a, 5,10
138
	menu_set 0x5a, 5,10
128
	menu_set 0x5b, 5,11
139
	menu_set 0x5b, 5,11
-
 
140
	menu_set 0x41, 4,1
-
 
141
	menu_set 0x42, 4,2
129
.end_handler:
142
.end_handler:
130
ret
143
ret
Line 131... Line 144...
131
 
144
 
132
main_menu dd 0
145
main_menu dd 0
133
main_menu_file  dd 0
146
main_menu_file  dd 0
134
main_menu_edit dd 0
147
main_menu_edit dd 0
-
 
148
main_menu_instr dd 0
Line 135... Line 149...
135
main_menu_instr dd 0
149
main_menu_filters dd 0
136
 
150
 
137
sz_main_menu_File        db 'File', 0
151
sz_main_menu_File        db 'File', 0
138
sz_main_menu_File_New    db 'New', 0
152
sz_main_menu_File_New    db 'New', 0
Line 159... Line 173...
159
sz_main_menu_Instr_Line db 'Line', 0
173
sz_main_menu_Instr_Line db 'Line', 0
160
sz_main_menu_Instr_Rectangle db 'Rectangle', 0
174
sz_main_menu_Instr_Rectangle db 'Rectangle', 0
161
sz_main_menu_Instr_Circle db 'Circle', 0
175
sz_main_menu_Instr_Circle db 'Circle', 0
162
sz_main_menu_Instr_Ellips db 'Ellips', 0
176
sz_main_menu_Instr_Ellips db 'Ellips', 0
163
sz_main_menu_Instr_Hard_contour db 'Hard contour', 0
177
sz_main_menu_Instr_Hard_contour db 'Hard contour', 0
164
178
 
-
 
179
sz_main_menu_Filters      db 'Filters', 0
-
 
180
sz_main_menu_Filters_ReflectionLR db 'Reflection |', 0
-
 
181
sz_main_menu_Filters_ReflectionTB db 'Reflection -', 0
-
 
182
165
183