IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 2 Toplam 4 Sayfadan 1 2 34
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım? (https://www.ircforumlari.net/mirc-scripting-sorunlari/44126-rootekle-nick-rootsil-nick-root-bota-uzerinde-nasil-uygularim.html)

hea 26 Nisan 2008 18:14
Yanıt: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
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 ?

Regex 26 Nisan 2008 21:04
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
Kod:
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
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
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:
/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:
.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:
/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:
/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:
/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 *@*

Toprak 18 Temmuz 2012 23:30
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
Buyur;

Kod:
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:
!helper ekle Nick Şifre
!helper sil Nick Şifre
!helper list
Oper Ekleme/Silme/List;

Kod:
!oper ekle Nick Şifre
!oper sil Nick Şifre
!oper list
Server Admin Ekleme/Silme/List;

Kod:
!server ekle Nick Şifre
!server sil Nick Şifre
!server list
Servces Admin Ekleme/Silme/List;

Kod:
!services ekle Nick Şifre
!services sil Nick Şifre
!services list
Root Ekleme/Silme/List

Kod:
!root ekle Nick
!root sil Nick
!root list

Goemon 18 Temmuz 2012 23:44
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
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
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
Alıntı:
robo-c-OP Nickli Üyeden Alıntı (Mesaj 1041172376)
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:
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
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
Hiç bir tepki alamadım bottan, neden olabilir?

Toprak 18 Temmuz 2012 23:59
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
Kodu tekrar alabilirsiniz.

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

Alıntı:
kvcist Nickli Üyeden Alıntı (Mesaj 1041172385)
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:
on *:text:*:#:{
Olan yeri

Kod:
on *:input:#:{
Olarak degişdiriniz

Prens 19 Temmuz 2012 20:03
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
@[Ü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
Cevap: !rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım?
 
Kodu boş bir remote sayfasına ekleyin.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 15:35.
Sayfa 2 Toplam 4 Sayfadan 1 2 34
Konuya ait 40 Mesajı başka Sayfada göster

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