IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Tekil Mesaj gösterimi - Client Soru-Cevap Oyunu

YouMyCure · 26 Ocak 2016, 20:49

Toprak Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Cevap(lar) :

Basit:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

//write sayı.txt 10 $crlf 9 $crlf 8 $crlf 7 $crlf 6 $crlf 5 $crlf 4 $crlf 3 $crlf 2 $crlf 1

While kullanarak;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

//var %s = 10 | while %s { var %w $addtok(%w,%s,32) | dec %s } | .write sayı.txt $replace(%w,$chr(32),$crlf)

Regsubex kullanarak;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

//write sayı.txt $regsubex($sorttok($regsubex($str(*,10),/./g,\n $chr(32)),32,nr),/\s/g,$crlf)

-

Soru : #Y kanal'ına giren "Tprk" nick'inin ident'i "Paradox" değil ise kanal'dan 2 dakika'lık ban uygulasın ve kick'lesin.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:join:#y: {
  .enable #rr
  .userip $nick
  .timerRR 1 1 .disable #rr
  if ($nick == Tprk) {
    $iif(%&& == Paradox,return,_aa $chan $nick)
  }
}
alias _aa { 
  .ban -u120 $1-
  .kick $1- Atıldınız.
  .unset %&&
}
#rr off
raw 340:*: {
  if ($left($4,1) == +) {
    .set %&& $remove($token($gettok($4,2,$asc(=)),1,$asc(@)),+)
  }
  elseif ($left($4,1) == -) {
    .set %&& $remove($token($gettok($4,2,$asc(=)),1,$asc(@)),-)
  }
}
#rr end

Soru; #A kanalıma giren 10 nickten 5'inin içerisinde *my* geçiyorsa kanaldaki herkezi tek tek banlayım.