Subversion Repositories Kolibri OS

Rev

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

Rev 7889 Rev 7890
Line 1... Line 1...
1 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 1 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2 
;;                                                                 ;;
 2 
;;                                                                 ;;
3 
;; Copyright (C) KolibriOS team 2004-2018. All rights reserved.    ;;
 3 
;; Copyright (C) KolibriOS team 2004-2020. 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.31'
 16 
version equ '0.32'
17 
 
 17 
 
18 
; connection status
 18 
; connection status
19 
STATUS_DISCONNECTED     = 0
 19 
STATUS_DISCONNECTED     = 0
Line 184... Line 184...
184 
        call    window_create_textbox
 184 
        call    window_create_textbox
185 
        test    eax, eax
 185 
        test    eax, eax
186 
        jz      exit
 186 
        jz      exit
187 
        mov     [ebx + window.type], WINDOWTYPE_SERVER
 187 
        mov     [ebx + window.type], WINDOWTYPE_SERVER
Line 188... Line -...
188 
 
 - 
 
189 
; get system colors
 - 
 
190 
        mcall   48, 3, colors, 40
 - 
 
191 
 
 - 
 
192 
; set edit box and scrollbar colors
 - 
 
193 
        mov     eax, [colors.work]
 - 
 
194 
        mov     [scroll1.bg_color], eax
 - 
 
195 
        mov     [scroll2.bg_color], eax
 - 
 
196 
 
 - 
 
197 
        mov     eax, [colors.work_button]
 - 
 
198 
        mov     [scroll1.front_color], eax
 - 
 
199 
        mov     [scroll2.front_color], eax
 - 
 
200 
 
 - 
 
201 
        mov     eax, [colors.work_text]
 - 
 
202 
        mov     [scroll1.line_color], eax
 - 
 
203 
        mov     [scroll2.line_color], eax
 - 
 
204 
 
 - 
 
205 
        mov     [scroll1.type], 1               ; 0 = simple, 1 = skinned
 - 
 
206 
        mov     [scroll2.type], 1
 - 
 
207 
 
 188 
 
208 
; get settings from ini
 189 
; get settings from ini
209 
        invoke  ini.get_str, path, str_user, str_nick, user_nick, MAX_NICK_LEN, default_nick
 190 
        invoke  ini.get_str, path, str_user, str_nick, user_nick, MAX_NICK_LEN, default_nick
210 
        invoke  ini.get_str, path, str_user, str_real, user_real_name, MAX_REAL_LEN, default_real
 191 
        invoke  ini.get_str, path, str_user, str_real, user_real_name, MAX_REAL_LEN, default_real