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

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

- - !Ajoin sil ve !Ajoin ekle (https://www.ircforumlari.net/mirc-scripting-sorunlari/791336-ajoin-sil-ve-ajoin-ekle.html)

!Ajoin sil ve !Ajoin ekle

Ajoine eklemek istediğim veya ajoinden silmek istediğim kanal(ları) ;

!ajoinsil help,helpers,helpteam veya !ajoinekle help,helpers,helpteam şeklinde bir kod ile gerçekleştirebilirim diye düşünüyorum.

Not: kanal ismi değişkenlik gösterebilir. Örn: sohbet radyo help v.s

Kod için coder arkadaş(lar)a şimdiden teşekkür ederim.

Cevap: !Ajoin sil ve !Ajoin ekle

Alıntı:

Titanic Nickli Üyeden Alıntı (Mesaj 1041930909)

Kod:

On 1:input:*:{

  if $1 == !ajoinekle { ns ajoin add $2 }

  if $1 == !ajoinsil { ns ajoin del $2 }

  if $1 == !ajoinlist { ns ajoin list }

}

Belirlediğiniz herhangi bir kanalda;

!ajoinekle #Kanal
!ajoinsil #kanal
!ajoinlist

statuste size gerekli uyarıyı verecektir.

Cevap: !Ajoin sil ve !Ajoin ekle

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Verdiğin kodu düzelttim.

if $1 == !ajoinekle { ns ajoin add $chan }

Bu şekilde kullanılırsa komutu nerde uyguluyorsa o kanalı ajoine alır . $chan yerine $2 olması gerekir söylediğin şekilde çalışması için.

Alıntı:

Titanic Nickli Üyeden Alıntı (Mesaj 1041930909)

Kod:

on *:input:#:{

  if $regex($1,/^[!.](ajoinekle|ajoinsil)/i) {

    if ($regml(1) == ajoinekle) {

      if ($3-) { return }

      if (*,* !iswm $2) { ns ajoin add $iif(*#* !iswm $2,$+($chr(35),$2),$2) | return }

      var %ajoin %ajoin $replace($2,$chr(44),$chr(32))

      var %no = 1

      while %no <= $token(%ajoin,0,32) {

        ns ajoin add $iif(*#* !iswm $token(%ajoin,%no,32),$+($chr(35),$token(%ajoin,%no,32)),$token(%ajoin,%no,32))

        inc %no

      }

    }

    if ($regml(1) == ajoinsil) {

      if ($3-) { return }

      if (*,* !iswm $2) { ns ajoin del $iif(*#* !iswm $2,$+($chr(35),$2),$2) | return }

      var %ajoin %ajoin $replace($2,$chr(44),$chr(32))

      var %no = 1

      while %no <= $token(%ajoin,0,32) {

        ns ajoin del $iif(*#* !iswm $token(%ajoin,%no,32),$+($chr(35),$token(%ajoin,%no,32)),$token(%ajoin,%no,32))

        inc %no

      }

    }

  }

}

Kullanımı,
!ajoinekle/!ajoinsil #k1,#k2,#k3 veya !ajoinekle/!ajoinsil #k1

Virgül koyarak kanal ismi girilirse kaç tane kanal varsa hepsini ajoine eklenir yoksa tek 1 tanesi eklenir yukardaki örnek gibi.

Edit: Kanal işareti koymadan olacak şekilde ayarladım.

Cevap: !Ajoin sil ve !Ajoin ekle

Teşekkür ederim pckopat sağolasın.

Cevap: !Ajoin sil ve !Ajoin ekle

pckopat KraLsın Elerıne SagLık Super Yok Yok KraLarın KraLısın