Subversion Repositories Kolibri OS

Rev

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

Rev 3191 Rev 3215
Line 49... Line 49...
49 
        mov     edi, [window_open]
 49 
        mov     edi, [window_open]
50 
        cmp     [edi + window.type], WINDOWTYPE_CHANNEL
 50 
        cmp     [edi + window.type], WINDOWTYPE_CHANNEL
51 
        jne     .not_channel
 51 
        jne     .not_channel
Line 52... Line 52...
52 
 
 52 
 
53 
        mov     ebx, [xsize]
 53 
        mov     ebx, [xsize]
54 
        sub     ebx, 100
 54 
        sub     ebx, USERLIST_X + SCROLLBAR_WIDTH + 3
55 
        push    bx
 55 
        push    bx
56 
        shl     ebx, 16
 56 
        shl     ebx, 16
57 
        pop     bx
 57 
        pop     bx
58 
        mov     ecx, [ysize]
 58 
        mov     ecx, [ysize]
Line 72... Line 72...
72 
        mov     eax, [ysize]
 72 
        mov     eax, [ysize]
73 
        sub     eax, 30 ;;;;;;
 73 
        sub     eax, 30 ;;;;;;
74 
        mov     [edit1.top], eax
 74 
        mov     [edit1.top], eax
Line 75... Line 75...
75 
 
 75 
 
76 
        mov     eax, [xsize]
 - 
 
77 
        sub     eax, 10 ;;;;;;
 76 
        mov     eax, [xsize]
Line 78... Line 77...
78 
        mov     [edit1.width], eax
 77 
        mov     [edit1.width], eax
79 
 
 78 
 
Line 105... Line 104...
105 
 
 104 
 
Line 106... Line 105...
106 
print_channel_list:
 105 
print_channel_list:
Line 107... Line 106...
107 
 
 106 
 
Line 108... Line 107...
108 
        pusha
 107 
        pusha
109 
 
 108 
 
110 
        mov     eax, 13                 ; draw rectangle (clear list)
 109 
        mov     eax, 13                         ; draw rectangle (clear list)
111 
 
 110 
 
- 
 
 111 
        mov     ebx, [xsize]
112 
        mov     ebx, [xsize]
 112 
        sub     ebx, USERLIST_X + SCROLLBAR_WIDTH
113 
        sub     ebx, 95
 113 
        shl     ebx, 16
114 
        shl     ebx, 16
 114 
        push    ebx
115 
        push    ebx
 115 
        mov     bx, USERLIST_X
Line -... Line 116...
- 
 
 116 
        mov     ecx, [ysize]
- 
 
 117 
        add     ecx, TEXT_Y shl 16 - (TEXT_Y + 35 + 10 )        ;;;;;
- 
 
 118 
        mov     edx, [colors.work]
- 
 
 119 
        mcall
- 
 
 120 
 
- 
 
 121 
        mov     eax, [scroll1.position]
116 
        mov     bx,  90                         ; x size ;;; FIXME
 122 
        xor     edx, edx
- 
 
 123 
        mov     ecx, MAX_NICK_LEN
- 
 
 124 
        mul     ecx
117 
        mov     ecx, TEXT_Y shl 16 + 12*10      ; y size ;;; FIXME
 125 
        mov     edx, eax
118 
        mov     edx, [colors.work]
 126 
        mov     eax, [window_open]
119 
        mcall
 127 
        add     edx, [eax + window.data_ptr]
120 
 
 128 
        add     edx, window_data.names
121 
        mov     eax, 4                  ; draw text
 - 
 
122 
        pop     ebx
 129 
 
- 
 
 130 
        pop     ebx
123 
        mov     bx, TEXT_Y
 131 
        mov     bx, TEXT_Y
124 
        mov     ecx, [colors.work_text]
 132 
        mov     ecx, [colors.work_text]
125 
        or      ecx, 0x80000000         ; ASCIIZ string
 133 
        or      ecx, 0x80000000                 ; ASCIIZ string
- 
 
 134 
        mov     eax, 4                          ; draw text
- 
 
 135 
 
- 
 
 136 
        mov     edi, [ysize]                    ; Calculate how many names will fit on screen
126 
        mov     edx, [window_open]
 137 
        sub     edi, TEXT_Y + 35 + 10           ;;;;;
Line 127... Line 138...
127 
        mov     edx, [edx + window.data_ptr]
 138 
  .loop:
128 
        add     edx, window_data.names
 139 
        ; TODO: check if name is selected and highlight background color if so
129 
        mov     edi, MAX_CHANNELS
 140 
        cmp     byte[edx], ' '                  ; end of list?
130 
  .loop:
 141 
        je      .done
- 
 
 142 
        mcall
Line 131... Line 143...
131 
        mcall
 143 
 
Line 132... Line 144...
132 
 
 144 
        add     edx, MAX_NICK_LEN               ; next name