!rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım? - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

hea · 26 Nisan 2008, 18:14

Slm Kardeş

ßu Kodu Degiştire ßiLirmiyiz Acaba ?

Msela Örnek:

Yönetim Kanaldan !botgir #hea Koruma

dedigim Zaman Kanal'a Girip Kendini Op'a Çıkarsın +

ßana Şöyle ßir Cvp versin Koruma #hea kanal'a Girdi List'e ekLendi

List Yani: Kanal.txt eklensin

ve ßot'u her Server'e Soktugum Zaman Sadece /sajoin demem ile Kanal.txt içerisindeki kanallar'a Girip Op'a Çıksın ?

Yönetim Kanaldan !botçık #hea koruma dedigim Zaman

Koruma #hea Kanaldan Çıktı List'ten Silindi..

Die Cvp verecek ?

Sizce ßöyLe ßirşey Munkun mu ?

26 Nisan 2008, 21:04

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#Yönetim:{
  if $2 {
    if $1 == !botgir { join $2 | .timer 1 2 mode $2 +o $me | .msg # $2 kanalına girildi ve opa çıkıldı. }
    if $1 == !botçık { part $2 | .msg # $2 kanalından çıkıldı. }
  }
  if $1 == !sajoin { var %d = 1 | while %d <= $lines(kanal.txt) { join $read(kanal.txt,%d) | .msg # Kanallara sıra ile giriliyor: $+($read(kanal.txt,%d),.) | inc %d }
}

Şeklinde yapabilirsin.

Komutlar:
!botgir <kanal>: Bot, belirlediğin kanala girer ve opa çıkar.
!botçık <kanal>: Bot, belirlediğin kanaldan çıkar.
!sajoin: Bot, kanal.txt adlı dosyadaki kanallara sıra ile girer.

Umarım işine yarar. Kolay gelsin.

Prens · 18 Temmuz 2012, 21:40

Belirtilen bu kodlarla, !operekle nick , !opersil nick, !operlist, | !adminekle nick, !adminsil nick, !adminlist, | !rootekle nick, !rootsil nick, !rootlist yaptığımızda, oper.txt , admin.txt, root.txt klasörüne eklemiş/silmiş/listelemiş oluyor sorunsuz. Fakat bunu böyle modifiye gibi değilde, görünen bu kodlarala gerçek işlem nasıl yapabiliriz?

Örnek #Yönetim odasında;

!operekle nick yaptığımızda aşağıda belirtilen komutlarla oper/admin/root ekle/sil/list yapmasını sağlamamız gerekiyor?

Helper eklemek ve silmek için:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 /as oper Nick add Şifre h |  | /as oper Nick access add *@*
/as oper Nick del Şifre h |  | /as oper Nick access del *@*

Oper eklemek ve silmek için:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 .as oper Nick add Şifre gh | .as oper Nick access add *@*     
.as oper Nick del Şifre gh | .as oper Nick access del *@*

Services Admin eklemek için:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 /as oper Nick add Şifre ghs | /os opercfg Nick add ghs Şifre | /as oper Nick access add *@*
/as oper Nick del Şifre hgs | /os opercfg Nick del ghs Şifre | /as oper Nick access del *@*

Server Admin eklemek için:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 /as oper Nick add Şifre ghsa | /os opercfg Nick add ghsa Şifre | /as oper Nick access add *@*
/as oper Nick del Şifre hgsa | /os opercfg Nick del ghsa Şifre | /as oper Nick access del *@*

Server Root Admin eklemek için:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 /as oper Nick add Şifre ghsac | /os opercfg Nick add root Şifre | /as oper Nick access add *@*
/as oper Nick del Şifre ghsac | /os opercfg Nick del root Şifre | /as oper Nick access del *@*

18 Temmuz 2012, 23:30

Buyur;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#:{
  if $1 == !helper {
    if !$2 { msg $chan  :Lütfen !helper ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle { 
      if !$3 { msg $chan :Lütfen !helper ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan :Lütfen !helper ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$read(helper.txt,w,$3) {
        as oper $3 add $4 h 
        as oper $3 access add *@* 
        msg $chan :[ $3 ] Nicki Helper Listesine eklenmişdir 
        write helper.txt $3
      }
      else {
        msg $chan :[ $3 ] Nicki Helper Listesinde ekli.
      }
    }
    if $2 == sil {
      if !$3 { msg $chan :Lütfen !helper sil Nick Şifre Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan :Lütfen !helper sil Nick Şifre Şeklinde belirtiniz. | halt }
      if $read(helper.txt,w,$3) {
        as oper $3 del $4 h 
        as oper $3 access del *@* 
        msg $chan :[ $3 ] Nicki Helper listesinden silinmişdir.
        write $+(-dl,$readn) helper.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Helper Listesinde ekli degildir.
      }
    }
    if $2 == list {
      if $lines(helper.txt) == 0 { msg $chan Helper listesi boş. | halt }
      var %hlist 1
      while %hlist <= $lines(helper.txt) {
        msg $chan %hlist $+ .4) $read(helper.txt,%hlist)
        inc %hlist
      }
    }
  }
  if $1 == !oper {
    if !$2 { msg $chan  :Lütfen !oper ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle { 
      if !$3 { msg $chan  :Lütfen !oper ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !oper ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$read(oper.txt,w,$3) {
        as oper $3 add $4 gh 
        as oper $3 access add *@* 
        msg $chan :[ $3 ] Nicki Oper olarak eklenmişdir.
        write oper.txt $3
      }
      else {
        msg $chan :[ $3 ] Nicki Oper Listesinde ekli.
      }
    }
    if $2 == sil { 
      if !$3 { msg $chan  :Lütfen !oper sil Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !oper sil Nick Şifre Şeklinde belirtiniz. | halt }
      if $read(oper.txt,w,$3) {
        as oper $3 del $4 gh 
        as oper $3 access del *@* 
        msg $chan :[ $3 ] Nicki Oper listesinden silinmişdir. 
        write $+(-dl,$readn) oper.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Oper Listesinde ekli degildir.
      }
    }
    if $2 == list {
      if $lines(oper.txt) == 0 { msg $chan Oper listesi boş. | halt }
      var %olist 1
      while %olist <= $lines(oper.txt) {
        msg $chan %olist $+ .4) $read(oper.txt,%olist)
        inc %olist
      }
    }
  }
  if $1 == !services {
    if !$2 { msg $chan  :Lütfen !services ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle {
      if !$3 { msg $chan  :Lütfen !services ekle Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !services ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$read(services.txt,w,$3) {
        as oper $3 add $4 ghs 
        os opercfg $3 add ghs $4 
        as oper $3 access add *@*
        msg $chan :[ $3 ] Nicki Services Admin olarak eklenmişdir
        write services.txt $3
      }
      else { 
        msg $chan :[ $3 ] Nicki Services Admin Listesinde ekli.
      }
    }
    if $2 == sil {
      if !$3 { msg $chan  :Lütfen !services sil Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !services sil Nick Şifre Şeklinde belirtiniz. | halt }
      if $read(services.txt,w,$3) {
        as oper  $3 del $4 hgs 
        os opercfg $3 del ghs $4
        as oper $3 access del *@* 
        msg $chan :[ $3 ] Nicki Services Admin listesinden silinmişdir. 
        write $+(-dl,$readn) services.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Services Admin Listesinde ekli degil.
      }
    }
    if $2 == list {
      if $lines(services.txt) == 0 { msg $chan Services Admin listesi boş. | halt }
      var %slist 1
      while %slist <= $lines(services.txt) {
        msg $chan %slist $+ .4) $read(services.txt,%slist)
        inc %slist
      }
    }
  }

  if $1 == !server {
    if !$2 { msg $chan  :Lütfen !server ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle {
      if !$3 { msg $chan  :Lütfen !server ekle Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !server ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$read(server.txt,w,$3) {
        as oper $3 add $4 ghsa 
        os opercfg $3 add ghsa $4 
        as oper $3 access add *@*
        msg $chan :[ $3 ] Nicki Server Admin olarak eklenmişdir
        write server.txt $3
      }
      else { 
        msg $chan :[ $3 ] Nicki Server Admin Listesinde ekli.
      }
    }
    if $2 == sil {
      if !$3 { msg $chan  :Lütfen !server sil Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !server sil Nick Şifre Şeklinde belirtiniz. | halt }
      if $read(server.txt,w,$3) {
        as oper $3 del $4 hgsa 
        os opercfg $3 del ghsa $4
        as oper $3 access del *@*       
        msg $chan :[ $3 ] Nicki Server Admin listesinden silinmişdir. 
        write $+(-dl,$readn) server.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Server Admin Listesinde ekli degil.
      }
    }
    if $2 == list {
      if $lines(server.txt) == 0 { msg $chan Server Admin listesi boş. | halt }
      var %slist 1
      while %slist <= $lines(server.txt) {
        msg $chan %slist $+ .4) $read(server.txt,%slist)
        inc %slist
      }
    }
  }
  if $1 == !root {
    if !$2 { msg $chan  :Lütfen !root ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle { 
      if !$3 { msg $chan  :Lütfen !root ekle Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !root ekle Nick Şifre Şeklinde belirtiniz. | halt }
      if !$read(root.txt,w,$3) {
        as oper $3 add $4 ghsac 
        os opercfg $3 add root $4
        as oper $3 access add *@*
        msg $chan :[ $3 ] Nicki Root olarak eklenmişdir.
        write root.txt $3
      }
      else {
        msg $chan :[ $3 ] Nicki Root Listesinde ekli.
      }
    }
    if $2 == sil { 
      if !$3 { msg $chan  :Lütfen !root sil Nick Şeklinde belirtiniz. | halt }
      if !$4 { msg $chan  :Lütfen !root sil Nick Şifre Şeklinde belirtiniz. | halt }
      if $read(root.txt,w,$3) {
        as oper $3 del $4 ghsac 
        os opercfg $3 del root $4 
        as oper $3 access del *@*
        msg $chan :[ $3 ] Nicki Root listesinden silinmişdir. 
        write $+(-dl,$readn) Root.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Root Listesinde ekli degildir.
      }
    }
    if $2 == list {
      if $lines(root.txt) == 0 { msg $chan Root listesi boş. | halt }
      var %rlist 1
      while %rlist <= $lines(root.txt) {
        msg $chan %rlist $+ .4) $read(root.txt,%rlist)
        inc %rlist
      }
    }
  }
}

Komutlar;

Helper Ekleme/Silme/List;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

!helper ekle Nick Şifre
!helper sil Nick Şifre
!helper list

Oper Ekleme/Silme/List;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

!oper ekle Nick Şifre
!oper sil Nick Şifre
!oper list

Server Admin Ekleme/Silme/List;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

!server ekle Nick Şifre
!server sil Nick Şifre
!server list

Servces Admin Ekleme/Silme/List;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

!services ekle Nick Şifre
!services sil Nick Şifre
!services list

Root Ekleme/Silme/List

Kod: Kodu kopyalamak için üzerine çift tıklayın!

!root ekle Nick
!root sil Nick
!root list

18 Temmuz 2012, 23:44

Ghost usta hayırlı akşamlar

!root ekle nick şifre şifreyi nereye yazacağız?

help services server root eklediğimiz kişilerin eklemesini yaptığımız zaman şifreyi nereye yazacağız ?

Krieq · 18 Temmuz 2012, 23:50

robo-c-OP Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Ghost usta hayırlı akşamlar

!root ekle nick şifre şifreyi nereye yazacağız?

help services server root eklediğimiz kişilerin eklemesini yaptığımız zaman şifreyi nereye yazacağız ?

CR komutlarını pek bilmediğimiz için Ghost ta şifreyi Şifre diye yazmış kodda.
Kodda Şifre yazılı yerlere $4 olarak yaz.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#:{
  if $1 == !helper {
    if !$2 { msg $chan  :Lütfen !helper ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle { 
      if !$3 { msg $chan :Lütfen !helper ekle Nick Şeklinde belirtiniz. | halt }
      if !$read(helper.txt,w,$3) {
        as oper $3 add $4 h 
        as oper $3 access add *@* 
        msg $chan :[ $3 ] Nicki Helper Listesine eklenmişdir 
        write helper.txt $3
      }
      else {
        msg $chan :[ $3 ] Nicki Helper Listesinde ekli.
      }
    }
    if $2 == sil {
      if !$3 { msg $chan :Lütfen !helper sil Nick Şeklinde belirtiniz. | halt }
      if $read(helper.txt,w,$3) {
        as oper $3 del $4 h 
        as oper $3 access del *@* 
        msg $chan :[ $3 ] Nicki Helper listesinden silinmişdir.
        write $+(-dl,$readn) helper.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Helper Listesinde ekli degildir.
      }
    }
    if $2 == list {
      if $lines(helper.txt) == 0 { msg $chan Helper listesi boş. | halt }
      var %hlist 1
      while %hlist <= $lines(helper.txt) {
        msg $chan %hlist $+ .4) $read(helper.txt,%hlist)
        inc %hlist
      }
    }
  }
  if $1 == !oper {
    if !$2 { msg $chan  :Lütfen !oper ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle { 
      if !$3 { msg $chan  :Lütfen !oper ekle Nick Şeklinde belirtiniz. | halt }
      if !$read(oper.txt,w,$3) {
        as oper $3 add $4 gh 
        as oper $3 access add *@* 
        msg $chan :[ $3 ] Nicki Oper olarak eklenmişdir.
        write oper.txt $3
      }
      else {
        msg $chan :[ $3 ] Nicki Oper Listesinde ekli.
      }
    }
    if $2 == sil { 
      if !$3 { msg $chan  :Lütfen !oper sil Nick Şeklinde belirtiniz. | halt }
      if $read(oper.txt,w,$3) {
        as oper $3 del $4 gh 
        as oper $3 access del *@* 
        msg $chan :[ $3 ] Nicki Oper listesinden silinmişdir. 
        write $+(-dl,$readn) oper.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Oper Listesinde ekli degildir.
      }
    }
    if $2 == list {
      if $lines(oper.txt) == 0 { msg $chan Oper listesi boş. | halt }
      var %olist 1
      while %olist <= $lines(oper.txt) {
        msg $chan %olist $+ .4) $read(oper.txt,%olist)
        inc %olist
      }
    }
  }
  if $1 == !services {
    if !$2 { msg $chan  :Lütfen !services ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle {
      if !$3 { msg $chan  :Lütfen !services ekle Nick Şeklinde belirtiniz. | halt }
      if !$read(services.txt,w,$3) {
        as oper $3 add $4 ghs 
        os opercfg $3 add ghs $4 
        as oper $3 access add *@*
        msg $chan :[ $3 ] Nicki Services Admin olarak eklenmişdir
        write services.txt $3
      }
      else { 
        msg $chan :[ $3 ] Nicki Services Admin Listesinde ekli.
      }
    }
    if $2 == sil {
      if !$3 { msg $chan  :Lütfen !services sil Nick Şeklinde belirtiniz. | halt }
      if $read(services.txt,w,$3) {
        as oper  $3 del $4 hgs 
        os opercfg $3 del ghs $4 
        as oper $3 access del *@* 
        msg $chan :[ $3 ] Nicki Services Admin listesinden silinmişdir. 
        write $+(-dl,$readn) services.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Services Admin Listesinde ekli degil.
      }
    }
    if $2 == list {
      if $lines(services.txt) == 0 { msg $chan Services Admin listesi boş. | halt }
      var %slist 1
      while %slist <= $lines(services.txt) {
        msg $chan %slist $+ .4) $read(services.txt,%slist)
        inc %slist
      }
    }
  }
 

  if $1 == !server {
    if !$2 { msg $chan  :Lütfen !server ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle {
      if !$3 { msg $chan  :Lütfen !server ekle Nick Şeklinde belirtiniz. | halt }
      if !$read(server.txt,w,$3) {
        as oper $3 add $4 ghsa 
        os opercfg $3 add ghsa $4 
        as oper $3 access add *@*
        msg $chan :[ $3 ] Nicki Server Admin olarak eklenmişdir
        write server.txt $3
      }
      else { 
        msg $chan :[ $3 ] Nicki Server Admin Listesinde ekli.
      }
    }
    if $2 == sil {
      if !$3 { msg $chan  :Lütfen !server sil Nick Şeklinde belirtiniz. | halt }
      if $read(server.txt,w,$3) {
        as oper $3 del $4 hgsa 
        os opercfg $3 del ghsa $4 
        as oper $3 access del *@*       
        msg $chan :[ $3 ] Nicki Server Admin listesinden silinmişdir. 
        write $+(-dl,$readn) server.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Server Admin Listesinde ekli degil.
      }
    }
    if $2 == list {
      if $lines(server.txt) == 0 { msg $chan Server Admin listesi boş. | halt }
      var %slist 1
      while %slist <= $lines(server.txt) {
        msg $chan %slist $+ .4) $read(server.txt,%slist)
        inc %slist
      }
    }
  }
  if $1 == !root {
    if !$2 { msg $chan  :Lütfen !root ekle/sil/list Nick Şeklinde belirtiniz. | halt }
    if $2 == ekle { 
      if !$3 { msg $chan  :Lütfen !root ekle Nick Şeklinde belirtiniz. | halt }
      if !$read(root.txt,w,$3) {
        as oper $3 add $4 ghsac 
        os opercfg $3 add root $4 
        as oper $3 access add *@*
        msg $chan :[ $3 ] Nicki Root olarak eklenmişdir.
        write root.txt $3
      }
      else {
        msg $chan :[ $3 ] Nicki Root Listesinde ekli.
      }
    }
    if $2 == sil { 
      if !$3 { msg $chan  :Lütfen !root sil Nick Şeklinde belirtiniz. | halt }
      if $read(root.txt,w,$3) {
        as oper $3 del $4 ghsac 
        os opercfg $3 del root $4 
        as oper $3 access del *@*
        msg $chan :[ $3 ] Nicki Root listesinden silinmişdir. 
        write $+(-dl,$readn) Root.txt
      }
      else {
        msg $chan :[ $3 ] Nicki Root Listesinde ekli degildir.
      }
    }
    if $2 == list {
      if $lines(root.txt) == 0 { msg $chan Root listesi boş. | halt }
      var %rlist 1
      while %rlist <= $lines(root.txt) {
        msg $chan %rlist $+ .4) $read(root.txt,%rlist)
        inc %rlist
      }
    }
  }
}

Bu şekilde yani.

Prens · 18 Temmuz 2012, 23:51

Hiç bir tepki alamadım bottan, neden olabilir?

18 Temmuz 2012, 23:59

Kodu tekrar alabilirsiniz.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 23:59 -->-> Daha önceki mesaj 23:57 --

kvcist Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Hiç bir tepki alamadım bottan, neden olabilir?

Kodu kendi mircinize ekleyip kendinizmi denediniz? yoksa bot'amı eklediniz kodda bi sorun yok.

Kendi mircinize ekleyip kendınız kullanmak isterseniz

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#:{

Olan yeri

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:input:#:{

Olarak degişdiriniz

Prens · 19 Temmuz 2012, 20:03

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Hepsi yapılmasına rağmen bottan kesinlikle en ufak bir cevap alınmıyor.

Paint · 19 Temmuz 2012, 20:36

Kodu boş bir remote sayfasına ekleyin.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Root Özel İnfo ve en çok online olan nick en çok ziyaret edilen kanal.	alii-zerbeststill	Servisler	5	02 Ekim 2008 07:45
Services Root Nick	böcek	Servisler	9	09 Ekim 2007 17:05

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.