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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 18 Aralık 2005, 23:00   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
ilginç bi Sistem yapalım mı?




Serverıma Aşırı Derece inviter Giriyor.İnviter kanala giriyor kanal nicklerini alıyor kanaldan çıkıyor.oper ve adminleri ignore ediyor.sonra başlıyor reklama böyle olunca ben reklamları göremiyorum.

bir bot yapabilirmiyiz txt den kanalları okusun ve o kanallara girsin.özeline reklam gelince Gerçek nicke (Yetkisi olan nicke) bildirsin.bildirsin derken kline vs.. atsın.Şimdiden yardımınız için tşkler.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 19 Aralık 2005, 00:48   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



bu çok basit bişi bunun için oturup saatlerce kod yazmaya gerek youk ki


on *:text:*:?: {
if ($nick isop $chan) { return }
if $nick ison #oper { halt }
var %x $lines(reklam.txt)
while (0 < %x) {
if ($read(reklam.txt,%x) iswm $strip($1-)) {
kline $nick Reklam Tespit
msg #takip : $nick Nicki $chan Kanalında : $1- : Yasaklı Kelimeyi Kullandı (Kline) Edildi
}
dec %i
}
}

Bu Kodda nick Eğer Oper Kalındaysa Ve Kanalda Opsa İşlemez haricen &#246;zele gelen yazılarda eğer reklam.txt de uyuşan yazı olursa kline atar ve takip kanalına yollar kullandıı kelimeyi
tabi mirc klasorune reklam.txt adında bir txt dosyası a&#231;mayı unutmadıysan
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

/alias ekle { write reklam.txt $1- } bunuda mirce yapıştır
/ekle eklenecekkelime şekline reklam.txt ye kelime eklersin umarım işini g&#246;r&#252;r

Kusura bakma daha g&#252;zelini yazmak isterdim ama ben daha &#231;ok &#231;ok yeniyim burdan &#231;ok şey &#246;ğrendim bu kadarı geldi elimden muhakkak ustad larım daha iisini yapacaklardır Kolay Gelsin

__________________
TurkSohbet.NET | #XPass

