Subversion Repositories Kolibri OS

Rev

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

Rev 6596 Rev 7090
Line 1... Line 1...
1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2
;;                                                                 ;;
2
;;                                                                 ;;
3
;; Copyright (C) KolibriOS team 2004-2016. All rights reserved.    ;;
3
;; Copyright (C) KolibriOS team 2004-2017. All rights reserved.    ;;
4
;; Distributed under terms of the GNU General Public License       ;;
4
;; Distributed under terms of the GNU General Public License       ;;
5
;;                                                                 ;;
5
;;                                                                 ;;
6
;;  IRC client for KolibriOS                                       ;;
6
;;  IRC client for KolibriOS                                       ;;
7
;;                                                                 ;;
7
;;                                                                 ;;
8
;;   Written by hidnplayr@kolibrios.org,                           ;;
8
;;   Written by hidnplayr@kolibrios.org,                           ;;
Line 11... Line 11...
11
;;         GNU GENERAL PUBLIC LICENSE                              ;;
11
;;         GNU GENERAL PUBLIC LICENSE                              ;;
12
;;          Version 2, June 1991                                   ;;
12
;;          Version 2, June 1991                                   ;;
13
;;                                                                 ;;
13
;;                                                                 ;;
14
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
14
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 15... Line 15...
15
 
15
 
Line 16... Line 16...
16
version equ '0.29'
16
version equ '0.30'
17
 
17
 
18
; connection status
18
; connection status
19
STATUS_DISCONNECTED     = 0
19
STATUS_DISCONNECTED     = 0
Line 291... Line 291...
291
        mov     eax, [ebx + window.selected]
291
        mov     eax, [ebx + window.selected]
292
        dec     eax
292
        dec     eax
293
        imul    eax, MAX_NICK_LEN
293
        imul    eax, MAX_NICK_LEN
294
        mov     ebx, [ebx + window.data_ptr]
294
        mov     ebx, [ebx + window.data_ptr]
295
        lea     esi, [ebx + window_data.names + eax]
295
        lea     esi, [ebx + window_data.names + eax]
-
 
296
; Strip user prefixes
-
 
297
        cmp     byte[esi], '~'
-
 
298
        je      .inc
-
 
299
        cmp     byte[esi], '&'
-
 
300
        je      .inc
-
 
301
        cmp     byte[esi], '@'
-
 
302
        je      .inc
-
 
303
        cmp     byte[esi], '%'
-
 
304
        je      .inc
-
 
305
        cmp     byte[esi], '+'
-
 
306
        je      .inc
-
 
307
  .open:
296
        call    window_open
308
        call    window_open
297
        test    ebx, ebx
309
        test    ebx, ebx
298
        jz      mainloop
310
        jz      mainloop
299
        mov     [window_active], ebx
311
        mov     [window_active], ebx
300
        call    redraw
312
        call    redraw
Line 301... Line 313...
301
 
313
 
-
 
314
        jmp     mainloop
-
 
315
  .inc:
-
 
316
        inc     esi
Line 302... Line 317...
302
        jmp     mainloop
317
        jmp     .open
303
 
318
 
304
  @@:
319
  @@: