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ü Modeall Komutu (https://www.ircforumlari.net/mirc-scripting-sorunlari/814192-modeall-komutu.html)

Bilecikli 06 Nisan 2019 01:31
Modeall Komutu
 
Merhabalar. Sunucularda botlara tanımlı olan .modeall/modeall eklentisini/addonunu arıyorum. Varmıdır böyle bir şey için yardımcı olabilecek? Ekleyeceğim kanallarda kullanıma dayalı olarak +M/+R/+b/op-sop-halfop verme alma/block ekleme gibi işlemleri yaptırabileceğim yani kısacası benim yazdığımı uygulayabilecek bir addon arıyorum. Mesela: .modeall yada /modeall +b ~T:block:biLecikLi* gibi. Yardımcı olursanız minnettar kalırım.

diEfoRyoU 06 Nisan 2019 02:07
Cevap: Modeall
 
on 1:input:#: { if $regex($1,/^//) || $ctrlenter { return }
if $istok(.modeall !modeall,$1,32) { mode $active $2- }
}

Örnek kanalda; .modeall +m yada .modeall -m şeklinde yazarsan çalışır.
Bilecikli bu kod senin için yeterli mi?

Bilecikli 06 Nisan 2019 13:13
Cevap: Modeall
 
Alıntı:
diEfoRyoU Nickli Üyeden Alıntı (Mesaj 1042048019)
on 1:input:#: { if $regex($1,/^//) || $ctrlenter { return }
if $istok(.modeall !modeall,$1,32) { mode $active $2- }
}

Örnek kanalda; .modeall +m yada .modeall -m şeklinde yazarsan çalışır.
Bilecikli bu kod senin için yeterli mi?
Hocam prefix sahibi olmasam da kullanabiliyormuyum? Adminim sonuçta :) ONdan sordum. Bazen prefix olayına takılıyorum da kodlarda.

Che 06 Nisan 2019 21:55
Cevap: Modeall Komutu
 
Kod:
On 1:input:*:{
  if $1 == !R { cs set $chan mlock +R }
  if $1 == !-R { cs set $chan mlock -R }
  if $1 == !v { mode $chan +v $2 2 $3- }
  if $1 == !-v { mode $chan -v $2 2 $3- }
  if $1 == !m { mode $chan +m $2 2 $3- }
  if $1 == !-m { mode $chan -m $2 2 $3- }
  if $1 == !h { mode $chan +hhhhhhhh $2 $3 $4 $5 $6 $7 $8 $9 }
  if $1 == !dh { mode $chan -hhhhhhhh $2 $3 $4 $5 $6 $7 $8 $9 }
}
}

Bilecikli 07 Nisan 2019 00:50
Cevap: Modeall
 
Alıntı:
diEfoRyoU Nickli Üyeden Alıntı (Mesaj 1042048019)
on 1:input:#: { if $regex($1,/^//) || $ctrlenter { return }
if $istok(.modeall !modeall,$1,32) { mode $active $2- }
}

Örnek kanalda; .modeall +m yada .modeall -m şeklinde yazarsan çalışır.
Bilecikli bu kod senin için yeterli mi?
Prefix sahibi olmadan da kullanılabilir mi? Yani; admin flagları mevcut.

Toprak 07 Nisan 2019 15:19
Cevap: Modeall Komutu
 
Cevap verilmiş ama başkalarında işine yaraması açısından;


Kod:
alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $token($_kanal,0,32) | while %:md {
        mode $token($_kanal,%:md,32) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
Kanalları kendiniz belirtebilirsiniz yada, TXT den okutmalı yapar isek;

Kod:
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $lines(global.txt) | while %:md {
        mode $read(global.txt,%:md) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}

Bilecikli 09 Nisan 2019 22:16
Cevap: Modeall Komutu
 
Alıntı:
Toprak Nickli Üyeden Alıntı (Mesaj 1042049334)
Cevap verilmiş ama başkalarında işine yaraması açısından;


Kod:
alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $token($_kanal,0,32) | while %:md {
        mode $token($_kanal,%:md,32) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}


Kanalları kendiniz belirtebilirsiniz yada, TXT den okutmalı yapar isek;

Kod:
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $lines(global.txt) | while %:md {
        mode $read(global.txt,%:md) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
input ile düzenlemek istersek hocam?

Bilecikli 10 Nisan 2019 14:55
Cevap: Modeall Komutu
 
Alıntı:
Toprak Nickli Üyeden Alıntı (Mesaj 1042049334)
Cevap verilmiş ama başkalarında işine yaraması açısından;


Kod:
alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $token($_kanal,0,32) | while %:md {
        mode $token($_kanal,%:md,32) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
Kanalları kendiniz belirtebilirsiniz yada, TXT den okutmalı yapar isek;

Kod:
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $lines(global.txt) | while %:md {
        mode $read(global.txt,%:md) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
Bunu inputa çevirebirebilirmiyiz hocam?

Toprak 10 Nisan 2019 15:30
Cevap: Modeall Komutu
 
Alıntı:
Bilecikli Nickli Üyeden Alıntı (Mesaj 1042052524)
Bunu inputa çevirebirebilirmiyiz hocam?
1.)
Kod:
alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:input:#:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $token($_kanal,0,32) | while %:md {
        mode $token($_kanal,%:md,32) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}

2.)
Kod:
on *:input:#:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $lines(global.txt) | while %:md {
        mode $read(global.txt,%:md) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] tek değişen yer kırmızı olarak belirtilen yer kolayca kendinizde text/input eventi olarak değiştirebilirsiniz.

Bilecikli 10 Nisan 2019 15:49
Cevap: Modeall Komutu
 
Alıntı:
Toprak Nickli Üyeden Alıntı (Mesaj 1042052587)
1.)
Kod:
alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:input:#:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $token($_kanal,0,32) | while %:md {
        mode $token($_kanal,%:md,32) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}

2.)
Kod:
on *:input:#:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $lines(global.txt) | while %:md {
        mode $read(global.txt,%:md) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] tek değişen yer kırmızı olarak belirtilen yer kolayca kendinizde text/input eventi olarak değiştirebilirsiniz.
Dün bi faciaya sebep oldum da @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ondan tereddütte kaldım :D

Zadrich 28 Nisan 2020 22:51
Cevap: Modeall Komutu
 
Güzel ve işe yarar Bir Kod Toprak ,peki bu modeall uygulamasını nick'lere yapamaz mıyıs misal alias _kanal return kısmında
Yer alan bütün global kanallarda kullanıcıya belirlediğim mode uygulasa nasıl olur Toprak

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 22:51 -->-> Daha önceki mesaj 22:24 --

Kod:
alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:text:*:#Opers:{
  if $regex($1,/^[!.-]modeal$/Si) {
    if !$regex($2,/^[+-]/Si) { msg # Lütfen mode belirtiniz. Kullanımı:4 [!.]modeal [+-]<MODLAR> }
    else {
      var %:md = $token($_kanal,0,32) | while %:md {
        mode $token($_kanal,%:md,32) $strip($2-)     
        dec %:md
      }
      msg # Global kanallarda $strip($2-) modları uygulanmıştır.
    }
  }
}
-
Yapabildim Teşekkür ederim Toprak
Bu kısmı
var %:md = $token($_kanal,0,32) | while %:md {
-
Bu şekilde Değiştirdim
var %:md = $token($_kanal,$nick,32) | while %:md {
-
uyguladım düzgün çalıştı.


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

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