Moderatör Olmak İçin Tıklayın Editör Olmak İçin Tıklayın Forum Kuralları IF Görüntülü Röportajlar IF Helper Grubu
IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  vaybe sohbet

>
+
 Kayıt ol
Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 03 Kasım 2011, 12:54   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Sock Bota Host Okuturmak



Selam kolay gelsin arkadaşlar. kendi çapımda bir socket botuna extra bot daha yaptım host verme botu ama host verdime işini beceremedim botta bana yardımcı olabilirmisiniz bu konuda simdiden kolay gelsin.
on *:SOCKOPEN:hostsystem: {
%hostnick = Grr $+ $r(100,9999)
sw $sockname NICK %hostnick
sw $sockname USER $qbotident "" " $+ $iif($host,$host,$ip) $+ " : $+ $qlogo
sockmark $sockname hostsytem
}
on *:SOCKREAD:hostsystem: {
var %s
sockread %s
tokenize 32 %s
if $1 == PING {
sw $sockname PONG $2
}
if $2 == 376 || $2 == 422 {
sw $sockname oper $qoperpass
}
if $2 == 381 {
sw $sockname join 0,
sw $sockname ns ghost XBot $+ -HOST $qnickpass
sw $sockname ns release XBot $+ -HOST $qnickpass
.timer 1 2 sw $sockname NICK XBot $+ -HOST
.timershout 0 15 shout
}
if $2 == NICK {
if $right($3,-1) == XBot $+ -HOST {
sw $sockname MODE XBot $+ -HOST +BH-h
sw $sockname ns identify $qnickpass
.timer 1 3 sw $sockname setident hostserv
.timer 1 4 sw $sockname sethost hostsystem.X.net
.timer 1 5 sw $sockname os raw svsmode XBot $+ HOST +D
.timer 1 5 sw $sockname JOIN #Bulmaca@,#Oyun@,#Kelime@,#Game@,#Sohbet@,#Chat@,# Diyalog@,#Zurna@,#Muhabbet@,#Aşk@,#Türkiye@,#istan bul@,#Ankara@,#Samsun@,#Adana@,#Antalya@,#izmir@,# KELEBEK@,#35+@,#Klavye@,#Bursa@,#Sinop@,#islam@,#v ip,#Beauty,#Beşiktaş,#Galatasaray,#Fenerbahçe,#Gir ls,#Opers,#Operlog ,
.timer 1 6 sw $sockname mode #Unban +vh XBot $+ -HOST XBot $+ -HOST
.timer 1 6 sw $sockname mode #Radyo@ +vh XBot $+ -HOST XBot $+ -HOST
.timer 1 6 sw $sockname mode #Dj +vh XBot $+ -HOST XBot $+ -HOST
.timer 0 150 .radyoerr
}
if $botfnick($1) == XBot $+ -HOST {
sw $sockname ns ghost XBot $+ -HOST $qnickpass
sw $sockname ns release XBot $+ -HOST $qnickpass
.timer 1 3 sw $sockname NICK XBot $+ -HOST
}
}
}
on *:rawmode:#Dj: {
if $read(admin.txt,w,$2) { halt }
if $nick == ChanServ {
if $1 == +o { chghost $2 Dj.X.net | os raw svsmode $2 +W | chgname $2 0,4 X.Net 0,12 Radyo XFM Dj (@)  }
if $1 == +oa { chghost $2 Radyo.djsop.X.net | os raw svsmode $2 +W | chgname $2 0,4 X.Net 0,12 Radyo XFM Dj (&)  }
if $1 == +oq { chghost $2 Radyo.founder.X.net | os raw svsmode $2 +W | chgname $2 0,4 X.Net 0,12 Radyo Kanal Founderi (~)  }
}
}
on *:rawmode:#Helpers: {
if $read(admin.txt,w,$2) { halt }
if $nick == ChanServ {
if $1 == +o { chghost $2 Helper.X.net | os raw svsmode $2 +W | chgname $2 0,4 X.Net 0,12 IRC Helperi (@)  }
if $1 == +oa { chghost $2 Help.sop.X.net | os raw svsmode $2 +W | chgname $2 0,4 X.Net 0,12 IRC Helperi (&)  }
if $1 == +oq { chghost $2 Help.koordinator.X.net | os raw svsmode $2 +W | chgname $2 0,4 X.Net 0,12 IRC Help Kanal Founderi (~)  }
}
}
Çogu kanalı sildim kod göze basit gelsin diye ilgilenen arkadaşlara tekrardan kolay gelsin.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan
Alt 03 Kasım 2011, 19:11   #2
Toprak
Misafir
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Sock Bota Host Okuturmak



