Subversion Repositories Kolibri OS

Rev

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

Rev 7577 Rev 7579
Line 196... Line 196...
196 
; ah = symbol
 196 
; ah = symbol
197 
align 4
 197 
align 4
198 
proc KeyConvertToASCII, table:dword
 198 
proc KeyConvertToASCII, table:dword
199 
	push ebx
 199 
	push ebx
200 
	mov ebx,dword[table] ;convert scan to ascii
 200 
	mov ebx,dword[table] ;convert scan to ascii
201 
	ror ax,8
 201 
	shr ax,8
202 
	xor ah,ah
 - 
 
203 
	add bx,ax
 202 
	add bx,ax
204 
	mov ah,byte[ebx]
 203 
	mov ah,byte[ebx]
205 
	pop ebx
 204 
	pop ebx
206 
	ret
 205 
	ret
207 
endp
 206 
endp
Line 292... Line 291...
292 
align 4
 291 
align 4
293 
but_SaveSyntax:
 292 
but_SaveSyntax:
294 
	stdcall [ted_save_file], tedit0,run_file_70,[edit1.text]
 293 
	stdcall [ted_save_file], tedit0,run_file_70,[edit1.text]
295 
	ret
 294 
	ret
Line -... Line 295...
- 
 
 295 
 
- 
 
 296 
;description:
- 
 
 297 
; äã­ªæ¨ï ¢ë§ë¢ ¥¬ãî ¯à¨ ­ ¦ â¨¨ Ctrl+N,O,F,S,H,G
- 
 
 298 
align 4
- 
 
 299 
proc ted_but_ctrl_all uses eax, opt_key:dword
- 
 
 300 
	mov eax,[opt_key]
- 
 
 301 
	cmp al,'N' ;Ctrl+N
- 
 
 302 
	jne @f
- 
 
 303 
		call but_ctrl_n
- 
 
 304 
		jmp .end0
- 
 
 305 
	@@:
- 
 
 306 
	cmp al,'O' ;Ctrl+O
- 
 
 307 
	jne @f
- 
 
 308 
		call but_ctrl_o
- 
 
 309 
	@@:
- 
 
 310 
	;cmp al,'S' ;Ctrl+S
- 
 
 311 
	;cmp al,'F' ;Ctrl+F
- 
 
 312 
	;cmp al,'G' ;Ctrl+G
- 
 
 313 
	;cmp al,'H' ;Ctrl+H
- 
 
 314 
	.end0:
- 
 
 315 
	ret
- 
 
 316 
endp
296 
 
 317 
 
297 
align 4
 318 
align 4
298 
but_ctrl_o:
 319 
but_ctrl_o:
299 
	push eax
 320 
	push eax
300 
	call get_wnd_in_focus
 321 
	call get_wnd_in_focus
Line 330... Line 351...
330 
	;jne @f
 351 
	;jne @f
331 
	;       mov eax,tedit1
 352 
	;       mov eax,tedit1
332 
	;@@:
 353 
	;@@:
333 
	ret
 354 
	ret
Line 334... Line 355...
334 
 
 355 
 
335 
hed db 'TextEditor syntax file converter 23.01.19',0 ;¯®¤¯¨áì ®ª­ 
 356 
hed db 'TextEditor syntax file converter 29.01.19',0 ;¯®¤¯¨áì ®ª­ 
Line 336... Line 357...
336 
conv_tabl rb 128 ; â ¡«¨æ  ¤«ï ª®­¢¥àâ¨à®¢ ­¨ï scan-ª®¤  ¢ ascii-ª®¤
 357 
conv_tabl rb 128 ; â ¡«¨æ  ¤«ï ª®­¢¥àâ¨à®¢ ­¨ï scan-ª®¤  ¢ ascii-ª®¤
337 
 
 358 
 
338 
txt_load_f db '‡ £à. ä ©«',0
 359 
txt_load_f db '‡ £à. ä ©«',0