IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 25 Ocak 2007, 17:06   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Socket ßotta Kanalda ve özelde komut uygulatma




Arkadaşlar uzun zamandır urasıyorum bugün sonunda el33t hocamın kodlarıyla socket btotu hele sükür servere sokup ident ettirdim buna baya sevindim acıkcası
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Şimdi sorunum su arkadaslar bu socket bota özelde ve kanalda !kurallar komutu uygulatmak istiyorum bir türlü yapamadım
Nerde socket varsa aldım cırptım yapamadım ßir örnek verebilirseniz cok sevinirim
Arkadaşlar uzun zamandır urasıyorum bugün sonunda el33t hocamın kodlarıyla socket btotu hele sükür servere sokup ident ettirdim buna baya sevindim acıkcası
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Şimdi sorunum su arkadaslar bu socket bota özelde ve kanalda !kurallar komutu uygulatmak istiyorum bir türlü yapamadım
Nerde socket varsa aldım cırptım yapamadım ßir örnek verebilirseniz cok sevinirim
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Sohbet
Alt 25 Ocak 2007, 23:36   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Eğer ki bi'şiler öğrendinse, sana sadece mantığını anlatacağım.
Çok kısa olacak belki ama bir yerden başlaman için yol gösterebilir.
if $2 == privmsg && $remove($4,:) == !komutlar && $3 == botnick { sockwrite -nt $sockname privmsg $gettok($remove($1,:),1,33) bla bla }

bota gelen yazılar
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
$1 $2 $3 $4- <- :page_upend!mIRCTEAM@D291A042.759866C8 PRIVMSG Botnick :ne amacları varsa artık

şeklindedir,

Umarım işine yarar;).

__________________
TurkSohbet.NET | #XPass

Konu diEfoRyoU tarafından (26 Ocak 2007 Saat 01:00 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 26 Ocak 2007, 19:56   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Öncelikle tŞk. ederim yardımın için eğer cok olmuyorsam bir kaç sey daha soracam ben verdiğin kodu iqi şekiLdede denedim oLdu özel ve kanalda yaptırdım txt den okutmayı felan başardım bir şey daha denedim onu yapamadım kanalda yazılan bir kelime txt de ise ona göre bir olay gerçekleştiremedim bu konuda yardımcı olursanız sevinirim...Kod burada ;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $2 == privmsg && $remove($4,:) == !komutlar && $3 == #aşkops { var %i 1 while $read(reklamlar.txt,%i) { msg #SiberAsk $v1 sockwrite -nt $sockname privmsg #aşkops $v1 inc %i } } if $2 == PRIVMSG && $3 == # { var %: $lines(kufur.txt) while (%: > 0) { if $read(kufur.txt,%:) iswm $strip($1-) { if ($nick == Cause) || (dmin isin $address) || (ops isin $address) || ($nick == irc.mirctr.net) { halt } ban -bu300 $chan ~q: $+ $wildsite | msg $chan  $+ $nick $+  : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi. } .dec %: } } }


 
Alıntı ile Cevapla

Alt 26 Ocak 2007, 21:26   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




bLaCkdeviL Nickli Üyeden Alıntı
Öncelikle tŞk. ederim yardımın için eğer cok olmuyorsam bir kaç sey daha soracam ben verdiğin kodu iqi şekiLdede denedim oLdu özel ve kanalda yaptırdım txt den okutmayı felan başardım bir şey daha denedim onu yapamadım kanalda yazılan bir kelime txt de ise ona göre bir olay gerçekleştiremedim bu konuda yardımcı olursanız sevinirim...Kod burada ;

Test ettim calısıyor.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $2 == PRIVMSG { %chan = $3 | %nick = $gettok($remove($1,:),1,33) | %text = $4- | %address = $mask($1,2) var %: $lines(kufur.txt) while (%: > 0) { if $read(kufur.txt,%:) iswm $4- { if (%nick == Cause) || (dmin isin %address) || (ops isin %address) || (%nick == irc.mirctr.net) { halt } sockwrite -nt $sockname mode %chan +b %nick | sockwrite -nt $sockname privmsg %chan  $+ %nick $+  : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi. | $+(.timerunban,%chan,%nick) 1 300 sockwrite -nt $sockname mode %chan -b %nick } .dec %: } } }

Bunu Cr serverinde yazdıgım icin Kırmızı renkli olan yerleri kendine göre degistire bilirsin

Alıntı:
<asddsa> denemeee
* Guest98502 sets mode: +b asddsa!*@*
<Guest98502> asddsa : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi.
* Guest98502 sets mode: -b asddsa!*@*


__________________
Our brain is Our Weapon

Konu Brain tarafından (26 Ocak 2007 Saat 21:37 ) değiştirilmiştir. Sebep: Düzenleme
 
Alıntı ile Cevapla

Alt 26 Ocak 2007, 21:39   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Tşkler oLduda ßir kac sorum daha olacak bunu süreli olarak attıramazmıyız acaba birde söle ßir sorun var
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[21:33] <sirmaaaa> sikerim haaaa [21:33] *** EroL mode değiştirdi:+b sirmaaaa!*@* [21:33] <EroL> sirmaaaa : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 30 dk. sureyle konusmaniz engellendi. [21:33] *** KGS mode değiştirdi:-b bennnnnnnnnnnnnnn!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
[21:35] <sirmaaaa> ne dion a.q [21:35] *** EroL mode değiştirdi:+b *!*@F5FFF999.mIRCTurk.com

İkinci kez küfür ederse birisi nedense uyarı yazısı cıkmıyor ama ban atılıyor bu neden olabilir...

 
Alıntı ile Cevapla

