Çözüldü oto zline ekleme - oto nick değiştirme - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Yasakkk · 24 Eylül 2022, 23:47

Merhaba

Arkadaşlar kısaca anlatayım sunucuya istemediğimiz Ip Adresleri giriyor bu Ip adresini,ve indentini oto zline eklemek istiyorum nasıl yapabilirim ? Remote olarak
1 diğer sorunum ise oto nick değiştirme remotesi varmı yada yapabilirmiyiz misal !ekle abaza bu nick sunucuya giriş yaptığında oto olarak mircim abaza nickini misafir olarak değiştirsin
Diğer sorum ise T-blok banlarını biliyorsunuzdur bu t-blok banlarını remoteye ekleye bilirmiyiz Okuyan zahmet edip cevap yazan herkese teşekkür ederim

Mylife · 27 Eylül 2022, 17:09

Merhaba,

Forumda sorunuz ile ilgili epeyli bir kod paylaşımı olduğunu düşünüyorum. Forumu aramanız yeterli olacaktır.

Bazı fikirler;

Girişte oto ban atmak istiyorsanız bunu $read ile txt dosyasına kayıt edip snotice eventi kullanıp text dosyası ile server noticelerinde ip adresine denk gelicek şekilde karşılaştırma yaparak basitce yapabilirsiniz.

oto nick değiştirme için de yine aynı şekilde server notice ( snotice ) eventi ile nicke denk gelicek şekilde yaparak text dosyası ile karşılaştırma yapıp raw dan dilediğiniz nicki almasını yapabilirsiniz.

alias içinde aşağıda link bıraktım araştırıp yapabilirsiniz.

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

İyi forumlar.

aLone · 27 Eylül 2022, 18:48

Şu Konuya bir göz at istersen [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Yasakkk · 27 Eylül 2022, 20:25

aLone selam yönlendirdiğin link'i inceledim mirc'e nasıl yüklerim yönlendirirsen çok sevinirim

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

Çok teşekkür ederim inceliyorum

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

butonlar çalışmıyor çalışırsa güzel olmuş tam aradağım özellik

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

Alıntı:

alias mdc { return $dll(dll\mdc.dll,$1,$2-) }
alias mdx { return $dll(dll\mdx.dll,$1,$2-) }
alias a.b { dialog -m zlnat zlnat }
dialog zlnat {
title "~"
size 40 170 510 320
option pixels
radio "Acık",13,420 225 55 24,group
radio "KapaLı",14,420 250 55 24
box "", 11, 5 8 500 295
edit "Nick Yazınız..!", 9, 175 20 160 30, center
edit "Ident Yazınız..!", 1, 175 55 160 30, center
edit "Host Yazınız..!", 2, 175 90 160 30, center
edit "", 19, 93 132 80 30, center
edit "", 20, 93 182 80 30, center
edit "", 21, 93 232 80 30, center
edit " Girişte Oto Nick ident host Gzline Paneli ", 33, 10 276 490 23, center
list 22, 175 132 160 130, size
}
on *:dialog:zlnat:sclick:*:{
if ($did = 13) { set %NickZ Acık | set %identZ Acık | set %HostZ Acık | dialog -t zlnat Yasak Giriş Koruması AcıLdı. | did -e zlnat 9,1,2,19,20,21,33,22 }
if ($did = 14) { set %NickZ Kapalı | set %identZ Kapalı | set %HostZ Kapalı | dialog -t zlnat Yasak Giriş Koruması KapatıLdı. | did -b zlnat 9,1,2,19,20,21,33,22 }
}
on *:dialog:zlnat:init:0: {
if (%NickZ == Acık) { did -c zlnat 13 }
if (%NickZ == Kapalı) { did -c zlnat 14 }
.timerxa 1 2 did -r zlnat 9,1,2
mdx MarkDialog $dname
mdx SetDialog [ $dname ] bgcolor $rgb(28,134,238)
mdx SetColor 9,1,2,19,20,21,22,33 background $rgb(0,0,0)
mdx SetColor 9,1,2,19,20,21,22,33 textbg $rgb(0,0,0)
mdx SetColor $dname 9,1,2,19,20,21,22,33 text $rgb(255,0,0)
mdx SetFont 13,14,9,1,2,19,20,21,22,33 -11 700 Tahoma
mdx SetFont 33 -14 700 Tahoma
mdx SetColor 13,14 background $rgb(28,134,238)
mdx SetColor 13,14 textbg $rgb(28,134,238)
mdx SetColor $dname 13,14 text $rgb(255,0,0)
mdc BitBtn Create zlnat 2 10 20 162 31 > Nick Zline Ekle
mdc BitBtn Create zlnat 3 10 55 162 31 > Ident Zline Ekle
mdc BitBtn Create zlnat 4 10 90 162 31 > Host Zline Ekle
mdc BitBtn Create zlnat 5 337 20 162 31 > Nick Zline SiL
mdc BitBtn Create zlnat 6 337 55 162 31 > Ident Zline SiL
mdc BitBtn Create zlnat 7 337 90 162 31 > Host Zline SiL
mdc BitBtn Create zlnat 13 10 125 80 21 > Muaf N Ekle
mdc BitBtn Create zlnat 14 10 175 80 21 > Muaf i Ekle
mdc BitBtn Create zlnat 15 10 225 80 21 > Muaf H Ekle
mdc BitBtn Create zlnat 16 10 150 80 21 > Muaf N Sil
mdc BitBtn Create zlnat 17 10 200 80 21 > Muaf i Sil
mdc BitBtn Create zlnat 18 10 250 80 21 > Muaf H Sil
mdc BitBtn Create zlnat 26 337 125 80 21 > Muaf N list
mdc BitBtn Create zlnat 27 337 175 80 21 > Muaf i list
mdc BitBtn Create zlnat 28 337 225 80 21 > Muaf H list
mdc BitBtn Create zlnat 29 337 150 80 21 > Yasak N list
mdc BitBtn Create zlnat 30 337 200 80 21 > Yasak i list
mdc BitBtn Create zlnat 31 337 250 80 21 > Yasak H list
mdc BitBtn Create zlnat 8 420 125 79 97 > Kapat
mdc BitBtn Color 2 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 2 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 3 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 3 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 4 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 4 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 5 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 5 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 6 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 6 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 7 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 7 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 8 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 8 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 13 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 13 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 14 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 14 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 15 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 15 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 16 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 16 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 17 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 17 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 18 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 18 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 26 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 26 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 27 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 27 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 28 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 28 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0)
mdc BitBtn Color 29 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 29 $rgb(25,2,22) $rgb(6,135,5) $rgb(130,25,255) $rgb(2,5,255) $rgb(2,10,220)
mdc BitBtn Color 30 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 30 $rgb(25,2,22) $rgb(6,135,5) $rgb(130,25,255) $rgb(2,5,255) $rgb(2,10,220)
mdc BitBtn Color 31 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20)
mdc BitBtn downcolor 31 $rgb(25,2,22) $rgb(6,135,5) $rgb(130,25,255) $rgb(2,5,255) $rgb(2,10,220)
mdc BitBtn Font 2 $rgb(240,240,240) 9 +b > Tahoma
mdc BitBtn Font 3 $rgb(240,240,240) 9 +b > Tahoma
mdc BitBtn Font 4 $rgb(240,240,240) 9 +b > Tahoma
mdc BitBtn Font 5 $rgb(240,240,240) 9 +b > Tahoma
mdc BitBtn Font 6 $rgb(240,240,240) 9 +b > Tahoma
mdc BitBtn Font 7 $rgb(240,240,240) 9 +b > Tahoma
mdc BitBtn Font 8 $rgb(240,240,240) 14 +b > Tahoma
mdc BitBtn Font 13 $rgb(240,240,240) 7 +b > Tahoma
mdc BitBtn Font 14 $rgb(240,240,240) 7 +b > Tahoma
mdc BitBtn Font 15 $rgb(240,240,240) 7 +b > Tahoma
mdc BitBtn Font 16 $rgb(240,240,240) 7 +b > Tahoma
mdc BitBtn Font 17 $rgb(240,240,240) 7 +b > Tahoma
mdc BitBtn Font 18 $rgb(240,240,240) 7 +b > Tahoma
mdc BitBtn Font 26 $rgb(255,252,252) 7 +b > Tahoma
mdc BitBtn Font 27 $rgb(255,252,252) 7 +b > Tahoma
mdc BitBtn Font 28 $rgb(255,252,252) 7 +b > Tahoma
mdc BitBtn Font 29 $rgb(255,252,252) 7 +b > Tahoma
mdc BitBtn Font 30 $rgb(255,252,252) 7 +b > Tahoma
mdc BitBtn Font 31 $rgb(255,252,252) 7 +b > Tahoma
did -f $dname 9
}
on *:signal:mdc: {
if ($2 == zlnat) && ($3 == sclick) && ($4 == 2) { .auser NickZ $did(zlnat,9) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,9) 4 Nick 0zLine liste Eklendi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 3) { .auser identZ $did(zlnat,1) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,1) 4 identi 0zLine liste Eklendi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 4) { .auser HostZ $did(zlnat,2) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,2) 4 Hostu 0zLine liste Eklendi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 5) { .ruser NickZ $did(zlnat,9) | echo -a 0,1 4 SiLme işLemi7 $did(zlnat,9) 11 Nick 0zLine listesinden SiLindi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 6) { .ruser identZ $did(zlnat,1) | echo -a 0,1 4 SiLme işLemi7 $did(zlnat,1) 11 ident 0zLine listesinden SiLindi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 7) { .ruser HostZ $did(zlnat,2) | echo -a 0,1 4 SiLme işLemi7 $did(zlnat,2) 11 Host 0zLine listesinden SiLindi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 8) { .timer 1 0 dialog -x zlnat }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 13) { .auser Muafnick $did(zlnat,19) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,19) 4 Nick 0Muaf liste Eklendi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 14) { .auser Muafident $did(zlnat,20) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,20) 4 ident 0Muaf liste Eklendi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 15) { .auser Muafhost $did(zlnat,21) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,21) 4 Host 0Muaf liste Eklendi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 16) { .ruser Muafnick $did(zlnat,19) | echo -a 0,1 4 SiLme işLemi11 $did(zlnat,19) 4 Nick 0Muaf listesinden SiLindi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 17) { .ruser Muafident $did(zlnat,20) | echo -a 0,1 4 SiLme işLemi11 $did(zlnat,20) 4 ident 0Muaf listesinden SiLindi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 18) { .ruser Muafhost $did(zlnat,21) | echo -a 0,1 4 SiLme işLemi11 $did(zlnat,21) 4 Host 0Muaf listesinden SiLindi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 26) { .m.nick | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,19) 4 Nick 0Muaf listesi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 27) { .m.ident | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,20) 4 ident 0Muaf listesi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 28) { .m.host | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,21) 4 Host 0Muaf listesi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 29) { .y.nick | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,19) 4 Nick 0Yasak listesi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 30) { .y.ident | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,20) 4 ident 0Yasak listesi. }
if ($2 == zlnat) && ($3 == sclick) && ($4 == 31) { .y.host | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,21) 4 Host 0Yasak listesi. }
}
on *:snotice:*connecting on*: {
if ($level($9) == muafnick) { halt }
if (connecting isin $1-) {
if (%nickZ == Acık) {
var %:ip $remove($gettok($10,2,64),$chr(41))
if $level($9) = NickZ { gzline $+(*@,%:ip) 1d YasakLı Nick | halt }
}
if (%identZ == Acık) {
var %:idnt $remove($gettok($10,1,64),$chr(40))
if ($level(%:idnt) == muafident) { halt }
if $level(%:idnt) = identZ { gzline $+(*@,%:ip) 1d YasakLı ident | halt }
}
if (%HostZ == Acık) {
if ($level(%:ip) == muafhost) { halt }
if $level(%:ip) = HostZ { gzline $+(*@,%:ip) 1d YasakLı Host | halt }
}
}
}
;Yasak list
alias y.nick {
did -r zlnat 22
did -a zlnat 22 : Yasak Nick Listesi :
var %x = 1
while (%x <= $ulist(*,nickz,0)) {
did -a zlnat 22 ) $ulist(*,nickz,%x)
inc %x
}
}
alias y.ident {
did -r zlnat 22
did -a zlnat 22 : Yasak Ident Listesi :
var %xx = 1
while (%xx <= $ulist(*,identz,0)) {
did -a zlnat 22 ) $ulist(*,identz,%xx)
inc %xx
}
}
alias y.host {
did -r zlnat 22
did -a zlnat 22 : Yasak Host Listesi :
var %xxx = 1
while (%xxx <= $ulist(*,hostz,0)) {
did -a zlnat 22 ) $ulist(*,hostz,%xxx)
inc %xxx
}
}
;Muaf list
alias m.nick {
did -r zlnat 22
did -a zlnat 22 : Muaf Nick Listesi :
var %ax = 1
while (%ax <= $ulist(*,muafnick,0)) {
did -a zlnat 22 ) $ulist(*,muafnick,%ax)
inc %ax
}
}
alias m.ident {
did -r zlnat 22
did -a zlnat 22 : Muaf Ident Listesi :
var %axx = 1
while (%axx <= $ulist(*,muafident,0)) {
did -a zlnat 22 ) $ulist(*,muafident,%axx)
inc %axx
}
}
alias m.host {
did -r zlnat 22
did -a zlnat 22 : Muaf Host Listesi :
var %axxx = 1
while (%axxx <= $ulist(*,muafhost,0)) {
did -a zlnat 22 ) $ulist(*,muafHost,%axxx)
inc %axxx
}
}
menu * {
Gzline Paneli:/a.b }

