Cevap: Çevrimiçi Takip Sistemi - [&!.]yardim komutu eklendi.
- [&!.]gizle NICK komutu eklendi. (kullanım detayı için &help 1)
[09:45:55] <Lociz> &gizle
[09:45:55] <LBot> Lociz gizli duruma geçtiniz. Bundan sonra takip bilgileriniz, operatör bilgileriniz, operatör listesinde adınız görülmeyecek. [09:46:13] <L2> &obilgi Lociz
[09:46:13] <LBot> Lociz bir gizli operatördür, bilgilerine bakamazsınız. - [&!.]göster NICKkomutu eklendi.
[09:46:31] <Lociz> &göster
[09:46:31] <LBot> Lociz gizli durumundan çıktınız. Bundan sonra takip bilgileriniz, operatör bilgileriniz, operatör listesinde adınız görülecek.
[09:47:05] <L2> &obilgi Lociz
[09:47:07] <LBot> 09/03/2014 - 10:55:07: Lociz adlı kullanıcının log bilgilerini sorguladı.
[09:47:07] <LBot> 09/03/2014 - 10:55:15: Gizlilik moduna geçti. - [&!.]help KONU komutu eklendi.
[09:44:42] <Lociz> &help 1
[09:44:42] <LBot> &gizle NICK Komutu ve Kullanımı
[09:44:42] <LBot> Bu komutu sadece MASTER kullanabilir.
[09:44:42] <LBot> MASTER:Bu kullanıcılar kendilerini &gizle komutu ile gizleme moduna geçebilirler.
[09:44:42] <LBot> ÖRNEK: Lociz kişisi MASTER'dir.
[09:44:42] <LBot> <Lociz> &gizle
[09:44:42] <LBot> <LBot> Lociz gizli duruma geçtiniz, bundan sonra operatör bilgileriniz, operatör listesinde adınız görülmeyecek.
[09:44:42] <LBot> BAŞKA BİRİ İÇİN:&gizle OperatörNicki şeklinde kullanılır.
[09:44:42] <LBot> ÖRNEK:Lociz kişisi MASTER, Owner kişisi OPERATÖR'dür.
[09:44:42] <LBot> <Lociz> &gizle Owner
[09:44:42] <LBot> <LBot> Owner gizli duruma geçti, bundan sonra operatör bilgileri, operatör listesinde adı görülmeyecek. NOT: Şu anda 1 numaralı yardım konusu dışında diğerleri eklenmemiştir. - [&!.]clist komutu eklendi.(ÇEVRİMİÇİ LİSTESİ)
[09:43:23] <Lociz> &clist
[09:43:23] <LBot> 1. Kullanıcı Adı: Lociz[Çevrimiçi] Aktif Süre: 27 dk 20 sn
[09:43:23] <LBot> 1. Kullanıcı Adı: Owner[Çevrimiçi] Aktif Süre: 12 dk 43 sn - [&!.]dlist komutu eklendi.(ÇEVRİMDIŞI LİSTESİ)
[09:44:23] <Lociz> &dlist
[09:44:23] <LBot> 1. Kullanıcı Adı: BL[Çevrimdışı]
[09:44:23] <LBot> 2. Kullanıcı Adı: AL[Çevrimdışı] - Komutlar sadece & ile kullanılmayacak, &, ! veya . ile kullanılabilecek.
ÖRNEK: &bilgi Lociz, .bilgi Lociz, !bilgi Lociz - TOP 10 listelerindeki hata giderildi.
- Kanaldan çıkmasına rağmen sürenin devam etmesi sorunu giderildi.
- Takip süresi başladığında, durdulduğunda NOTICE ile bilgi verme eklendi.
[09:42:02] *** Kanala Tekrar Giriliyor #lociz
[09:42:02] -LBot- Hoşgeldiniz, Lociz. Süreniz başlamıştır.
[09:42:16] <Lociz> &sil Lociz
[09:42:16] <LBot> Lociz kullanıcısı takip listesinden çıkartılmıştır.
[09:42:16] -LBot- Süreniz durdurulmuştur. - [&!.]bilgi komutu ile artık çevrimiçi durumu, son aktif olduğu süre görülebilecek.
[09:41:40] <Lociz> &bilgi Lociz
[09:41:40] <LBot> Kullanıcı Adı: Lociz Durumu: Çevrimiçi
[09:41:40] <LBot> Ekleyen Operatör, Kanal: Lociz, #admin
[09:41:40] <LBot> Eklenme Tarihi, Saati: 09/03/2014 - 17:02:05
[09:41:40] <LBot> Son Çevrimiçi Olduğu Süre: 7 dk 59 sn
[09:41:40] <LBot> Toplam Çevrimiçi Olduğu Süre: 4 saat 18 dk 38 sn - [&!.]tsıfılra komutu eklendi
Bu komut tüm operatör bilgilerini ve kullanıcıların bilgilerini sıfırlar. PHP- Kodu: on *:text:*:%opchan: { if ($regex($1,/^[&!.]gizle/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { if (!$2) { if (%MasterHidding == 1) { msg $chan 2 $nick siz zaten gizli durumdasınız. } if (%MasterHidding == 0) || (%MasterHidding == $null) { msg $chan 2 $nick gizli duruma geçtiniz. Bundan sonra takip bilgileriniz, operatör bilgileriniz, operatör listesinde adınız görülmeyecek. | hidden $nick $nick $date $time $chan } } if ($2) { if (!$ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısı operatör listesinde bulunmadığı için işlem yapılamaz. } if ($ini(operator.ini,$2)) { if ($readini(operator.ini,$2,hidden) == 1) { msg $chan 2 $2 kullanıcısı zaten gizli durumda bulunuyor. } if ($readini(operator.ini,$2,hidden) == 0) || ($readini(operator.ini,$2,hidden) == $null) { msg $chan 2 $2 gizli duruma geçti. Bundan sonra takip bilgileri, operatör bilgileri, operatör listesinde adı görülmeyecek. | hidden $2 $nick $date $time $chan } } } } } if ($regex($1,/^[&!.]goster/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { if (!$2) { if (%MasterHidding == 0) || (%MasterHidding == $null) { msg $chan 2 $nick siz zaten gizli durumda değilsiniz. } if (%MasterHidding == 1) { msg $chan 2 $nick gizli durumundan çıktınız. Bundan sonra takip bilgileriniz, operatör bilgileriniz, operatör listesinde adınız görülecek. | show $nick $nick $date $time $chan } } if ($2) { if (!$ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısı operatör listesinde bulunmadığı için işlem yapılamaz. } if ($ini(operator.ini,$2)) { if ($readini(operator.ini,$2,hidden) == 0) || ($readini(operator.ini,$2,hidden) == $null) { msg $chan 2 $2 kullanıcısı zaten gizli durumda bulunmuyor. } if ($readini(operator.ini,$2,hidden) == 1) { msg $chan 2 $2 gizli durumdan çıkartıldı. Bundan sonra takip bilgileri, operatör bilgileri, operatör listesinde adı görülecek. | show $2 $nick $date $time $chan } } } } } if ($regex($1,/^[&!.]ekle/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { if (!$2) { msg $chan 2Lütfen kullanıcı adı giriniz. } if ($2) { if ($ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısı $readini(follow.ini,$2,addop) tarafından $readini(follow.ini,$2,adddate) tarihinde $readini(follow.ini,$2,addtime) saatinde takip listesine eklenmiş. } if (!$ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısı takip listesine eklendi. | followadd $2 $nick $date $time $chan } } } } if ($regex($1,/^[&!.]sifirla/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { if (!$2) { msg $chan 2Lütfen kullanıcı adı giriniz. } if ($2) { if (!$ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısı takip listesinde bulunmuyor. } if ($ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısının takip bilgileri sıfırlanmıştır. | followclean $2 $nick $date $time $chan } } } } if ($regex($1,/^[&!.]osifirla/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { if (!$2) { msg $chan 2Lütfen kullanıcı adı giriniz. } if ($2) { if (!$ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısı operatör listesinde bulunmadığı için sıfırlanamaz. } if ($ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısının operatör takip bilgileri sıfırlanmıştır. | operatorclean $2 $nick $date $time $chan } } } } if ($regex($1,/^[&!.]tsifirla/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { msg $chan 2Tüm kayıtlar sıfırlanmıştır. | cleanall $2 $nick $chan } } if ($regex($1,/^[&!.]oekle/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { if (!$2) { msg $chan 2Lütfen kullanıcı adı giriniz. } if ($2) { if ($2 == %master) { msg $chan 2Belirttiğiniz kişi $me botunun sahibidir, operatör listesine eklenemez. } if ($2 != %master) { if ($ini(operator.ini,$2)) { msg $chan 2 $2 zaten bir operatör. } if (!$ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısı operatör olarak eklendi. | operatoradd $2 $nick $date $time $chan } } } } } if ($regex($1,/^[&!.]osil/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { if (!$2) { msg $chan 2Lütfen kullanıcı adı giriniz. } if ($2) { if ($2 == %master) { msg $chan 2Belirttiğiniz kişi $me botunun sahibidir, operatör listesinden silinemez. } if ($2 != %master) { if (!$ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısı operatör listesinde yok. } if ($ini(operator.ini,$2)) { msg $chan 2 $2 kullanıcısının operatör yetkisi kaldırıldı. | operatordel $2 $nick $date $time $chan } } } } } if ($regex($1,/^[&!.]help/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { helptopic $2 $chan } } if ($regex($1,/^[&!.]olist/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { operatorlist $chan $nick $date $time } } if ($regex($1,/^[&!.]reboot/Si)) { if ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($nick == %master) { msg $chan 2Yeniden başlatılıyor...(3-5 saniye içerisinde tekrar bağlanacaktır.) | reboot $nick $chan $date $time } } if ($regex($1,/^[&!.]top10/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { topten $chan $nick $date $time } } if ($regex($1,/^[&!.]optop10/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { optopten $chan $nick $date $time } } if ($regex($1,/^[&!.]yardim/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { help $nick $chan $date $time } } if ($regex($1,/^[&!.]sil/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { if (!$2) { msg $chan 2Lütfen kullanıcı adı giriniz. } if ($2) { if (!$ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısı takip listesinde zaten bulunmuyor. } if ($ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısı takip listesinden çıkartılmıştır. | followdel $2 $nick $date $time $chan } } } } if ($regex($1,/^[&!.]list/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { followlist $chan $nick $date $time } } if ($regex($1,/^[&!.]clist/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { onlinelist $chan $nick $date $time } } if ($regex($1,/^[&!.]dlist/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if ($ini(operator.ini,$nick)) || ($nick == %master) { offlinelist $chan $nick $date $time } } if ($regex($1,/^[&!.]obilgi/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) && ($2) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if (!$2) { if ($ini(operator.ini,$nick)) || ($nick == %master) { loginfo $nick $chan $nick $date $time } if (!$ini(operator.ini,$nick)) && ($nick != %master) { msg $chan 2 $nick siz operatör listesinde bulunmuyorsunuz. } } if ($ini(operator.ini,$nick)) || ($nick == %master) { if ($2) { if ($ini(operator.ini,$2)) || ($2 == %master) { loginfo $2 $chan $nick $date $time } if (!$ini(operator.ini,$2)) && ($2 != %master) { msg $chan 2 $2 kullanıcısı operatör listesinde bulunmamaktadır. } } } } if ($regex($1,/^[&!.]bilgi/Si)) { if (!$ini(operator.ini,$nick)) && ($nick != %master) && ($2) { msg $chan 2Bu işlem için yetkiniz bulunmamaktadır. } if (!$2) { if ($ini(follow.ini,$nick)) { followinfo $nick $chan $nick $date $time } if (!$ini(follow.ini,$nick)) { msg $chan 2 $nick siz takip listesinde bulunmuyorsunuz. } } if ($2) { if ($ini(follow.ini,$2)) { followinfo $2 $chan $nick $date $time } if (!$ini(follow.ini,$2)) { msg $chan 2 $2 kullanıcısı takip listesinde bulunmamaktadır. } } } }
alias hidden { write $+($2,.txt) 2 $+($date, - ,$time,:) $iif($1 == $2,Gizlilik moduna geçti.,$+(,$1) kullanıcısını gizlilik moduna geçirdi.) if ($1 == %master) { set %MasterHidding 1 } if ($1 != %master) { writeini -n operator.ini $1 hidden 1 } }
alias show { write $+($2,.txt) 2 $+($date, - ,$time,:) $iif($1 == $2,Gizlilik modundan çıktı.,$+(,$1) kullanıcısını gizlilik modundan çıkardı.) if ($1 == %master) { set %MasterHidding 0 } if ($1 != %master) { writeini -n operator.ini $1 hidden 0 } }
alias cleanall { var %ini = $ini(follow.ini,0), %x = 1 while (%x <= %ini) { unset $+(%,$ini(follow.ini,%x)) inc %x }
if ($file(follow.ini)) { remove follow.ini } if ($file(operator.ini)) { remove operator.ini }
var %ini = $ini(operator.ini,0), %x = 1 while (%x <= %ini) { if ($file($+($ini(operator.ini,%x),.txt))) { remove $+($ini(operator.ini,%x),.txt) } inc %x }
write $+($2,.txt) 2 $+($date, - ,$time,:) tüm bilgileri sıfırladı. }
alias loginfo { if ($1 == %master) && (%MasterHidding == 1) && ($3 != %master) { msg $2 2 $1 bir gizli operatördür, bilgilerine bakamazsınız. | return } if ($1 != %master) && ($readini(operator.ini,$1,hidden) == 1) && ($1 != $3) { msg $2 2 $1 bir gizli operatördür, bilgilerine bakamazsınız. | return } var %ini = $lines($+($1,.txt)), %x = 1 if (%ini == 0) { msg $2 2 $1 adlı operatörün hiçbir işlem kaydı bulunmamaktadır. } while (%x <= %ini) { timer 1 %x msg $2 $read($+($1,.txt),%x) inc %x } write $+($3,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcının log bilgilerini sorguladı. }
alias operatoradd { write $+($2,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcıyı operatör listesine ekledi. writeini -n operator.ini $1 addop $2 writeini -n operator.ini $1 adddate $3 writeini -n operator.ini $1 addtime $4 writeini -n operator.ini $1 addchan $5 writeini -n operator.ini $1 hidden 0 }
alias followdel { set $+(%,$1) 0 write $+($2,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcıyı takip listesinden çıkardı. remini -n follow.ini $1 if ($timer($+(follow,$1))) { $+(.timerfollow,$1) off } noti $1 2 }
alias followinfo { if ($1 == %master) && (%MasterHidding == 1) && ($3 != %master) { msg $2 2 $1 bir gizli operatördür, bilgilerine bakamazsınız. | return } if ($1 != %master) && ($readini(operator.ini,$1,hidden) == 1) && ($1 != $3) { msg $2 2 $1 bir gizli operatördür, bilgilerine bakamazsınız. | return } %x = $calc($eval($+(%,$1))) save $1 msg $2 2 Kullanıcı Adı: $1 Durumu: $iif($timer($+(follow,$1)),Çevrimiçi,Çevrimdışı) msg $2 2 Ekleyen Operatör, Kanal: $readini(follow.ini,$1,addop) $+ , $readini(follow.ini,$1,addchan) msg $2 2 Eklenme Tarihi, Saati: $readini(follow.ini,$1,adddate) - $readini(follow.ini,$1,addtime) msg $2 2 Son Çevrimiçi Olduğu Süre: $convert(%x) msg $2 2 Toplam Çevrimiçi Olduğu Süre: $+( ,$convert($readini(follow.ini,$1,onlinetime))) write $+($3,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcının takip bilgilerini sorguladı. }
alias save { writeini -n follow.ini $1 onlinetime $calc($readini(follow.ini,$1,onlinetime)+$eval($+(%,$1))) set $+(%,$1) 0 }
alias update { var %ini = $ini(follow.ini,0), %x = 1 while (%x <= %ini) { save $ini(follow.ini,%x) inc %x } } alias operatorlist { update write $+($2,.txt) 2 $+($date, - ,$time,:) Operatör listesini sorguladı. if ($2 != %master) { var %ini = $ini(operator.ini,0), %x = 1, %y = 0, %z = 1, %command = $ini(operator.ini,0)
while (%z <= %ini) { if ($readini(operator.ini,$ini(operator.ini,%z),hidden) == 1) { dec %command } inc %z }
if (%command == 0) && (%master != $null) && (%MasterHidding == 1) { msg $1 2Operatör listesinde kimse bulunmuyor. | return }
while (%x <= %ini) { if ($readini(follow.ini,$ini(operator.ini,%x),onlinetime)) && ($readini(operator.ini,$ini(operator.ini,%x),hidden) == 0) { inc %y | save $ini(operator.ini,%x) | msg $1 2 $+(%y,.) Kullanıcı Adı: $ini(operator.ini,%x) Ekleyen: $readini(operator.ini,$ini(operator.ini,%x),addop) Eklenme Tarihi, Saati: $readini(operator.ini,$ini(operator.ini,%x),adddate) - $readini(operator.ini,$ini(operator.ini,%x),addtime) Eklenen Kanal: $readini(operator.ini,$ini(operator.ini,%x),addchan) Çevrimiçi Süresi: $convert($readini(follow.ini,$ini(operator.ini,%x),onlinetime)) } if (!$readini(follow.ini,$ini(operator.ini,%x),onlinetime)) && ($readini(operator.ini,$ini(operator.ini,%x),hidden) == 0) { inc %y | msg $1 2 $+(%x,.) Kullanıcı Adı: $ini(operator.ini,%x) Ekleyen: $readini(operator.ini,$ini(operator.ini,%x),addop) Eklenme Tarihi, Saati: $readini(operator.ini,$ini(operator.ini,%x),adddate) - $readini(operator.ini,$ini(operator.ini,%x),addtime) Eklenen Kanal: $readini(operator.ini,$ini(operator.ini,%x),addchan) } inc %x }
if (%master != $null) && (%MasterHidding == 0) { inc %y if ($readini(follow.ini,%master,onlinetime)) { save %master | msg $1 2 $+(%y,.) Kullanıcı Adı: %master Ekleyen Operatör: $me Eklenme Tarihi, Saati: %firstrunD - %firstrunT Eklenen Kanal: %opchan Çevrimiçi Süresi: $convert($readini(follow.ini,%master,onlinetime)) } if (!$readini(follow.ini,%master,onlinetime)) { msg $1 2 $+(%y,.) Kullanıcı Adı: %master Ekleyen Operatör: $me Eklenme Tarihi, Saati: %firstrunD - %firstrunT Eklenen Kanal: %opchan } } } if ($2 == %master) { var %ini = $ini(operator.ini,0), %x = 1, %y = 0, %z = $calc(%ini + 1)
if (%z == 0) { msg $1 2Operatör listesinde kimse bulunmuyor. | return }
while (%x <= %ini) { if ($readini(follow.ini,$ini(operator.ini,%x),onlinetime)) { inc %y | save $ini(operator.ini,%x) | msg $1 2 $+(%y,.) Kullanıcı Adı: $ini(operator.ini,%x) Ekleyen: $readini(operator.ini,$ini(operator.ini,%x),addop) Eklenme Tarihi, Saati: $readini(operator.ini,$ini(operator.ini,%x),adddate) - $readini(operator.ini,$ini(operator.ini,%x),addtime) Eklenen Kanal: $readini(operator.ini,$ini(operator.ini,%x),addchan) Çevrimiçi Süresi: $convert($readini(follow.ini,$ini(operator.ini,%x),onlinetime)) } if (!$readini(follow.ini,$ini(operator.ini,%x),onlinetime)) { inc %y | msg $1 2 $+(%x,.) Kullanıcı Adı: $ini(operator.ini,%x) Ekleyen: $readini(operator.ini,$ini(operator.ini,%x),addop) Eklenme Tarihi, Saati: $readini(operator.ini,$ini(operator.ini,%x),adddate) - $readini(operator.ini,$ini(operator.ini,%x),addtime) Eklenen Kanal: $readini(operator.ini,$ini(operator.ini,%x),addchan) } inc %x }
if (%master != $null) { inc %y if ($readini(follow.ini,%master,onlinetime)) { save %master | msg $1 2 $+(%y,.) Kullanıcı Adı: %master Ekleyen Operatör: $me Eklenme Tarihi, Saati: %firstrunD - %firstrunT Eklenen Kanal: %opchan Çevrimiçi Süresi: $convert($readini(follow.ini,%master,onlinetime)) } if (!$readini(follow.ini,%master,onlinetime)) { msg $1 2 $+(%y,.) Kullanıcı Adı: %master Ekleyen Operatör: $me Eklenme Tarihi, Saati: %firstrunD - %firstrunT Eklenen Kanal: %opchan } } } }
alias operatordel { write $+($2,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcıyı operatör listesinden çıkardı. remini -n operator.ini $1 operatorclean $1 $2 }
alias followadd { write $+($2,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcıyı takip listesine ekledi. writeini -n follow.ini $1 addop $2 writeini -n follow.ini $1 adddate $3 writeini -n follow.ini $1 addtime $4 writeini -n follow.ini $1 addchan $5 writeini -n follow.ini $1 onlinetime 0 if ($1 ison %chan) { $+(.timerfollow,$1) 0 1 follow $1 } noti $1 1 0 }
alias followclean { write $+($2,.txt) 2 $+($date, - ,$time,:) $1 adlı kullanıcının takip bilgilerini sıfırladı. writeini -n follow.ini $1 addop $2 writeini -n follow.ini $1 adddate $3 writeini -n follow.ini $1 addtime $4 writeini -n follow.ini $1 addchan $5 writeini -n follow.ini $1 onlinetime 0 set $+(%,$1) 0 if ($timer($+(follow,$1))) { $+(.timerfollow,$1) off } if ($1 ison %chan) { $+(.timerfollow,$nick) 0 1 follow $1 } }
alias operatorclean { remove $+($1,.txt) write $+($2,.txt) 2 $+($date, - ,$time,:) $1 adlı operatörün takip bilgilerini sıfırladı. }
alias topten { update write $+($2,.txt) 2 $+($date, - ,$time,:) TOP10 listesini sorguladı. var %ini = $ini(follow.ini,0), %x = 1 if (%ini == 0) { msg $1 2TOP10 listesinde kimse bulunmuyor. } if (%ini != 0) { while (%x <= %ini) { %y = $ini(follow.ini,%x) if ($readini(follow.ini,%y,onlinetime)) { set $+(%,%y,.points) $readini(follow.ini,%y,onlinetime) } inc %x } var %n = 1 while ($findval(%n) != $null) && (%n <= 10) { if (%n == 1) { %topten = 12 $+(%n,.) 2 $findval(%n) $+ ( $+ $convert($findval(%n).val) $+ ) } if (%n != 1) { %topten = %topten $+ ,12 $+(%n,.) 2 $findval(%n) $+ ( $+ $convert($findval(%n).val) $+ ) } inc %n } cleanpoints msg $1 %topten } }
alias optopten { update write $+($2,.txt) 2 $+($date, - ,$time,:) OPTOP10 listesini sorguladı. var %ini = $ini(operator.ini,0), %x = 1 if (%ini == 0) { msg $1 2OPTOP10 listesinde kimse bulunmuyor. } if (%ini != 0) { while (%x <= %ini) { %y = $ini(operator.ini,%x) if ($readini(follow.ini,%y,onlinetime)) { set $+(%,%y,.points) $readini(follow.ini,%y,onlinetime) } inc %x } if ($readini(follow.ini,%master,onlinetime)) { set $+(%,%master,.points) $readini(follow.ini,%master,onlinetime) } var %n = 1 while ($findval(%n) != $null) && (%n <= 10) { if (%n == 1) { %topten = 12 $+(%n,.) 2 $findval(%n) $+ ( $+ $convert($findval(%n).val) $+ ) } if (%n != 1) { %topten = %topten $+ ,12 $+(%n,.) 2 $findval(%n) $+ ( $+ $convert($findval(%n).val) $+ ) } inc %n } cleanpoints msg $1 %topten } }
alias cleanpoints { var %i = 1 while $var(%*.points, %i) { unset $+(%,$remove($ifmatch,$chr(37),.points),.points) } }
alias findval { if ($1 == 0) return $var(%*.points,0) window -sh @sort 0 0 100 100 var %i = 1 while ($var(%*.points,%i)) { aline @sort $base( [ [ $ifmatch ] ] ,10,10,10) $remove($ifmatch,$chr(37),.points) inc %i } var %info = $line(@sort,$calc($line(@sort,0) - $iif($1 isnum,$1,$fline(@sort,$1,1)) + 1)) window -c @sort if ($prop == val) { var %regex = $regex(sort,$gettok(%info,1,32),m~0*(\d*)~g) return $regml(sort,1) } else return $gettok(%info,2,32) }
alias help { timer 1 1 msg $2 2[!&.]gizle NICK: NICK operatörün işlem kayıtları, operatör listesindeki adını göstermemek için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 1 yazınız. timer 1 2 msg $2 2[!&.]&goster NICK: Gizlenme modu aktif edilen NICK operatörünün gizlilik modunu açmak için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 2 yazınız. timer 1 3 msg $2 2[!&.]&ekle NICK: NICK adlı kullanıcıyı takip listesine eklemek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 3 yazınız. timer 1 4 msg $2 2[!&.]&sil NICK: NICK adlı kullanıcıyı takip listesinden çıkarmak için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 4 yazınız. timer 1 5 msg $2 2[!&.]&list: Takip listesindeki kullanıcıları listelemek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 5 yazınız. timer 1 6 msg $2 2[!&.]&bilgi NICK: Takip listesinde bulunan NICK kullanıcısının takip bilgilerini görmek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 6 yazınız. timer 1 7 msg $2 2[!&.]&top10: Takip listesinde en çok kim çevrimiçi oluyor? Öğrenmek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 7 yazınız. timer 1 8 msg $2 2[!&.]&clist: Takip listesindeki çevrimiçi kullanıcıları için listelemek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 8 yazınız. timer 1 9 msg $2 2[!&.]&dlist: Takip listesindeki çevrimdışı kullanıcıları için listelemek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 9 yazınız. timer 1 10 msg $2 2[!&.]&sifirla NICK: NICK adlı kullanıcının takip bilgilerini sıfırlamak için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 10 yazınız. timer 1 11 msg $2 2[!&.]&osifirla NICK: NICK adlı operatörün işlem kaydını sıfırlamak için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 11 yazınız. timer 1 12 msg $2 2[!&.]&tsifirla : Tüm kullanıcıların takip bilglierini, takip listesini; operatörlerin işlem kaydını, operatör listesini sıfırlamak için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 12 yazınız. timer 1 13 msg $2 2[!&.]&oekle NICK: NICK adlı kullanıcı operatör listesine eklemek için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 13 yazınız. timer 1 14 msg $2 2[!&.]&osil NICK: NICK adlı operatörü operatör listesinden çıkarmak için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 14 yazınız. timer 1 15 msg $2 2[!&.]&olist: Operatör yetkisine sahip kullanıcıları görmek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 15 yazınız. timer 1 16 msg $2 2[!&.]&obilgi NICK: Operatör listesinde bulunan NICK operatörünün işlem kaydını görmek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 16 yazınız. timer 1 17 msg $2 2[!&.]&optop10: Takip listesinde bulunan operatörlerin içinde en çok kim çevrimiçi oluyor? Öğrenmek için kullanılan komuttur. Sadece OPERATÖR ve MASTER yetkisine sahip kullanıcılar kullanabilir. Kullanım detayı için: &help 17 yazınız. timer 1 18 msg $2 2[!&.]&reboot: $me botunun yeniden başlatılması için kullanılan komuttur. Sadece MASTER yetkisine sahip kullanıcı kullanabilir. Kullanım detayı için: &help 18 yazınız. }
alias helptopic { if ($1 == 1) { msg $2 2[!&.]&gizle NICK Komutu ve Kullanımı msg $2 2Bu komutu sadece MASTER kullanabilir. msg $2 2MASTER:Bu kullanıcılar kendilerini &gizle komutu ile gizleme moduna geçebilirler. msg $2 2ÖRNEK: Lociz kişisi MASTER'dir. msg $2 2<Lociz> &gizle msg $2 2<LBot> Lociz gizli duruma geçtiniz, bundan sonra operatör bilgileriniz, operatör listesinde adınız görülmeyecek. msg $2 2BAŞKA BİRİ İÇİN:&gizle OperatörNicki şeklinde kullanılır. msg $2 2ÖRNEK:Lociz kişisi MASTER, Owner kişisi OPERATÖR'dür. msg $2 2<Lociz> &gizle Owner msg $2 2<LBot> Owner gizli duruma geçti, bundan sonra operatör bilgileri, operatör listesinde adı görülmeyecek. } else { msg $2 2 $1 konulu yardım dosyası henüz aktif değil. } }
alias followlist { update write $+($2,.txt) 2 $+($date, - ,$time,:) Takip listesini sorguladı. var %ini = $ini(follow.ini,0), %x = 1 if (%ini == 0) { msg $1 2Takip listesinde kimse bulunmuyor. } while (%x <= %ini) { save $ini(follow.ini,%x) msg $1 2 $+(%x,.) Kullanıcı Adı: $iif($ini(follow.ini,%x),$ini(follow.ini,%x),HATA![KOD:1]) Ekleyen: $iif($readini(follow.ini,$ini(follow.ini,%x),addop),$readini(follow.ini,$ini(follow.ini,%x),addop),HATA![KOD:1]) Eklenme Tarihi, Saati: $iif($readini(follow.ini,$ini(follow.ini,%x),adddate),$readini(follow.ini,$ini(follow.ini,%x),adddate),HATA![KOD:1]) - $iif($readini(follow.ini,$ini(follow.ini,%x),addtime),$readini(follow.ini,$ini(follow.ini,%x),addtime),HATA![KOD:1]) Eklenen Kanal: $iif($readini(follow.ini,$ini(follow.ini,%x),addchan),$readini(follow.ini,$ini(follow.ini,%x),addchan),HATA![KOD:1]) Çevrimiçi Süresi: $convert($iif($readini(follow.ini,$ini(follow.ini,%x),onlinetime),$readini(follow.ini,$ini(follow.ini,%x),onlinetime),0)) inc %x } }
alias convert { return $replace($duration($1,0),wks,$chr(32) hft,wk,$chr(32) hft,mins,$chr(32) dk,hrs,$chr(32) saat,secs,$chr(32) sn,min,$chr(32) dk,hr,$chr(32) saat,sec,$chr(32) sn,days,$chr(32) gün,day,$chr(32) gün) }
alias reboot { write $+($1,.txt) 2 $+($date, - ,$time,:) $me botunu yeniden başlattı. set %restart 1 set %restartuser $1 exit -nr }
alias follow { if ($1 ison %chan) && ($ini(follow.ini,$1)) { inc -e $+(%,$1) } if ($1 !ison %chan) || (!$ini(follow.ini,$1)) { noti $1 2 | save $1 | $+(.timerfollow,$1) off } }
on *:nick: { if ($ini(follow.ini,$newnick)) { noti $newnick 3 | $+(.timerfollow,$newnick) 0 1 follow $newnick } }
on *:join:#: { if ($chan == %chan) { if ($nick == $me) { timerchck 1 1 checkstart } if ($ini(follow.ini,$nick)) { noti $nick 1 1 | $+(.timerfollow,$nick) 0 1 follow $nick } } if ($chan == %opchan) { if ($nick == $me) { inc %run 1 if (%run == 1) { set %firstrunD $date | set %firstrunT $time } msg $chan 2 $me botunun $chan kanalına $+(%run,.) girişidir. if ($nick == $me) && (%restart == 1) { .msg $chan 2 $me botu %restartuser tarafından yeniden başlatılmıştır. | unset %restart | unset %restartuser } } } }
alias checkstart { var %ini = $ini(follow.ini,0), %x = 1 while (%x <= %ini) { if ($ini(follow.ini,%x) ison %chan) && (!$timer($ini(follow.ini,%x))) { .noti $ini(follow.ini,%x) 1 0 | $+(.timerfollow,$ini(follow.ini,%x)) 0 1 follow $ini(follow.ini,%x) } inc %x } }
alias noti { if ($2 == 1) && ($3 == 1) { .notice $1 2Hoşgeldiniz, $+($1,.) Süreniz başlamıştır. } if ($2 == 1) && ($3 == 0) { .notice $1 2Süreniz başlamıştır. } if ($2 == 2) && ($1 ison %chan) { .notice $1 2Süreniz durdurulmuştur. } if ($2 == 3) { .notice $1 2Süreniz tekrar başlamıştır. } }
alias onlinelist { write $+($2,.txt) 2 $+($date, - ,$time,:) Çevrimiçi listesini sorguladı. var %ini = $ini(follow.ini,0), %x = 1, %y = 0 while (%x <= %ini) { if ($timer($+(follow,$ini(follow.ini,%x)))) { inc %y | msg $1 2 $+(%y,.) Kullanıcı Adı: $+($ini(follow.ini,%x),[Çevrimiçi]) Aktif Süre: $convert($calc($eval($+(%,$ini(follow.ini,%x))))) } inc %x } if (%y == 0) { msg $1 2Çevrimiçi kimse bulunmuyor. } }
alias offlinelist { write $+($2,.txt) 2 $+($date, - ,$time,:) Çevrimdışı listesini sorguladı. var %ini = $ini(follow.ini,0), %x = 1, %y = 0 while (%x <= %ini) { if (!$timer($+(follow,$ini(follow.ini,%x)))) { inc %y | msg $1 2 $+(%y,.) Kullanıcı Adı: $+($ini(follow.ini,%x),[Çevrimdışı]) } inc %x } if (%y == 0) { msg $1 2Çevrimdışı kimse bulunmuyor. } }
|