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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Away'da Reklam Hakkında... (https://www.ircforumlari.net/mirc-scripting-sorunlari/6511-awayda-reklam-hakkinda.html)

MephisTo 18 Ağustos 2005 00:13

Hımm, şöyle birşey olabilir.

on *:join:#: { if ($nick == $me) && ($chan == #kanal) { enable #whoisreply | /timer 0 150 /who #kanal } }

raw 352:*: { if (G isin $7) { set %whoislenecekler $addtok(%whoislenecekler,$6,32) } }
raw 315:*: { if %whoislenecekler != $null { whoislebakiim } }

alias whoislebakiim {
var %x = $numtok(%whoislenecekler,32)
var %y = 1
while %y <= %x {
var %a = $gettok(%whoislenecekler,%y,32)
.timer 1 %y whois %a
if %y = %x { unset %whoislenecekler | halt }
inc %y
}
}

raw 301:*:{
var %i $lines(aways.txt)
while $read(aways.txt,%i) {
.set %awmsg $ifmatch
if (%awmsg isin $3-) .ucur $2
dec %i
}
unset %awmsg
}

alias ucur {
if ($comchan($1,0)) {
var %? $comchan($1,0)
if ($me isop $comchan($1,%?)) {
while (%? > 0) {
echo -a $comchan($1,%?)
.ban $comchan($1,%?) $1
.kick $comchan($1,%?) $1 12 Away de kufur..!!!
dec %?
}
}

MaeLStrOm 18 Ağustos 2005 00:31

raw 352:*: {
if (G isin $7) {
if (%deneme == $null) { set %deneme $6 } | else {
set %deneme $addtok(%deneme,$6,46)
whoisle
}
}
}
alias whoisle { var %t = $numtok(%deneme,46) | while %t { timer 1 2 whois $gettok(%deneme,%t,46) | dec %t } } }
;kanalda who cekince 2 saniye nefes alır sonra whois ceker

MephisTo 18 Ağustos 2005 00:35

2 saniye nefes aldıktan sonra hepsine aynı anda whois çeker, o yüzden flooddan düşüyor zaten :) Aslında whois end rawından da güzel birşey yapabiliriz. Whois end rawı geldiğinde sıradakine whois çekmek için 1 saniye sonrasına timer açar. Öncekinin whois'i gelmeden whois çekmez, böylece flood da yapmaz.

Flyman 18 Ağustos 2005 00:42

who cekiyor whosilenecekleri set yapiyor orda kaliyor whois cekemiyor kod mephisto orda kaliyor

MephisTo 18 Ağustos 2005 00:49

var %a = $gettok(%whoislenecekler,%y,32)

Kalın yazan yeri düzelt önce.

while %y <= %x {

Burayı da düzelt.

raw 353 yerine 315 de yaz :)

Flyman 18 Ağustos 2005 01:38

bu sefer cekiyor whois ama yine ayni anda hepsine cekiyor

MephisTo 18 Ağustos 2005 01:49

alias whoislebakiim {
set %whoislenen 2
whois $gettok(%whoislenecekler,1,32)
}

Burayı bu şekilde değiştir.

raw 318:*:{
if %whoislenecekler != $null { .timer 1 2 whois $gettok(%whoislenecekler,%whoislenen,32) }
if $numtok(%whoislenecekler,32) == %whoislenen { unset %whoisle* | halt }
inc %whoislenen
}

Bunu ekle ayriyetten.

Flyman 18 Ağustos 2005 02:02

su anda calisiyor bi sorun yok gibi :)) saol mephisto

MephisTo 18 Ağustos 2005 02:12

318. rawdaki timer 1 2 kısmındaki 2 kaç saniye arayla diğer nicke whois çekeceğini gösterir. Flooddan düşersen süreyi uzatabilirsin. Bu arada nicklere whois çekme işlemi bitene kadar kimseye whois çekme, yoksa sapıtabilir :)

Flyman 18 Ağustos 2005 02:21

amladim onu yukselttim zatende
alias whoislebakiim {
set %whoislenen 2
whois $gettok(%whoislenecekler,1,32)
}
burdaki set %whoislenen 2 burayi anliyamadim 2 ne oluyor burayi bi aciklasanda ne yaptigimizi biraz cakayim :)) bilgi olsun yani


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:57.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk