Şöyle Bir Kodum Var Genelde Yazılan Küfürleri Kanaldan Atiyor Txt Eklediğim Küfürler Genele Yansıdığı Zaman Hemen Kanaldan Atiyor
Şu Koduma Genelde Küfür Olduğu Zaman Kanaldan Atığı Kişiyi Hemen Kanalda /hop !temizle yapsın istiyorum kanalı Tşk Ederim
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias argosil {
if ($read(Argo.txt,w,$+(*,$1-,*))) {
write -dl $+ $readn argo.txt
echo -a $1- Argo veri tabanindan çıkarıldı
}
}
alias argoekle { write argo.txt $1- | echo -a $1- argosu veri tabanina eklendi }
#Argo on
on *@:text:*:#:{
if ($nick isop $chan || $nick ishop $chan) { return }
var %i 1
while $read(Argo.txt,%i) {
if ($read(Argo.txt,%i) iswm $1-) { ban -k $chan $nick 4KüfürLü Konuşmak Yasaktir 0,6 }
inc %i
}
}
#Argo end
Şöyle Bir Kodum Var Genelde Yazılan Küfürleri Kanaldan Atiyor Txt Eklediğim Küfürler Genele Yansıdığı Zaman Hemen Kanaldan Atiyor
Şu Koduma Genelde Küfür Olduğu Zaman Kanaldan Atığı Kişiyi Hemen Kanalda /hop !temizle yapsın istiyorum kanalı Tşk Ederim
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias argosil {
if ($read(Argo.txt,w,$+(*,$1-,*))) {
write -dl $+ $readn argo.txt
echo -a $1- Argo veri tabanindan çıkarıldı
}
}
alias argoekle { write argo.txt $1- | echo -a $1- argosu veri tabanina eklendi }
#Argo on
on *@:text:*:#:{
if ($nick isop $chan || $nick ishop $chan) { return }
var %i 1
while $read(Argo.txt,%i) {
if ($read(Argo.txt,%i) iswm $1-) { ban -k $chan $nick 4KüfürLü Konuşmak Yasaktir 0,6 }
inc %i
}
}
#Argo end