Buyur;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:SOCKOPEN:hostsystem: {
  %hostnick = Grr $+ $r(100,9999)
  sw $sockname NICK %hostnick
  sw $sockname USER $qbotident "" " $+ $iif($host,$host,$ip) $+ " : $+ $qlogo
  sockmark $sockname hostsytem
}
on *:SOCKREAD:hostsystem: {
  var %s
  sockread %s
  tokenize 32 %s
  if $1 == PING {
    sw $sockname PONG $2
  }
  if $2 == 376 || $2 == 422 {
    sw $sockname oper $qoperpass
  }
  if $2 == 381 {
    sw $sockname join 0,
    sw $sockname ns ghost XBot $+ -HOST $qnickpass
    sw $sockname ns release XBot $+ -HOST $qnickpass
    .timer 1 2 sw $sockname NICK XBot $+ -HOST
    .timershout 0 15 shout
  }
  if $2 == NICK {
    if $right($3,-1) == XBot $+ -HOST {
      sw $sockname MODE XBot $+ -HOST +BH-h
      sw $sockname ns identify $qnickpass
      .timer 1 3 sw $sockname setident hostserv
      .timer 1 4 sw $sockname sethost hostsystem.X.net
      .timer 1 5 sw $sockname os raw svsmode XBot $+ HOST +D
      .timer 1 5 sw $sockname JOIN #Bulmaca@,#Oyun@,#Kelime@,#Game@,#Sohbet@,#Chat@,# Diyalog@,#Zurna@,#Muhabbet@,#Aşk@,#Türkiye@,#istan bul@,#Ankara@,#Samsun@,#Adana@,#Antalya@,#izmir@,# KELEBEK@,#35+@,#Klavye@,#Bursa@,#Sinop@,#islam@,#v ip,#Beauty,#Beşiktaş,#Galatasaray,#Fenerbahçe,#Gir ls,#Opers,#Operlog , 
      .timer 1 6 sw $sockname mode #Unban +vh XBot $+ -HOST XBot $+ -HOST 
      .timer 1 6 sw $sockname mode #Radyo@ +vh XBot $+ -HOST XBot $+ -HOST 
      .timer 1 6 sw $sockname mode #Dj +vh XBot $+ -HOST XBot $+ -HOST 
      .timer 0 150 .radyoerr
    }
    if $botfnick($1) == XBot $+ -HOST {
      sw $sockname ns ghost XBot $+ -HOST $qnickpass
      sw $sockname ns release XBot $+ -HOST $qnickpass
      .timer 1 3 sw $sockname NICK XBot $+ -HOST
    }
  }
  if $2 == MODE {
    if $3 == #Dj {
      if $read(admin.txt,w,$5) { halt }
      if $remove($gettok($1,1,33),:) == ChanServ { 
        if $4 == +o { sw $sockname chghost $5 Dj.X.net | sw $sockname os raw svsmode $5 +W | sw $sockname chgname $5 0,4 X.Net 0,12 Radyo XFM Dj (@)  }
        if $4 == +oa { sw $sockname chghost $5 Radyo.djsop.X.net | sw $sockname os raw svsmode $5 +W | sw $sockname chgname $5 0,4 X.Net 0,12 Radyo XFM Dj (&)  }
        if $4 == +oq { sw $sockname chghost $5 Radyo.founder.X.net | sw $sockname os raw svsmode $5 +W | sw $sockname chgname $5 0,4 X.Net 0,12 Radyo Kanal Founderi (~)  }
      }
    }
    if $3 == #Help {
      if $read(admin.txt,w,$5) { halt }
      if $remove($gettok($1,1,33),:) == ChanServ { 
        if $4 == +o { sw $sockname chghost $5 Helper.X.net | sw $sockname os raw svsmode $5 +W | sw $sockname chgname $5 0,4 X.Net 0,12 IRC Helperi (@)  }
        if $4 == +oa { sw $sockname chghost $5 Help.sop.X.net | sw $sockname os raw svsmode $5 +W | sw $sockname chgname $5 0,4 X.Net 0,12 IRC Helperi (&)  }
        if $4 == +oq { sw $sockname chghost $5 Help.koordinator.X.net | sw $sockname os raw svsmode $5 +W | sw $sockname chgname $5 0,4 X.Net 0,12 IRC Help Kanal Founderi (~)  }
      }
    }
  }
}
 
Alıntı ile Cevapla

Alt 04 Kasım 2011, 14:18   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sock Bota Host Okuturmak



Gözünü seveyim, kopyala/yapıştır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 05 Kasım 2011, 13:08   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sock Bota Host Okuturmak



GhoSt un yaptığı çalışmadı usta yaf :S sen bi el atsan şu koda ?

 
Alıntı ile Cevapla

Alt 10 Kasım 2011, 02:50   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sock Bota Host Okuturmak



Alıntı:
on *:join:#KANAL: {
if $nick != $cfg(me) && $nick != X-BOT && $nick != Y-BOT && BOT_* !iswm $nick {
.chgident $nick İDENT
.chgname $nick FULLNAME
.os raw svsmode $nick +p
if *xxx.host.com* iswm $address($nick,2) {
.os raw svsmode $nick -D+p
}
}
}


buna benzer bişiler yapabilirsin..

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 10 Kasım 2011, 18:56   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sock Bota Host Okuturmak



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if +*a iswm $4 {
          if $3 == #dj {
            sw $sockname os raw svsmode $5 +W
            sw $sockname chgname $5 4,1 «0 DJ 4»  on Geveze IRC Network
            sw $sockname chghost $5 DJ.Sop.Geveze.ORG
            sw $sockname chgident $5 Radio
            sw $sockname privmsg $3 : $+ $5 $+ : Sisteme [DJ Sop] olarak giris yaptiniz..
          }

          if $3 == #helpers {
            sw $sockname chghost $5 HelpSop.Geveze.ORG
            sw $sockname os raw svsmode $5 +Wh
            sw $sockname privmsg $3 : $+ $5 $+ : Sisteme [Help Sop] olarak giris yaptiniz..
          }
        }
        if +*q iswm $4 {
          if $3 == #helpers {
            sw $sockname chghost $5 Help.Koordinator.Geveze.ORG
            sw $sockname os raw svsmode $5 +Wh
            sw $sockname privmsg $3 : $+ $5 $+ : Sisteme [Help Master] olarak giris yaptiniz..
          }
          if $3 == #dj {
            sw $sockname os raw svsmode $5 +W
            sw $sockname chghost $5 DJ.Master.Geveze.ORG
            sw $sockname chgident $5 Radio
            sw $sockname privmsg $3 : $+ $5 $+ : Sisteme [Master DJ] olarak giris yaptiniz..
          }

Gibi coğaltabilirsiniz.

 
Alıntı ile Cevapla

Cevapla

Etiketler
bota, host, okuturmak, sock

« önceki Konu | sonraki Konu »

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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık

Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Dj Host Sock Sistemi Goemon mIRC Scripting Sorunları 10 29 Ekim 2012 20:16
kodu sock bota göre edit cekme Nothinq mIRC Scripting Sorunları 0 25 Nisan 2011 23:58
user host help host dj host sorunu !! darl Unreal IRCd 8 17 Nisan 2008 11:29
sock kod local mIRC Scripting Sorunları 1 21 Şubat 2008 03:19




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
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.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
ferizli haber kaynarca haber sohbet sohbet teması takipçi satın al tiktok takipçi satın al instagram beğeni satın al takipçi satın al takipçi satın al Buy Instagram Followers pubg mobile uc
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
Kuşadası Web Site Tasarım & Teknik Destek - KuşadasıNET