Bence Küfür Ve Reklam KorumaSını bir Txt den Ya da Bir Değişkenden OkutSak Daha Hoş olmaz mI
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:TEXT:*:#:{
var %i $lines(kufurler.txt)
while (%i > 0) {
if ($me isop $chan)
if ($nick !isop $chan)
if ($read(kufurler.txt,%i) isin $1) {
mode $chan +b $nick | kick $chan $nick Küfür Yasak.!
}
}
}
on *:TEXT:*:?:{
var %i $lines(kufurler.txt)
while (%i > 0) {
if ($me isop $comchan($nick,1))
if ($nick !isop $comchan($nick,1))
if ($read(kufurler.txt,%i) isin $1) {
mode $comchan($nick,1) +b $nick | kick $comchan($nick,1) $nick Küfür Yasak.!
}
}
}
alias kufurekle {
write kufurler.txt $1
}
alias kufurlist {
var %i $lines(kufurler.txt)
while (%i > 0) {
echo -a $read(kufurler.txt,%i)
dec %i
}
}
alias kufursil {
write $+(-ds,$1) kufurler.txt $1
}
on *:TEXT:*:#:{
var %i $lines(reklamlar.txt)
while (%i > 0) {
if ($me isop $chan)
if ($nick !isop $chan)
if ($read(reklamlar.txt,%i) isin $1) {
mode $chan +b $nick | kick $chan $nick Küfür Yasak.!
}
}
}
on *:TEXT:*:?:{
var %i $lines(reklamlar.txt)
while (%i > 0) {
if ($me isop $comchan($nick,1))
if ($nick !isop $comchan($nick,1))
if ($read(reklamlar.txt,%i) isin $1) {
mode $comchan($nick,1) +b $nick | kick $comchan($nick,1) $nick Küfür Yasak.!
}
}
}
alias reklamekle {
write reklamlar.txt $1
}
alias reklamlist {
var %i $lines(reklamlar.txt)
while (%i > 0) {
echo -a $read(reklamlar.txt,%i)
}
dec %i
}
alias reklamsil {
write $+(-ds,$1) reklamlar.txt $1
}
ÖrnekLer;
/reklamekle *[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] /kufurekle ***** /reklamsil *[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] /kufursil ***** Liste İçin ; /kufurlist /reklamlist
kuLLanImLar bu şekiLdedir BaşarıLar
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.