Subversion Repositories Kolibri OS

Rev

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

Rev 4935 Rev 5547
Line 634... Line 634...
634
;   *********************************************
634
;   *********************************************
Line 635... Line 635...
635
 
635
 
636
draw_window:
636
draw_window:
Line 637... Line 637...
637
        mcall   12, 1
637
        mcall   12, 1
Line 638... Line 638...
638
 
638
 
Line 639... Line 639...
639
        mcall   48, 3, sc, 192
639
        mcall   48, 3, sc, sizeof.system_colors
640
 
640
 
641
        mcall   48, 4
641
        mcall   48, 4
642
 
642
 
643
        mov     ecx, eax
643
        mov     ecx, eax
644
        xor     eax, eax                     
644
        xor     eax, eax                     
645
        mov     ebx, 200 shl 16 + 256
645
        mov     ebx, 200 shl 16 + 256
646
        add     ecx, 200 shl 16 + 158
646
        add     ecx, 200 shl 16 + 158
Line 647... Line 647...
647
        mov     edx, [sc.win_body]
647
        mov     edx, [sc.work]
648
        or      edx, 0x34000000
648
        or      edx, 0x34000000
649
        mov     edi, title
649
        mov     edi, title
650
        mcall
650
        mcall
651
 
651
 
652
        mov     eax, 8
652
        mov     eax, 8
653
        mov     ebx, 19 shl 16 + 28
653
        mov     ebx, 19 shl 16 + 28
654
        mov     ecx, 49 shl 16 + 18
654
        mov     ecx, 49 shl 16 + 18
655
        mov     edx, 6
655
        mov     edx, 6
656
        mov     esi, [sc.btn_face]
656
        mov     esi, [sc.work_button]
Line 670... Line 670...
670
 
670
 
671
        mcall   , <199, 28>, <49, 18>, 2        ; 'C'
671
        mcall   , <199, 28>, <49, 18>, 2        ; 'C'
Line 672... Line 672...
672
        mcall   , <220,  8>, < 7,  8>, 3        ; 'dec-bin-hex'
672
        mcall   , <220,  8>, < 7,  8>, 3        ; 'dec-bin-hex'
673
 
673
 
674
 
674
 
675
        mov     ecx, [sc.btn_text]
675
        mov     ecx, [sc.work_button_text]
676
        mov     edx, text
676
        mov     edx, text
677
        mov     edi, 55 - 20
677
        mov     edi, 55 - 20
Line 702... Line 702...
702
        mcall   12, 2
702
        mcall   12, 2
703
        ret
703
        ret
Line 704... Line 704...
704
 
704
 
705
print_display:
705
print_display:
706
        pusha
706
        pusha
707
        mcall   13, < 20, 207>, <21, 17>, [sc.gui_face]
707
        mcall   13, < 20, 207>, <21, 17>, 0xFFFfff
708
        mcall   38, < 19, 227>, <20, 20>, [sc.gui_frame]
708
        mcall   38, < 19, 227>, <20, 20>, [sc.work_graph]
709
        mcall   38, < 19, 227>, <38, 38>, [sc.gui_frame]
709
        mcall   38, < 19, 227>, <38, 38>, [sc.work_graph]
710
        mcall   38, < 19,  19>, <21, 37>, [sc.gui_frame]
710
        mcall   38, < 19,  19>, <21, 37>, [sc.work_graph]
Line 711... Line 711...
711
        mcall   38, <227, 227>, <21, 37>, [sc.gui_frame]
711
        mcall   38, <227, 227>, <21, 37>, [sc.work_graph]
712
 
712
 
713
        mov     eax, 4
713
        mov     eax, 4
714
        mov     ebx, 135 shl 16 + 7
714
        mov     ebx, 135 shl 16 + 7
715
        mov     ecx, [sc.gui_text]
715
        mov     ecx, [sc.work_text]
716
        or      ecx, 0x40000000
716
        or      ecx, 0x40000000
717
        mov     edx, calc
717
        mov     edx, calc
718
        mov     esi, 1
718
        mov     esi, 1
Line 719... Line 719...
719
        mov     edi, [sc.win_body]
719
        mov     edi, [sc.work]
720
        mcall
720
        mcall
721
 
721
 
722
        mov     ebx, 198 shl 16 + 8
722
        mov     ebx, 198 shl 16 + 8
723
        mov     edx, [display_type]
723
        mov     edx, [display_type]
724
        shl     edx, 2
724
        shl     edx, 2
725
        add     edx, display_type_text
725
        add     edx, display_type_text
Line 726... Line 726...
726
        mov     esi, 3
726
        mov     esi, 3
727
        mov     edi, [sc.win_body]
727
        mov     edi, [sc.work]
728
        mcall
728
        mcall
Line 839... Line 839...
839
asci:   db 49, 50, 51, 52, 53, 54, 55, 56, 57, 48, 43, 61, 45, 42, 47, 44, 46, 27
839
asci:   db 49, 50, 51, 52, 53, 54, 55, 56, 57, 48, 43, 61, 45, 42, 47, 44, 46, 27
840
butid:  db 12, 13, 14, 19, 20, 21, 26, 27, 28, 34, 15, 39, 22, 36, 29, 35, 35, 1
840
butid:  db 12, 13, 14, 19, 20, 21, 26, 27, 28, 34, 15, 39, 22, 36, 29, 35, 35, 1
Line 841... Line 841...
841
 
841
 
Line 842... Line 842...
842
I_END:
842
I_END:
843
 
843
 
844
sc      sys_colors_new
844
sc      system_colors