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


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net