Subversion Repositories Kolibri OS

Rev

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

Rev 3331 Rev 3337
Line 99... Line 99...
99
        flags           db ?
99
        flags           db ?
100
        type            db ?
100
        type            db ?
101
        name            rb MAX_WINDOWNAME_LEN
101
        name            rb MAX_WINDOWNAME_LEN
102
        users           dd ?
102
        users           dd ?
103
        users_scroll    dd ?
103
        users_scroll    dd ?
-
 
104
        selected        dd ?            ; selected user, 0 if none selected
104
ends
105
ends
Line 105... Line 106...
105
 
106
 
106
struct  window_data
107
struct  window_data
107
        text            rb 120*60
108
        text            rb 120*60
108
        title           rb 256
109
        title           rb 256
109
        names           rb MAX_NICK_LEN * MAX_USERS
-
 
110
        selected        dd ?            ; selected user, 0 if none selected
110
        names           rb MAX_NICK_LEN * MAX_USERS
111
        usertext        rb 256
111
        usertext        rb 256
112
        usertextlen     dd ?
112
        usertextlen     dd ?
Line 113... Line 113...
113
ends
113
ends
Line 229... Line 229...
229
        shr     eax, 8
229
        shr     eax, 8
Line 230... Line 230...
230
 
230
 
231
        cmp     ax, 1           ; close program
231
        cmp     ax, 1           ; close program
Line -... Line 232...
-
 
232
        je      exit
-
 
233
 
-
 
234
        cmp     ax, 50
-
 
235
        jne     @f
-
 
236
 
-
 
237
        mcall   37, 1           ; Get mouse position
-
 
238
        sub     ax, TEXT_Y
-
 
239
        mov     bl, 10
-
 
240
        div     bl
-
 
241
        and     eax, 0x000000ff
-
 
242
        inc     eax
-
 
243
        add     eax, [scroll1.position]
-
 
244
        mov     ebx, [window_open]
-
 
245
        mov     [ebx + window.selected], eax
-
 
246
 
-
 
247
        call    print_channel_list
-
 
248
 
-
 
249
        jmp     still
232
        je      exit
250
 
233
 
251
  @@:
Line 234... Line 252...
234
        sub     ax, WINDOW_BTN_START
252
        sub     ax, WINDOW_BTN_START
235
        jb      exit
253
        jb      exit