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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Çözüldü .sopekle aop ekle (https://www.ircforumlari.net/mirc-scripting-sorunlari/813053-sopekle-aop-ekle.html)

RahmetLi 11 Şubat 2019 03:43
.sopekle aop ekle
 
s.a arkadar hayırlı geceler elımde .sopekle .aop ekle addonu var sorunsuz calısıyor
Kod:
alias subroots {
  if $me ison #kelebek@ {
    var %corenicks = $gettok($2-,1,32)
    .msg #kelebek@ $+(2Yetkili: 1 ,$gettok(%corenicks,1,61)) $+(2Ekleyen Yetkili: 1 ,$gettok(%corenicks,2,61)) $+(2Tarih:,$asctime($gettok($2-,2,32),dd-mm-yyyy )) $+(5Saat:,$asctime($gettok($2-,2,32),HH:nn))
  }
}

list yapınca ekleyen tarih cıkıyor buna aop ekledıgımı Yetki: AOP Sopekledıgıme yetki: SOP ek olarak eklemeye ugrastım sonuca ulasamadım yardımcı olabılırmısınız zahmet olmazsa sımdıden tşlker.


ÖRNEK : Yetkili: seda01 Ekleyen Yetkili: RahmetLi Yetki: AOP Tarih:11-02-2019 Saat:02:44
Yetkili: seda01 Ekleyen Yetkili: RahmetLi Yetki: SOP Tarih:11-02-2019 Saat:

Alper 11 Şubat 2019 09:45
Cevap: .sopekle aop ekle
 
Mantiken şöyle yapilabilir.

.sopekle komutuna değişken ekleyebilirsin.

.sopekle veya .aopekle yaptığın zaman set %yektituru yetki şeklinde.

.sopekle nick yaptın diyelim set %yetkituru Sop gibi kanala mesaj yazdıktan sonra unset yaptırabilirsin.

RahmetLi 11 Şubat 2019 14:01
Cevap: .sopekle aop ekle
 
tam anlamadım başkan :D

Alper 11 Şubat 2019 18:53
Cevap: .sopekle aop ekle
 
Tam olarak anlaman için aop ekle kodunu paylaşman gerek.

RahmetLi 11 Şubat 2019 21:17
Cevap: .sopekle aop ekle
 
