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

Sayfa 1 Toplam 3 Sayfadan

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/)

- - özele reklam ile ilgili (https://www.ircforumlari.net/mirc-scripting-sorunlari/12318-ozele-reklam-ile-ilgili.html)

FoCuS21

18 Şubat 2006 21:23

özele reklam ile ilgili

Merhaba arkadaşlar :

Özelide gelen reklamları scriptin içine bi txt dosyası koyacam öernegin özelime : xxxxxxx yazdıkları zaman bu yazıda scriptin içindeki txt dosyasının içinde varsa reklam yapan kişiyi serverde olsada olmasade auser liste atsın serverde ise bulundum butün kanllardan atsın nasıl yaparız . bir iki deneme yaptım başarısız oldu .

yardım edermisiniz.

FoCuS21

18 Şubat 2006 21:50

ek olarak

birde buna özele gelen reklamıdaki kişi ignore edip pecereyide kapatsa hiç fena olmaz :)

kolay gelsin.

MaeLStrOm

18 Şubat 2006 22:48

Denediklerini gösterirmisin onlardan yola cıkalım?

FoCuS21

19 Şubat 2006 13:08

Alıntı:

On 1:OPEN:?:*::*:{
var %i $lines(xxx.txt)
while $read(xxxx.txt,%i) {
if ($read(xxx.txt,%i) isin $3-) .ucur $2
dec %i
}
}
alias ucur {
if ($comchan($1,0)) {
var %ş $comchan($1,0)
while (%ş > 0) {
.cs akick $comchan($1,%ş) add $+($1,!*@*) özel mesajında reklam ..
.cs akick $comchan($1,%ş) enforce
.cs akick $comchan($1,%ş) del $+($1,!*@*)
.auser 666 $$1!*@*
dec %ş
}
}
}

böyle birşey
eksikvar gibi birde ignore ve pencereyi kapayıp auser 666 eklicek

el33t

19 Şubat 2006 14:19

on *:open:?:*:{ var %: = 1 | while $read(bilmemne.txt,%:) { if $v1 iswm $strip($1-) { kbcom $nick özel mesajında reklam | .auser 666 $+($nick,!*@*) | .ignore $nick | close -m $nick | return } | inc %: } }
alias kbcom { var %\ = 1 | while $comchan($$1,%\) { var %' = $v1, %. = $+($1,!*@*) | cs akick %' add %. $2- | cs akick %' enforce | cs akick %' del %. | inc %\ } }

FoCuS21

19 Şubat 2006 15:06

malesef çalışmadı alla alla

el33t

26 Şubat 2006 14:00

Kodu yukarda olduğu şekilde aldım ve denedim, çalışıyor. Kırmızıyla yazılmış bilmemne.txt'i istediğin isimle değiştirip mIRC klasörüne koyduğunda sorunsuz çalışacaktır. bilmemne.txt dosyası içine *[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] gibi alt alta istediğin şeyi koyduğunda biri [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yazdığında o kişi ortak bulunduğun kanallardan ChanServ akick komutuyla atılacaktır.

FoCuS21

26 Şubat 2006 18:30

ben nerede yanlış yapıyorum script tetık yoq bu andonu ekliyorum ama banamısın demiyor neden ola bilir

MaeLStrOm

26 Şubat 2006 19:02

Kod:

on *:open:?:{ 
 var %i = $lines(kufur.txt) 
 while %i { 
 if ($read(kufur.txt,%i) isin $1-) {
 kbcom $nick
 .auser 666 $+($nick,!*@*) 
 .ignore $nick 
 close -m $nick 
 return
 }
 dec %i
 }
 }

el33t nin kbcom aliasını aynen kullanabilirsin.

FoCuS21

27 Şubat 2006 19:45

Alıntı:

on *:open:?:{ while $read(kufur.txt) | .msg $nick Küfür Etme..! | closemsg $nick | .auser 666 $+ | kbcom $nick özel koruma... ($nick,!*@*) }
var %i = $lines(kufur.txt)
while %i {
if ($read(kufur.txt,%i) isin $1-) {
kbcom $nick
.auser 666 $+($nick,!*@*)
.ignore $nick
close -m $nick
return
}
dec %i
}
}
alias kbcom { var %\ = 1 | while $comchan($$1,%\) { var %' = $v1, %. = $+($1,!*@*) | cs akick %' add %. $2- | cs akick %' enforce | cs akick %' del %. | inc %\ } }

banamısın demiyo nerede yanlış yapıyorumanlamadım gitti

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:52.

Sayfa 1 Toplam 3 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster