IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - /list komutuyla ilgili... (https://www.ircforumlari.net/mirc-scripting-sorunlari/154217-list-komutuyla-ilgili.html)

/list komutuyla ilgili...

Sunucuda 5 dkda bir /List çekip #Oyun,#Radyo dışında en çok kullanıcının olduğu 2 kanala yeni gelen kullanıcıları joinlemek istiyorum.. Yardımcı olursanız çok sevinirim..

Cevap: /list komutuyla ilgili...

Sanırım yukarda dediğim şekilde çok karmaşık kod dizisi oluşuyor..Sunucuya connect olan kullanıcıları en çok kullanıcı yoğunluğu olan 2 kanala joinlemek istiyorum..Bu konuda yardımınızı bekliyorum.

Cevap: /list komutuyla ilgili...

Kod:

alias _getusr {

var %xc = $hget(chlist,0).data | unset %chlist

while (%xc) { set %chlist $addtok(%chlist,$hget(chlist,%xc).data,46) | dec %xc }

var %sira = $sorttok(%chlist,46,nr)

var %1 = 1,%2 = 1,%3 = 1,%4 = 1,%5 = 1

%1 = $fazlaise($gettok(%sira,1,46)) | %2 = $fazlaise($gettok(%sira,2,46)) | %3 = $fazlaise($gettok(%sira,3,46)) | %4 = $fazlaise($gettok(%sira,4,46)) | %5 = $fazlaise($gettok(%sira,5,46))

set %joinchan $+(%1,$chr(44),%2,$chr(44),%3,$chr(44),%4,$chr(44),%5)

unset %w %y

}

alias -l fazlaise {

unset %y | unset %w 

var %i = $hfind(chlist,$1,0,w).data

while (%i) { %y = $hfind(chlist,$1,%i,w).data | %w = %y %w | dec %i }

return $replace($sorttok(%w,32,a),$chr(32),$chr(44))

}

raw 322:*:{

if (!$hget(chlist)) { hmake chlist }

if ($3 >= 50) && !$regex($2,/^(#oyun|#radyo)$) { hadd chlist $2 $3 }

}

raw 323:*:{ $_getusr }

on *:SNOTICE:*:{

if (Connecting isin $1-) {

if (*on*port* iswm $1-) { sajoin $9 %joinchan }

else { sajoin $8 %joinchan }

}

}

Teşekkürünü GemLik'e edersin, o rica etmeseydi yazmazdım bu kodu :)

yapacağın tek şey on connect eventine 5 dakikalık bir list eventi eklemek
yoksa bunu ekle:

Kod:

on *:connect:timer 0 300 /list

Cevap: /list komutuyla ilgili...

saolasın dayı güzel kod ve güzel çalışma :) hemde bir çok arkadaşın işine yarayacağına eminim