Subversion Repositories Kolibri OS

Rev

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

Rev 3525 Rev 3539
Line 7... Line 7...
7
;; (C) 2004 Ville Turjanmaa, License: GPL                       ;;
7
;; (C) 2004 Ville Turjanmaa, License: GPL                       ;;
8
;; Addings by M.Lisovin                                         ;;
8
;; Addings by M.Lisovin                                         ;;
9
;; LFN support by diamond                                       ;;
9
;; LFN support by diamond                                       ;;
10
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
10
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 11... Line 11...
11
 
11
 
Line 12... Line 12...
12
$Revision: 3525 $
12
$Revision: 3539 $
Line 13... Line 13...
13
 
13
 
Line 344... Line 344...
344
        jb      .rus2
344
        jb      .rus2
345
.unk:
345
.unk:
346
        mov     al, '_'
346
        mov     al, '_'
347
        jmp     .doit
347
        jmp     .doit
348
.yo1:
348
.yo1:
349
        mov     al, 'ð'
349
        mov     al, 0xF0 ; 'Ё'
350
        jmp     .doit
350
        jmp     .doit
351
.yo2:
351
.yo2:
352
        mov     al, 'ñ'
352
        mov     al, 0xF1 ; 'ё'
353
        jmp     .doit
353
        jmp     .doit
354
.rus1:
354
.rus1:
355
; 0x410-0x43F -> 0x80-0xAF
355
; 0x410-0x43F -> 0x80-0xAF
356
        add     al, 0x70
356
        add     al, 0x70
357
        jmp     .doit
357
        jmp     .doit
Line 387... Line 387...
387
        add     ax, 0x440-0xE0
387
        add     ax, 0x440-0xE0
388
        ret
388
        ret
389
; 0xF0 -> 0x401
389
; 0xF0 -> 0x401
390
; 0xF1 -> 0x451
390
; 0xF1 -> 0x451
391
@@:
391
@@:
392
        cmp     al, 'ð'
392
        cmp     al, 0xF0 ; 'Ё'
393
        jz      .yo1
393
        jz      .yo1
394
        cmp     al, 'ñ'
394
        cmp     al, 0xF1 ; 'ё'
395
        jz      .yo2
395
        jz      .yo2
396
.unk:
396
.unk:
397
        mov     al, '_'         ; ah=0
397
        mov     al, '_'         ; ah=0
398
        ret
398
        ret
399
.yo1:
399
.yo1:
Line 409... Line 409...
409
; out: al=converted symbol
409
; out: al=converted symbol
410
        cmp     al, 'a'
410
        cmp     al, 'a'
411
        jb      .ret
411
        jb      .ret
412
        cmp     al, 'z'
412
        cmp     al, 'z'
413
        jbe     .az
413
        jbe     .az
414
        cmp     al, 'ñ'
414
        cmp     al, 0xF1 ; 'ё'
415
        jz      .yo1
415
        jz      .yo1
416
        cmp     al, ' '
416
        cmp     al, 0xA0 ; 'а'
417
        jb      .ret
417
        jb      .ret
418
        cmp     al, 'à'
418
        cmp     al, 0xE0 ; 'р'
419
        jb      .rus1
419
        jb      .rus1
420
        cmp     al, 'ï'
420
        cmp     al, 0xEF ; 'я'
421
        ja      .ret
421
        ja      .ret
422
; 0xE0-0xEF -> 0x90-0x9F
422
; 0xE0-0xEF -> 0x90-0x9F
423
        sub     al, 'à'-''
423
        sub     al, 0xE0-0x90
424
.ret:
424
.ret:
425
        ret
425
        ret
426
.rus1:
426
.rus1:
427
; 0xA0-0xAF -> 0x80-0x8F
427
; 0xA0-0xAF -> 0x80-0x8F
428
.az:
428
.az: