IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum (https://www.ircforumu.net/)
-   Hazır Kodlar (https://www.ircforumu.net/hazir-kodlar/)
-   -   !takip ekle-sil-Onlines (https://www.ircforumu.net/hazir-kodlar/4732-takip-ekle-sil-onlines.html)

immortaL 20 Ağustos 2016 22:43

!takip ekle-sil-Onlines
 
Kod:

on *:text:*:#Opers: {
  if ($1 == !ekle) { if (!$2) { return }
    if ($2 == $me) { .msg # 5Beni takip listesine alamazsın $nick $+  | return }
    if ($ini(takip.ini,$2)) { .msg # 4 $+ $2  5nicki zaten listede ekli durumda. | return }
    else {
      writeini -n takip.ini $2 Pazartesi 0
      writeini -n takip.ini $2 Salı 0
      writeini -n takip.ini $2 Çarşamba 0
      writeini -n takip.ini $2 Perşembe 0
      writeini -n takip.ini $2 Cuma 0
      writeini -n takip.ini $2 Cumartesi 0
      writeini -n takip.ini $2 Pazar 0
      .auser takip $2
      .msg # 4 $+ $2  5nicki online listesine eklenmiştir.
      if ($2 ison #Opers) { $+(.timertakip,$2) 0 1 inc -e $+(%,$2) }
    }
  }
  if ($1 == !sil) {
    if (!$2) { return }
    if (!$ini(takip.ini,$2)) { .msg # 4 $2  5Listede ekli değil | return }
    else { .remini takip.ini $2 | .ruser takip $2 | .msg # $2 Listeden silindi.
      if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$2) }
    }
  }
  if ($1 == !onlines) {
    if (!$2) { return }
    if (!$ini(takip.ini,$2)) { .msg # 4 $2  5 Listede ekli değil | return }
    kayit $2
    .msg # 7 $str(-,10) 4 $2  5nicki için takip listesi 7 $str(-,10)
    .play $+(-t,$2) # takip.ini 100
    $+(.timerlist,$2) 1 1 .msg # 7 $str(-,10) 5Listenin sonu 7 $str(-,10)
  }
}
on takip:join:#Opers: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$nick) }
on takip:part:#Opers:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $nick } }
on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $nick } }
alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs, Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day ,Gün,days,Gün) }
alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,su nday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday ,Cumartesi,tuesday,Salı,thursday,Perşembe) }



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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.6.0
Copyright ©2005 - 2023 IRCForumu.Net - Tüm Hakları Saklıdır.