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 Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Helpekle HelpSil HelpList (https://www.ircforumlari.net/mirc-scripting-sorunlari/182693-helpekle-helpsil-helplist.html)

Goemon 25 Şubat 2009 00:35
Helpekle HelpSil HelpList
 
öncelikle s.a arkadaşlar kolay gelsin.
arkadaşlar bir botda aradığım kodu gördüm bende yarım edeceğinizi düşenerek yardımlarınızı bekliyorum.


!helpekle aop #kanal nick
!helpekle sop #kanal nick
!helpekle uop #kanal nick
!helpekle vop #kanal nick

!helpsil vop #kanal nick
!helpsil uop #kanal nick
!helpsil aop #kanal nick
!helpsil sop #kanal nick

!helplist

arkadaşlar komutlarda olduğu gibide anlatmak istediğim kod böle bişi mesela yönetim kanalında !helpekle sop #help ali dedim bot onu o kanala sop olarak kayıt edecek sil dediğimde onu o kanaldan silecek artı birde eklenen nickleri help.txt dosyasına kayıt edecek orayada ekleyip silecek yalnız bir sorun daha var bu komutu bir kişinin kullanmasını istiyrum mesela rumuzu Sinan Sinandan başkasının kullanmasını istemiyorum yada founder.txt dosyasına dayanarak bunu o dosyanın içinde yazan nicklerin kullanmasını istiyorum.birde rumuzu kayıtlı olan nickleri kayıt etsin olmayanları edmiyor zaten ama rumuz kayıtsız ise rumuzunuzu kayıt edin desin kayıtlı ise helpe başarı ile eklendiniz desin ve helpekle helpsil komutunu kullanan kişiyede yetkiniz yhok desin ismi yazan kişide demezse güzel olur aklıma geldikçe eklerim sağolun ;)

uFuK 25 Şubat 2009 01:06
Cevap: Helpekle HelpSil HelpList
 
Öncelikle öyle "Aklıma gelsin eklerim" falan üslubuna dikkat et. Buradaki kimse sana yardım etmek zorunda değil onca şey istemişsin biraz mütevazi ol.
PHP- Kodu:
on *:text:*:#: { 
if $read(founder.txt,w,$nick) { 
else { /msg $chan Siz Benim Founder Belgemde Yoksunuz.. }
if ($1 == !hekle) { /ns info $2 | /cs vop $chan $2 | write  nickler.txt $2 } 
if ($1 == !hsil) { /cs vop $chan del $2 | write -d nickler.txt $2  } 
if ($1 == !hlist) { 
var %i 1 
while %i <= $lines(nickler.txt) { 
/msg $chan $read(nickler.txt,%i)
inc %i
}
}
} 
!hekle nick (belirtilen nicki nickler.txt'e kaydeder kanalda vop yazar)
!hsil nick (belirtilen nicki nickler.txt'den siler, kanaldaki vopunuda siler.)
!hlist nick (listedeki nickleri kanala yansıtır)
Not: founder.txt'deki nickler kullanabilir sadece.

Editor 25 Şubat 2009 02:38
Cevap: Helpekle HelpSil HelpList
 
Kod:
on @*:text:*:#:{
  var %.* = $2
  var %Text $right($strip($4-),-1)
  var %::chan = $chan
  var %::nick = $2
  var %:nick $nick
  var %::sebeb $3-
  if $nick == FounderNICK {
    if *!HelpekleAop* iswm $1- {
      if $2 == $null {
        msg %::chan Eklenecek Nicki Belirtmediniz. Kullanımı ; !Helpekleaop <nick> <seviye>
        halt
      }
      elseif $2 !ison $chan { msg %::chan Eklemeye Çalıştığınız Help - Aop ( %::nick ) Kanalda bulunmamaktadır. }
      else {
        if $read(HelpAoplar.txt,w,$2-) {
          msg %::chan Eklemeye Çalıştığınız ( %.* ) listenin ( $+($readn,.) ) satırında mevcuttur.
        }
        else {
          write HelpAoplar.txt $2-
          cs access %::chan add %:nick $3
          mode %::chan +o %::nick
          msg %::chan Listeye Eklenen Nick ( %.* ) dir.
          msg %::chan %::nick : %::chan Kanalında  $time $date  İtibariyle Operator Konumunda  $3  seviyesinden eklenmiştir.
          msg %::nick : %::chan Kanalında Aop Konumuna getirildiniz.Görevinizi Layıkıyla yapmanız dileğiyle.
        } 
      }
    }
    if *!HelpsilAop* iswm $1- {
      if $2 == $null {
        msg %::chan Silinecek Nicki Belirtmediniz. Kullanımı ; !Helpsilaop <nick>
        halt
      }
      if !$read(HelpAoplar.txt,w,$2-) {
        msg %::chan Silmeye çalıştığınız ( %.* ) Listede bulunmamaktadır.
      }
      else {
        write $+(-,dw,$2-) HelpAoplar.txt
        ChanServ AOP %::chan DEL %:nick
        msg %::chan Listeden Silinen nick ( %.* ) dir.
        mode %::chan -qaohv %::nick %::nick %::nick %::nick %::nick
        notice %::chan %::nick  %::chan  Kanalında Yetkileriniz silinmiştir.Lütfen Kanalda Bekleme yapmayınız.Aksi Taktirde 30 saniye içersinde Uzaklaştırılıcaksınız.
        timer 1 30 Ban %::chan %::nick
        timer 1 30 Kick %::chan %::nick %::chan Yetiniz alınmıştır.Lütfen kurallara Uyunuz.
      }
    }
    if *!HelpAoplist* iswm $1- {
      msg %::chan 4 *Help - Aop Listesi sıralanıyor*
      Play %::chan helpaoplar.txt 300
    }
    if *!HelpekleSop* iswm $1- {
      if $2 == $null {
        msg %::chan Eklenecek Nicki Belirtmediniz. Kullanımı ; !Helpeklesop <nick> <seviye>
        halt
      }
      elseif $2 !ison $chan { msg %::chan Eklemeye Çalıştığınız Help - Sop ( %::nick ) Kanalda bulunmamaktadır. }
      else {
        if $read(helpSoplar.txt,w,$2-) {
          msg %::chan Eklemeye Çalıştığınız ( %.* ) listenin ( $+($readn,.) ) satırında mevcuttur.
        }
        else {
          write HelpSoplar.txt $2-
          cs access %::chan add %::nick $3
          mode %::chan +a %::nick
          msg %::chan Listeye Eklenen Nick ( %.* ) dir.
          msg %::chan %::nick : %::chan Kanalında  $time $date  İtibariyle Super Operator Konumunda  $3  seviyesinden eklenmiştir.
          msg %::nick : %::chan Kanalında Help - Sop Konumuna getirildiniz.Görevinizi Layıkıyla yapmanız dileğiyle.
        }
      }
    }
    if *!HelpsilSop* iswm $1- {
      if $2 == $null {
        msg %::chan Silinecek Nicki Belirtmediniz. Kullanımı ; !HelpsilSop <nick>
        halt
      }
      if !$read(HelpSoplar.txt,w,$2-) {
        msg %::chan Silmeye çalıştığınız ( %.* ) Listede bulunmamaktadır.
      }
      else {
        write $+(-,dw,$2-) HelpSoplar.txt
        msg %::chan Listeden Silinen nick ( %.* ) dir.
        ChanServ SOP %::chan DEL %::nick
        mode %::chan -qaohv %:nick %:nick %:nick %:nick %:nick
        notice %::chan %:nick  %::chan  Kanalında Yetkileriniz silinmiştir.Lütfen Kanalda Bekleme yapmayınız.Aksi Taktirde 30 saniye içersinde Uzaklaştırılıcaksınız.
        timer 1 30 Ban %::chan %:nick
        timer 1 30 Kick %::chan %:nick %::chan Yetiniz alınmıştır.Lütfen kurallara Uyunuz.
      }
    }
    if *!HelpSoplist* iswm $1- {
      msg %::chan 4 *Help - Sop Listesi sıralanıyor*
      Play %::chan Helpsoplar.txt 300
    }
    if !Helpekleuop* iswm $1- {
      if $2 == $null {
        msg %::chan Eklenecek Nicki Belirtmediniz. Kullanımı ; !Helpekleuop <nick> <seviye>
        halt
      }
      elseif $2 !ison $chan { msg %::chan Eklemeye Çalıştığınız Halfop ( %::nick ) Kanalda bulunmamaktadır. }
      else {
        if $read(Helpuoplar.txt,w,$2-) {
          msg %::chan Eklemeye Çalıştığınız ( %.* ) listenin ( $+($readn,.) ) satırında mevcuttur.
        }
        else {
          write Helpuoplar.txt $2-
          cs access %::chan add %::nick $3
          mode %::chan +h %:nick
          msg %::chan Listeye Eklenen Nick ( %.* ) dir.
          msg %::chan %::nick : %::chan Kanalında  $time $date  İtibariyle Yardımcı Operator Konumunda  $3  seviyesinden eklenmiştir.
          msg %::nick : %::chan Kanalında Help - Sop Konumuna getirildiniz.Görevinizi Layıkıyla yapmanız dileğiyle.
        }
      }
    }
    if *!Helpsiluop* iswm $1- {
      if $2 == $null {
        msg %::chan Silinecek Nicki Belirtmediniz. Kullanımı ; !Helpsiluop <nick> <seviye>
        halt
      }
      if !$read(Helpuoplar.txt,w,$2-) {
        msg %::chan Silmeye çalıştığınız ( %.* ) Listede bulunmamaktadır.
      }
      else {
        write $+(-,dw,$2-) Helpuoplar.txt
        msg %::chan Listeden Silinen nick ( %.* ) dir.
        ChanServ HOP %::chan DEL %::nick
        mode %::chan -qaohv %:nick %:nick %:nick %:nick %:nick
        notice %::chan %:nick  %::chan  Kanalında Yetkileriniz silinmiştir.Lütfen Kanalda Bekleme yapmayınız.Aksi Taktirde 30 saniye içersinde Uzaklaştırılıcaksınız.
        timer 1 30 Ban %::chan %:nick
        timer 1 30 Kick %::chan %:nick %::chan Yetiniz alınmıştır.Lütfen kurallara Uyunuz.
      }
    }
    if *!Heluoplist* iswm $1- {
      msg %::chan 4 *Help - Halfop Listesi sıralanıyor*
      Play %::chan Helpuoplar.txt 300
    }
    if !Helpeklevop* iswm $1- {
      if $2 == $null {
        msg %::chan Eklenecek Nicki Belirtmediniz. Kullanımı ; !Helpeklevop <nick> <seviye>
        halt
      }
      elseif $2 !ison $chan { msg %::chan Eklemeye Çalıştığınız Help - Vop ( %::nick ) Kanalda bulunmamaktadır. }
      else {
        if $read(HelpVoplar.txt,w,$2-) {
          msg %::chan Eklemeye Çalıştığınız ( %.* ) listenin ( $+($readn,.) ) satırında mevcuttur.
        }
        else {
          write HelpVoplar.txt $2-
          cs access %::chan add %::nick $3
          mode %::chan +v %:nick
          msg %::chan Listeye Eklenen Nick ( %.* ) dir.
          msg %::chan %::nick : %::chan Kanalında  $time $date  İtibariyle User yardımcı Operator Konumunda  $3  seviyesinden eklenmiştir.
          msg %::nick : %::chan Kanalında Help - Halfop Konumuna getirildiniz.Görevinizi Layıkıyla yapmanız dileğiyle.
        }
      }
    }
    if *!HelpsilVop* iswm $1- {
      if $2 == $null {
        msg %::chan Silinecek Nicki Belirtmediniz. Kullanımı ; !HelpsilVop <nick>
        halt
      }
      if !$read(HelpVoplar.txt,w,$2-) {
        msg %::chan Silmeye çalıştığınız ( %.* ) Listede bulunmamaktadır.
      }
      else {
        write $+(-,dw,$2-) Voplar.txt
        msg %::chan Listeden Silinen nick ( %.* ) dir.
        ChanServ VOP %::chan DEL %::nick
        mode %::chan -qaohv %:nick %:nick %:nick %:nick %:nick
        notice %::chan %:nick  %::chan  Kanalında Yetkileriniz silinmiştir.Lütfen Kanalda Bekleme yapmayınız.Aksi Taktirde 30 saniye içersinde Uzaklaştırılıcaksınız.
        timer 1 30 Ban %::chan %:nick
        timer 1 30 Kick %::chan %:nick %::chan Yetiniz alınmıştır.Lütfen kurallara Uyunuz.
      }
    }
    if *!HelpVoplist* iswm $1- {
      msg %::chan 4 *Help - Vop Listesi sıralanıyor*
      Play %::chan HelpVoplar.txt 300
    }
    if *!Helperlist* iswm $1- {
      timer 1 1 msg %::chan 1 !durum Komutu  %:nick    Tarafından Başlatılmıştır. Genel Help - yetkili listesi Sıralanıyor.
      timer 1 2 msg %::chan 4 Help - Aoplar Listeleniyor. [Lütfen Bekleyiniz]
      timer 1 3 Play %::chan HelpAoplar.txt 300
      timer 1 8 msg %::chan 4 Help - Soplar Listeleniyor. [Lütfen Bekleyiniz]
      timer 1 9 Play %::chan HelpSoplar.txt 300
      timer 1 14 msg %::chan 4 Help - Halfoplar Listeleniyor. [Lütfen Bekleyiniz]
      timer 1 15 Play %::chan Helpuoplar.txt 300
      timer 1 20 msg %::chan 4 Help - Voplar Listeleniyor. [Lütfen Bekleyiniz]
      timer 1 21 Play %::chan HelpVoplar.txt 300
      timer 1 25 msg %::chan 4 Yetki Listesi Sonu
    }
  }
}
Kullanacağın Komutlar ;

!Helpekleaop <nick> <seviye> ; Belirtilen nicke AOP ekler.
!Helpeklesop <nick> <seviye> ; Belirtilen nicke SOP ekler.
!Helpekleuop <nick> <seviye> ; Belirtilen nicke UOP ekler.
!Helpeklevop <nick> <seviye> ; Belirtilen nicke VOP ekler.
--------------
!Helpsilaop <nick> ; Belirtilen nickten AOP siler.
!Helpsilsop <nick> ; Belirtilen nickten SOP siler.
!Helpsiluop <nick> ; Belirtilen nickten UOP siler.
!helpsilvop <nick> ; Belirtilen nickten VOP siler.
--------------
!Helpaoplist ; Eklenmiş olan AOPları listeler.
!Helpsoplist ; Eklenmiş olan SOPları listeler.
!Helpuoplist ; Eklenmiş olan UOPları listeler.
!Helpvoplist ; Eklenmiş olan VOPları listeler.
--------------
!Helperlist ; Eklenmiş olan AOP,SOP,UOP,VOP Genel listeler.

Hoşça Paylaşımlar.

Goemon 03 Mart 2009 00:16
Cevap: Helpekle HelpSil HelpList
 
arkadaşlar tşk ederim ama bu kodlar çalışmadı birde mynet den katılan arkadaşım ben aklıma geldikçe eklerim derken sırf bu konuda demedim okey bilip bilmeden kimseyi yargılama yardım edeceksen edersin edmeyeceksen edmezin bu kadar basit biz yardım edenede ALLAH razı olsun deriz edmeyenede ALLAH razı olsun deriz ne o öle üslübuna dikkat ed falan filan ben ediyorum ahlakımda üslubumda gayet normal ha sen anlamıyorsan anladığın dilide biliyorum ama ahlakım üslübum buna izin vermiyor burası yardım için açılmaşsa muhakkak biri yardım eder diye umduk adama bakale rajon kesiyor sen polatı herhalde çhok izledin aslanım bahk uyarim istersen çoçukca diziler izleme aklın başından gider ALLAH korusun .. sagopa sana gelincede kardeş emeğin için tşk ederim.emeğinede saygı duyuyorum bir numarasın. mynet anlamışsındır umarım. burası kimsenin babasının tarlası değil yardım amaçlı açılmış bir sunucu diyim kısacası işine geliyorsa yardım edersin işine gelmiyorsa yardım edmezsin kafana silah dayıyan yhok tehdit edende yhok ciğerim.. sen üslübunu bozmadığın sürece kimse bozmaz kafana tahkma için rahat olsun yiğenim. ;cool


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

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