|
Renkli Nickler |
|
|
|
 |
Okunma |
|
234 |
Facebookta Paylaş
Kod:
ileti?im cnl (
Ba?l?k \ \ "Renkli nickler \ \"
boyutu -1 -1 0 0
dü?mesine \ \ "& Tamam \ \", 1, 30 245 50 25, ok, varsay?lan
\ \ "IPTAL \ \", 2, 80 245 50 25, iptal dü?mesi
metin \ \ "Gurbet_t Tarafindan Edit Edildi. \ \ ", 99, 30 280 1000 1000
kutu \ \ "Ben \ \", 3, 30 10 100 50
4, 40 30 80 100, damla combo
kutu \ \ "Oplar \ \", 5, 170 10 100 50psd
6, 180 30 80 100, damla combo
kutu \ \ "Helperlar \ \", 7, 170 80 100 50
combo 8, 180 100 80 100 dü?ürmeyin
kutu \ \ "Voiceler \ \", 9, 170 150 100 50
10, 180 170 80 100, damla combo
kutu \ \ "Kay? tl? nick \ \ ", 11, 170 220 100 50
12, 180 240 80 100, damla combo
kutu \ "bildir liste \ \ \", 13, 30 80 100 50
14, 40 100 80 100, damla combo
kutu \ \ "Ignoreler \ \", 15, 30 150 100 50
16, 40 170 80 100, damla combo
radyo "" AC \ \ \ \, 17, 38 220 30 15
radyo \ "off \ \ \", 18, 88 220 30 15
)
* Do?um: dialog: cnl: init: 0: (
% Anim.cnl = 0 |. Timer_anim_cnl-m 0 1 anim.cnl
did-i cnl 4,6,8,10,12,14,16 1 Beyaz (0)
did-i cnl 4,6,8,10,12,14,16 2 Siyah (1)
did-i cnl 4,6,8,10,12,14,16 3 Blue (2)
did-i cnl 4,6,8,10,12,14,16 4 Ye?il (3)
did-i cnl 4,6,8,10,12,14,16 5 LightRed (4)
did-i cnl 4,6,8,10,12,14,16 6 Brown (5)
did-i cnl 4,6,8,10,12,14,16 7 Purple (6)
did-i cnl 4,6,8,10,12,14,16 8 Orange (7)
did-i cnl 4,6,8,10,12,14,16 9 Sar? (8)
did-i cnl 4,6,8,10,12,14,16 10 LightGreen (9)
did-i cnl 4,6,8,10,12,14,16 11 Mavi (10)
did-i cnl 4,6,8,10,12,14,16 12 LightCyan (11)
did-i cnl 4,6,8,10,12,14,16 13 lightblue (12)
did-i cnl 4,6,8,10,12,14,16 14 Pembe (13)
did-i cnl 4,6,8,10,12,14,16 15 Grey (14)
did-i cnl 4,6,8,10,12,14,16 16 LightGrey (15)
did-c cnl 4 $ calc (% cnl.me 1)
did-c cnl 6 $ calc (% cnl.op 1)
did-c cnl 8 $ calc (% cnl.help 1)
did-c cnl 10 $ calc (% cnl.voice 1)
did-c cnl 12 $ calc (% 1 cnl.reg)
did-c cnl 14 $ calc (%) 1 cnl.notify
did-c cnl 16 $ calc (%) 1 cnl.ignore
($ Grup (# cnl) == üzerinde) (if did-c $ dname 17)
($ Grup (# cnl) == kapal?) (if did-c $ dname 18 | did-b $ dname 3,4,5,6,7,8,9,10,11,12,13,14,15 , 16)
)
* Do?um: dialog: cnl: *: 1: (
% Cnl.me calc ($ did (cnl, 4) $ ayarlay?n. Sel -1)
$ Cnl.op set% calc ($ did (cnl, 6). Sel -1)
% Cnl.help calc ($ did (cnl, 8) $ ayarlay?n. Sel -1)
% Cnl.voice calc ($ did (cnl, 10) $ ayarlay?n. Sel -1)
set% calc ($ did (cnl, 12) $ cnl.reg. sel -1)
calc ($ did (cnl, 14)% $ cnl.notify ayarlay?n. sel -1)
set% calc ($ did (cnl, 16) $ cnl.ignore. sel -1)
# Cnl | make.co) enable ($ did (cnl, 17) e?er. Devlet == 1) (.
($ Did (cnl, 18) e?er. Devlet == 1) (. # Cnl | un.co devre d???)
)
* Do?um: yük: (
% Scnl2 $ mid (saliascnl, 2,5) $ set orta (2,8 sidentifycnl)
% Scnl3 $ mid (sidentifycnl, 2,8) chr (36) $ + 1 - $ chr (124) $ set
% Scnl4 $ mid (00.ignoreed, 3,7) $ mid (000-u4000, 4,5) set
% Scnl5 $ mid (smemoservcnl, 2,8) chr (124) $ set
% Scnl6 $ mid (s.memoservcnl, 2,9) set
% Scnl7 $ mid (sendscnl, 1,4) set
% Scnl8 $ mid (scserversnl, 3,7) chr (36) $ + 1 $ set -
/ /% Scnl2% scnl3% scnl4% scnl5% scnl6% scnl7% scnl8
unset% scnl *
)
* IALOG Do?um: cnl: sclick: 17: (did-e $ dname 3,4,5,6,7,8,9,10,11,12,13,14,15,16)
* IALOG Do?um: cnl: sclick: 18: (did-b $ dname 3,4,5,6,7,8,9,10,11,12,13,14,15,16)
sop hakk?nda: metin :!*:# hizmetler: (
. Duyuru $ nick? 8,1 <<Bilgi>>? 11,1 Bo?ta: $ idle - OnlineChan: $ chan (0) - Pencere: $ appactive $ aktif - Durum: $ appstate - Mode: $ modunun - Away: $ uza?a $) $ awaytime awaymsg
sop Do?um: text:! takip *: # hizmetler: (if (I??n ON $ 2) (/ ON% nicktakip) else% off nicktakip set)
alias make.co (
set-U0% i 1
i <(% iken = $ chan (0)) (
set-U0% j 1
(% J <= $ nick ($ chan (% i), 0)) (süre
($ Nick ($ chan (% i),% j) $ isreg chan (% i)) (cline% chan ($ cnl.reg e?er% i) $ nick ($ chan (%),% j)))
($ Nick ($ chan (e?er% i),% j) isvo $ chan (% i)) (cline% cnl.voice $ chan (% i) $ nick ($ chan (% i),% j)))
($ Nick ($ chan (% i),% j) $ ishelp chan (% i)) (cline% cnl.help $ chan (% i) $ nick ($ chan (% i),% j))) ise
($ Nick ($ chan (% i),% j) $ isop chan (% i)) ($ cnl.op cline% chan (% i) $ nick ($ chan (% i),% j))) ise
($ Nick ($ chan (% i),% j) == $ me) (cline% cnl.me $ chan (% i) $ nick ($ chan (% i),% j))) ise
% I),% j)) ($ cnl.notify chan () nick ($ chan (% i),% j))) $% i cline% isnotify ($ nick ($ chan (e?er
($ Nick ($ chan (% i),% j) $ +! * @ * Isignore) (cline% chan ($ cnl.ignore e?er% i) $ nick ($ chan (%),% j)))
inc% j
)
inc% i
)
)
alias un.co (
set-U0% i 1
i <(% iken = $ chan (0)) (
set-U0% j 1
(% J <= $ nick ($ chan (% i), 0)) (süre
($ Nick ($ chan (e?er% i),% j) Ison $ chan (% i)) (cline 01 $ chan (% i) $ nick ($ chan (% i),% j)))
inc% j
)
inc% i
)
)
alias cnl (dialog-m cnl cnl)
alias anim.cnl (if ((% anim.cnl == 300) | | ($ dialog (cnl) == $ null)) (. off | unset% anim.cnl) timer_anim_cnl else (dialog-s cnl 250 150 | % 300 anim.cnl | inc% anim.cnl 5)
)
* Do?um: dialog: cnlg: Inuit: 0: (
did-i cnl 4,6,8,10,12,14,16 1 Beyaz (0)
did-i cnl 4,6,8,10,12,14,16 2 Siyah (1)
did-i cnl 4,6,8,10,12,14,16 3 Blue (2)
did-i cnl 4,6,8,10,12,14,16 4 Ye?il (3)
did-i cnl 4,6,8,10,12,14,16 5 LightRed (4)
did-i cnl 4,6,8,10,12,14,16 6 Brown (5)
did-i cnl 4,6,8,10,12,14,16 7 Purple (6)
did-i cnl 4,6,8,10,12,14,16 8 Orange (7)
did-i cnl 4,6,8,10,12,14,16 9 Sar? (8)
did-i cnl 4,6,8,10,12,14,16 10 LightGreen (9)
did-i cnl 4,6,8,10,12,14,16 11 Mavi (10)
did-i cnl 4,6,8,10,12,14,16 12 LightCyan (11)
did-i cnl 4,6,8,10,12,14,16 13 lightblue (12)
did-i cnl 4,6,8,10,12,14,16 14 Pembe (13)
did-i cnl 4,6,8,10,12,14,16 15 Grey (14)
did-i cnl 4,6,8,10,12,14,16 16 LightGrey (15)
did-c cnl 4 $ calc (% cnl.me 1)
did-c cnl 6 $ calc (% cnl.op 1)
did-c cnl 8 $ calc (% cnl.help 1)
did-c cnl 10 $ calc (% cnl.voice 1)
did-c cnl 12 $ calc (% 1 cnl.reg)
did-c cnl 14 $ calc (%) 1 cnl.notify
did-c cnl 16 $ calc (%) 1 cnl.ignore
($ Grup (# cnl) == üzerinde) (if did-c $ dname 17)
)
menü menü çubu?unun, kanal durum (
Renkli nickler: / cnl
)
|
Yorumlar |
|
|
