Subversion Repositories Kolibri OS

Rev

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

Rev 3221 Rev 3671
Line 170... Line 170...
170
        je      downuplbl
170
        je      downuplbl
171
        dec     eax
171
        dec     eax
172
        jmp     nodownup
172
        jmp     nodownup
173
;--------------------------------------
173
;--------------------------------------
174
downuplbl:
174
downuplbl:
175
        mov     eax,6
175
        mov     eax,7
176
;--------------------------------------
176
;--------------------------------------
177
nodownup:
177
nodownup:
178
        mov     [keyboard],eax
178
        mov     [keyboard],eax
179
        call    draw_infotext
179
        call    draw_infotext
180
;--------------------------------------
180
;--------------------------------------
181
nokm:
181
nokm:
182
        cmp     ah,5
182
        cmp     ah,5
183
        jnz     nokp
183
        jnz     nokp
184
        mov     eax,[keyboard]
184
        mov     eax,[keyboard]
185
        cmp     eax,6
185
        cmp     eax,7
186
        je      updownlbl
186
        je      updownlbl
187
        inc     eax
187
        inc     eax
188
        jmp     noupdown
188
        jmp     noupdown
189
;--------------------------------------
189
;--------------------------------------
190
updownlbl:
190
updownlbl:
Line 426... Line 426...
426
        mcall   21,,9,6
426
        mcall   21,,9,6
427
        call    alt_gen
427
        call    alt_gen
428
;--------------------------------------
428
;--------------------------------------
429
nosetkeylet:
429
nosetkeylet:
430
        cmp     [keyboard],6    ;belgian
430
        cmp     [keyboard],6    ;belgian
431
        jnz     nosetkeylbe
431
        jnz     nosetkeylit
Line 432... Line 432...
432
 
432
 
Line 433... Line 433...
433
        mcall   21,2,1,be_keymap
433
        mcall   21,2,1,be_keymap
434
        
434
        
Line 435... Line 435...
435
        inc     ecx
435
        inc     ecx
436
        mcall   21,,,be_keymap_shift
436
        mcall   21,,,be_keymap_shift
Line 437... Line 437...
437
 
437
 
-
 
438
        inc  ecx
-
 
439
        mcall   21,,,be_keymap_alt_gr
-
 
440
 
-
 
441
        mcall   21,,9,7
-
 
442
;--------------------------------------
-
 
443
nosetkeylit:
-
 
444
        cmp     [keyboard],7    ;italian
-
 
445
        jnz     nosetkeylbe
-
 
446
        
-
 
447
        mcall   21,2,1,it_keymap
-
 
448
        
-
 
449
        inc     ecx
-
 
450
        mcall   21,,,it_keymap_shift
-
 
451
        
438
        inc  ecx
452
        inc     ecx
-
 
453
        mcall   21,,,it_keymap_alt_gr
439
        mcall   21,,,be_keymap_alt_gr
454
        
440
 
455
        mcall   21,,9,8
441
        mcall   21,,9,5
456
;--------------------------------------
442
;--------------------------------------
457
 
443
nosetkeylbe:
458
nosetkeylbe:
Line 564... Line 579...
564
        jnz     nobe
579
        jnz     nobe
565
        mov     [text00+LLL*1+28],dword 'BELG'
580
        mov     [text00+LLL*1+28],dword 'BELG'
566
        mov     [text00+LLL*1+32],dword 'IAN '
581
        mov     [text00+LLL*1+32],dword 'IAN '
567
;--------------------------------------
582
;--------------------------------------
568
nobe:
583
nobe:
-
 
584
        cmp     eax,7
-
 
585
        jnz     noit
-
 
586
        mov     [text00+LLL*1+28],dword 'ITAL'
-
 
587
        mov     [text00+LLL*1+32],dword 'IAN'
-
 
588
;--------------------------------------
-
 
589
noit:
569
        mov     eax,[syslang]             ; SYSTEM LANGUAGE
590
        mov     eax,[syslang]             ; SYSTEM LANGUAGE
570
        dec     eax
591
        dec     eax
571
        test    eax,eax
592
        test    eax,eax
572
        jnz     noen5
593
        jnz     noen5
573
        mov     [text00+LLL*0+28],dword 'ENGL'
594
        mov     [text00+LLL*0+28],dword 'ENGL'