bu kodu mirc üzerinde kalışır hale getirebilecek varmı ?

Yasakkk · 28 Eylül 2022, 01:20

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

Ekran görüntüsü paylaştım

Forbidden · 28 Eylül 2022, 04:07

Yasakkk Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

Ekran görüntüsü paylaştım

Sana orada dll klasöründe mdx.dll si olmadıgını söylüyor altda verdigim ekden indirip rardan cıkar klasörü mircin dosya bölümüne atıp tekrar acmayı dene.
Yalnız o kodda mdc.dll si de gerekiyor o bende yok.

Forbidden · 28 Eylül 2022, 04:34

Yasakkk Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba

Arkadaşlar kısaca anlatayım sunucuya istemediğimiz Ip Adresleri giriyor bu Ip adresini,ve indentini oto zline eklemek istiyorum nasıl yapabilirim ? Remote olarak
1 diğer sorunum ise oto nick değiştirme remotesi varmı yada yapabilirmiyiz misal !ekle abaza bu nick sunucuya giriş yaptığında oto olarak mircim abaza nickini misafir olarak değiştirsin
Diğer sorum ise T-blok banlarını biliyorsunuzdur bu t-blok banlarını remoteye ekleye bilirmiyiz Okuyan zahmet edip cevap yazan herkese teşekkür ederim

