IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Yetkili ekleme.. (https://www.ircforumlari.net/mirc-scripting-sorunlari/310203-yetkili-ekleme.html)

Yetkili ekleme..

Bir code'yi kullanabilecek yetkilileri bir dosya icerisine yazdirip silmek ve listelemek icin asagidaki gibi bir yol izledim ama olmadi..

on *:start:{
if (!$hget(Kyetki) { Hmake Kyetki 10 | Hload Kyetki Kyetki.hsh }
}

code burada..

on *:text:*:?: {
if ($nick == Mit) {
if ($1 == !Kyetki && $2 != $null) {
if ($hfind(Kyetki,$2,W).item == 1) { msg $nick ki?i Yekili Listesinde bulunmakta }
else { hadd Kyetki $2 $nick | hsave Kyetki Kyetki.hsh | msg $nick 5Yetki Listesine Eklenen Rumuz ( $+ $2 $+ ) }
}
elseif ($1 == !Ksil && $2 != $null) {
if $hfind(Kyetki,$2,W).item == 1 { msg $nick Listeden silinen Rumuz 4 $2 | hdel Kyetki $2 | hsave Kyetki Kyetki.hsh }
else { msg $nick Silmek ?stedi?iniz Rumuz 5Yetkili Listesinde Yok. }
}
elseif ($1 == !Kliste) {
msg $nick 4 Yetkili Listesi Al?n?yor..
var %a = 1 | while (%a <= $hget(Kyetki,0).data) { msg $nick 5Yetkili ----> 7 $hget(Kyetki,%a).item - 5Ekleyen ----> 7 $hget(Kyetki,%a).data | inc %a }
}
}
}

Cevap: Yetkili ekleme..

on *:text:*:?:{
if ($nick == Mit) {
if $1 == !kyetki { if !$read(yetki.txt,w,$2) { write yetki.txt $2 | msg # $2 yetkili listesine eklendi. }
if $1 == !ksil { if $read(yetki.txt,w,$2) { write $+(-dl,$readn) yetki.txt | msg # $2 yetkili listesinden silindi. }
if $1 == !kliste { msg $nick listeleniyor. | .play $nick yetki.txt 0 }
}
}
}
}

Buyur arkadaşım işini görür.

Cevap: Yetkili ekleme..

hata veriyor hocam.benim verdigim code'yi duzeltme imkani varsa sevinirim..

Düzenli ve Anlaşılır Olması için Txt'ye Yazdırdım Sıfırdan Kodladım

Test ;

Alıntı:

<Kelebek57113> !kyetki add deneme
<HaLiL> "deneme" Listeye Eklendi.
<Kelebek57113> !kyetki add deneme
<HaLiL> "deneme" Saten Ekli
<Kelebek57113> !kyetki del deneme
<HaLiL> "deneme" Listeden Silindi.
<Kelebek57113> !kyetki del deneme
<HaLiL> "deneme" Ekli Değil

Code ;

Kod:

alias kyetki {

  if $1 == add {

    if $read(kyetki.txt,$2) { msg $3 $qt($2) Saten Ekli | halt }

    else { write kyetki.txt $2 | msg $3 $qt($2) Listeye Eklendi. }

  }

  if $1 == del { 

    if !$read(kyetki.txt,$2) { msg $3 $qt($2) Ekli Değil | halt }

    elseif $read(kyetki.txt,$2) { write -d kyetki.txt $readn | msg $3 $qt($2) Listeden Silindi. }

  }

  if $1 == list { 

    var %x = 1,%y = $lines(kyetki.txt)

    while (%x <= %y) {

      .notice $2 $read(kyetki.txt,%x)

      inc %x 1

    }

    .notice $2 Toplam %y Kisi.

  }

  if $read(kyetki.txt,$1) { return $ture }

  else { return $false }

}

on *:text:*:#deneme:{

  if $1 == !kyetki && $2 == add { $kyetki($2,$3,$chan) }

  if $1 == !kyetki && $2 == del { $kyetki($2,$3,$chan) }

  if $1 == !kyetki && $2 == list { $kyetki($2,$nick) }

}

Bu eklediğin kişileri başka bir komut ile ilişkilendireceksen şöyle bir yol izleyebilirsin;

Kod:

on *:text:!komut:#kanal:{

  if $1 == !test {

    if $kyetki($nick) == $false { msg # $nick Bu Komutu Kullanmaya Yetkili Değilsin! | halt }

    else { msg # $nick Komut vs.. işlem tamam }

  }

}

Cevap: Yetkili ekleme..

Hocam ayni nick'i defalarca ekliyor dosyaya..nick'i silmeye calistigimda da ekli oldugu halde listede olmadigini belirtiyor..

Cevap: Yetkili ekleme..

Test ettiğimde kyetki.txt dosyasını açıp bakmıştım kaydediyordu senden kaynaklanan birşey olsa gerek.

Cevap: Yetkili ekleme..

Alıntı:

XcLusive Nickli Üyeden Alıntı (Mesaj 1040292608)

Test ettiğimde kyetki.txt dosyasını açıp bakmıştım kaydediyordu senden kaynaklanan birşey olsa gerek.

evet hocam benden kaynaklaniyormus.code calisiyor ama sunuda surekli yaziyor.

-
$FALSE Unknown command
-

Cevap: Yetkili ekleme..

elseif $read(kyetki.txt,$2) { write -d kyetki.txt $readn | msg $3 $qt($2) Listeden Silindi. }

bunu

elseif $read(kyetki.txt,$2) { write -d kyetki.txt $readn | msg $3 $qt($2) Listeden Silindi. | halt }

ile değiştir.

Cevap: Yetkili ekleme..

Alıntı:

CipriX Nickli Üyeden Alıntı (Mesaj 1040292647)

list komutundan sonra da ayni hatayi veriyor..

Cevap: Yetkili ekleme..

tahmin etmiştim

.notice $2 Toplam %y Kisi.

bunun altına .halt koyarsan düzelir;

.notice $2 Toplam %y Kisi.
.halt

şeklinde

Cevap: Yetkili ekleme..

suanda sorun yok.ek olarak sunu rica ediyorum hocam.bu yetkili listesindeki sahislar,kanaldaki gorevliler ve Mitolojik nick'i diger codelerdeki komutlari da kullanmak icin yetkili olacak.bu yetkili listesindekileri gorevlileri ve benim nickimi tum codeler icin yetkili hale getirmek icin diger codelere nasil bir eklenti yapabilirim..

Cevap: Yetkili ekleme..

XcLusive, ikinci verdiği kodda bunu yapmış zaten

Cevap: Yetkili ekleme..

Ufak tefek unutkanlıklar hatalar olacak tabiki 2 3 ay ara vermiştim :)

Cevap: Yetkili ekleme..

Alıntı:

XcLusive Nickli Üyeden Alıntı (Mesaj 1040293497)

Ufak tefek unutkanlıklar hatalar olacak tabiki 2 3 ay ara vermiştim :)

Bidaha olmasın :p :D