MaeLStrOm'un ya da benim yazdığım kodu kullan, sende olan kodda while kullanımı yanlış on OPEN eventi içinde.

Alıntı:

On 1:OPEN:?:*::*:{ var %: = 1 | while $read(küfür.txt,% Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. { 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 %\ } }

son hali bu ama gene tık yoq aliseste problem vardiyecem ignorede etmiyo yani hiç çalışmıyo

birde dll dosyası yaptım kodu ondanmı oldu acaba

HATALI EVENT Kullanıyorsunda ondan!

dikkat edersen.

on *:open:?:*:{

basliyor event

sen ise

On 1:OPEN:?:*::*:

yapmissin acaba neden calismiyor!

Arkadaşlar Ozele. Reklam geldiğin de. otomatik gline nasıl atabilirim soyle bir komut var Raw lı bunu nasıl ayarlaya bilirim Teşk. ozele reklam gelince gline atıcak..

raw 301:*:{
if (US isin $nick-) || (net isin $3-) || (N E T isin $3-) || (C O M isin $3-) (U S isin $3-) || (TK isin $3-) || (com isin $3-) {
gline $2 86200 0,4 4/Reklam Koruması
}
}

kbcom u gline şekline uyararak halledebilirsin.Rawlarla işin yok şu an.Bu farklı bir olay.
alias kbcom { gline $1 Reklam }
gibi

On 1:OPEN:?:*:{ var %: = 1 | while $read(küfür.txt,%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
{ if $v1 iswm $strip($1-) { kbcom $nick özel mesajında reklam | .auser 666 $+($nick,!*@*) | .ignore $nick | close -m $nick | return } | inc %: } }
alias kbcom { gline $1 4Reklam/Koruması } }

arkadaşım yaptım sağolda. peki ben bu kufurleri Txt. den değilde kendim eklesem Remoteye ola bilirmi? yardımcı olursanız sevinirim bunda ne gibi ekleme veya cıkarma yapsam Txt. te ye değilde kendim ekleyince ozelden reklamı atar saygılar.

alias küfürekle {
if !$hget(küfür) {
hmake küfür 100
}
if !$hget(küfür,ler) {
hadd küfür ler $1
}
else {
hadd küfür ler $addtok($hget(küfür,ler),$1,32)
}
}
alias küfürsil {
if $hget(küfür,ler) {
hadd küfür ler $deltok($hget(küfür,ler),$1,32)
}
}
On 1:OPEN:?:*:{
var %. = $numtok($1-,32)
while %. {
if $istok($hget(küfür,ler),$gettok($1-,%.,32),32) {
gline $nick Reklam Koruması
close -m $nick
}
dec %.
}
}
on *:connect:hmake küfür 100 | hload küfür küfür.püf
on *:disconnect:hsave küfür küfür.püf

/küfürekle küfür
/küfürsil küfür
yazarak ekler silebilirsin.

harikasın dostum eline sağlık

banada bi kod allah rızası için
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.