Alt 26 Ocak 2007, 21:59   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Arkadasım bende sorun vermedi her defasında uyarı veriyor ayrıca sureli atmasını ayarladım kodu tekrar alırsan sureli olarak atacaktır

Alıntı:
<asddsa> denemeeeeeeee
<Guest5737> asddsa : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi.
<asddsa> denemeeeeeeee
<Guest5737> asddsa : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi.
<asddsa> denemeeeeeeee
<Guest5737> asddsa : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi.


__________________
Our brain is Our Weapon
 
Alıntı ile Cevapla

Alt 26 Ocak 2007, 22:12   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Hocam neden se bende oLmuyor hatta söle bir durum var ya
Küfürleri yazdıgım mIRC penceresi ;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[22:07] <sirmaaaa> sikerimmmm [22:07] *** EroL mode değiştirdi:+b sirmaaaa!*@* [22:07] <EroL> sirmaaaa : kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 5 dk. sureyle konusmaniz engellendi. [22:07] <sirmaaaa> sikerimmmm [22:07] <sirmaaaa> sikerimmmm [22:07] <sirmaaaa> sikerimmmm ama [22:08] <sirmaaaa> sikerimmmm haaaa

Sockbotun debug penceresi ;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[22:07] < :sirmaaaa!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PRIVMSG #Aşkops :sikerimmmm [22:07] < :EroL!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
MODE #Aşkops +b sirmaaaa!*@* [22:07] < :X-Ray!~
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PRIVMSG #alem :du burdamı [22:07] < :L-mIRCTurk-SwatBot!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PART #ayva :Part [22:07] < :L-mIRCTurk-SwatBot!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
JOIN :#ayva [22:07] < :X-Ray!~
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PRIVMSG #alem :tilbelog kim Aksi? [22:07] < :sirmaaaa!
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
PRIVMSG #Aşkops :sikerimmmm ama

Birde bir şey daha soracam bu süreli açma komutundaki %nick kısımlarını %address olarak değişsem calısır mı ?

 
Alıntı ile Cevapla

Alt 28 Ocak 2007, 12:53   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Arkadaşlar yardımlarınızla socket bot kodlamasını da baya öğrenmeye başladım bir yerde takıLdım size sormak istedim
mIRC te kullandıgım söle bir kod vardı ;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#aşk:{ if %rekor == $null { set %rekor $nick(#,0) } if %rekor < $nick(#,0) { msg #aşkops [DUYURU] Aşk KanaLı OnLine User Rekoru KırıLdı. Yeni Rekor : [ $+ $nick(#,0) $+ ] | set %rekor $nick(#,0) } }

Kanalda online user sayıyor bunu sockbotta denedim yapamadım ;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $2 == JOIN { if $right($3,-1) == #aşk { inc %gelen | inc %toplamgelen sw $sockname NOTICE $remove($gettok($1,1,33),:) :Merhaba $remove($gettok($1,1,33),:) Aşk Kanalına Bugün Giriş Yapan %gelen $+ . Kişisiniz Hoş Sohbetler Dileriz.TopLam Giriş Yapan User Sayısı %toplamgelen if %rekor == $null { set %rekor $sockname(#aşk,0) } if %rekor < $sockname(#aş,0) { sw $sockname privmsg #aşkops [DUYURU] Aşk KanaLı OnLine User Rekoru KırıLdı. Yeni Rekor : [ $+ $sockname(#aşk,0) $+ ] | set %rekor $sockname(#aşk,0) } } }

Kod bu şekilde bir türlü calıştıramadım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 28 Ocak 2007, 14:18   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket ßotta Kanalda ve özelde komut uygulatma




Arkadaşlar cok mu oLuyorum bilmiyorum ama ßir sorunum daha var
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $2 == PRIVMSG { %chan = $3 | %nick = $gettok($remove($1,:),1,33) | %text = $4- | %address = $mask($1,2) var %: $lines(reklam.txt) while (%: > 0) { if $read(reklam.txt,%:) iswm $4- { if (%nick == Cause) || (dmin isin %address) || (ops isin %address) || (%nick == irc.mirctr.net) { halt } sockwrite -nt $sockname mode %chan +b %address | sockwrite -nt $sockname privmsg %chan  $+ %nick $+  : kanal genelinde baska bir kanalin/sitenin/sunucunun reklamini yaptiginiz icin 5 dk. sureyle konusmaniz engellendi. | $+(.timerunban,%chan,%address) 1 300 sockwrite -nt $sockname mode %chan -b %address } .dec %: } }

Bu kodu Sıradanbiri arkadasım sağoLsun tamam ladı bana fakat ben bnu @ olmadıgı kanallarda calısmaması için düzenledim su kısmı değiştim
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if (EroL !isop %chan) || (%nick == Cause) || (dmin isin %address) || (ops isin %address) || (%nick == irc.mirctr.net) { halt }

Ama calışmadı bu konudada yardımcı oLursanız cok sevinirim

 
Alıntı ile Cevapla

Cevapla

Etiketler
kanalda, komut, mirc download, mirc indir, otta, ozelde, socket, uygulatma, ve


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

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
identden komut uygulatma Goemon mIRC Scripting Sorunları 9 23 Temmuz 2012 00:58
KOMUT uygulatma QkLa mIRC Scripting Sorunları 5 21 Kasım 2008 12:18
bota komut uygulatma QkLa mIRC Scripting Sorunları 5 04 Eylül 2008 20:55
mirca komut uygulatma QkLa mIRC Scripting Sorunları 3 23 Ağustos 2008 06:56
Bota komut uygulatma ShaoLin mIRC Scripting Sorunları 15 10 Temmuz 2008 21:26