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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Helpfounder yardımcısı. (v1.0) (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/40122-helpfounder-yardimcisi-v10.html)

L4roXyL 29 Ekim 2007 04:19

Helpfounder yardımcısı. (v1.0)
 
Tarih: 28 Ekim 2007 Pazar
Yazan: L4roXyL

-

İlk öncelikle kurulumunu anlatmak istiyorum.

Bu kod'u kendi mIRC'inize değil, başka bir mIRC'e entegre ederek #help(değişir) ve #help-op(değişir) kanalına sokunuz. Yani kod'u eklediğiniz mIRC, kullandığınız mIRC olmasın.


Helpfounder yardımcısı neler yapar?
  1. Help kanal'ına girip 1 saniye içinde op/sop/halfop olan herhangi bir nick'i helper listesine ekler. Ayrıca girdiği tarihi kayıt eder.
  2. Helper listesine eklenen nick'in;
  • Kaç adet ban attığını,
  • Kaç adet ban açtığını,
  • Kaç adet voice verdiğini,
  • Kaç adet voice aldığını,
  • Help kanalına kaç satır text gönderdiğini,
  • Help kanalına kaç defa giriş/çıkış yaptığını;
Komutlar listesi;(Sadece helpfounder uygulayabilir)

Genel komutlar;

