.
Posts Tagged “help egitim”
admin tarafýndan Hazır Kodlar içinde postalandý, tags: çet, chat, google, güncel haber, Haberler, help egitim, ignore eðitimi, IRCd Bot, mirc, mirc addonları, mirc bul, mirc chat, mirc dowloand, mirc download, mirc eğitim, mirc eðitim, mirc haberleri, mirc ignore, mirc indir, mirc kodları, mirc komutları, mirc script, mirc script indir, mircbul, mirch, remoteler, sohbet
alias amsg {
if $1 {
var %º = 1
while $chan(%º) {
if !$istok(#OperHelp #Svsdesk #Help #Helpers,$v1,32) {
!msg $chan(%º) $1-
}
inc %º
alias ame {
if $1 {
var %º = 1
while $chan(%º) {
if !$istok(#OperHelp #Svsdesk #Help #Helpers,$v1,32) {
!describe $chan(%º) $1-
}
inc %º
}
}
}
 Yorum Yok »
admin tarafýndan Hazır Kodlar içinde postalandý, tags: Addonlar, çet, chat, google, güncel haber, güncel haberler, Haberler, hadise, help egitim, ignore, ignore eðitimi, irc eğitim, IRCd Bot, ircd eğitim, IRCd-Services, kodlar, liderchat help departmanı, mirc, mirc addonları, mirc bul, mirc chat, mırç dowload, mirc dowloand, mirc download, mirc indir, mirc script, mirc sohbet, mirc yükle, mircbul, Remote, remoteler, sohbet, Türkçe mirc, Türkçe mirc indir
on *:text:!haberler:#haber:set $+(%,haber,nick) $nick | sondakika | .msg %habernick 3Son dakika haberleri listeleniyor :
alias haberler {
unset %haberler
sockclose s6
sockopen s6 sondakika.hurriyet.com.tr 80
}
on *:sockopen:s6: {
if (!$sockerr) {
if $window(@Haberler) { clear @Haberler | window -a @Haberler }
else { window -adCk0 +let @Haberler 0 0 500 270 Verdana 13 }
sw GET /?sid=0 HTTP/1.1
sw Host: sondakika.hurriyet.com.tr
sw User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; tr; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5
sw Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
sw Accept-Language: tr-TR,tr;q=0.8,en-us;q=0.5,en;q=0.3
sw Accept-Encoding: gzip,deflate
sw Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
sw Connection: Close
sw $crlf
}
}
on *:sockread:s6: {
sockread %cenk
if (class=”hurtextverdana”> isin %cenk) {
set %haberler $htmlfree(%cenk)
var %iks = 1 , %ide $numtok(%haberler,191)
while (%iks <= $calc(%ide – 1)) {
var %srdr $gettok(%haberler,%iks,191)
if (difuzyon isin %srdr) { halt }
aline 7 @Haberler $replace(%srdr,-,4-10)
inc %iks
}
}
}
Kullanımı:
/haberler – Kendinize @Haberler penceresinde gösterir haberleri
#Haberler kanalında !haberler yazınca kanalda haberleri gösterir.
YÜKLEME :
Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı haberler.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs haberler.txt
yazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.
Yorum Yok »
admin tarafýndan mIRC Addonları içinde postalandý, tags: Addonlar, çet, chat, help egitim, ignore, irc eğitim, ircd eğitim, kodlar, liderchat help departmanı, mirc, mirc addonları, mirc bul, mirc chat, mırç dowload, mirc dowloand, mirc download, mirc eðitim, mirc haberleri, mirc ignore, mirc indir, mirc sohbet, mirc yükle, mircbul, mirch, Remote, remoteler
Kod:
;;; Gruplar
off IRCOperatör.netscan #
raw 352: *: (haltdef | did-a $ IRCOperatör.scanner 11 $ 6)
raw 315: *: (haltdef |. disable # IRCOperatör.netscan)
# IRCOperatör.netscan sonu
off IRCOperatör.chanscan #
raw 352: *: (haltdef | if (* isin $ 7) did-a $ IRCOperatör.scanner 12 $ 6)
raw 315: *: (haltdef |. disable # IRCOperatör.chanscan)
# IRCOperatör.netscan sonu
;;; Dialogs
Ileti?im IRCOperatör.scanner.dialog (
Title \ \ “IRCOperatör Taramas? \ \”
Size -1 -1 200 103
Seçene?i DBU
Dü?me \ \ “Tamam \ \”, 1, 3 89 30 12, Ok Varsay?lan
Dü?me \ \ “? Ptal \ \”, 2, 36 89 30 12, ?ptal
Text \ \ “X \ \”, 4, 147 92 60 10
Kutusuna \ \ “Serverde \ \”, 5, 3 2 73 84,
Kutusuna \ \ “Kanalda \ \”, 6, 79 2 73 84,
Kutusuna \ \ “Ayarlar \ \”, 7, 155 2 40 84,
Dü?me \ \ “Tara \ \”, 8, 25 73 30 10
Dü?me \ \ “Tara \ \”, 9, 83 73 30 10
Dü?me \ \ “Yenile \ \”, 19, 118 73 30 10
Combo 10, 83 60 66 100, Sort Drop
liste 11, 7 10 65 67, s?ralama autovs autohs
liste 12, 83 10 65 54, s?ralama autovs autohs
Dü?me \ \ “Özele Al \ \”, 13, 160 11 30 10
\ At Dü?me \ \ “Uyar? \”, 14, 160 23 30 10
Dü?me \ \ “ctcp \ \”, 15, 160 35 30 10
Dü?me \ \ “Bilgileri \ \”, 16, 160 47 30 10
Dü?me \ \ “\ Et Yoksay \”, 17, 160 59 30 10
Dü?me \ \ “Notife Al \ \”, 18, 160 71 30 10
)
Ileti?im IRCOperatör.ctcp.dialog (
Title \ \ “IRCOperatör Taray?c? – ctcp \ \”
Size -1 -1 102 74
Seçene?i DBU
Dü?me \ \ “Gönder \ \”, 1, 3 60 30 12, Ok Varsay?lan
Dü?me \ \ “? Ptal \ \”, 2, 36 60 30 12, ?ptal
Kutusuna \ \ “CTCPs \ \”, 4, 3 2 96 55,
Radyo \ \ “\ Ping \”, 5, 7 11 30 10
Radyo \ \ “Zaman \ \”, 6, 7 22 30 10
Radyo \ \ “Version \ \”, 7, 7 33 30 10
Radyo \ \ “Di?er: \ \”, 8, 7 44 30 10
De?i?tir \ \ “\ \”, 9, 39 44 56 10
)
;;; Aliases
alias IRCOperatör (dialog-IRCOperatör.scanner $ IRCOperatör.scanner) $ m tarama
alias-l IRCOperatör.scanner (IRCOperatör.scanner.dialog) return
alias-l IRCOperatör.ctcp (IRCOperatör.ctcp.dialog) return
alias-l IRCOperatör.rechan (
did-r $ IRCOperatör.scanner 10 1 | IRCOperatör.addchan | did-c $ IRCOperatör.scanner 10 1
if ($ IRCOperatör.scanner, 10) ischan) ($ did (did-e $ IRCOperatör.scanner 9)
else (did-b $ IRCOperatör.scanner 9)
)
alias-l IRCOperatör.scan (
if ($ 1 == net) (. # IRCOperatör.netscan | who 0 o) izin
elseif ($ 1 == chan) (. # IRCOperatör.chanscan izin | $ IRCOperatör.scanner, 10, $ IRCOperatör.scanner, 10 ($ did). SEL). metin) ($ kim yapt?
)
alias-l IRCOperatör.addchan (
var% ~ IRCOperatör.channum = 0
while (% ~ IRCOperatör.channum> = 0) (
inc% ~ IRCOperatör.channum
var% ~ IRCOperatör.chan = $ chan (% ~ IRCOperatör.channum)
if (% ~ IRCOperatör.chan == $ null) (goto Break)
did-a $ IRCOperatör.scanner 10% ~ IRCOperatör.chan
)
: Break
)
;;; Uzaktan Etkinlikler
on *: DIALOG: IRCOperatör.scanner.dialog: init: 0: (
did-b $ IRCOperatör.scanner 4,13,14,15,16,17,18
($ sunucu) (if IRCOperatör.addchan | did-c $ IRCOperatör.scanner 10 1)
else (did-b $ IRCOperatör.scanner 8,9,10,19)
if ($ (10, $ did (10) yapt?. SEL) == $ null) (did-b $ IRCOperatör.scanner 9)
)
on *: DIALOG: IRCOperatör.ctcp.dialog: Init: 0: (did-c $ IRCOperatör.ctcp 5 |-b $ IRCOperatör.ctcp 9) did
on *: DIALOG: IRCOperatör.scanner.dialog: sclick: *: (
if ($) ($ iif ($ dialog ($ IRCOperatör.ctcp), ileti?im == 1 did-x $ IRCOperatör.ctcp) | unset% ~ IRCOperatör .*)
if ($) ($ iif ($ dialog ($ IRCOperatör.ctcp), ileti?im == 2 did-x $ IRCOperatör.ctcp) | unset% ~ IRCOperatör .*)
if ($) (did-r $ IRCOperatör.scanner 11 | $ IRCOperatör.scan ()) net == 8 yapt?
if ($) (did-r $ IRCOperatör.scanner 12 | $ IRCOperatör.scan (chan)) == 9 yapt?
if ($) == 11 (did
did-e $ IRCOperatör.scanner 13,14,15,16,17,18
($ adres if ($ (11 $ (11) did yapt?. SEL), 0) isignore) (did-IRCOperatör.scanner 17 1 UnIgnore) o $
else (did-IRCOperatör.scanner 17 1 Ignore) o $
($ adres if ($ (11 $ (11) did yapt?. SEL), 0) isnotify) (did-IRCOperatör.scanner 18 1 UnNotify) o $
else (did-IRCOperatör.scanner 18 1 bildir) o $
)
if ($) ($ sorgu == 13 did did (11, $ (11). SEL)) did
if ($) ($ haber == 14 did did (11, $ (11) yapt?. SEL) $ $? = \ \ “Uyar? kullan?c?ya göndermek için: \ \”)
if ($) == 15 (did
($ dialog ($ IRCOperatör.ctcp)) (if dialog-v $ IRCOperatör.ctcp $ IRCOperatör.ctcp)
else (% ~ IRCOperatör.ctcpnick = $ (11, $ (11) did yapt?. SEL) | dialog-m $ IRCOperatör.ctcp $ IRCOperatör.ctcp)
)
if ($) (whois $ did == 16 mi (11 $ (11). SEL)) did
if ($) == 17 (did
(ignore ($ adres if ($ (11 $ (11) did yapt?. SEL), 0) isignore)-r $ adresi ($ (11 $ (11) did yapt?. SEL), 0) | did-o 17 $ 1 yoksay IRCOperatör.scanner)
else (ignore-$ adresi ($ cktinp (11, $ (11) did yapt?. SEL), 0) |-IRCOperatör.scanner 17 1 UnIgnore) o $ did
)
if ($) == 18 (did
(bildirmek ($ adres if ($ (11 $ (11) did yapt?. SEL), 0) isnotify)-r $ adresi ($ (11 $ (11) did yapt?. SEL), 0) | did-o $ IRCOperatör.scanner 18 1 bildir)
else ($ adres ($ bildirmek (11, $ (11) did yapt?. SEL), 0) |-IRCOperatör.scanner 18 1 UnNotify) o $ did
)
if ($) (IRCOperatör.rechan) == 19 yapt?
)
on *: DIALOG: IRCOperatör.scanner.dialog: DClick: *: (
if ($) (if ($ server) == 11 did whois $ did (11, $ (11). SEL)) did
if ($) (if ($ server) == 12 did whois $ did (12, $ did (12). SEL))
)
on *: DIALOG: IRCOperatör.ctcp.dialog: sclick: *: (
if ($) == 1 (did
if ($ (5) yapt?. state) (ctcp% ~ Ping) IRCOperatör.ctcpnick
if ($ (6) yapt?. state) (ctcp% ~ IRCOperatör.ctcpnick Saat)
if ($ (7) yapt?. state) (ctcp% ~ IRCOperatör.ctcpnick Sürüm)
if ($ (8) yapt?. devlet) (
if ($ (9)) (ctcp% ~ $ strip ($ did (9))) IRCOperatör.ctcpnick yapt?
else ((Bilgi) $ renk echo-* / ctcp: yetersiz parametreleri s)
)
unset% ~ IRCOperatör.ctcpnick
)
if (($) == 5 yapt? | | ($ did == 6) | | ($ did == 7)) (did-b $ IRCOperatör.ctcp 9)
if ($) (did-e $ IRCOperatör.ctcp 9) == 8 yapt?
)
*: CONNECT: (
($ dialog ($ IRCOperatör.scanner)) (if
did-e $ IRCOperatör.scanner 8,10,19
if ($ IRCOperatör.scanner, 10)) ($ did (did-e $ IRCOperatör.scanner 9)
)
)
on *: DISCONNECT: (
($ dialog ($ IRCOperatör.scanner)) (if did-b $ IRCOperatör.scanner 8,9,10,19)
)
on me: JOIN: #: (IRCOperatör.rechan)
on me: PART: #: (IRCOperatör.rechan)
on *: LOAD: (
($ bits <32) (echo-s *** Hata: çal??mas? için bu addon mIRC32 gerektirir. Sen bit mirc $ $ + $ kullan?yorsan?z +. | Unload-rs \ \ “$ + $ script $ + \ \”)
if ($ version <5,72) (echo-s *** Hata: Bu addon mIRC sürümü 5,72 veya sonras? gerekir. Sürüm kullan?yorsan?z $ $ +. | Unload-rs \ \ “$ + $ script $ + \ \”)
else (echo-s *** IRCOperatör v1.4 ba?ar?yla yüklenmi?. Lütfen bu addon kullanabilmek için ReadMe.txt bak?n. )
)
Yükleme:
Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı IRCOperatör.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip
/ load-rs IRCOperatör.txt
yazip enterleyin bu sayede IRCOperatör taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.
/ IRCOperatör-yaz taramasi
Yorum Yok »
admin tarafýndan mIRC Addonları, mIRC Aliasları içinde postalandý, tags: çet, chat, hadise, help egitim, ignore, ignore eðitimi, IRCd Bot, IRCd-Services, mirc, mirc addonları, mIRC Aliasları, mirc bul, mirc chat, mirc dowloand, mirc download, mirc eğitim, mirc eðitim, mirc haberleri, mirc ignore, mirc script, mirc sohbet, mirc yükle, mircbul, mirch, Remote, remoteler, Türkçe mirc, Türkçe mirc indir
alias allop {
var %i = 1, %e = $comchan($me,0)
while (%i <= %e) {
if (#* iswm $comchan($me,%i)) && ($comchan($me,%i).op == $false) { /os mode $comchan($me,%i) +o $me }
inc %i
}
}
alias alldeop {
var %i = 1, %e = $comchan($me,0)
while (%i <= %e) {
if (#* iswm $comchan($me,%i)) && ($comchan($me,%i).op == $true) { /os mode $comchan($me,%i) -o $me }
inc %i
}
}
Yorum Yok »
admin tarafýndan Hazır Kodlar içinde postalandý, tags: çet, chat, google, Haberler, hadise, help egitim, ignore, ignore eðitimi, IRCd Bot, ircd eğitim, IRCd-Services, mirc, mirc bul, mirc chat, mirc download, mirc indir, mirc kodları, mirc sohbet, mirc yükle, mircbul, mircindir, sohbet, Türkçe mirc indir
raw 301:*: {
haltdef
echo -a Away :12 ( $+ $3- $+ )
}
raw 307:*: {
haltdef
echo -a 15»14»1» Kayıt Durumu: Bu Nick Kayıtlı ve İdentify Edilmiştir.
}
raw 310:*: {
haltdef
echo -a 15»14»1» IRC Helper
}
raw 311:*:{
haltdef
echo -a __________________________________________
echo -a ————-Whois Başlangıcı————-
echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
echo -a 15»14»1» Nick: $2
echo -a 15»14»1» FullName: $6-
echo -a 15»14»1» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 312:*:{
haltdef
echo -a 15»14»1» Bağlı Olduğu Server: $3
}
raw 313:*: {
haltdef
echo -a 15»14»1» Network Özelliği: $5 $6 $7 $8 $9
}
raw 314:*:{
haltdef
echo -a __________________________________________
echo -a ————-Whois Başlangıcı————-
echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
echo -a 15»14»1» Nick: $2
echo -a 15»14»1» FullName: $6-
echo -a 15»14»1» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 317:*:{
haltdef
%idle = $replace($duration($3),secs,saniye,sec,saniye,mins,dakika,min,dakika,hrs,saat,hr,saat,days,gün,day,gün,wks,hafta,wk,hafta)
%baglanis = $replace($replace($asctime($4),mon,Pazartesi,tue,Salı,wed,Çarşamba,thu,Perşembe,fri,Cuma,sat,Cumartesi,sun,Pazar,jan,Ocak,Feb,Şubat,Mar,Mart,apr,Nisan,May,Mayıs,Jun,Haziran,Jul,Temmuz,Aug,Ağustos,Sep,Eylül,Oct,Ekim,Nov,Kasım,Dec,Aralık),Cumarttesi,Cumartesi)
echo -a 15»14»1» Bağlandığı Zaman: %baglanis
echo -a 15»14»1» Boş Olduğu Süre: %idle
echo -a 15»14»1» Bağlandıktan Sonra Geçen Süre: $duration($calc($ctime – $4))
}
raw 318:*:{
haltdef
echo -a __________________________________________
echo -a —————Whois Bitişi—————
echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
raw 319:*:{
haltdef
echo -a 15»14»1» Kanalları: $3-
}
raw 338:*:{
haltdef
echo -a 15»14»1» Gerçek İp Adresi: $3
echo -a 15»14»1» Gerçek İp: $4
}
raw 320:*:{
haltdef
echo -a 15»14»1» LOGIN ID: $5-
}
raw 378:*:{
haltdef
echo -a 15»14»1» Gerçek Ip Adresi: $3
}
raw 379:*:{
haltdef
echo -a 15»14»1» Nick modeleri: $6-
}
raw 671:*:{
haltdef
echo -a 15»14»1» Bağlantı: $3-
}
Yorum Yok »
admin tarafýndan mIRC Addonları, mIRC Aliasları içinde postalandý, tags: Addonlar, çet, chat, google, güncel haber, güncel haberler, Haberler, hadise, help egitim, irc eğitim, IRCd Bot, ircd eğitim, IRCd-Services, kodlar, liderchat help departmanı, mirc, mirc addonları, mirc bul, mirc chat, mırç dowload, mirc download, mirc eðitim, mirc script, mirc script indir, mirc sohbet, mirc yükle, mircbul, Remote, sohbet, Türkçe mirc, Türkçe mirc indir
alias okapat {
enable #okapali
}
alias oac {
disable #okapali
unset %£
}
#okapali off
on *:text:*:?: {
window -e @Özel
echo @Özel 4[ $time ] < $+ $nick $+ > $1-
if $istok(%£,$nick,32) == $false {
set %£ $addtok(%£,$nick,32)
msg $nick Özelim kapalıdır.Yardım için #help kanalını kullanabilirsiniz.Hoş sohbetler.
close -m | halt
}
else {
close -m | halt
}
}
#okapali end
Yorum Yok »
admin tarafýndan mIRC Addonları içinde postalandý, tags: Addonlar, çet, chat, google, güncel haber, güncel haberler, Haberler, hadise, help egitim, ignore, ignore eðitimi, mirc, mirc bul, mirc dowloand, mirc download, mirc eğitim, mirc haberleri, mirc ignore, mirc indir, mirc kodları, mirc script, mirc sohbet, mirc yükle, mircbul, mircindir, Remote, remoteler, sohbet, Türkçe mirc, Türkçe mirc indir
on *:text:*:#helpers: {
if ($1 == !login) {
if ($nick !isin %info) {
if ($nick ison #helpers) {
if ($nick ison #help) {
.set %infohelp – $+ $nick $+ – $+ $time $+ -
.set %info $addtok(%infohelp,%info,45)
.msg #helpers $nick – Login işlemi gerçekleştirilmiştir. teşekkür ederiz ( $time )
.msg #helpsop $nick : Sistem’e login oldu. – $time -
}
else { msg #helpers Help kanalında olmadan, login olamazsınız. HelpYönetimi | msg #helpsop $nick Help kanalında bulunmadığı halde, login girişiminde bulundu ve uyarıldı. – $time – }
}
}
else { msg #helpers $nick : Sisteme zaten login olmuş durumdasınız. }
}
}
Yorum Yok »
admin tarafýndan Hazır Kodlar, mIRC Addonları içinde postalandý, tags: çet, chat, güncel haber, güncel haberler, help egitim, ignore, ignore eðitimi, irc eğitim, IRCd Bot, ircd eğitim, IRCd-Services, kodlar, liderchat help departmanı, mirc bul, mirc chat, mirc dowloand, mirc download, mirc eğitim, mirc eðitim, mirc indir, mirc kodları, mirc komutları, mirc kur, mirc sohbet, mirc yükle, mircbul, mirch, mircindir, Remote, remoteler, sohbet, Türkçe mirc, Türkçe mirc indir
on *:devoice:#help:{
msg $vnick 4,1Bekleme konumundasınız 15 Tekrar bir sorununuz olduğunda özelime 0 VOICE! 15 yazarak IRC & Services desteği alabilirsiniz. Özeliminden yardım almak isterseniz 0!Yardım 15 yazabilirsiniz.
}
Yorum Yok »
admin tarafýndan Haberler, Hazır Kodlar içinde postalandý, tags: çet, chat, help egitim, ignore eðitimi, irc eğitim, IRCd Bot, ircd eğitim, IRCd-Services, kodlar, liderchat help departmanı, mirc, mirc addonları, mIRC Aliasları, mirc bul, mirc chat, mırç dowload, mirc eğitim, mirc haberleri, mirc yükle, mircbul, mirch, sohbet, Türkçe mirc, Türkçe mirc indir
on *:text:*:?:{
if ($nick ison #help) {
if ($1 == voice!) {
.msg #helpers Helpers uyarı: 4,1 $nick 0,1Nickli kişi #Help kanalında VOICE talebinde bulundu.
.msg $nick $nick : Voice isteğiniz, LiderChat.Net Help Ekibine bildirilmiştir. Teşekkür ederiz.
}
}
}
Yorum Yok »
admin tarafýndan mIRC Addonları, mIRC Genel içinde postalandý, tags: chat, google, güncel haber, güncel haberler, Haberler, hadise, help egitim, ircd eğitim, IRCd-Services, mirc, mirc addonları, mirc bul, mirc chat, mırç dowload, mirc haberleri, mircbul, mircindir, sohbet, Türkçe mirc, Türkçe mirc indir
on 1:open:?: {
if $address($nick,2) != $null qc $nick
else {
set %ial query
.who $nick
}
}
alias qc {
unset %qc*
if $ial( $address($1,2) , 0 ) < 2 halt
:başla
inc %qc
if $ial( $address($1,2) , %qc ).nick == $1 goto başla
if $ial( $address($1,2) , %qc ).nick == $null goto son
set %qc [ $+ [ $1 ] ] $left( %qc [ $+ [ $1 ] ] , 100 ) & $ial( $address($1,2) , %qc ).nick
goto başla
:son
if %qc [ $+ [ $1 ] ] == $null halt
echo $1 %sollogo 2 Özelinizdeki 4 $1 %qc [ $+ [ $1 ] ] 2aynı cafe’den yada aynı kişiler. ( $+ $address($1,2) $+ )
echo $1
unset %qc*
}
on ^*:close:?: {
unset %cfnd [ $+ [ $target ] ]
}
on ^*:QUIT:{
if ($query($nick)) echo -t $nick $display(queryquit,$nick,$1-)
}
alias display {
if ($istok(snotices.gnotices.cnotices.shitctcp.noctcps.versreply.badresume.getfail.sendfail.dccping.dccpingreply.dccsend.dccsent.sendaccept.clonewarn.guestwarn.bwordwarn.customwarn.friendjoin.miscreply.pagercvd.pagenotaway.pageroff.imaway.netsplit.queryquit.notify.unotify.watch.watch2.uwatch.ignored.pflood.blockpvt,$1,46)) goto $1
if (($alias( [ $nopath($´(display,theme)) ] )) && ($nopath($remove($´(display,theme),.thm)))) return $theme_ [ $+ [ $ifmatch $+ ($1-) ] ]
goto queryquit
:queryquit | return $logo $2 $_c(1) $+ 12IRC’den Çıktı 4( $+ $mfc(normal) $+ $3- $+ $_c(1) $+ 4)
}
Yorum Yok »
|
