Çevrimdışı

slm konuyu dogru yeremı actım bılmıorum ama arkadaslar bız arkadaslarla beraber bır NoMercy editledık sunucumuza botun herseyı tamamdır ama yanlız uzerıne ek olarak S-Bot Check deki gibi .nickekle nick . muafnekle nick bunun gibi kod ıstıyorum bır nıckı korumaya almıoyor bu modulu buna nasıl eklıyebılırım bana yardım edebilicek bırısı warmı?

----------

Yokmu Bir Yardım Eden..?

 

Çevrimdışı

if $remove($4,:) == .muaf {
if $5 == $null {
swbot privmsg #ghost .muaf , Yetersiz veya eksik parametre
swbot privmsg #ghost Parametreler: liste ekle sil (ÖRN: .muaf ekle #Kanal)
}
else {
if $5 == liste {
if $lines(muaf.txt) == 0 {
swbot privmsg #ghost Muaf listesi boş!
}
else {
swbot privmsg #ghost Muaf LİSTESİ
swbot privmsg #ghost $str(-,20)
var %i 1
while %i <= $lines(muaf.txt) {
dll WhileFix.dll WhileFix .
swbot privmsg #ghost %i - $read(muaf.txt,%i)
inc %i
}
}
}
if $5 == ekle {
if $6 == $null {
swbot privmsg #ghost Lütfen bir kanal belirtiniz (Kullanımı .muaf ekle #Kanal)
.halt
}
else {
if $read(muaf.txt,w,$6) {
swbot privmsg #ghost $6 : Zaten muaf listesinde ekli
}
else {
.write muaf.txt $6
swbot privmsg #ghost $6 : Kanalı muaf listesine Eklenmiştir..
}
}
}
if $5 == sil {
if $6 == $null {
swbot privmsg #ghost Lütfen bir kanal seçiniz (Kullanımı .muaf sil #Kanal)
.halt
}
if $read(muaf.txt,w,$6) {
.write $+(-,dl,$readn) muaf.txt
swbot privmsg #ghost $6- : Kanalı muaf listesinden silinmiştir..
}
else {
swbot privmsg #ghost $6- : Kanalı muaf listesinde bulunamadı
}
}
}
}
if $remove($4,:) == .korunick {
if $5 == $null {
swbot PRIVMSG #GhoSt korunick, Yetersiz veya eksik parametre
swbot PRIVMSG #GhoSt Parametreler: liste ekle sil (ÖRN: .korunick ekle Nick)
swbot PRIVMSG #GhoSt -
swbot PRIVMSG #GhoSt Yıldızlı şekilde nick ekleyebilirsiniz
swbot PRIVMSG #GhoSt ÖRN: GhoSt* => Bu şekilde "GhoSt-Away" nickide "GhoSt-" nickide Muaff Olur..
}
else {
if $5 == liste {
if $lines(muafnick.txt) == 0 {
swbot PRIVMSG #GhoSt KoruNick listesi boş!
}
else {
swbot PRIVMSG #GhoSt KoruNick LİSTESİ
swbot PRIVMSG #GhoSt $str(-,20)
var %i 1
while %i <= $lines(muafnick.txt) {
dll WhileFix.dll WhileFix .
swbot PRIVMSG #GhoSt %i - $read(muafnick.txt,%i)
inc %i
}
}
}
if $5 == ekle {
if $6 == $null {
swbot PRIVMSG #GhoSt Lütfen bir nick belirtiniz (Kullanımı .korunick ekle Nick)
.halt
}
else {
if $read(muafnick.txt,w,$6) {
swbot PRIVMSG #GhoSt $6 : Nicki zaten KoruNick listesinde ekli
}
else {
.write muafnick.txt $6
swbot PRIVMSG #GhoSt $6 : Nicki KoruNick listesine Eklenmiştir..
}
}
}
if $5 == sil {
if $6 == $null {
swbot PRIVMSG #GhoSt Lütfen bir Nick seçiniz (Kullanımı .korunick sil Nick)
.halt
}
if $read(muafnick.txt,w,$6) {
.write $+(-,dl,$readn) muafnick.txt
swbot PRIVMSG #GhoSt $6- : Nicki KoruNick listesinden silinmiştir..
}
else {
swbot PRIVMSG #GhoSt $6- : Nicki KoruNick listesinde bulunamadı
}
}
}
}

----------

!$read(muaf.txt,w,$remove($3,:)) && !$read(muafnick.txt,w,%::nick)
bunuda korumalara ekle kufur vs. ekle .muaf ekle #kanal
.korunick ekle Nick inş. işini görür.