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

Kod:

on *:text:*:*: { 

  if ($1 == !onlines) {

    if (!$2) { return }

    if !$var($+(%,$replace($2,[,~,],~)),0) { msg $nick $2 'nin henüz online süresi yok. | return }

    if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg $nick $2 Listede ekli değil | return } 

    kayit $replace($2,[,~,],~) 

    msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10) 

    .play $+(-t,$replace($2,[,~,],~)) $nick takip.ini 300 

    $+(.timerlist,$2) 1 3 msg $nick 4 $str(-,10) Listenin sonu $str(-,10)

  }

  if !$istok(sniper ahmet mehmet,$nick,32) { return }

  if ($1 == !ekle) { if (!$2) { return } 

    if ($2 == $me) { msg $nick Beni takip listesine alamazsın $nick $+ :) | return } 

    if ($ini(takip.ini,$replace($2,[,~,],~))) { msg $nick  $+ $2  nicki zaten listede ekli durumda. | return }

    else { 

      writeini -n takip.ini $replace($2,[,~,],~) Pazartesi 0

      writeini -n takip.ini $replace($2,[,~,],~) Salı 0 

      writeini -n takip.ini $replace($2,[,~,],~) Çarşamba 0 

      writeini -n takip.ini $replace($2,[,~,],~) Perşembe 0

      writeini -n takip.ini $replace($2,[,~,],~) Cuma 0

      writeini -n takip.ini $replace($2,[,~,],~) Cumartesi 0

      writeini -n takip.ini $replace($2,[,~,],~) Pazar 0

      .auser takip $2 

      msg $nick  $+ $2  nicki online listesine eklenmiştir.

      if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$replace($2,[,~,],~)) }

    }

  }

  if ($1 == !sil) {

    if (!$2) { return } 

    if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg $nick $2 Listede ekli değil | return } 

    else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | msg $nick $2 Listeden silindi.

      if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$replace($2,[,~,],~)) }

    }

  }

  if ($1 == !sıfırla) {

    var %\ = $ulist(*,takip,0) 

    while %\ { 

      $+(.timertakip,$ulist(*,takip,%\)) off  

      set $+(%,$replace($ulist(*,takip,%\),[,~,],~)) 0 

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazartesi 0

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Salı 0 

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Çarşamba 0 

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Perşembe 0

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cuma 0

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cumartesi 0

      writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazar 0

      if ($ulist(*,takip,%\) ison #zurna) { $+(.timertakip,$ulist(*,takip,%\)) 0 1 inc -e $+(%,$replace($ulist(*,takip,%\),[,~,],~)) }

      dec %\ 

    }

    msg $nick Tüm online süreleri sıfırlanıp yeniden başlatılmıştır.

  }

  if ($1 == !temizle) {

    write -c takip.ini

    var %\ = $ulist(*,takip,0) 

    while %\ { 

      $+(.timertakip,$ulist(*,takip,%\)) off

      .timer 1 1 unset $+(%,$replace($ulist(*,takip,%\),[,~,],~)) 

      .ruser takip $ulist(*,takip,%\)   

      dec %\ 

    }

Bu Şekilde
!liste
!ekle nick
!sil nick

Vs,vs, Bu Komutları Kullandığnızda Cvpları Özelinize Verir.

Kod'u Eklediğin Kişinin Özeline Gidersen

!ekle Nick
!sil Nick

vs vs Bu Komutlarıda Özelinde De Yapabilirsin Dilersen Kanaldada YAaparsın