Buda istedigin tblock kodu +tmodeall kelime ekler -tmodeall kelime siler

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias _kanal return #Sohbet #Radyo #Oyun #Kelime #Yarisma
on *:input:#opers:{
  if $regex($1,/^[+]tmodeall$/Si) {
    var %:md = $token($_kanal,0,32) | while %:md {
      .mode $token($_kanal,%:md,32) +b ~T:block: $+ $2
      dec %:md
    }
  }
  if $regex($1,/^[-]tmodeall$/Si) {
    var %:md = $token($_kanal,0,32) | while %:md {
      .mode $token($_kanal,%:md,32) -b ~T:block: $+ $2
      dec %:md
    }
  }
}

Tüm modeleri kullanmak istersen eger

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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.
    }
  }
}

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

aLone · 28 Eylül 2022, 07:04

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

Yasakkk · 28 Eylül 2022, 13:51

İlgi ve alakanıza teşekkür ederim kodları ekleyip geri sizlere geri dönüş yapacağım

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 13:41 -->-> Daha önceki mesaj 13:36 --

İlgi ve alakana teşekkür ederim sağolasın

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

söylediğiniz gibi mirc klasörünü açtım dlls klasörüne girdim linkdeki mdx.dll,mdc.dll buraya kopyaladım ekran görüntüsü aynı değişmedi statüs de verdiği hatayı aşağıda belirttim

* $dll: 'C:\TurkishChat Script\dll\mdx.dll' Açılamıyor (Satır 2, script14.Kadir)

Forbidden · 28 Eylül 2022, 13:59

Yasakkk Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

İlgi ve alakanıza teşekkür ederim kodları ekleyip geri sizlere geri dönüş yapacağım

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 13:41 -->-> Daha önceki mesaj 13:36 --

İlgi ve alakana teşekkür ederim sağolasın

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

söylediğiniz gibi mirc klasörünü açtım dlls klasörüne girdim linkdeki mdx.dll,mdc.dll buraya kopyaladım ekran görüntüsü aynı değişmedi statüs de verdiği hatayı aşağıda belirttim

* $dll: 'C:\TurkishChat Script\dll\mdx.dll' Açılamıyor (Satır 2, script14.Kadir)

Canım kardesim sana yukarda anlatmıstım aslında. aLone verdigi klasörü indir ac mirc dosyasına dll klasörü ekle icine at sonra kodu calistir

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Çözüldü nick değiştirme,bad nick değişme	SandaLci	mIRC Scripting Sorunları	19	05 Ağustos 2024 13:13
!badnick ekle nick ( Kill + nick değiştirme şeklinde )	Heavenly	mIRC Scripting Sorunları	20	09 Mayıs 2022 23:25
nick.txt zline	sad33	mIRC Scripting Sorunları	12	15 Ocak 2017 22:27
Belirtiğim Sunucularda nick oto nick değiştirme sorunu	StyLechiLd	mIRC Scripting Sorunları	2	29 Temmuz 2013 19:08
!nick nick değiştirme komutu yardım ?	SabotaJ-	mIRC Scripting Hazır Kodlar	2	23 Haziran 2009 00:56

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.