!voicelist (#Help kanalında kayıt gününden beri verilen tüm voice'leri sıralar)
!devoicelist (#Help kanalında kayıt gününden beri alınan tüm voice'leri sıralar)
!banlist (#Help kanalında kayıt tarihinden beri atılan tüm banları sıralar)
!unbanlist (#Help kanalında kayıt tarihinden beri açılan tüm banları sıralar)
!Helperler (#Help kanalında takip listesinde olan tüm helper'ları sıralar)
!sıfırla tümü (#Help kanalı için varolan tüm kayıtları sıfır'lar)

Kişisel komutlar:

!ekle helper-nick (Takip listesine helper eklemek için kullanılır)
!sil helper-nick (Takip listesinde ekli olan bir helper'i siler)
!istatistik helper-nick (Takip listesinde kayıtlı olan helper hakkında ayrıntılı bilgiler verir)
!takip helper-nick (Takip listesinde kayıtlı olan helper'in, hangi tarihlerde giriş/çıkış yaptığını gösterir)
!tsil helper-nick (Takip listesinde kayıtlı olan helper'in, giriş/çıkış tarihlerini sıfır'lar)


Ve kullandıkça anlıyacağınız bir çok özellik daha ekledim.
Bir kaç düzenleme yapmanız gerekmekte;
Bunları kod'un içinde zaten belirteceğim;

Kod:

alias yuzde { return $+($chr(40),%,$left($calc($hget($1,v) * 100 / $hget($2,v)),4),$chr(41)) }
alias yuzde2 { return $+($chr(40),%,$calc($left(100.000000,4) - $remove($yuzde($1,$2),$chr(41),$chr(40),%)),$chr(41)) }
alias yuzde3 { return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41)) }
alias ll { return $calc($hget($1,v)-$hget($2,v)) }
alias kapsa { return $+($chr(2),$1-,$chr(2)) }
alias kontrol { if $count($nick($1,$2).pnick,@,~,%,&) != 0 { hadd -m nickler $2 1 | hsave -i nickler nickler.db | hinc -m giris $2 1 | hsave -i giris giris.db | hinc -m ygiris v 1 | hsave -i ygiris ygiris.db | write $+(helper/,$2,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Giriş,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } | else { helperler #HELP-OP #HELP-OP | msg #HELP-OP #Help kanalına giriş yapıldı. Nick: $+($chr(2),$2,$chr(2)) } }
alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) }
alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | hsil }
alias helperler { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }
alias hsil { var %s = $numtok($findfile(helper,*.txt,1),92) | var %1 = 1,%2 = $findfile(helper,*.txt,0) | while %1 <= %2 { remove $gettok($findfile(helper,*.txt,%1),%s,92) | inc %1 } }
alias sil {
  hdec voiceler v $hget(vc,$1) | hdec banlar v $hget(ban,$1) | hdec unbanlar v $hget(unban,$1) | hdec ytext v $hget(text,$1)
  hdec ygiris v $hget(giris,$1) | hdec ycıkıs v $hget(cıkıs,$1) | hdec devoiceler v $hget(devc,$1)
  hdel nickler $1 | hsave -i nickler nickler.db | hdel giris $1 | hsave -i giris giris.db | hdel cıkıs $1 | hsave -i cıkıs cıkıs.db | hdel vc $1 | hsave -i vc vc.db
  hdel devc $1 | hsave -i devc devc.db | hdel ban $1 | hsave -i ban ban.db | hdel unban $1 | hsave -i unban unban.db | hdel text $1 | hsave -i text text.db
}
on *:start: {
  if !%trh { set %trh $date }
  if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }
  if $isfile(giris.db) { hmake giris 100 | hload -i giris giris.db } | else { hmake giris 100 | hsave -i giris giris.db }
  if $isfile(cıkıs.db) { hmake cıkıs 100 | hload -i cıkıs cıkıs.db } | else { hmake cıkıs 100 | hsave -i cıkıs cıkıs.db }
  if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }
  if $isfile(devoiceler.db) { hmake devoiceler 100 | hload -i devoiceler devoiceler.db } | else { hmake devoiceler 100 | hsave -i devoiceler devoiceler.db }
  if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }
  if $isfile(devc.db) { hmake devc 100 | hload -i devc devc.db } | else { hmake devc 100 | hsave -i devc devc.db }
  if $isfile(banlar.db) { hmake banlar 100 | hload -i banlar banlar.db } | else { hmake banlar 100 | hsave -i banlar banlar.db }
  if $isfile(ban.db) { hmake ban 100 | hload -i ban ban.db } | else { hmake ban 100 | hsave -i ban ban.db }
  if $isfile(unbanlar.db) { hmake unbanlar 100 | hload -i unbanlar unbanlar.db } | else { hmake unbanlar 100 | hsave -i unbanlar unbanlar.db }
  if $isfile(unban.db) { hmake unban 100 | hload -i unban unban.db } | else { hmake unban 100 | hsave -i unban ban.db }
  if $isfile(text.db) { hmake text 100 | hload -i text text.db } | else { hmake text 100 | hsave -i text text.db }
  if $isfile(normalg.db) { hmake normalg 100 | hload -i normalg normalg.db } | else { hmake normalg 100 | hsave -i normalg normalg.db }
  if $isfile(normalc.db) { hmake normalc 100 | hload -i normalc normalc.db } | else { hmake normalc 100 | hsave -i normalc normalc.db }
  if $isfile(ntext.db) { hmake ntext 100 | hload -i ntext ntext.db } | else { hmake ntext 100 | hsave -i ntext ntext.db }
  if $isfile(ytext.db) { hmake ytext 100 | hload -i ytext ytext.db } | else { hmake ytext 100 | hsave -i ytext ytext.db }
  if $isfile(ycıkıs.db) { hmake ycıkıs 100 | hload -i ycıkıs ycıkıs.db } | else { hmake ycıkıs 100 | hsave -i ycıkıs ycıkıs.db }
  if $isfile(ygiris.db) { hmake ygiris 100 | hload -i ygiris ygiris.db } | else { hmake ygiris 100 | hsave -i ygiris ygiris.db }
}
on *:op:#HELP: { if !$hmatch(nickler,$opnick) { hadd -m nickler $opnick 1 | hsave -i nickler nickler.db } }
on *:join:#HELP: { hinc -m normalg v 1 | hsave -i normalg normalg.db | .timer 1 1 kontrol # $nick }
on *:part:#HELP: { hinc -m normalc v 1 | hsave -i normalc normalc.db | if $hmatch(nickler,$nick) { hinc -m ycıkıs v 1 | hsave -i ycıkıs ycıkıs.db | hinc -m cıkıs $nick 1 | hsave -i cıkıs cıkıs.db | write $+(helper/,$nick,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Çıkış,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } }
on *:voice:#HELP: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }
on *:devoice:#HELP: { if $hmatch(nickler,$nick) { hinc -m devoiceler v 1 | hsave -i devoiceler devoiceler.db | hinc -m devc $nick 1 | hsave -i devc devc.db } }
on *:ban:#HELP: { if $hmatch(nickler,$nick) { hinc -m banlar v 1 | hsave -i banlar banlar.db | hinc -m ban $nick 1 | hsave -i ban ban.db } }
on *:unban:#HELP: { if $hmatch(nickler,$nick) { hinc -m unbanlar v 1 | hsave -i unbanlar unbanlar.db | hinc -m unban $nick 1 | hsave -i unban unban.db } }
on *:text:*:#HELP: { hinc -m ntext v 1 | hsave -i ntext ntext.db | if $hmatch(nickler,$nick) { hinc -m ytext v 1 | hsave -i ytext ytext.db | hinc -m text $nick 1 | hsave -i text text.db } }
on *:text:*:#HELP-OP: {
  if $nick == HELP-Founder-NICK'i {
    if $1 == !durum {
      msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt'da olan $+($chr(2),#help,$chr(2)) kanalı istatistik'leri sıralanıyor:
      msg # -
      msg # Toplam kullanıcı girişi istatistikleri: $+($chr(40),$iif($hget(normalg,v),$hget(normalg,v),0),$chr(41))
      msg # - Giriş bilgisi: $iif($hget(normalg,v),Yetkili girişi: $iif($hget(ygiris,v),$hget(ygiris,v),0) $yuzde(ygiris,normalg) - Yetkisiz girişi: $ll(normalg,ygiris) $yuzde2(ygiris,normalg),Toplam: 0 (%100))
      msg # Toplam kullanıcı çıkışı istatistikleri: $+($chr(40),$iif($hget(normalc,v),$hget(normalc,v),0),$chr(41))
      msg # - Çıkış bilgisi: $iif($hget(normalc,v),Yetkili çıkışı: $iif($hget(ycıkıs,v),$hget(ycıkıs,v),0) $yuzde(ycıkıs,normalc) - Yetkisiz çıkışı: $ll(normalc,ycıkıs) $yuzde2(ycıkıs,normalc), Toplam: 0 (%100))
      msg # Toplam verilen voice: $+($chr(40),$iif($hget(voiceler,v),$hget(voiceler,v),0),$chr(41))
      msg # Toplam alınan voice: $+($chr(40),$iif($hget(devoiceler,v),$hget(devoiceler,v),0),$chr(41))
      msg # Toplam atılan ban sayısı: $+($chr(40),$iif($hget(banlar,v),$hget(banlar,v),0),$chr(41))
      msg # Toplam açılan ban sayısı: $+($chr(40),$iif($hget(unbanlar,v),$hget(unbanlar,v),0),$chr(41))
      msg # Toplam yazılan satır sayısı: $+($chr(40),$iif($hget(ntext,v),$hget(ntext,v),0),$chr(41))
      msg # - Satır bilgisi: $iif($hget(ntext,v),Yetkili yazısı: $iif($hget(ytext,v),$hget(ytext,v),0) $yuzde(ytext,ntext) - Yetkisiz yazısı: $ll(ntext,ytext) $yuzde2(ytext,ntext),Toplam: 0 (%100))
      msg # -
      msg # $+($chr(2),$nick,$chr(2)) kullanabileceğiniz komutlar listesini görmek için: $+($chr(2),!Komutlar,$chr(2)) yazınız.
    }
    if $1 == !Komutlar {
      msg # $+($chr(31),Genel komutlar,$chr(31),:)
      msg # -
      msg # !voicelist $kapsa((#Help kanalında kayıt gününden beri verilen tüm voice'leri sıralar))
      msg # !devoicelist $kapsa((#Help kanalında kayıt gününden beri alınan tüm voice'leri sıralar))
      msg # !banlist $kapsa((#Help kanalında kayıt tarihinden beri atılan tüm banları sıralar))
      msg # !unbanlist $kapsa((#Help kanalında kayıt tarihinden beri açılan tüm banları sıralar))
      msg # !Helperler $kapsa((#Help kanalında takip listesinde olan tüm helper'ları sıralar))
      msg # !sıfırla tümü $kapsa((#Help kanalı için varolan tüm kayıtları sıfır'lar))
      msg # -
      msg # $+($chr(31),Kişisel komutlar,$chr(31),:)
      msg # -
      msg # !ekle helper-nick $kapsa((Takip listesine helper eklemek için kullanılır))
      msg # !sil helper-nick $kapsa((Takip listesinde ekli olan bir helper'i siler))
      msg # !istatistik helper-nick $kapsa((Takip listesinde kayıtlı olan helper hakkında ayrıntılı bilgiler verir))
      msg # !takip helper-nick $kapsa((Takip listesinde kayıtlı olan helper'in, hangi tarihlerde giriş/çıkış yaptığını gösterir))
      msg # !tsil helper-nick $kapsa((Takip listesinde kayıtlı olan helper'in, giriş/çıkış tarihlerini sıfır'lar))
      msg # -
      msg # Tüm komutlar sıralandı.
    }
    if $1 == !helperler {
      if $hget(nickler,0).item < 1 { msg # Kayıtlı helper mevcut değil. Helper eklemek için; $kapsa(!ekle helper-nick) yazınız. | halt }
      else { msg # Kayıtlı olan toplam; $kapsa($hget(nickler,0).item) helper sıralanıyor. | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& }
      }
      msg # Kayıtlar sıralandı.
      msg # Herhangi bir helper hakkında detaylı bilgi almak için; $kapsa(!istatistik helper-nick) yazınız.
    }
    if $1 == !voicelist {
      if $hget(voiceler,v) < 1 { msg # $kapsa(#Help) kanalı için voice kaydı yok.(Voice verilmemiş) | halt }
      else {
        msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren verilen toplam voice sayısı: $kapsa($hget(voiceler,v))
        msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper'in voice verme istastiği(Sadece voice veren'ler sıralanır):
        var %1 = 1,%2 = $hget(vc,0).item | while %1 <= %2 { msg # Helper: $kapsa($hget(vc,%1).item) - Verdiği voice sayısı: $kapsa($iif($hget(vc,%1).data,$hget(vc,%1).data $yuzde3(vc,$hget(vc,%1).item,voiceler),0)) | inc %1 }
      }
      msg # -
      msg # Voice kayıtları sıralandı.
    }
    if $1 == !devoicelist {
      if $hget(devoiceler,v) < 1 { msg # $kapsa(#Help) kanalı için devoice kaydı yok.(Devoice işlevi yapılmamış) | halt }
      else {
        msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren uygulanan toplam devoice sayısı: $kapsa($hget(devoiceler,v))
        msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper'in devoice uygulama istastiği:(Sadece devoice veren'ler sıralanır)
        var %a = 1,%b = $hget(devc,0).item | while %a <= %b { msg # Helper: $kapsa($hget(devc,%a).item) - Uyguladığı devoice sayısı: $kapsa($iif($hget(devc,%a).data,$hget(devc,%a).data $yuzde3(devc,$hget(devc,%a).item,devoiceler),0)) | inc %a }
      }
      msg # -
      msg # Devoice kayıtları sıralandı.
    }
    if $1 == !banlist {
      if $hget(banlar,v) < 1 { msg # $kapsa(#Help) kanalı için ban kaydı bulunamadı.(Atılan ban yok) | halt }
      else {
        msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren atılan toplam ban sayısı: $kapsa($hget(banlar,v))
        msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper'in ban uygulama istastiği:(Sadece ban atanlar sıralanır)
        var %x = 1,%y = $hget(ban,0).item | while %x <= %y { msg # Helper: $kapsa($hget(ban,%x).item) - Attığı ban sayısı: $kapsa($iif($hget(ban,%x).data,$hget(ban,%x).data $yuzde3(ban,$hget(ban,%x).item,banlar),0)) | inc %x }
      }
      msg # -
      msg # Ban kayıtları sıralandı.
    }
    if $1 == !unbanlist {
      if $hget(unbanlar,v) < 1 { msg # $kapsa(#Help) kanalı için unban kaydı bulunamadı.(Açılan ban yok) | halt }
      else {
        msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren açılan toplam ban sayısı: $kapsa($hget(unbanlar,v))
        msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) helper'in ban açma istastiği:(Sadece ban açanlar sıralanır)
        var %s = 1,%k = $hget(unban,0).item | while %s <= %k { msg # Helper: $kapsa($hget(unban,%s).item) - Açtığı ban sayısı: $kapsa($iif($hget(unban,%s).data,$hget(ban,%s).data $yuzde3(unban,$hget(unban,%s).item,unbanlar),0)) | inc %s }
      }
      msg # -
      msg # Unban kayıtları sıralandı.
    }
    if $1 == !sıfırla {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sıfırla tümü) (Tüm verileri sıfırlar)  | halt }
      if  $2 == tümü {
        msg # Bu işlev eklenen helper'ler hariç tüm kayıtları silecektir.
        msg # $kapsa(#Help) kanalı için tüm kayıtlar sıfırlansın'mı?
        msg # Onaylamak için: $kapsa(!Evet) - Vazgeçmek için: $kapsa(!Hayır) yazınız.
      }
    }
    if $1 == !Evet { msg # Tüm veriler sıfırlan'dı. | pp }
    if $1 == !Hayır { msg # Tüm verileri sıfırlama işlevi durduruldu. | return $false }
    if $1 == !istatistik {
      if !$2 { msg # Herhangi bir nick girilmedi. Kullanım şekli: $kapsa(!istatistik helper-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) isminde helper kayıtlı değil. | halt }
      else {
        msg # $kapsa($2) helper'inin $kapsa(%trh) tarihinden beri kayıt edilen istatistik'leri sıralanıyor:
        msg # -
        msg # #Help kanalına toplam: $kapsa($+($chr(40),$iif($hget(giris,$2),$hget(giris,$2),0),$chr(41))) giriş yaptı.
        msg # #Help kanalın'dan toplam: $kapsa($+($chr(40),$iif($hget(cıkıs,$2),$hget(cıkıs,$2),0),$chr(41))) çıkış yaptı.
        msg # Not: $kapsa($2) helper'inin hangi tarihlerde giriş/çıkış yaptığını öğrenmek için: $kapsa(!Takip $2) yazınız.
        msg # Verdiği voice sayısı: $kapsa($iif($hget(vc,$2),$hget(vc,$2) $yuzde3(vc,$2,voiceler),0))
        msg # Aldığı voice sayısı: $kapsa($iif($hget(devc,$2),$hget(devc,$2) $yuzde3(devc,$2,devoiceler),0))
        msg # Attığı ban sayısı: $kapsa($iif($hget(ban,$2),$hget(ban,$2) $yuzde3(ban,$2,banlar),0))
        msg # Açtığı ban sayısı: $kapsa($iif($hget(unban,$2),$hget(unban,$2) $yuzde3(unban,$2,unbanlar),0))
        msg # #Help kanalın'da yazdığı satır miktarı: $kapsa($iif($hget(text,$2),$hget(text,$2) $yuzde3(text,$2,ntext),0))
        msg # -
        msg # Bilgi: $kapsa($2) helper'inin tüm istatistikleri sıralandı.
      }
    }
    if $1 == !Takip {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Takip helper-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde mevcut değil. | halt }
      else {
        msg # $kapsa($2) helper'inin $kapsa(%trh) tarihinden beri, $kapsa(#help) kanalına giriş/çıkış bilgileri sıralanıyor.
        var %1 = 1,%2 = $lines($+(helper/,$2,.,txt)) | while %1 <= %2 { msg # $read($+(helper/,$2,.,txt),%1) | inc %1 }
        msg # Bu kayıtları silmek için; $kapsa(!tsil $2) yazınız.
      }
    }
    if $1 == !tsil {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Tsil helper-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde kayıtlı değil. | halt }
      if !$isfile($+(helper/,$2,.,txt)) { msg # $kapsa($2) için giriş/çıkış kaydı yok. | halt }
      else { remove $+(helper/,$2,.,txt)) | msg # $kapsa($2) helper'i için, giriş/çıkış tarihleri sıfırlandı. }
    }
    if $1 == !ekle {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Ekle yeni-helper-nick) | halt }
      if $hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde zaten mevcut. | halt }
      else { hadd -m nickler $2 | hsave -i nickler nickler.db | msg # $kapsa($2) helper listesine eklendi. }
    }
    if $1 == !sil {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sil helper-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde zaten mevcut değil. | halt }
      else { sil $2 | msg # $kapsa($2) helper listesinden tüm kayıtları ile beraber silindi. }
    }
  }
}

#HELP-OP olarak belirttiğim yerleri, kendi help görevlilerinizin toplandığı kanal ile değişeceksiniz.
#HELP olarak belirttiğim yerleri ise, kendi yardım kanalınızın ismi ile değişeceksiniz.
HELP-Founder-NICK'i olarak belirttiğim yere, help founder'in nick'i gelicektir.

İlk başka 1 kaç aksilik % 10 ihtimal ile çıkabilir.
Sonra bu bug'lar düzelicektir.
Umarım işinize yarar. Kolay gelsin.

CanCeL 29 Ekim 2007 17:29

Cevap: Helpfounder yardımcısı. (v1.0)
 
Daha ne olabilir'ki :)
ALLAH Razı olsun L4roXyL :D Hızır gibisin herkesin yardımına koşuyorsun ;oki

Marquez 29 Ekim 2007 18:03

Cevap: Helpfounder yardımcısı. (v1.0)
 
Eline koluna sağlık...

BLaCK_and_WHiTe 29 Ekim 2007 18:15

Cevap: Helpfounder yardımcısı. (v1.0)
 
Bence çok güzel bir çalışma Ciko da bize eggdrop halini yapar artık

Cemalizim 29 Ekim 2007 19:38

Cevap: Helpfounder yardımcısı. (v1.0)
 
Cok Güzel HerSeyin Cok qüsel .. RoportajLık adamsın .)

тєαм 29 Ekim 2007 19:42

Cevap: Helpfounder yardımcısı. (v1.0)
 
helal olsun vallah'a yapıcam dedin yaptın daha ne olsun ki :)

Silencer 01 Kasım 2007 00:28

Cevap: Helpfounder yardımcısı. (v1.0)
 
Tebrikler hasan. Bu gidişle default'a rakip çıkacak :)

Regex 04 Kasım 2007 04:17

Cevap: Helpfounder yardımcısı. (v1.0)
 
"""Vay anasınıııı""" dedirten bi kod.. :)

Helal olsun..

Gravity 10 Aralık 2007 23:22

Cevap: Helpfounder yardımcısı. (v1.0)
 
emeğe saygi , tebrikler

xlxlxl 14 Aralık 2007 21:41

Yanıt: Helpfounder yardımcısı. (v1.0)
 
ya bende mIRC hata verdi direk ? nasil calistiricas bunu

on *:text:*:#Helpop: {
if $nick == Nokta {
if $1 == !durum {
msg # $+([,$chr(

yazdim foundere ama calismadi

riXos 16 Aralık 2007 14:01

Cevap: Helpfounder yardımcısı. (v1.0)
 
Kod:

if $nick == Staff {
ben burda birden fazla nicke yetki vermek istiyorum araya virgül koyarak felan ekledim olmadı bu konuda yardım edebilirmisiniz acaba rica etsem

Xomed 26 Haziran 2008 13:21

Cevap: Helpfounder yardımcısı. (v1.0)
 
cok güzel bir kod müthissin L4roxyLy ..

Alıntı:

KarsiyakaLee Nickli Üyeden Alıntı (Mesaj 308688)
Kod:

if $nick == Staff {
ben burda birden fazla nicke yetki vermek istiyorum araya virgül koyarak felan ekledim olmadı bu konuda yardım edebilirmisiniz acaba rica etsem

Kod:

  if ($nick == nick1) || ($nick == nick2) || ($nick == nick3)  || ($nick == nick4) {
şeklinde arttırırsın..

Bu arada arkadaşlar kodu attıktan sonra mirc'inizin bulundugu yere "Helper" isimli bos bir klasör atmayı unutmayın yoksa !takip helper-nick komutundan verim alamazsınız ve hep * /write açılamıyor gibisinden bir uyarı alırsınız.

lacremel 28 Haziran 2008 13:23

Cevap: Helpfounder yardımcısı. (v1.0)
 
Kod:

alias yuzde { return $+($chr(40),%,$left($calc($hget($1,v) * 100 / $hget($2,v)),4),$chr(41)) }
alias yuzde2 { return $+($chr(40),%,$calc($left(100.000000,4) - $remove($yuzde($1,$2),$chr(41),$chr(40),%)),$chr(41)) }
alias yuzde3 { return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41)) }
alias ll { return $calc($hget($1,v)-$hget($2,v)) }
alias kapsa { return $+($chr(2),$1-,$chr(2)) }
alias kontrol { if $count($nick($1,$2).pnick,@,~,%,&) != 0 { hadd -m nickler $2 1 | hsave -i nickler nickler.db | hinc -m giris $2 1 | hsave -i giris giris.db | hinc -m ygiris v 1 | hsave -i ygiris ygiris.db | write $+(helper/,$2,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Giriş,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) }  }
alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) }
alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | hsil }
alias Globaller { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }
alias hsil { var %s = $numtok($findfile(helper,*.txt,1),92) | var %1 = 1,%2 = $findfile(helper,*.txt,0) | while %1 <= %2 { remove $gettok($findfile(helper,*.txt,%1),%s,92) | inc %1 } }
alias sil {
  hdec voiceler v $hget(vc,$1) | hdec banlar v $hget(ban,$1) | hdec unbanlar v $hget(unban,$1) | hdec ytext v $hget(text,$1)
  hdec ygiris v $hget(giris,$1) | hdec ycıkıs v $hget(cıkıs,$1) | hdec devoiceler v $hget(devc,$1)
  hdel nickler $1 | hsave -i nickler nickler.db | hdel giris $1 | hsave -i giris giris.db | hdel cıkıs $1 | hsave -i cıkıs cıkıs.db | hdel vc $1 | hsave -i vc vc.db
  hdel devc $1 | hsave -i devc devc.db | hdel ban $1 | hsave -i ban ban.db | hdel unban $1 | hsave -i unban unban.db | hdel text $1 | hsave -i text text.db
}
on *:start: {
  if !%trh { set %trh $date }
  if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }
  if $isfile(giris.db) { hmake giris 100 | hload -i giris giris.db } | else { hmake giris 100 | hsave -i giris giris.db }
  if $isfile(cıkıs.db) { hmake cıkıs 100 | hload -i cıkıs cıkıs.db } | else { hmake cıkıs 100 | hsave -i cıkıs cıkıs.db }
  if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }
  if $isfile(devoiceler.db) { hmake devoiceler 100 | hload -i devoiceler devoiceler.db } | else { hmake devoiceler 100 | hsave -i devoiceler devoiceler.db }
  if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }
  if $isfile(devc.db) { hmake devc 100 | hload -i devc devc.db } | else { hmake devc 100 | hsave -i devc devc.db }
  if $isfile(banlar.db) { hmake banlar 100 | hload -i banlar banlar.db } | else { hmake banlar 100 | hsave -i banlar banlar.db }
  if $isfile(ban.db) { hmake ban 100 | hload -i ban ban.db } | else { hmake ban 100 | hsave -i ban ban.db }
  if $isfile(unbanlar.db) { hmake unbanlar 100 | hload -i unbanlar unbanlar.db } | else { hmake unbanlar 100 | hsave -i unbanlar unbanlar.db }
  if $isfile(unban.db) { hmake unban 100 | hload -i unban unban.db } | else { hmake unban 100 | hsave -i unban ban.db }
  if $isfile(text.db) { hmake text 100 | hload -i text text.db } | else { hmake text 100 | hsave -i text text.db }
  if $isfile(normalg.db) { hmake normalg 100 | hload -i normalg normalg.db } | else { hmake normalg 100 | hsave -i normalg normalg.db }
  if $isfile(normalc.db) { hmake normalc 100 | hload -i normalc normalc.db } | else { hmake normalc 100 | hsave -i normalc normalc.db }
  if $isfile(ntext.db) { hmake ntext 100 | hload -i ntext ntext.db } | else { hmake ntext 100 | hsave -i ntext ntext.db }
  if $isfile(ytext.db) { hmake ytext 100 | hload -i ytext ytext.db } | else { hmake ytext 100 | hsave -i ytext ytext.db }
  if $isfile(ycıkıs.db) { hmake ycıkıs 100 | hload -i ycıkıs ycıkıs.db } | else { hmake ycıkıs 100 | hsave -i ycıkıs ycıkıs.db }
  if $isfile(ygiris.db) { hmake ygiris 100 | hload -i ygiris ygiris.db } | else { hmake ygiris 100 | hsave -i ygiris ygiris.db }
}
on *:op:#D-bana: { if !$hmatch(nickler,$opnick) { hadd -m nickler $opnick 1 | hsave -i nickler nickler.db } }
on *:join:#D-bana: { hinc -m normalg v 1 | hsave -i normalg normalg.db | .timer 1 1 kontrol # $nick }
on *:part:#D-bana: { hinc -m normalc v 1 | hsave -i normalc normalc.db | if $hmatch(nickler,$nick) { hinc -m ycıkıs v 1 | hsave -i ycıkıs ycıkıs.db | hinc -m cıkıs $nick 1 | hsave -i cıkıs cıkıs.db | write $+(helper/,$nick,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Çıkış,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } }
on *:voice:#D-bana: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }
on *:devoice:#D-bana: { if $hmatch(nickler,$nick) { hinc -m devoiceler v 1 | hsave -i devoiceler devoiceler.db | hinc -m devc $nick 1 | hsave -i devc devc.db } }
on *:ban:#D-bana: { if $hmatch(nickler,$nick) { hinc -m banlar v 1 | hsave -i banlar banlar.db | hinc -m ban $nick 1 | hsave -i ban ban.db } }
on *:unban:#D-bana: { if $hmatch(nickler,$nick) { hinc -m unbanlar v 1 | hsave -i unbanlar unbanlar.db | hinc -m unban $nick 1 | hsave -i unban unban.db } }
on *:text:*:#D-bana: { hinc -m ntext v 1 | hsave -i ntext ntext.db | if $hmatch(nickler,$nick) { hinc -m ytext v 1 | hsave -i ytext ytext.db | hinc -m text $nick 1 | hsave -i text text.db } }
on *:text:*:#Shy: {
  if $nick == osman {
    if $1 == !durum {
      msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt'da olan $+($chr(2),#D-bana,$chr(2)) kanalı istatistik'leri sıralanıyor:
      msg # -
      msg # Toplam kullanıcı girişi istatistikleri: $+($chr(40),$iif($hget(normalg,v),$hget(normalg,v),0),$chr(41))
      msg # - Giriş bilgisi: $iif($hget(normalg,v),Yetkili girişi: $iif($hget(ygiris,v),$hget(ygiris,v),0) $yuzde(ygiris,normalg) - Yetkisiz girişi: $ll(normalg,ygiris) $yuzde2(ygiris,normalg),Toplam: 0 (%100))
      msg # Toplam kullanıcı çıkışı istatistikleri: $+($chr(40),$iif($hget(normalc,v),$hget(normalc,v),0),$chr(41))
      msg # - Çıkış bilgisi: $iif($hget(normalc,v),Yetkili çıkışı: $iif($hget(ycıkıs,v),$hget(ycıkıs,v),0) $yuzde(ycıkıs,normalc) - Yetkisiz çıkışı: $ll(normalc,ycıkıs) $yuzde2(ycıkıs,normalc), Toplam: 0 (%100))
      msg # Toplam verilen voice: $+($chr(40),$iif($hget(voiceler,v),$hget(voiceler,v),0),$chr(41))
      msg # Toplam alınan voice: $+($chr(40),$iif($hget(devoiceler,v),$hget(devoiceler,v),0),$chr(41))
      msg # Toplam atılan ban sayısı: $+($chr(40),$iif($hget(banlar,v),$hget(banlar,v),0),$chr(41))
      msg # Toplam açılan ban sayısı: $+($chr(40),$iif($hget(unbanlar,v),$hget(unbanlar,v),0),$chr(41))
      msg # Toplam yazılan satır sayısı: $+($chr(40),$iif($hget(ntext,v),$hget(ntext,v),0),$chr(41))
      msg # - Satır bilgisi: $iif($hget(ntext,v),Yetkili yazısı: $iif($hget(ytext,v),$hget(ytext,v),0) $yuzde(ytext,ntext) - Yetkisiz yazısı: $ll(ntext,ytext) $yuzde2(ytext,ntext),Toplam: 0 (%100))
      msg # -
      msg # $+($chr(2),$nick,$chr(2)) kullanabileceğiniz komutlar listesini görmek için: $+($chr(2),!Komutlar,$chr(2)) yazınız.
    }
    if $1 == !gir {
      msg #Shy $2 Kanalina giris yapildi
      join $2
    }
    if $1 == !cik {
      msg #Shy $2 Kanalindan cikis yapildi.
      part $2
    }
    if $1 == !restart {
      msg #Shy Re-Connect
      server
    }   
    if $1 == !Komutlar {
      msg # $+($chr(31),Genel komutlar,$chr(31),:)
      msg # -
      msg # !voicelist $kapsa((#D-bana kanalında kayıt gününden beri verilen tüm voice'leri sıralar))
      msg # !devoicelist $kapsa((#D-bana kanalında kayıt gününden beri alınan tüm voice'leri sıralar))
      msg # !banlist $kapsa((#D-bana kanalında kayıt tarihinden beri atılan tüm banları sıralar))
      msg # !unbanlist $kapsa((#D-bana kanalında kayıt tarihinden beri açılan tüm banları sıralar))
      msg # !Globals $kapsa((#D-bana kanalında takip listesinde olan tüm Globalleri sıralar))
      msg # !sıfırla tümü $kapsa((#D-bana kanalı için varolan tüm kayıtları sıfır'lar))
      msg # -
      msg # $+($chr(31),Kişisel komutlar,$chr(31),:)
      msg # -
      msg # !ekle Global-nick $kapsa((Takip listesine Global eklemek için kullanılır))
      msg # !sil Global-nick $kapsa((Takip listesinde ekli olan bir Global'i siler))
      msg # !istatistik Global-nick $kapsa((Takip listesinde kayıtlı olan Global hakkında ayrıntılı bilgiler verir))
      msg # !takip Global-nick $kapsa((Takip listesinde kayıtlı olan Global'in, hangi tarihlerde giriş/çıkış yaptığını gösterir))
      msg # !tsil Global-nick $kapsa((Takip listesinde kayıtlı olan Global'in, giriş/çıkış tarihlerini sıfır'lar))
      msg # -
      msg # Tüm komutlar sıralandı.
    }
    if $1 == !Globaller {
      if $hget(nickler,0).item < 1 { msg # Kayıtlı Global mevcut değil. Global eklemek için; $kapsa(!ekle Global-nick) yazınız. | halt }
      else { msg # Kayıtlı olan toplam; $kapsa($hget(nickler,0).item) Global sıralanıyor. | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& }
      }
      msg # Kayıtlar sıralandı.
      msg # Herhangi bir Global hakkında detaylı bilgi almak için; $kapsa(!istatistik Global-nick) yazınız.
    }
    if $1 == !voicelist {
      if $hget(voiceler,v) < 1 { msg # $kapsa(#D-bana) kanalı için voice kaydı yok.(Voice verilmemiş) | halt }
      else {
        msg # #D-bana kanalın'da $kapsa(%trh) tarihinden itibaren verilen toplam voice sayısı: $kapsa($hget(voiceler,v))
        msg # #D-bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) Global'in voice verme istastiği(Sadece voice veren'ler sıralanır):
        var %1 = 1,%2 = $hget(vc,0).item | while %1 <= %2 { msg # Global: $kapsa($hget(vc,%1).item) - Verdiği voice sayısı: $kapsa($iif($hget(vc,%1).data,$hget(vc,%1).data $yuzde3(vc,$hget(vc,%1).item,voiceler),0)) | inc %1 }
      }
      msg # -
      msg # Voice kayıtları sıralandı.
    }
    if $1 == !devoicelist {
      if $hget(devoiceler,v) < 1 { msg # $kapsa(#D-bana) kanalı için devoice kaydı yok.(Devoice işlevi yapılmamış) | halt }
      else {
        msg # #D-bana kanalın'da $kapsa(%trh) tarihinden itibaren uygulanan toplam devoice sayısı: $kapsa($hget(devoiceler,v))
        msg # #D-bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) Global'in devoice uygulama istastiği:(Sadece devoice veren'ler sıralanır)
        var %a = 1,%b = $hget(devc,0).item | while %a <= %b { msg # Global: $kapsa($hget(devc,%a).item) - Uyguladığı devoice sayısı: $kapsa($iif($hget(devc,%a).data,$hget(devc,%a).data $yuzde3(devc,$hget(devc,%a).item,devoiceler),0)) | inc %a }
      }
      msg # -
      msg # Devoice kayıtları sıralandı.
    }
    if $1 == !banlist {
      if $hget(banlar,v) < 1 { msg # $kapsa(#D-bana) kanalı için ban kaydı bulunamadı.(Atılan ban yok) | halt }
      else {
        msg # #D-bana kanalın'da $kapsa(%trh) tarihinden itibaren atılan toplam ban sayısı: $kapsa($hget(banlar,v))
        msg # #D-bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) Global'in ban uygulama istastiği:(Sadece ban atanlar sıralanır)
        var %x = 1,%y = $hget(ban,0).item | while %x <= %y { msg # Global: $kapsa($hget(ban,%x).item) - Attığı ban sayısı: $kapsa($iif($hget(ban,%x).data,$hget(ban,%x).data $yuzde3(ban,$hget(ban,%x).item,banlar),0)) | inc %x }
      }
      msg # -
      msg # Ban kayıtları sıralandı.
    }
    if $1 == !unbanlist {
      if $hget(unbanlar,v) < 1 { msg # $kapsa(#D-bana) kanalı için unban kaydı bulunamadı.(Açılan ban yok) | halt }
      else {
        msg # #D-bana kanalın'da $kapsa(%trh) tarihinden itibaren açılan toplam ban sayısı: $kapsa($hget(unbanlar,v))
        msg # #D-bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) Global'in ban açma istastiği:(Sadece ban açanlar sıralanır)
        var %s = 1,%k = $hget(unban,0).item | while %s <= %k { msg # Global: $kapsa($hget(unban,%s).item) - Açtığı ban sayısı: $kapsa($iif($hget(unban,%s).data,$hget(ban,%s).data $yuzde3(unban,$hget(unban,%s).item,unbanlar),0)) | inc %s }
      }
      msg # -
      msg # Unban kayıtları sıralandı.
    }
    if $1 == !sıfırla {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sıfırla tümü) (Tüm verileri sıfırlar)  | halt }
      if  $2 == tümü {
        msg # Bu işlev eklenen Global'ler hariç tüm kayıtları silecektir.
        msg # $kapsa(#D-bana) kanalı için tüm kayıtlar sıfırlansın'mı?
        msg # Onaylamak için: $kapsa(!Evet) - Vazgeçmek için: $kapsa(!Hayır) yazınız.
      }
    }
    if $1 == !Evet { msg # Tüm veriler sıfırlan'dı. | pp }
    if $1 == !Hayır { msg # Tüm verileri sıfırlama işlevi durduruldu. | return $false }
    if $1 == !istatistik {
      if !$2 { msg # Herhangi bir nick girilmedi. Kullanım şekli: $kapsa(!istatistik Global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) isminde Global kayıtlı değil. | halt }
      else {
        msg # $kapsa($2) Global'inin $kapsa(%trh) tarihinden beri kayıt edilen istatistik'leri sıralanıyor:
        msg # -
        msg # #D-bana kanalına toplam: $kapsa($+($chr(40),$iif($hget(giris,$2),$hget(giris,$2),0),$chr(41))) giriş yaptı.
        msg # #D-bana kanalın'dan toplam: $kapsa($+($chr(40),$iif($hget(cıkıs,$2),$hget(cıkıs,$2),0),$chr(41))) çıkış yaptı.
        msg # Not: $kapsa($2) Global'inin hangi tarihlerde giriş/çıkış yaptığını öğrenmek için: $kapsa(!Takip $2) yazınız.
        msg # Verdiği voice sayısı: $kapsa($iif($hget(vc,$2),$hget(vc,$2) $yuzde3(vc,$2,voiceler),0))
        msg # Aldığı voice sayısı: $kapsa($iif($hget(devc,$2),$hget(devc,$2) $yuzde3(devc,$2,devoiceler),0))
        msg # Attığı ban sayısı: $kapsa($iif($hget(ban,$2),$hget(ban,$2) $yuzde3(ban,$2,banlar),0))
        msg # Açtığı ban sayısı: $kapsa($iif($hget(unban,$2),$hget(unban,$2) $yuzde3(unban,$2,unbanlar),0))
        msg # #D-bana kanalın'da yazdığı satır miktarı: $kapsa($iif($hget(text,$2),$hget(text,$2) $yuzde3(text,$2,ntext),0))
        msg # -
        msg # Bilgi: $kapsa($2) Global'inin tüm istatistikleri sıralandı.
      }
    }
    if $1 == !Takip {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Takip Global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) Global listesinde mevcut değil. | halt }
      else {
        msg # $kapsa($2) Global'inin $kapsa(%trh) tarihinden beri, $kapsa(#D-bana) kanalına giriş/çıkış bilgileri sıralanıyor.
        var %1 = 1,%2 = $lines($+(helper/,$2,.,txt)) | while %1 <= %2 { msg # $read($+(helper/,$2,.,txt),%1) | inc %1 }
        msg # Bu kayıtları silmek için; $kapsa(!tsil $2) yazınız.
      }
    }
    if $1 == !tsil {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Tsil Global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) Global listesinde kayıtlı değil. | halt }
      if !$isfile($+(/,$2,.,txt)) { msg # $kapsa($2) için giriş/çıkış kaydı yok. | halt }
      else { remove $+(helper/,$2,.,txt)) | msg # $kapsa($2) Global'i için, giriş/çıkış tarihleri sıfırlandı. }
    }
    if $1 == !ekle {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Ekle yeni-Global-nick) | halt }
      if $hmatch(nickler,$2) { msg # $kapsa($2) Global listesinde zaten mevcut. | halt }
      else { hadd -m nickler $2 | hsave -i nickler nickler.db | msg # $kapsa($2) Global listesine eklendi. }
    }
    if $1 == !sil {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sil Global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) Global listesinde zaten mevcut değil. | halt }
      else { sil $2 | msg # $kapsa($2) Global listesinden tüm kayıtları ile beraber silindi. }
    }
  }
}
on *:NOTiCE:*NickServ identify*:?:{ if ($nick == NickServ) { identify osmantan }
}
on *:connect:{
  join #shy
  
  
  partall
}

Kod:

* /hdec: no such table 'voiceler' (line 12, script.ini)
-
* /write: unable to open 'C:\Program Files\mIRC\helper\vesli.txt'
-
* /write: unable to open 'C:\Program Files\mIRC\helper\osman.txt'
-
* /write: unable to open 'C:\Program Files\mIRC\helper\osman.txt' (line 6, script.ini)
-
* /hdec: no such table 'voiceler' (line 12, script.ini)

böyle hata verdi :S

Xomed 29 Haziran 2008 18:38

Cevap: Helpfounder yardımcısı. (v1.0)
 
kardeş sen kodu tamamen değiştirmissin nerdeyse.. ben sana dogrusunu yapıp vereceğim..

Xomed 29 Haziran 2008 19:24

Cevap: Helpfounder yardımcısı. (v1.0)
 
Kardeş bak kodlarla oynamaya hiç gerek yok , senin için sadece mesajları değiştirsen yeterli.. Şimdi aynen dediklerimi yap ;

-> mIRC inin bulunduğu dosyada helper isimli bir klasör aç.
-> Aşağıda bulunan kodu aynen mIRC inin Alt+R(Editör) bölümünde Remote kısmına yapıştır.

*Not: Kodda herhangi bir oynama yapmana gerek yok. Senin koddaki mesajların aynısını yaptım hatta bu kodda daha fazlası var.

Kod:

alias yuzde { return $+($chr(40),%,$left($calc($hget($1,v) * 100 / $hget($2,v)),4),$chr(41)) }
alias yuzde2 { return $+($chr(40),%,$calc($left(100.000000,4) - $remove($yuzde($1,$2),$chr(41),$chr(40),%)),$chr(41)) }
alias yuzde3 { return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41)) }
alias ll { return $calc($hget($1,v)-$hget($2,v)) }
alias kapsa { return $+($chr(2),$1-,$chr(2)) }
alias kontrol { if $count($nick($1,$2).pnick,@,~,%,&) != 0 { hadd -m nickler $2 1 | hsave -i nickler nickler.db | hinc -m giris $2 1 | hsave -i giris giris.db | hinc -m ygiris v 1 | hsave -i ygiris ygiris.db | write $+(helper/,$2,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Giriş,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } | else { helperler #Shy #Shy | msg #Shy #D-bana kanalına giriş yapıldı. Nick: $+($chr(2),$2,$chr(2)) } }
alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) }
alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | hsil }
alias helperler { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }
alias hsil { var %s = $numtok($findfile(helper,*.txt,1),92) | var %1 = 1,%2 = $findfile(helper,*.txt,0) | while %1 <= %2 { remove $gettok($findfile(helper,*.txt,%1),%s,92) | inc %1 } }
alias sil {
  hdec voiceler v $hget(vc,$1) | hdec banlar v $hget(ban,$1) | hdec unbanlar v $hget(unban,$1) | hdec ytext v $hget(text,$1)
  hdec ygiris v $hget(giris,$1) | hdec ycıkıs v $hget(cıkıs,$1) | hdec devoiceler v $hget(devc,$1)
  hdel nickler $1 | hsave -i nickler nickler.db | hdel giris $1 | hsave -i giris giris.db | hdel cıkıs $1 | hsave -i cıkıs cıkıs.db | hdel vc $1 | hsave -i vc vc.db
  hdel devc $1 | hsave -i devc devc.db | hdel ban $1 | hsave -i ban ban.db | hdel unban $1 | hsave -i unban unban.db | hdel text $1 | hsave -i text text.db
}
on *:start: {
  if !%trh { set %trh $date }
  if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }
  if $isfile(giris.db) { hmake giris 100 | hload -i giris giris.db } | else { hmake giris 100 | hsave -i giris giris.db }
  if $isfile(cıkıs.db) { hmake cıkıs 100 | hload -i cıkıs cıkıs.db } | else { hmake cıkıs 100 | hsave -i cıkıs cıkıs.db }
  if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }
  if $isfile(devoiceler.db) { hmake devoiceler 100 | hload -i devoiceler devoiceler.db } | else { hmake devoiceler 100 | hsave -i devoiceler devoiceler.db }
  if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }
  if $isfile(devc.db) { hmake devc 100 | hload -i devc devc.db } | else { hmake devc 100 | hsave -i devc devc.db }
  if $isfile(banlar.db) { hmake banlar 100 | hload -i banlar banlar.db } | else { hmake banlar 100 | hsave -i banlar banlar.db }
  if $isfile(ban.db) { hmake ban 100 | hload -i ban ban.db } | else { hmake ban 100 | hsave -i ban ban.db }
  if $isfile(unbanlar.db) { hmake unbanlar 100 | hload -i unbanlar unbanlar.db } | else { hmake unbanlar 100 | hsave -i unbanlar unbanlar.db }
  if $isfile(unban.db) { hmake unban 100 | hload -i unban unban.db } | else { hmake unban 100 | hsave -i unban ban.db }
  if $isfile(text.db) { hmake text 100 | hload -i text text.db } | else { hmake text 100 | hsave -i text text.db }
  if $isfile(normalg.db) { hmake normalg 100 | hload -i normalg normalg.db } | else { hmake normalg 100 | hsave -i normalg normalg.db }
  if $isfile(normalc.db) { hmake normalc 100 | hload -i normalc normalc.db } | else { hmake normalc 100 | hsave -i normalc normalc.db }
  if $isfile(ntext.db) { hmake ntext 100 | hload -i ntext ntext.db } | else { hmake ntext 100 | hsave -i ntext ntext.db }
  if $isfile(ytext.db) { hmake ytext 100 | hload -i ytext ytext.db } | else { hmake ytext 100 | hsave -i ytext ytext.db }
  if $isfile(ycıkıs.db) { hmake ycıkıs 100 | hload -i ycıkıs ycıkıs.db } | else { hmake ycıkıs 100 | hsave -i ycıkıs ycıkıs.db }
  if $isfile(ygiris.db) { hmake ygiris 100 | hload -i ygiris ygiris.db } | else { hmake ygiris 100 | hsave -i ygiris ygiris.db }
}
on *:op:#D-bana: { if !$hmatch(nickler,$opnick) { hadd -m nickler $opnick 1 | hsave -i nickler nickler.db } }
on *:join:#D-bana: { hinc -m normalg v 1 | hsave -i normalg normalg.db | .timer 1 1 kontrol # $nick }
on *:part:#D-bana: { hinc -m normalc v 1 | hsave -i normalc normalc.db | if $hmatch(nickler,$nick) { hinc -m ycıkıs v 1 | hsave -i ycıkıs ycıkıs.db | hinc -m cıkıs $nick 1 | hsave -i cıkıs cıkıs.db | write $+(helper/,$nick,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Çıkış,$chr(31),$chr(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr(2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } }
on *:voice:#D-bana: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }
on *:devoice:#D-bana: { if $hmatch(nickler,$nick) { hinc -m devoiceler v 1 | hsave -i devoiceler devoiceler.db | hinc -m devc $nick 1 | hsave -i devc devc.db } }
on *:ban:#D-bana: { if $hmatch(nickler,$nick) { hinc -m banlar v 1 | hsave -i banlar banlar.db | hinc -m ban $nick 1 | hsave -i ban ban.db } }
on *:unban:#D-bana: { if $hmatch(nickler,$nick) { hinc -m unbanlar v 1 | hsave -i unbanlar unbanlar.db | hinc -m unban $nick 1 | hsave -i unban unban.db } }
on *:text:*:#D-bana: { hinc -m ntext v 1 | hsave -i ntext ntext.db | if $hmatch(nickler,$nick) { hinc -m ytext v 1 | hsave -i ytext ytext.db | hinc -m text $nick 1 | hsave -i text text.db } }
on *:text:*:#Shy: {
  if $nick == osman {
    if $1 == !durum {
      msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt'da olan $+($chr(2),#D-bana,$chr(2)) kanalı istatistik'leri sıralanıyor:
      msg # -
      msg # Toplam kullanıcı girişi istatistikleri: $+($chr(40),$iif($hget(normalg,v),$hget(normalg,v),0),$chr(41))
      msg # - Giriş bilgisi: $iif($hget(normalg,v),Yetkili girişi: $iif($hget(ygiris,v),$hget(ygiris,v),0) $yuzde(ygiris,normalg) - Yetkisiz girişi: $ll(normalg,ygiris) $yuzde2(ygiris,normalg),Toplam: 0 (%100))
      msg # Toplam kullanıcı çıkışı istatistikleri: $+($chr(40),$iif($hget(normalc,v),$hget(normalc,v),0),$chr(41))
      msg # - Çıkış bilgisi: $iif($hget(normalc,v),Yetkili çıkışı: $iif($hget(ycıkıs,v),$hget(ycıkıs,v),0) $yuzde(ycıkıs,normalc) - Yetkisiz çıkışı: $ll(normalc,ycıkıs) $yuzde2(ycıkıs,normalc), Toplam: 0 (%100))
      msg # Toplam verilen voice: $+($chr(40),$iif($hget(voiceler,v),$hget(voiceler,v),0),$chr(41))
      msg # Toplam alınan voice: $+($chr(40),$iif($hget(devoiceler,v),$hget(devoiceler,v),0),$chr(41))
      msg # Toplam atılan ban sayısı: $+($chr(40),$iif($hget(banlar,v),$hget(banlar,v),0),$chr(41))
      msg # Toplam açılan ban sayısı: $+($chr(40),$iif($hget(unbanlar,v),$hget(unbanlar,v),0),$chr(41))
      msg # Toplam yazılan satır sayısı: $+($chr(40),$iif($hget(ntext,v),$hget(ntext,v),0),$chr(41))
      msg # - Satır bilgisi: $iif($hget(ntext,v),Yetkili yazısı: $iif($hget(ytext,v),$hget(ytext,v),0) $yuzde(ytext,ntext) - Yetkisiz yazısı: $ll(ntext,ytext) $yuzde2(ytext,ntext),Toplam: 0 (%100))
      msg # -
      msg # $+($chr(2),$nick,$chr(2)) kullanabileceğiniz komutlar listesini görmek için: $+($chr(2),!Komutlar,$chr(2)) yazınız.
    }
    if $1 == !Komutlar {
      msg # $+($chr(31),Genel komutlar,$chr(31),:)
      msg # -
      msg # !voicelist $kapsa((#D-bana kanalında kayıt gününden beri verilen tüm voice'leri sıralar))
      msg # !devoicelist $kapsa((#D-bana kanalında kayıt gününden beri alınan tüm voice'leri sıralar))
      msg # !banlist $kapsa((#D-bana kanalında kayıt tarihinden beri atılan tüm banları sıralar))
      msg # !unbanlist $kapsa((#D-bana kanalında kayıt tarihinden beri açılan tüm banları sıralar))
      msg # !Globals $kapsa((#D-bana kanalında takip listesinde olan tüm Globalleri sıralar))
      msg # !sıfırla tümü $kapsa((#D-bana kanalı için varolan tüm kayıtları sıfır'lar))
      msg # -
      msg # $+($chr(31),Kişisel komutlar,$chr(31),:)
      msg # -
      msg # !ekle Global-nick $kapsa((Takip listesine Global eklemek için kullanılır))
      msg # !sil Global-nick $kapsa((Takip listesinde ekli olan bir Global'i siler))
      msg # !istatistik Global-nick $kapsa((Takip listesinde kayıtlı olan Global hakkında ayrıntılı bilgiler verir))
      msg # !takip Global-nick $kapsa((Takip listesinde kayıtlı olan Global'in, hangi tarihlerde giriş/çıkış yaptığını gösterir))
      msg # !tsil Global-nick $kapsa((Takip listesinde kayıtlı olan Global'in, giriş/çıkış tarihlerini sıfır'lar))
      msg # -
      msg # $+($chr(31),Bot komutları,$chr(31),:)
      msg # -
      msg # !çık #kanal $kapsa((Botun belirtilen kanaldan cıkmasını saglar.))
      msg # !gir #kanal $kapsa((Botun belirtilen kanala girmesini saglar.))
      msg # -
      msg # Tüm komutlar sıralandı.
    }
    if $1 == !Globals {
      if $hget(nickler,0).item < 1 { msg # Kayıtlı Global mevcut değil. Global eklemek için; $kapsa(!ekle global-nick) yazınız. | halt }
      else { msg # Kayıtlı olan toplam; $kapsa($hget(nickler,0).item) globaller sıralanıyor. | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& }
      }
      msg # Kayıtlar sıralandı.
      msg # Herhangi bir global hakkında detaylı bilgi almak için; $kapsa(!istatistik global-nick) yazınız.
    }
    if $1 == !voicelist {
      if $hget(voiceler,v) < 1 { msg # $kapsa(#D-Bana) kanalı için voice kaydı yok.(Voice verilmemiş) | halt }
      else {
        msg # #D-Bana kanalın'da $kapsa(%trh) tarihinden itibaren verilen toplam voice sayısı: $kapsa($hget(voiceler,v))
        msg # #D-Bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) global'in voice verme istastiği(Sadece voice veren'ler sıralanır):
        var %1 = 1,%2 = $hget(vc,0).item | while %1 <= %2 { msg # Global: $kapsa($hget(vc,%1).item) - Verdiği voice sayısı: $kapsa($iif($hget(vc,%1).data,$hget(vc,%1).data $yuzde3(vc,$hget(vc,%1).item,voiceler),0)) | inc %1 }
      }
      msg # -
      msg # Voice kayıtları sıralandı.
    }
    if $1 == !devoicelist {
      if $hget(devoiceler,v) < 1 { msg # $kapsa(#D-Bana) kanalı için devoice kaydı yok.(Devoice işlevi yapılmamış) | halt }
      else {
        msg # #D-Bana kanalın'da $kapsa(%trh) tarihinden itibaren uygulanan toplam devoice sayısı: $kapsa($hget(devoiceler,v))
        msg # #D-Bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) global'in devoice uygulama istastiği:(Sadece devoice veren'ler sıralanır)
        var %a = 1,%b = $hget(devc,0).item | while %a <= %b { msg # Global: $kapsa($hget(devc,%a).item) - Uyguladığı devoice sayısı: $kapsa($iif($hget(devc,%a).data,$hget(devc,%a).data $yuzde3(devc,$hget(devc,%a).item,devoiceler),0)) | inc %a }
      }
      msg # -
      msg # Devoice kayıtları sıralandı.
    }
    if $1 == !banlist {
      if $hget(banlar,v) < 1 { msg # $kapsa(#D-Bana) kanalı için ban kaydı bulunamadı.(Atılan ban yok) | halt }
      else {
        msg # #D-Bana kanalın'da $kapsa(%trh) tarihinden itibaren atılan toplam ban sayısı: $kapsa($hget(banlar,v))
        msg # #D-Bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) global'in ban uygulama istastiği:(Sadece ban atanlar sıralanır)
        var %x = 1,%y = $hget(ban,0).item | while %x <= %y { msg # Global: $kapsa($hget(ban,%x).item) - Attığı ban sayısı: $kapsa($iif($hget(ban,%x).data,$hget(ban,%x).data $yuzde3(ban,$hget(ban,%x).item,banlar),0)) | inc %x }
      }
      msg # -
      msg # Ban kayıtları sıralandı.
    }
    if $1 == !unbanlist {
      if $hget(unbanlar,v) < 1 { msg # $kapsa(#D-Bana) kanalı için unban kaydı bulunamadı.(Açılan ban yok) | halt }
      else {
        msg # #D-Bana kanalın'da $kapsa(%trh) tarihinden itibaren açılan toplam ban sayısı: $kapsa($hget(unbanlar,v))
        msg # #D-Bana kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41))) global'in ban açma istastiği:(Sadece ban açanlar sıralanır)
        var %s = 1,%k = $hget(unban,0).item | while %s <= %k { msg # Global: $kapsa($hget(unban,%s).item) - Açtığı ban sayısı: $kapsa($iif($hget(unban,%s).data,$hget(ban,%s).data $yuzde3(unban,$hget(unban,%s).item,unbanlar),0)) | inc %s }
      }
      msg # -
      msg # Unban kayıtları sıralandı.
    }
    if $1 == !sıfırla {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sıfırla tümü) (Tüm verileri sıfırlar)  | halt }
      if  $2 == tümü {
        msg # Bu işlev eklenen global'ler hariç tüm kayıtları silecektir.
        msg # $kapsa(#D-Bana) kanalı için tüm kayıtlar sıfırlansın'mı?
        msg # Onaylamak için: $kapsa(!Evet) - Vazgeçmek için: $kapsa(!Hayır) yazınız.
      }
    }
    if $1 == !Evet { msg # Tüm veriler sıfırlan'dı. | pp }
    if $1 == !Hayır { msg # Tüm verileri sıfırlama işlevi durduruldu. | return $false }
    if $1 == !istatistik {
      if !$2 { msg # Herhangi bir nick girilmedi. Kullanım şekli: $kapsa(!istatistik global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) isminde global kayıtlı değil. | halt }
      else {
        msg # $kapsa($2) global'inin $kapsa(%trh) tarihinden beri kayıt edilen istatistik'leri sıralanıyor:
        msg # -
        msg # #D-Bana kanalına toplam: $kapsa($+($chr(40),$iif($hget(giris,$2),$hget(giris,$2),0),$chr(41))) giriş yaptı.
        msg # #D-Bana kanalın'dan toplam: $kapsa($+($chr(40),$iif($hget(cıkıs,$2),$hget(cıkıs,$2),0),$chr(41))) çıkış yaptı.
        msg # Not: $kapsa($2) global'inin hangi tarihlerde giriş/çıkış yaptığını öğrenmek için: $kapsa(!Takip $2) yazınız.
        msg # Verdiği voice sayısı: $kapsa($iif($hget(vc,$2),$hget(vc,$2) $yuzde3(vc,$2,voiceler),0))
        msg # Aldığı voice sayısı: $kapsa($iif($hget(devc,$2),$hget(devc,$2) $yuzde3(devc,$2,devoiceler),0))
        msg # Attığı ban sayısı: $kapsa($iif($hget(ban,$2),$hget(ban,$2) $yuzde3(ban,$2,banlar),0))
        msg # Açtığı ban sayısı: $kapsa($iif($hget(unban,$2),$hget(unban,$2) $yuzde3(unban,$2,unbanlar),0))
        msg # #D-Bana kanalın'da yazdığı satır miktarı: $kapsa($iif($hget(text,$2),$hget(text,$2) $yuzde3(text,$2,ntext),0))
        msg # -
        msg # Bilgi: $kapsa($2) global'inin tüm istatistikleri sıralandı.
      }
    }
    if $1 == !Takip {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Takip global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) global listesinde mevcut değil. | halt }
      else {
        msg # $kapsa($2) global'inin $kapsa(%trh) tarihinden beri, $kapsa(#D-Bana) kanalına giriş/çıkış bilgileri sıralanıyor.
        var %1 = 1,%2 = $lines($+(helper/,$2,.,txt)) | while %1 <= %2 { msg # $read($+(helper/,$2,.,txt),%1) | inc %1 }
        msg # Bu kayıtları silmek için; $kapsa(!tsil $2) yazınız.
      }
    }
    if $1 == !tsil {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Tsil global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) global listesinde kayıtlı değil. | halt }
      if !$isfile($+(helper/,$2,.,txt)) { msg # $kapsa($2) için giriş/çıkış kaydı yok. | halt }
      else { remove $+(helper/,$2,.,txt)) | msg # $kapsa($2) global'i için, giriş/çıkış tarihleri sıfırlandı. }
    }
    if $1 == !ekle {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Ekle yeni-global-nick) | halt }
      if $hmatch(nickler,$2) { msg # $kapsa($2) global listesinde zaten mevcut. | halt }
      else { hadd -m nickler $2 | hsave -i nickler nickler.db | msg # $kapsa($2) global listesine eklendi. }
    }
    if $1 == !sil {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sil global-nick) | halt }
      if !$hmatch(nickler,$2) { msg # $kapsa($2) global listesinde zaten mevcut değil. | halt }
      else { sil $2 | msg # $kapsa($2) global listesinden tüm kayıtları ile beraber silindi. }
    }
    if $1 == !çık {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!çık #kanal) | halt }
      elseif $me ison $2 { part $2 | msg %helpchan $2 kanalından çıktım. }
      else { msg %helpchan $2 kanalında zaten yokum. }
    }
    if $1 == !gir {
      if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!gir #kanal) | halt }
      elseif $me ison $2 { msg %helpchan $2 kanalında zaten bulunuyorum. | halt }
      else { join $2 | msg %helpchan $2 kanalına girdim. }
    }
    if $1 == !restart {
      .msg # Restart - sunucudan çıkılıyor..
      .server %server
      /timer 1 3 /partall
      /timer 1 4 /join #shy
    }
  }
}
on *:NOTiCE:*NickServ identify*:?:{ if ($nick == NickServ) { identify osmantan } }
on *:connect:{
  /set %server $server
  /timer 1 3 /partall
  /timer 1 4 /join #shy
}


lacremel 29 Haziran 2008 23:09

Cevap: Helpfounder yardımcısı. (v1.0)
 
Allah razı olsun. yalnız helperlarıo ekliyorum listeye mirci kapatıp actıqım zaman sıfırlanıyor ?

Xomed 30 Haziran 2008 00:40

Cevap: Helpfounder yardımcısı. (v1.0)
 
rar ın içinden mi açıyorsun , öyle yapmaması gerek :S

lacremel 30 Haziran 2008 11:10

Cevap: Helpfounder yardımcısı. (v1.0)
 
yok rardan felan acmıyorum direkt remoteye koydum helperları ekliyorum mırcı kapatıp actıqım zaman listede 1 veya 2 helper kalmıs oluyor. Bide bunun masterini bir kisi daha eklemek istiyorum olabilirmi ?

{11:11:17} <&Shy> klalsd global listesine eklendi.
{11:11:17} <&Shy> Bhty global listesine eklendi.
{11:11:17} <&Shy> Klys global listesine eklendi.
{11:11:17} <&Shy> Xed global listesine eklendi.
{11:11:17} <&Shy> asa global listesine eklendi.
{11:11:17} <&Shy> isaa global listesine eklendi.
{11:11:17} <&Shy> istan global listesine eklendi.
{11:11:17} <&Shy> sus global listesine eklendi.
{11:11:17} <&Shy> sinir global listesine eklendi.
{11:11:17} <&Shy> bravo global listesine eklendi.
{11:11:18} <&Shy> cece global listesine eklendi.
{11:11:18} <&Shy> krals global listesine eklendi.
{11:11:19} <&Shy> bilmiyorum global listesine eklendi.
{11:11:21} <&Shy> logger global listesine eklendi.
{11:11:22} <&Shy> systems global listesine eklendi.
{11:11:22} <&Shy> muca global listesine eklendi.
{11:11:23} <&Shy> sisman global listesine eklendi.
{11:11:24} <&Shy> ayse global listesine eklendi.
{11:11:26} <&Shy> osman global listesine eklendi.

ekledim. ondan sonra Mırci kapattım geri actim

{11:13:10} <~osman> !globals
{11:13:11} <&Shy> Kayıtlı Global mevcut değil. Global eklemek için; !ekle global-nick yazınız.

Xomed 01 Temmuz 2008 00:38

Cevap: Helpfounder yardımcısı. (v1.0)
 
lacremel valla bu sorununa bişey diyemiyeceğim fakat master sayını 2 ye cıkartabilirsin.. zaten yukarıda da bir arkadaş sormuştu söylemiştim..

Bu satırı ;

Kod:

  if $nick == osman {
Bu şekilde değiştir ;

Kod:

  if ($nick == osman) || ($nick == nick2)  {

SilentSouL 01 Temmuz 2008 00:41

Cevap: Helpfounder yardımcısı. (v1.0)
 
işime yarayacak ellerine sağlık....
teşekkürler...

lacremel 01 Temmuz 2008 09:52

Cevap: Helpfounder yardımcısı. (v1.0)
 
Arkadaslar lütfen bu soruna bakarmısınız. Eklediqim Helper'lar siliniyor Mırc kapanınca ne yapmam lazım.

Crips 01 Temmuz 2008 17:06

Cevap: Helpfounder yardımcısı. (v1.0)
 
L4roXyL HeLpFounderlerinin işine yarıcak bir addon.Tesekkürler

lacremel 01 Temmuz 2008 17:35

Cevap: Helpfounder yardımcısı. (v1.0)
 
;D bana bakan yokmu ya madur kaldım :=) L4roXyL dostum nerdesin ya

Heavenly 23 Temmuz 2008 16:39

Cevap: Helpfounder yardımcısı. (v1.0)
 
alias yuzde { return $+($chr(40),%,$left($calc($hget($1,v) * 100 / $hget($2,v)),4),$chr(41)) }
alias yuzde2 { return $+($chr(40),%,$calc($left(100.000000,4) - $remove($yuzde($1,$2),$chr(41),$chr(40),%)),$chr(4 1)) }
alias yuzde3 { return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41)) }
alias ll { return $calc($hget($1,v)-$hget($2,v)) }
alias kapsa { return $+($chr(2),$1-,$chr(2)) }
alias kontrol { if $count($nick($1,$2).pnick,@,~,%,&) != 0 { hadd -m nickler $2 1 | hsave -i nickler nickler.db | hinc -m giris $2 1 | hsave -i giris giris.db | hinc -m ygiris v 1 | hsave -i ygiris ygiris.db | write $+(helper/,$2,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Giriş,$chr(31),$ch r(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr (2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } | else { helperler #HELP-OP #HELP-OP | msg #HELP-OP #Help kanalına giriş yapıldı. Nick: $+($chr(2),$2,$chr(2)) } }
alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesda y,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday, Cumartesi,Sunday,Pazar) }
alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | hsil }
alias helperler { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }
alias hsil { var %s = $numtok($findfile(helper,*.txt,1),92) | var %1 = 1,%2 = $findfile(helper,*.txt,0) | while %1 <= %2 { remove $gettok($findfile(helper,*.txt,%1),%s,92) | inc %1 } }
alias sil {
hdec voiceler v $hget(vc,$1) | hdec banlar v $hget(ban,$1) | hdec unbanlar v $hget(unban,$1) | hdec ytext v $hget(text,$1)
hdec ygiris v $hget(giris,$1) | hdec ycıkıs v $hget(cıkıs,$1) | hdec devoiceler v $hget(devc,$1)
hdel nickler $1 | hsave -i nickler nickler.db | hdel giris $1 | hsave -i giris giris.db | hdel cıkıs $1 | hsave -i cıkıs cıkıs.db | hdel vc $1 | hsave -i vc vc.db
hdel devc $1 | hsave -i devc devc.db | hdel ban $1 | hsave -i ban ban.db | hdel unban $1 | hsave -i unban unban.db | hdel text $1 | hsave -i text text.db
}
on *:start: {
if !%trh { set %trh $date }
if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }
if $isfile(giris.db) { hmake giris 100 | hload -i giris giris.db } | else { hmake giris 100 | hsave -i giris giris.db }
if $isfile(cıkıs.db) { hmake cıkıs 100 | hload -i cıkıs cıkıs.db } | else { hmake cıkıs 100 | hsave -i cıkıs cıkıs.db }
if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }
if $isfile(devoiceler.db) { hmake devoiceler 100 | hload -i devoiceler devoiceler.db } | else { hmake devoiceler 100 | hsave -i devoiceler devoiceler.db }
if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }
if $isfile(devc.db) { hmake devc 100 | hload -i devc devc.db } | else { hmake devc 100 | hsave -i devc devc.db }
if $isfile(banlar.db) { hmake banlar 100 | hload -i banlar banlar.db } | else { hmake banlar 100 | hsave -i banlar banlar.db }
if $isfile(ban.db) { hmake ban 100 | hload -i ban ban.db } | else { hmake ban 100 | hsave -i ban ban.db }
if $isfile(unbanlar.db) { hmake unbanlar 100 | hload -i unbanlar unbanlar.db } | else { hmake unbanlar 100 | hsave -i unbanlar unbanlar.db }
if $isfile(unban.db) { hmake unban 100 | hload -i unban unban.db } | else { hmake unban 100 | hsave -i unban ban.db }
if $isfile(text.db) { hmake text 100 | hload -i text text.db } | else { hmake text 100 | hsave -i text text.db }
if $isfile(normalg.db) { hmake normalg 100 | hload -i normalg normalg.db } | else { hmake normalg 100 | hsave -i normalg normalg.db }
if $isfile(normalc.db) { hmake normalc 100 | hload -i normalc normalc.db } | else { hmake normalc 100 | hsave -i normalc normalc.db }
if $isfile(ntext.db) { hmake ntext 100 | hload -i ntext ntext.db } | else { hmake ntext 100 | hsave -i ntext ntext.db }
if $isfile(ytext.db) { hmake ytext 100 | hload -i ytext ytext.db } | else { hmake ytext 100 | hsave -i ytext ytext.db }
if $isfile(ycıkıs.db) { hmake ycıkıs 100 | hload -i ycıkıs ycıkıs.db } | else { hmake ycıkıs 100 | hsave -i ycıkıs ycıkıs.db }
if $isfile(ygiris.db) { hmake ygiris 100 | hload -i ygiris ygiris.db } | else { hmake ygiris 100 | hsave -i ygiris ygiris.db }
}
on *:op:#HELP: { if !$hmatch(nickler,$opnick) { hadd -m nickler $opnick 1 | hsave -i nickler nickler.db } }
on *:join:#HELP: { hinc -m normalg v 1 | hsave -i normalg normalg.db | .timer 1 1 kontrol # $nick }
on *:part:#HELP: { hinc -m normalc v 1 | hsave -i normalc normalc.db | if $hmatch(nickler,$nick) { hinc -m ycıkıs v 1 | hsave -i ycıkıs ycıkıs.db | hinc -m cıkıs $nick 1 | hsave -i cıkıs cıkıs.db | write $+(helper/,$nick,.,txt) $+(=>,$chr(40),$chr(2),$chr(31),Çıkış,$chr(31),$ch r(2),$chr(41),$chr(32),$chr(40),$chr(2),$date,$chr (2),$chr(41)) Gün: $gun($+($chr(2),$day,$chr(2))) - Saat: $+($chr(2),$time,$chr(2)) } }
on *:voice:#HELP: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }
on *:devoice:#HELP: { if $hmatch(nickler,$nick) { hinc -m devoiceler v 1 | hsave -i devoiceler devoiceler.db | hinc -m devc $nick 1 | hsave -i devc devc.db } }
on *:ban:#HELP: { if $hmatch(nickler,$nick) { hinc -m banlar v 1 | hsave -i banlar banlar.db | hinc -m ban $nick 1 | hsave -i ban ban.db } }
on *:unban:#HELP: { if $hmatch(nickler,$nick) { hinc -m unbanlar v 1 | hsave -i unbanlar unbanlar.db | hinc -m unban $nick 1 | hsave -i unban unban.db } }
on *:text:*:#HELP: { hinc -m ntext v 1 | hsave -i ntext ntext.db | if $hmatch(nickler,$nick) { hinc -m ytext v 1 | hsave -i ytext ytext.db | hinc -m text $nick 1 | hsave -i text text.db } }
on *:text:*:#HELP-OP: {
if $nick == HELP-Founder-NICK'i {
if $1 == !durum {
msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt'da olan $+($chr(2),#help,$chr(2)) kanalı istatistik'leri sıralanıyor:
msg # -
msg # Toplam kullanıcı girişi istatistikleri: $+($chr(40),$iif($hget(normalg,v),$hget(normalg,v) ,0),$chr(41))
msg # - Giriş bilgisi: $iif($hget(normalg,v),Yetkili girişi: $iif($hget(ygiris,v),$hget(ygiris,v),0) $yuzde(ygiris,normalg) - Yetkisiz girişi: $ll(normalg,ygiris) $yuzde2(ygiris,normalg),Toplam: 0 (%100))
msg # Toplam kullanıcı çıkışı istatistikleri: $+($chr(40),$iif($hget(normalc,v),$hget(normalc,v) ,0),$chr(41))
msg # - Çıkış bilgisi: $iif($hget(normalc,v),Yetkili çıkışı: $iif($hget(ycıkıs,v),$hget(ycıkıs,v),0) $yuzde(ycıkıs,normalc) - Yetkisiz çıkışı: $ll(normalc,ycıkıs) $yuzde2(ycıkıs,normalc), Toplam: 0 (%100))
msg # Toplam verilen voice: $+($chr(40),$iif($hget(voiceler,v),$hget(voiceler, v),0),$chr(41))
msg # Toplam alınan voice: $+($chr(40),$iif($hget(devoiceler,v),$hget(devoice ler,v),0),$chr(41))
msg # Toplam atılan ban sayısı: $+($chr(40),$iif($hget(banlar,v),$hget(banlar,v),0 ),$chr(41))
msg # Toplam açılan ban sayısı: $+($chr(40),$iif($hget(unbanlar,v),$hget(unbanlar, v),0),$chr(41))
msg # Toplam yazılan satır sayısı: $+($chr(40),$iif($hget(ntext,v),$hget(ntext,v),0), $chr(41))
msg # - Satır bilgisi: $iif($hget(ntext,v),Yetkili yazısı: $iif($hget(ytext,v),$hget(ytext,v),0) $yuzde(ytext,ntext) - Yetkisiz yazısı: $ll(ntext,ytext) $yuzde2(ytext,ntext),Toplam: 0 (%100))
msg # -
msg # $+($chr(2),$nick,$chr(2)) kullanabileceğiniz komutlar listesini görmek için: $+($chr(2),!Komutlar,$chr(2)) yazınız.
}
if $1 == !Komutlar {
msg # $+($chr(31),Genel komutlar,$chr(31),:)
msg # -
msg # !voicelist $kapsa((#Help kanalında kayıt gününden beri verilen tüm voice'leri sıralar))
msg # !devoicelist $kapsa((#Help kanalında kayıt gününden beri alınan tüm voice'leri sıralar))
msg # !banlist $kapsa((#Help kanalında kayıt tarihinden beri atılan tüm banları sıralar))
msg # !unbanlist $kapsa((#Help kanalında kayıt tarihinden beri açılan tüm banları sıralar))
msg # !Helperler $kapsa((#Help kanalında takip listesinde olan tüm helper'ları sıralar))
msg # !sıfırla tümü $kapsa((#Help kanalı için varolan tüm kayıtları sıfır'lar))
msg # -
msg # $+($chr(31),Kişisel komutlar,$chr(31),:)
msg # -
msg # !ekle helper-nick $kapsa((Takip listesine helper eklemek için kullanılır))
msg # !sil helper-nick $kapsa((Takip listesinde ekli olan bir helper'i siler))
msg # !istatistik helper-nick $kapsa((Takip listesinde kayıtlı olan helper hakkında ayrıntılı bilgiler verir))
msg # !takip helper-nick $kapsa((Takip listesinde kayıtlı olan helper'in, hangi tarihlerde giriş/çıkış yaptığını gösterir))
msg # !tsil helper-nick $kapsa((Takip listesinde kayıtlı olan helper'in, giriş/çıkış tarihlerini sıfır'lar))
msg # -
msg # Tüm komutlar sıralandı.
}
if $1 == !helperler {
if $hget(nickler,0).item < 1 { msg # Kayıtlı helper mevcut değil. Helper eklemek için; $kapsa(!ekle helper-nick) yazınız. | halt }
else { msg # Kayıtlı olan toplam; $kapsa($hget(nickler,0).item) helper sıralanıyor. | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& }
}
msg # Kayıtlar sıralandı.
msg # Herhangi bir helper hakkında detaylı bilgi almak için; $kapsa(!istatistik helper-nick) yazınız.
}
if $1 == !voicelist {
if $hget(voiceler,v) < 1 { msg # $kapsa(#Help) kanalı için voice kaydı yok.(Voice verilmemiş) | halt }
else {
msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren verilen toplam voice sayısı: $kapsa($hget(voiceler,v))
msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41)) ) helper'in voice verme istastiği(Sadece voice veren'ler sıralanır):
var %1 = 1,%2 = $hget(vc,0).item | while %1 <= %2 { msg # Helper: $kapsa($hget(vc,%1).item) - Verdiği voice sayısı: $kapsa($iif($hget(vc,%1).data,$hget(vc,%1).data $yuzde3(vc,$hget(vc,%1).item,voiceler),0)) | inc %1 }
}
msg # -
msg # Voice kayıtları sıralandı.
}
if $1 == !devoicelist {
if $hget(devoiceler,v) < 1 { msg # $kapsa(#Help) kanalı için devoice kaydı yok.(Devoice işlevi yapılmamış) | halt }
else {
msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren uygulanan toplam devoice sayısı: $kapsa($hget(devoiceler,v))
msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41)) ) helper'in devoice uygulama istastiği:(Sadece devoice veren'ler sıralanır)
var %a = 1,%b = $hget(devc,0).item | while %a <= %b { msg # Helper: $kapsa($hget(devc,%a).item) - Uyguladığı devoice sayısı: $kapsa($iif($hget(devc,%a).data,$hget(devc,%a).dat a $yuzde3(devc,$hget(devc,%a).item,devoiceler),0)) | inc %a }
}
msg # -
msg # Devoice kayıtları sıralandı.
}
if $1 == !banlist {
if $hget(banlar,v) < 1 { msg # $kapsa(#Help) kanalı için ban kaydı bulunamadı.(Atılan ban yok) | halt }
else {
msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren atılan toplam ban sayısı: $kapsa($hget(banlar,v))
msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41)) ) helper'in ban uygulama istastiği:(Sadece ban atanlar sıralanır)
var %x = 1,%y = $hget(ban,0).item | while %x <= %y { msg # Helper: $kapsa($hget(ban,%x).item) - Attığı ban sayısı: $kapsa($iif($hget(ban,%x).data,$hget(ban,%x).data $yuzde3(ban,$hget(ban,%x).item,banlar),0)) | inc %x }
}
msg # -
msg # Ban kayıtları sıralandı.
}
if $1 == !unbanlist {
if $hget(unbanlar,v) < 1 { msg # $kapsa(#Help) kanalı için unban kaydı bulunamadı.(Açılan ban yok) | halt }
else {
msg # #Help kanalın'da $kapsa(%trh) tarihinden itibaren açılan toplam ban sayısı: $kapsa($hget(unbanlar,v))
msg # #Help kanalın'da yetkili olan $kapsa($+($chr(40),$hget(nickler,0).item,$chr(41)) ) helper'in ban açma istastiği:(Sadece ban açanlar sıralanır)
var %s = 1,%k = $hget(unban,0).item | while %s <= %k { msg # Helper: $kapsa($hget(unban,%s).item) - Açtığı ban sayısı: $kapsa($iif($hget(unban,%s).data,$hget(ban,%s).dat a $yuzde3(unban,$hget(unban,%s).item,unbanlar),0)) | inc %s }
}
msg # -
msg # Unban kayıtları sıralandı.
}
if $1 == !sıfırla {
if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sıfırla tümü) (Tüm verileri sıfırlar) | halt }
if $2 == tümü {
msg # Bu işlev eklenen helper'ler hariç tüm kayıtları silecektir.
msg # $kapsa(#Help) kanalı için tüm kayıtlar sıfırlansın'mı?
msg # Onaylamak için: $kapsa(!Evet) - Vazgeçmek için: $kapsa(!Hayır) yazınız.
}
}
if $1 == !Evet { msg # Tüm veriler sıfırlan'dı. | pp }
if $1 == !Hayır { msg # Tüm verileri sıfırlama işlevi durduruldu. | return $false }
if $1 == !istatistik {
if !$2 { msg # Herhangi bir nick girilmedi. Kullanım şekli: $kapsa(!istatistik helper-nick) | halt }
if !$hmatch(nickler,$2) { msg # $kapsa($2) isminde helper kayıtlı değil. | halt }
else {
msg # $kapsa($2) helper'inin $kapsa(%trh) tarihinden beri kayıt edilen istatistik'leri sıralanıyor:
msg # -
msg # #Help kanalına toplam: $kapsa($+($chr(40),$iif($hget(giris,$2),$hget(giri s,$2),0),$chr(41))) giriş yaptı.
msg # #Help kanalın'dan toplam: $kapsa($+($chr(40),$iif($hget(cıkıs,$2),$hget(cıkı s,$2),0),$chr(41))) çıkış yaptı.
msg # Not: $kapsa($2) helper'inin hangi tarihlerde giriş/çıkış yaptığını öğrenmek için: $kapsa(!Takip $2) yazınız.
msg # Verdiği voice sayısı: $kapsa($iif($hget(vc,$2),$hget(vc,$2) $yuzde3(vc,$2,voiceler),0))
msg # Aldığı voice sayısı: $kapsa($iif($hget(devc,$2),$hget(devc,$2) $yuzde3(devc,$2,devoiceler),0))
msg # Attığı ban sayısı: $kapsa($iif($hget(ban,$2),$hget(ban,$2) $yuzde3(ban,$2,banlar),0))
msg # Açtığı ban sayısı: $kapsa($iif($hget(unban,$2),$hget(unban,$2) $yuzde3(unban,$2,unbanlar),0))
msg # #Help kanalın'da yazdığı satır miktarı: $kapsa($iif($hget(text,$2),$hget(text,$2) $yuzde3(text,$2,ntext),0))
msg # -
msg # Bilgi: $kapsa($2) helper'inin tüm istatistikleri sıralandı.
}
}
if $1 == !Takip {
if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Takip helper-nick) | halt }
if !$hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde mevcut değil. | halt }
else {
msg # $kapsa($2) helper'inin $kapsa(%trh) tarihinden beri, $kapsa(#help) kanalına giriş/çıkış bilgileri sıralanıyor.
var %1 = 1,%2 = $lines($+(helper/,$2,.,txt)) | while %1 <= %2 { msg # $read($+(helper/,$2,.,txt),%1) | inc %1 }
msg # Bu kayıtları silmek için; $kapsa(!tsil $2) yazınız.
}
}
if $1 == !tsil {
if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Tsil helper-nick) | halt }
if !$hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde kayıtlı değil. | halt }
if !$isfile($+(helper/,$2,.,txt)) { msg # $kapsa($2) için giriş/çıkış kaydı yok. | halt }
else { remove $+(helper/,$2,.,txt)) | msg # $kapsa($2) helper'i için, giriş/çıkış tarihleri sıfırlandı. }
}
if $1 == !ekle {
if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!Ekle yeni-helper-nick) | halt }
if $hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde zaten mevcut. | halt }
else { hadd -m nickler $2 | hsave -i nickler nickler.db | msg # $kapsa($2) helper listesine eklendi. }
}
if $1 == !sil {
if !$2 { msg # Yanlış kullanım. Kullanım şekli: $kapsa(!sil helper-nick) | halt }
if !$hmatch(nickler,$2) { msg # $kapsa($2) helper listesinde zaten mevcut değil. | halt }
else { sil $2 | msg # $kapsa($2) helper listesinden tüm kayıtları ile beraber silindi. }
}
}
}



Bunu Cr Sunucu Icın nasıl cevırebılırız

q0kh4n01 24 Ekim 2008 20:12

Cevap: Helpfounder yardımcısı. (v1.0)
 
Alıntı:

Crips Nickli Üyeden Alıntı (Mesaj 498035)
L4roXyL HeLpFounderlerinin işine yarıcak bir addon.Tesekkürler

ßu Addonmuymus ;huh

Heavenly 13 Ocak 2009 16:30

Cevap: Helpfounder yardımcısı. (v1.0)
 
* /write: unable to open 'C:\Documents and Settings\user\Desktop\ScriptLer\HelpBot\helper\Q-Help.txt' (line 6, HelpFounderYardımcısı.txt)

ßu sekılde bı hata alıyorum

L4roXyL 13 Ocak 2009 22:15

Cevap: Helpfounder yardımcısı. (v1.0)
 
Helper klasörünü görmüyor.
Bu kodu mIRC'inden kaldır. Tekrar REMOTE'den ekle.

Cyberjust 06 Şubat 2009 00:44

Cevap: Helpfounder yardımcısı. (v1.0)
 
HELP-Founder-NICK'i buraya sadece bir nick yerine accesi 100 den fazla olan opları yapamazmıyız acces lidtesine göre örneğin accesi 100 ise bu komutu çalıştırabilir ben buda ekledimkusursuz çalışıyor fakat bi yerde hata veriyor

kanala her giriş yapanda statü bölümünde şöyle bir hata veriyor

/msg: Yetersiz veya eksik parametre (Satır 9, istatis.txt)

belkide benden kaynaklanıyordur bilemem ama emeğine sağlık çok güzel olmuş bot herşeyi kaydediyor sıfırlanma olasılığıda yok açıp kapatıncada gitmiyor

sadece dediğim gibi accesi 100 ve üzeri olan yetkililerde bunu çalıştırabilseler ne güzel olurdu

Senior 06 Şubat 2009 14:26

Cevap: Helpfounder yardımcısı. (v1.0)
 
Cyberjust sadece 100 ve üstü access'e sahip olan kullanıcıların bunu kullanmasını istiyor isen şu kısmı;

Kod:


on *:text:*:#HELP-OP: {
if $nick == HELP-Founder-NICK'i {
if $1 == !durum {
msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt'da olan $+($chr(2),#help,$chr(2)) kanalı istatistik'leri sıralanıyor:

Şöyle değiştir;

Kod:


on 100:text:*:#HELP-OP: {
if $1 == !durum {
msg # $+([,$chr(2),%trh,$chr(2),]) Tarihinden beri kayıt'da olan $+($chr(2),#help,$chr(2)) kanalı istatistik'leri sıralanıyor:

Burdaki amaç;

on seviye:işlev: { komutlar }
-
Yani seviye kısmına 100 access eklediğin kullanıcıya 100 auser listesine eklemeyi düşünürsek mantık olarak;

Eklemek için; /auser 100 nick
Silmek için; /ruser nick

Burda ausere eklediğin 100 değerindeki kullanıcıdır.
Daha sağlıklı olur diye düşündüm, değerlendirip değerlendirmemek size kalmış.
Böylelikle bu komutları kullanma imkanı sağlanır...

KartaL 06 Şubat 2009 15:11

Cevap: Helpfounder yardımcısı. (v1.0)
 
eLLerine Sağlık..

Abigor 06 Şubat 2009 15:16

Cevap: Helpfounder yardımcısı. (v1.0)
 
2 yıllık konu hortladı!

RapStar 06 Şubat 2009 16:12

Cevap: Helpfounder yardımcısı. (v1.0)
 
sen nasıl bişiysin ? abigor. kimseye faydan dokunmasın. eksik kal. bence önce kendine bi format at. sonra kod yazmaya başla.


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

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