Çevrimdışı

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

 

Çevrimdışı

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

 

Çevrimdışı

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

 

Çevrimdışı

HATALI EVENT Kullanıyorsunda ondan!

dikkat edersen.

on *:open:?:*:{

basliyor event

sen ise

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

yapmissin acaba neden calismiyor!

 

Çevrimdışı

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ı
}
}

 

Çevrimdışı

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

 

Çevrimdışı

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.

 

Çevrimdışı

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.

 

Çevrimdışı

harikasın dostum eline sağlık

 

Çevrimdışı

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.