| Alper | 31 Temmuz 2020 00:17 |
Cevap: dj ekleme sorunu
Alýntý:
alphae Nickli Üyeden Alýntý
(Mesaj 1042340447)
altaki kod calýþmadý ne yaptým ise verdigi hata yardýmlarýnýzý bekliyorum
#YETKI Unknown command
-
ON Unknown command
-
#YETKI Unknown command
- Kod:
on *:text:*:#yetki:{
if $regex($1,/[!.]dj/Si) {
if $2 == list {
.timer -h 1 500 msg $chan - djler listeleniyor.
var %:mnck = 1, %mnc = $lines(muafdj.txt)
while %:mnck <= %mnc {
.timer -h 1 500 msg $chan $+(%:mnck,$chr(41)) $read(muafdj.txt,%:mnck)
inc %:mnck
}
.timer -h 1 500 msg $chan - Toplam dj Sayýsý:04 %mnc
}
if $2 == ekle {
if !$regex($3,/^([a-zA-ZÐðýÝöÖüÜþÞçÇ_^\133\135}{][a-zA-ZÐðýÝöÖüÜþÞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
.write muafdj.txt $strip($3)
else { .enable #yetki | set %kanal # | cs access #dj add $3- 45 }
}
if $2 == sil {
if !$regex($3,/^([a-zA-ZÐðýÝöÖüÜþÞçÇ_^\133\135}{][a-zA-ZÐðýÝöÖüÜþÞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
if $read(muafdj.txt,w,$strip($3)) { write -dl $+ $readn muafdj.txt }
else { .enable #yetki | set %kanal # | cs access #dj del $3- }
}
}
#yetki on
on *:notice:*:?:{
if $regex($nick,/^ChanServ$/i) {
if $regex($1-,/kanal[ýiÝ]\skayitl[ýiÝ]\sde[gðÐ][ýiÝ]l/Si) { msg %kanal $1- | .disable #yetki | return }
if $regex($1-,/erisim\slistesi.+kayitli.+nick/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/Erisim\sseviyesi.+ve.+arasinda/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+kanalindaki\serisim.+zaten/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+kanalindaki\serisim\sseviyesi.+degisti/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+kanalinin\serisim.+seviyeden.+eklendi/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+akanalinin\dserisim.+silindi/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+bkanalinin\serisim.+bulunamadi/Si) { msg %kanal $1- | .disable #yetki }
}
}
#yetki end
| Kod:
on *:text:*:#yetki:{
if $regex($1,/[!.]dj/Si) {
if $2 == list {
.timer -h 1 500 msg $chan - djler listeleniyor.
var %:mnck = 1, %mnc = $lines(muafdj.txt)
while %:mnck <= %mnc {
.timer -h 1 500 msg $chan $+(%:mnck,$chr(41)) $read(muafdj.txt,%:mnck)
inc %:mnck
}
.timer -h 1 500 msg $chan - Toplam dj Sayýsý:04 %mnc
}
if $2 == ekle {
if !$regex($3,/^([a-zA-ZÐðýÝöÖüÜþÞçÇ_^\133\135}{][a-zA-ZÐðýÝöÖüÜþÞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
.write muafdj.txt $strip($3)
else { .enable #yetki | set %kanal # | cs access #dj add $3- 45 }
}
if $2 == sil {
if !$regex($3,/^([a-zA-ZÐðýÝöÖüÜþÞçÇ_^\133\135}{][a-zA-ZÐðýÝöÖüÜþÞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
if $read(muafdj.txt,w,$strip($3)) { write -dl $+ $readn muafdj.txt }
else { .enable #yetki | set %kanal # | cs access #dj del $3- }
}
}
}
#yetki on
on *:notice:*:?:{
if $regex($nick,/^ChanServ$/i) {
if $regex($1-,/kanal[ýiÝ]\skayitl[ýiÝ]\sde[gðÐ][ýiÝ]l/Si) { msg %kanal $1- | .disable #yetki | return }
if $regex($1-,/erisim\slistesi.+kayitli.+nick/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/Erisim\sseviyesi.+ve.+arasinda/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+kanalindaki\serisim.+zaten/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+kanalindaki\serisim\sseviyesi.+degisti/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+kanalinin\serisim.+seviyeden.+eklendi/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+akanalinin\dserisim.+silindi/Si) { msg %kanal $1- | .disable #yetki }
if $regex($1-,/nick.+bkanalinin\serisim.+bulunamadi/Si) { msg %kanal $1- | .disable #yetki }
}
}
#yetki end
Süslü parantez eksikti. Böyle durumlarda remote sayfasýnýn sað üst kýsmýnda bulunan buttona basýp parantezlerde sorun olup olmadýðýný kontrol edebilirsin. |