Konu diEfoRyoU tarafından (19 Aralık 2005 Saat 00:51 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 00:54   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



botun remotesine eklediğinde dosyadaki kanallara girer ve &#246;zeline baska bir dosyada bulunan reklam kelimelerinden biri yazılırsa sana msg atar:
on *:connect:{
timer 1 3 reklamlar
}
alias reklamlar {
var %a $lines(kanallar.txt)
while %a {
join $+($chr(35),$read(kanallar.txt,%a))
dec %a
}
}
on *:text:*:?:{
var %a $lines(k&#252;f&#252;rler.txt)
while %a {
if ($read(k&#252;f&#252;rler.txt,%a) isin $1-) {
msg ask_harfleri $nick reklam yapti
}
dec %a
}
}
bu kodu kendi remotene eklediğinde ise botundan mesaj geldiğinde reklam yapani kline ile cezalandırırsın
on *:text:*:?:{
if ($nick == botnicki) {
kline $1 reklam..
}
}
k&#252;f&#252;rler.txt adinda bi dosya olusturup icine reklam kelimelerini eklemelisin
kolay gelsin


Konu MaeLStrOm tarafından (19 Aralık 2005 Saat 10:41 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 11:08   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Sacmaliyoruz Nickli Üyeden Alıntı
on *:text:*:?: {
if ($nick isop $chan) { return }
if $nick ison #oper { halt }
var %x $lines(reklam.txt)
while (0 < %x) {
if ($read(reklam.txt,%x) iswm $strip($1-)) {
kline $nick Reklam Tespit
msg #takip : $nick Nicki $chan Kanalında : $1- : Yasaklı Kelimeyi Kullandı (Kline) Edildi
}
dec %i
}
}

on text eventini özel için kullandığın için (yani on *:text:*:?:) if $nick isop $chan kısmı gereksiz olur çünkü zaten bir kanal yoktur ve bu kişinin olmayan kanalda op olma ihtimali yoktur. Bu arada herkeste gördüğüm hatayı belirtmek istiyorum. /var kullanırken mutlaka = kullanın, aksi takdirde birden fazla değişkene değer atamak istediğinizde sorunlarla karşılaşabilirsiniz. Yani /var %x = $lines(reklamlar.txt) olması doğru olacaktır ve birden fazla değişken kullanıldığında sorun olmayacaktır (yani /var %x = 1, %b = 2, %c = 3 gibi...). While 0 < %x yerine ise while %x kullanabilirsin.

 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 12:16   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



saolasın el33t

 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 20:05   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Sağolasın El33t B&#246;le Eğitimci Postlarınıza İnan &#199;ok İhtiyacımız Var Yeni Bağlayanlar Adına Teşekk&#252;rLer.

__________________
TurkSohbet.NET | #XPass
 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 21:48   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Güzel çalıştı ama..




kod çok güzel çalıştı ama mesala reklamla.txt dosyasına *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
eklediğim zaman [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sitesinin reklamı atıldığında görmüyor bunu nasıl yapıcaz ?

 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 21:54   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



if ($read(k&#252;f&#252;rler.txt,%a) isin $1-) {
bu şekilde olan kısmı
if ($read(k&#252;f&#252;rler.txt,%a) iswm $1-) {
yaparsan d&#252;zelir.Ayrıca *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
yazdığında yine sorun vericektir cunku gorulduğu gibi reklam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ile başlıyor yani oncesinde * in yerini alabileceği bi değer yok.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
olarakta eklemelisin dosyaya
kolay gelsin

 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 22:24   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Çok Teşekkürler..




Reklamlar Yarıya indi...bundan çalıştıryom 2-3 tane reklam felan kalmıyor kendisi giriyor kanallara ara sıra part yaptıryom güzel oldu tşkler...

 
Alıntı ile Cevapla

Alt 19 Aralık 2005, 22:51   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



MaeLStrOm Nickli Üyeden Alıntı
if ($read(küfürler.txt,%a) isin $1-) {
bu şekilde olan kısmı
if ($read(küfürler.txt,%a) iswm $1-) {
yaparsan düzelir.Ayrıca *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
yazdığında yine sorun vericektir cunku gorulduğu gibi reklam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ile başlıyor yani oncesinde * in yerini alabileceği bi değer yok.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
olarakta eklemelisin dosyaya
kolay gelsin

*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
olduğunda neden çalışmayacağını anlayamadım. Aşağıdaki örnekte görüldüğü gibi biri "selam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
yazdığında *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bu cümlenin içinde olduğu için durum doğru olacaktır.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
asıl 2. örnekte gibi olduğunda durum doğru olmaz. yani "selam [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]" da
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ararsak bu durum yanlış olacaktır, yani eşleşmeyecektir.

1. örnek: (mIRC'de komut satırına yazılacak.)
//var %a = selam [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | if *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm %a { echo 4 -a $v2 içinde $v1 var. } | else { echo 4 -a $v2 içinde $v1 yok }


2. örnek:
//var %a = selam [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | if
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm %a { echo 4 -a $v2 içinde $v1 var. } | else { echo 4 -a $v2 içinde $ifmatch yok }


Umarım farkı anlamışsındır.

 
Alıntı ile Cevapla

Cevapla

Etiketler
ilginc, mirc download, mirc indir, sistem, yapalim


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
Yoga Yapalım Ecrin Alternatif Tıp 0 21 Ekim 2011 12:03
İş görüşmesinde ilginç sorulara ilginç cevaplar! Coder Haber Arşivi 1 20 Ocak 2010 00:03
Asp Forum Yapalım PaYanDA ASP/ASP.NET 3 12 Şubat 2009 22:23
FireFox ile hız yapalım Derebey Ağ, Network ve Networking 9 04 Ekim 2007 22:07
komık log yapalım mı PuSAt Komik Loglar 9 26 Mart 2006 16:32