Kod:
on *:text:*:#kelebek@: {
  var %rfile = $qt($scriptdirroots.ini)
  if $1 == .sopekle {
  if !$read(master.txt,w,$nick) { msg #kelebek@ 5[ACC-CHANGE] 4 $nick 1Yetkili listesinde bulunmadıgınız için .sopekle komutunu kullanamazsınız. | return }
  if $readini(%rfile,roots,$2) { .msg $chan 5[ACC-CHANGE]  4 $nick 1 $2  rumuzu #Kelebek kanalı Sop listesinde zaten mevcut. | return }
    else {
      writeini %rfile roots $2 $nick $ctime
      .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #Kelebek kanalı Sop Listesine Eklendi. Access Listesini görmek için .acclist yazınız.
      cs access #kelebek add $2 100
      cs access #kelebek@ add $2 100
      return
    }
  }
  elseif $1 == .accdel {
if !$read(yetkili.txt,w,$nick) { msg #kelebek@ 5[ACC-CHANGE]4 $nick 1 Yetkili listesinde bulunmadıgınız için .accdel komutunu kullanamazsınız. | return }
    if !$readini(%rfile,roots,$2) { .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #Kelebek kanalı Access listesinde bulunamadı. | return }
    else {
      remini %rfile roots $2 $ctime
    cs access #kelebek@ del $2
    cs access #kelebek del $2
      .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #Kelebek kanalı Access listesinden silindi.
      return
    }
  }
if $1 == .aopekle {
if !$read(yetkili.txt,w,$nick) { msg #kelebek@ 5[ACC-CHANGE] 4 $nick 1Yetkili listesinde bulunamadıgınız için .aopekle komutunu kullanamazsınız. | return }
    if $readini(%rfile,roots,$2) { .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #Kelebek kanalı Aop listesinde zaten mevcut. | return }
    else {
      writeini %rfile roots $2 $nick $ctime
      .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #Kelebek kanalı Aop Listesine Eklendi. Access Listesini görmek için .acclist yazınız.
      cs access #kelebek add $2 50
      cs access #kelebek@ add $2 50
      return
    }
  }

  elseif $1 == .acclist {
    if !$exists(%rfile) || $ini(%rfile,roots,0) <= 0 {
      .msg $chan 4 $nick $2 ACC-LIST  yönetici listesi boş.
    }
    else {
      .msg $chan 4 $nick 1 $2 5#KELEBEK 1[ACC-LIST] 2Toplam Yetkili:  $ini(%rfile,roots,0)
      .msg $chan  $2 2- - - - - - - - - - - - - - - - - - - - -

      .play -atroots subroots $chan %rfile
    }
  }
}
alias subroots {
  if $me ison #kelebek@ {
    var %corenicks = $gettok($2-,1,32)
    .msg #kelebek@ $+(2Yetkili: 1 ,$gettok(%corenicks,1,61)) $+(2Ekleyen Yetkili: 1 ,$gettok(%corenicks,2,61)) $+(2Tarih:,$asctime($gettok($2-,2,32),dd-mm-yyyy )) $+(5Saat:,$asctime($gettok($2-,2,32),HH:nn))
  }
}
kod bu tamamı bu üstadım

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 20:17 -->-> Daha önceki mesaj 19:41 --

üstadım bıde lıstelemeyı cok yavas yapıyor admın flagı var ama lıstelerken cok yavas neden olabılır acaba?

Alper 11 Şubat 2019 22:42
Cevap: .sopekle aop ekle
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]



Kod:
on *:text:*:#kelebek@: {
  var %rfile = $qt($scriptdirroots.ini)
  if $1 == .sopekle {
    if !$read(master.txt,w,$nick) { msg #kelebek@ 5[ACC-CHANGE] 4 $nick 1Yetkili listesinde bulunmadıgınız için .sopekle komutunu kullanamazsınız. | return }
    if $readini(%rfile,roots,$2) { .msg $chan 5[ACC-CHANGE]  4 $nick 1 $2  rumuzu #kelebek kanalı Sop listesinde zaten mevcut. | return }
    else {
      writeini %rfile roots $2 $nick SOP $ctime
      .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #kelebek kanalı Sop Listesine Eklendi. Access Listesini görmek için .acclist yazınız.
      cs access #kelebek add $2 100
      cs access #kelebek@ add $2 100
      return
    }
  }
  elseif $1 == .accdel {
    if !$read(yetkili.txt,w,$nick) { msg #kelebek@ 5[ACC-CHANGE]4 $nick 1 Yetkili listesinde bulunmadıgınız için .accdel komutunu kullanamazsınız. | return }
    if !$readini(%rfile,roots,$2) { .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #kelebek kanalı Access listesinde bulunamadı. | return }
    else {
      remini %rfile roots $2 $ctime
      cs access #kelebek@ del $2
      cs access #kelebek del $2
      .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #kelebek kanalı Access listesinden silindi.
      return
    }
  }
  if $1 == .aopekle {
    if !$read(yetkili.txt,w,$nick) { msg #kelebek@ 5[ACC-CHANGE] 4 $nick 1Yetkili listesinde bulunamadıgınız için .aopekle komutunu kullanamazsınız. | return }
    if $readini(%rfile,roots,$2) { .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #kelebek kanalı Aop listesinde zaten mevcut. | return }
    else {
      writeini %rfile roots $2 $nick AOP $ctime
      .msg $chan 5[ACC-CHANGE] 4 $nick 1 $2  rumuzu #kelebek kanalı Aop Listesine Eklendi. Access Listesini görmek için .acclist yazınız.
      cs access #kelebek add $2 50
      cs access #kelebek@ add $2 50
      return
    }
  }

  elseif $1 == .acclist {
    if !$exists(%rfile) || $ini(%rfile,roots,0) <= 0 {
      .msg $chan 4 $nick $2 ACC-LIST  yönetici listesi boş.
    }
    else {
      .msg $chan 4 $nick 1 $2 5#kelebek 1[ACC-LIST] 2Toplam Yetkili:  $ini(%rfile,roots,0)
      .msg $chan  $2 2- - - - - - - - - - - - - - - - - - - - -

      .play -atroots subroots $chan %rfile
    }
  }
}
alias subroots {
  if $me ison #kelebek@ {
    var %corenicks = $gettok($2-,1,32)
    .msg #kelebek@ $+(2Yetkili: 1 ,$gettok(%corenicks,1,61)) $+(2Ekleyen Yetkili: 1 ,$gettok(%corenicks,2,61)) $+(2Yetki: 1 ,$gettok($2-,2,32)) $+(2Tarih:,$asctime($gettok($2-,3,32),dd-mm-yyyy )) $+(5Saat:,$asctime($gettok($2-,3,32),HH:nn))
  }
}

RahmetLi 11 Şubat 2019 23:21
Cevap: .sopekle aop ekle
 
Yetkili: IşıLada Ekleyen Yetkili: RahmetLi Access Yetkisi: 11549886248 Tarih:11-02-2019 Saat:13:57

bu sekılde cıkıyor ustadım :S bide cok yavas sıralıyor admın flagı var nasıl hızlandırabılırız. senıde ugrastırıyorum kusura bakma

Alper 11 Şubat 2019 23:25
Cevap: .sopekle aop ekle
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]



Kodun tamamını değişmedin sanırım sadece alias kısmını değişmişsin ben denedim çalıştı.


[ 22:38:40 ] <pC`kOpAt> .acclist
[ 22:38:40 ] <Deneme> pC`kOpAt #sohbet [ACC-LIST] Toplam Yetkili: 1
[ 22:38:41 ] <Deneme> - - - - - - - - - - - - - - - - - - - - -
[ 22:38:41 ] <Deneme> Yetkili: elif Ekleyen Yetkili: pC`kOpAt Yetki: AOP Tarih:11-02-2019 Saat:22:38


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:18.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk