Subversion Repositories Kolibri OS

Rev

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

Rev 1156 Rev 2288
Line 453... Line 453...
453
        cmp     si,modes_table
453
        cmp     si, modes_table
454
        jbe     .loops
454
        jbe     .loops
455
        sub     word [cursor_pos],size_of_step
455
        sub     word [cursor_pos], size_of_step
456
        jmp     .loops
456
        jmp     .loops
Line -... Line 457...
-
 
457
 
457
 
458
.down:
458
.down:  cmp     ah,0x50;x,0x50E0               ; down
459
        cmp     ah, 0x50;x,0x50E0               ; down
459
        jne     .pgup
460
        jne     .pgup
460
        cmp     word[es:si+10],-1
461
        cmp     word[es:si+10], -1
461
        je      .loops        
462
        je      .loops
462
        add     word [cursor_pos],size_of_step
463
        add     word [cursor_pos], size_of_step
Line -... Line 464...
-
 
464
        jmp     .loops
463
        jmp     .loops
465
 
464
 
466
.pgup:
465
.pgup:  cmp     ah,0x49                 ; page up
467
        cmp     ah, 0x49                ; page up
466
        jne     .pgdn
468
        jne     .pgdn
467
        sub     si, size_of_step*long_v_table
469
        sub     si, size_of_step*long_v_table
468
        cmp     si, modes_table
470
        cmp     si, modes_table
Line 477... Line 479...
477
        mov     si, modes_table
479
        mov     si, modes_table
478
@@:
480
@@:
479
        mov     word [home_cursor], si
481
        mov     word [home_cursor], si
480
        jmp     .loops
482
        jmp     .loops
Line -... Line 483...
-
 
483
 
481
 
484
.pgdn:
482
.pgdn:  cmp     ah,0x51                 ; page down
485
        cmp     ah, 0x51                ; page down
483
        jne     .enter
486
        jne     .enter
484
        mov     ax, [end_cursor]
487
        mov     ax, [end_cursor]
485
        add     si, size_of_step*long_v_table
488
        add     si, size_of_step*long_v_table
486
        cmp     si, ax
489
        cmp     si, ax
Line 497... Line 500...
497
        mov     si, ax
500
        mov     si, ax
498
@@:
501
@@:
499
        mov     word [home_cursor], si
502
        mov     word [home_cursor], si
500
        jmp     .loops
503
        jmp     .loops
Line -... Line 504...
-
 
504
 
501
 
505
.enter:
502
.enter: cmp     al,0x0D;x,0x1C0D               ; enter
506
        cmp     al, 0x0D;x,0x1C0D               ; enter
503
        jne     .loops
507
        jne     .loops
504
        push    word [cursor_pos]
508
        push    word [cursor_pos]
505
        pop     bp
509
        pop     bp
506
        push    word [es:bp]
510
        push    word [es:bp]
Line 533... Line 537...
533
        call    print
537
        call    print
534
        mov     si, on_msg
538
        mov     si, on_msg
535
        popf
539
        popf
536
        jz      @f
540
        jz      @f
537
        mov     si, off_msg
541
        mov     si, off_msg
-
 
542
@@:
538
@@:     jmp     printplain
543
        jmp     printplain
539
; novesa and vervesa strings are not used at the moment of executing this code
544
; novesa and vervesa strings are not used at the moment of executing this code
540
virtual at novesa
545
virtual at novesa
541
.oldtimer dd ?
546
.oldtimer dd ?
542
.starttime dd ?
547
.starttime dd ?
543
.bSettingsChanged db ?
548
.bSettingsChanged db ?
Line 574... Line 579...
574
        jae     @f
579
        jae     @f
575
        cmp     al, 1
580
        cmp     al, 1
576
        mov     cl, 'ã'
581
        mov     cl, 'ã'
577
        jz      @f
582
        jz      @f
578
        mov     cl, 'ë'
583
        mov     cl, 'ë'
-
 
584
@@:
579
@@:     mov     [time_str+9], cl
585
        mov     [time_str+9], cl
580
else if lang eq et
586
else if lang eq et
581
        cmp     al, 1
587
        cmp     al, 1
582
        ja      @f
588
        ja      @f
583
        mov     [time_str+9], ' '
589
        mov     [time_str+9], ' '
584
        mov     [time_str+10],' '
590
        mov     [time_str+10], ' '
Line 587... Line 593...
587
; wait 5/4/3/2 seconds, 1 second
593
; wait 5/4/3/2 seconds, 1 second
588
        cmp     al, 1
594
        cmp     al, 1
589
        mov     cl, 's'
595
        mov     cl, 's'
590
        ja      @f
596
        ja      @f
591
        mov     cl, ' '
597
        mov     cl, ' '
-
 
598
@@:
592
@@:     mov     [time_str+9], cl
599
        mov     [time_str+9], cl
593
end if
600
end if
594
        add     al, '0'
601
        add     al, '0'
595
        mov     [time_str+1], al
602
        mov     [time_str+1], al
596
        mov     si, time_msg
603
        mov     si, time_msg
597
        _setcursor 7,0
604
        _setcursor 7,0