Subversion Repositories Kolibri OS

Rev

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

Rev 1489 Rev 2086
Line 4... Line 4...
4
  dd 0x01
4
  dd 0x01
5
  dd start
5
  dd start
6
  dd i_end ; à §¬¥à ¯à¨«®¦¥­¨ï
6
  dd i_end ; à §¬¥à ¯à¨«®¦¥­¨ï
7
  dd mem
7
  dd mem
8
  dd stacktop
8
  dd stacktop
9
  dd file_name;buf_cmd_lin
9
  dd file_name
10
  dd sys_path
10
  dd sys_path
Line 11... Line 11...
11
 
11
 
12
MAX_COLOR_WORD_LEN equ 40
12
MAX_COLOR_WORD_LEN equ 40
13
BUF_SIZE equ 1000 ;buffer for copy|paste
13
BUF_SIZE equ 1000 ;buffer for copy|paste
-
 
14
maxSyntaxFileSize equ 310000
Line 14... Line 15...
14
maxSyntaxFileSize equ 310000
15
CAPT_PATH_WIDTH equ 50 ;è¨à¨­  ¯®¤¯¨á¨ ¯¥à¥¤ ⥪áâ®¢ë¬ ¯®«¥¬
15
 
16
 
16
include '../../macros.inc'
17
include '../../macros.inc'
17
include '../../proc32.inc'
18
include '../../proc32.inc'
Line 126... Line 127...
126
  loop @b
127
  loop @b
127
.end_dir_init:
128
.end_dir_init:
Line 128... Line 129...
128
 
129
 
129
;--- load color option file ---
130
;--- load color option file ---
-
 
131
stdcall [ted_init], tedit0
Line 130... Line 132...
130
stdcall [ted_init], tedit0
132
mov byte[file_name],0
131
 
133
 
-
 
134
align 4
-
 
135
red_win:
-
 
136
	call draw_window
-
 
137
 
-
 
138
align 4
-
 
139
still:
-
 
140
  mcall 10
-
 
141
 
-
 
142
  cmp al,1 ;¨§¬. ¯®«®¦¥­¨¥ ®ª­ 
-
 
143
  jz red_win
-
 
144
  cmp al,2
-
 
145
  jz key
-
 
146
  cmp al,3
-
 
147
  jz button
-
 
148
  cmp al,6
-
 
149
  jz mouse
-
 
150
 
-
 
151
  jmp still
-
 
152
 
-
 
153
 
132
align 4
154
align 4
133
red_win:
155
draw_window:
Line 134... Line -...
134
  pushad
-
 
135
  mcall 12,1
-
 
136
 
-
 
137
  xor eax,eax
156
	pushad
138
  mov ebx,10*65536+555
157
	mcall 12,1
139
  mov ecx,10*65536+333
158
 
140
  mov edx,[sc.work]
159
	mov edx,[sc.work]
Line 141... Line 160...
141
  or  edx,0x33000000
160
	or  edx,0x33000000
Line 142... Line 161...
142
  mov edi,hed
161
	mov edi,hed
143
  mcall
162
	mcall 0,<10,555>,<10,333>
Line 172... Line 191...
172
  mcall
191
	mcall
Line 173... Line 192...
173
 
192
 
174
  mov ebx,195*65536+10
193
	mov ebx,195*65536+10
175
  mov ecx,[sc.work_text]
194
	mov ecx,[sc.work_text]
-
 
195
	or  ecx,0x80000000
-
 
196
	mov edx,txt_inp_file
-
 
197
	int 0x40
-
 
198
 
176
  or  ecx,0x80000000
199
	add ebx,20
-
 
200
	mov edx,txt_out_file
-
 
201
	int 0x40
-
 
202
 
-
 
203
	mov ebx,(215+CAPT_PATH_WIDTH) shl 16 + 10
177
  mov edx,txt_out_file
204
	mov edx,file_name
Line 178... Line 205...
178
  mcall
205
	int 0x40
179
 
206
 
Line 180... Line 207...
180
  stdcall [edit_box_draw],dword edit1
207
	stdcall [edit_box_draw],dword edit1
Line 185... Line 212...
185
  stdcall [scrollbar_ver_draw],dword ws_dir_lbox
212
	stdcall [scrollbar_ver_draw],dword ws_dir_lbox
186
  stdcall [ted_draw], tedit0
213
	stdcall [ted_draw], tedit0
Line 187... Line 214...
187
 
214
 
188
  mcall 12,2
215
	mcall 12,2
189
  popad
-
 
190
 
-
 
191
align 4
216
	popad
192
still:
-
 
193
  mcall 10
-
 
194
 
-
 
195
  cmp al,1 ;¨§¬. ¯®«®¦¥­¨¥ ®ª­ 
-
 
196
  jz red_win
-
 
197
  cmp al,2
-
 
198
  jz key
-
 
199
  cmp al,3
-
 
200
  jz button
-
 
201
  cmp al,6
-
 
202
  jz mouse
-
 
203
 
-
 
204
  jmp still
-
 
Line 205... Line 217...
205
 
217
	ret
206
 
218
 
207
align 4
219
align 4
208
mouse:
220
mouse:
Line 298... Line 310...
298
	;jne @f
310
	;jne @f
299
	;       mov eax,tedit1
311
	;       mov eax,tedit1
300
	;@@:
312
	;@@:
301
	ret
313
	ret
Line 302... Line 314...
302
 
314
 
303
hed db 'TextEditor syntax file converter 09.06.10',0 ;¯®¤¯¨áì ®ª­ 
-
 
304
 
-
 
305
txtErrOpen db '¥ ­ ©¤¥­ ä ©«, ¯à®¢¥àì⥠¯à ¢¨«ì­®áâì ¨¬¥­¨',0
-
 
306
txtErrIni0 db '¥ ®âªàë«áï ä ©« á ¨ª®­ª ¬¨',0
-
 
Line 307... Line 315...
307
err_ini0 db 0
315
hed db 'TextEditor syntax file converter 20.08.11',0 ;¯®¤¯¨áì ®ª­ 
308
 
316
 
-
 
317
txt122 db '‡ £à. ä ©«',0
309
txt122 db '‡ £à. ä ©«',0
318
txt148 db '‘®åà. ä ©«',0
Line 310... Line -...
310
txt148 db '‘®åà. ä ©«',0
-
 
311
txt_out_file db '‚ëå. ä ©«:',0
319
txt_inp_file db 'ˆáå. ä ©«:',0
Line 312... Line 320...
312
 
320
txt_out_file db '‚ëå. ä ©«:',0
313
CAPT_PATH_WIDTH equ 50
321
 
Line 314... Line 322...
314
edit1 edit_box 305+16-CAPT_PATH_WIDTH, 215+CAPT_PATH_WIDTH, 5, 0xffffff, 0xff, 0xff0000, 0, 0x80, MAX_COLOR_WORD_LEN, ed_buffer.127, mouse_dd, 0
322
edit1 edit_box 305+16-CAPT_PATH_WIDTH, 215+CAPT_PATH_WIDTH, 25, 0xffffff, 0xff, 0xff0000, 0, 0x80, MAX_COLOR_WORD_LEN, ed_buffer.127, mouse_dd, 0