IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 34 Toplam 85 Sayfadan « İlkSayfa 2427282930313233 34 353637383940414484 SonSayfa »
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Add-on ve snippet(parça) kod istekleri buraya (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/523479-add-ve-snippetparca-kod-istekleri-buraya.html)

YouMyCure 28 Şubat 2016 15:20
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Kod:
on *:text:*:#op:{
  if $regex($1,/([.!]idlekontrol)/Si) {
    if $regex($nick($chan,$nick).pnick,/^(~|&)/i) {
      if $2 == on {
        if !%idle {
          .set %idle on
          .msg $chan İdle Taraması Aktif, 5 Dakikada bir Tarama Yapılacak.
          .timerYMCIDLE 0 300 idlesymc
        }
        else { .msg $chan Tarama Zaten Aktif Kapamak İçin [.!]idlekontrol off yapınız. }
      }
      if $regex($2,/^(5|10|15|20)/i) {
        if !%idle {
          .set %idle on
          .msg $chan İdle Taraması Aktif, $2 Dakikada bir Tarama Yapılacak.
          .timerYMCIDLE 0 $calc($2 *60) idlesymc
        }
        else { .msg $chan Tarama Zaten Aktif Kapamak İçin [.!]idlekontrol off yapınız. }
      }
      if $2 == off {
        if %idle {
          .unset %idle
          .msg $chan Tarama Deaktif.
          .timerYMCIDLE off
        }
      }
    }
    else { .msg $chan Sizin Bu Komutu Kullanmaya Yetkiniz Yok $nick }
  }
}
alias idlesymc {
  var %y 1
  while (%y <= $nick(#sohbet,0)) {
    .whois $nick(#sohbet,%y)
    inc %y
  }
}
raw 317:*:{
  if $3 > 600 {
    if disarida isin $2 || mesgul isin $2 { halt }
    else {
mode #sohbet -oahv $2 $2 $2 $2
      .msg #op $2 idle suresini asmiş ve deop edildi $replace($duration($3),mins,dakika,secs,saniye,hrs,saat,hr,saat,min,dakika,sec,saniye)
    }
  } 
}

Smith 28 Şubat 2016 15:21
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Yardımından dolayı teşekkür ederim dostum :)

unpainful 28 Şubat 2016 17:49
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
SuLh Nickli Üyeden Alıntı (Mesaj 1041747151)
Bunun için .pnick prop'unu kullanabilirsin.
Kod:
on *:text:*:#:{
if $regex($1,/(\.v|\.dv|\.unban)/) {
if !$regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/)  { msg $chan Bu komutu kullanmaya yetkiniz yok. | return }
if $1 == .v { mode $chan +v $2 }
elseif $1 == .dv { mode $chan -v $2 }
elseif $1 == .unban { msg chanserv clear # bans }
}
}
Teşekkürler çalışıyor fakat Oper ve adminler kullanamıyor bu şekilde olduğu zaman yetkili değilsiniz uyarısı veriyor onlarıda eklemek için ne yapmaliyiz peki tekrar teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

unpainful 28 Şubat 2016 21:54
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
on *:text:*:#:{
if $regex($1,/(\.v|\.dv|\.unban)/) {
if ($regex($address($nick,2),/(helper|admin|ircop|services|tech|global)/i)) { halt }
if !$regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) { msg $chan Bu komutu kullanmaya yetkiniz yok. | return }
if $1 == .v { mode $chan +v $2 }
elseif $1 == .dv { mode $chan -v $2 }
elseif $1 == .unban { msg chanserv clear # bans }
}
}
gibi denedim ama çalışmadı @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] bi bakarmısınız

SuLh 28 Şubat 2016 23:56
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Kod:
on $*:text:/(\.v|\.dv|\.unban)/Si:#ss:{
  if !$regex($address($nick,2),/(admin|ircop|services|tech|global)/i) && !$regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/)  { msg $chan Bu komutu kullanmaya yetkiniz yok. | return }
  if $1 == .v { mode $chan +v $2 }
  elseif $1 == .dv { mode $chan -v $2 }
  else { msg chanserv clear # bans }
}
Bu şekilde içinde Admin, ircop vs hostu olanlara da erişim izni verirsin.

unpainful 29 Şubat 2016 00:06
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Teşekkür ederim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] çalıştı , müsaitsen birşey daha soracağım text dosyasında olan cümleleri random şekilde nasıl yayabiliriz mesela cümlenin başına nick gelicek sonraki komutta cümlenin sonuna gelecek gibi

Smith 29 Şubat 2016 01:01
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
YouMyCure Nickli Üyeden Alıntı (Mesaj 1041748426)
Kod:
on *:text:*:#op:{
  if $regex($1,/([.!]idlekontrol)/Si) {
    if $regex($nick($chan,$nick).pnick,/^(~|&)/i) {
      if $2 == on {
        if !%idle {
          .set %idle on
          .msg $chan İdle Taraması Aktif, 5 Dakikada bir Tarama Yapılacak.
          .timerYMCIDLE 0 300 idlesymc
        }
        else { .msg $chan Tarama Zaten Aktif Kapamak İçin [.!]idlekontrol off yapınız. }
      }
      if $regex($2,/^(5|10|15|20)/i) {
        if !%idle {
          .set %idle on
          .msg $chan İdle Taraması Aktif, $2 Dakikada bir Tarama Yapılacak.
          .timerYMCIDLE 0 $calc($2 *60) idlesymc
        }
        else { .msg $chan Tarama Zaten Aktif Kapamak İçin [.!]idlekontrol off yapınız. }
      }
      if $2 == off {
        if %idle {
          .unset %idle
          .msg $chan Tarama Deaktif.
          .timerYMCIDLE off
        }
      }
    }
    else { .msg $chan Sizin Bu Komutu Kullanmaya Yetkiniz Yok $nick }
  }
}
alias idlesymc {
  var %y 1
  while (%y <= $nick(#sohbet,0)) {
    .whois $nick(#sohbet,%y)
    inc %y
  }
}
raw 317:*:{
  if $3 > 600 {
    if disarida isin $2 || mesgul isin $2 { halt }
    else {
mode #sohbet -oahv $2 $2 $2 $2
      .msg #op $2 idle suresini asmiş ve deop edildi $replace($duration($3),mins,dakika,secs,saniye,hrs,saat,hr,saat,min,dakika,sec,saniye)
    }
  } 
}
kod için teşekkürler ama sunucuya giren herkeze whois çekiyor bu mirc dondu :)

SuLh 29 Şubat 2016 01:13
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
unpainful Nickli Üyeden Alıntı (Mesaj 1041748575)
Teşekkür ederim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] çalıştı , müsaitsen birşey daha soracağım text dosyasında olan cümleleri random şekilde nasıl yayabiliriz mesela cümlenin başına nick gelicek sonraki komutta cümlenin sonuna gelecek gibi
senin istediğin değil galiba fakat, ilgimi çekti

Kod:
alias rast {
  var %a enes.txt,%b $r(1,$lines(enes.txt)),%z $read(enes.txt,$+(%b))
  tokenize 32 $read(enes.txt,$+(%b))
  var %g $0, %c $r(1,$0)
  if %g > 1 { var %d $r(1,$0) | if %d = %c { var %d $r(1,$0) } }
  var %e %z
  set %h $token($read(enes.txt,$+(%b)),$+(%c),32) $token($read(enes.txt,$+(%b)),$+(%d),32)
  while (%g) { if %g != %d && %g != %c { set %h $addtok(%h,$token($read(enes.txt,$+(%b)),$+(%g),32),32) | dec %g } | else { dec %g }  }
  write -l $+ %e enes.txt %h
  echo -a %h
  unset %h
}
Sonuç:

Kod:
yüreğim sorsan düşlerini almaz
dayanmaz.. ömür bahara başka bir belki
almaz sorsan düşlerini yüreğim
yüreğim sorsan düşlerini almaz
anlatmaz hiçbir name..
bir belki dayanmaz.. ömür bahara başka
3 satır var txt'de.

unpainful 29 Şubat 2016 01:29
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
SuLh Nickli Üyeden Alıntı (Mesaj 1041748596)
senin istediğin değil galiba fakat, ilgimi çekti

Kod:
alias rast {
  var %a enes.txt,%b $r(1,$lines(enes.txt)),%z $read(enes.txt,$+(%b))
  tokenize 32 $read(enes.txt,$+(%b))
  var %g $0, %c $r(1,$0)
  if %g > 1 { var %d $r(1,$0) | if %d = %c { var %d $r(1,$0) } }
  var %e %z
  set %h $token($read(enes.txt,$+(%b)),$+(%c),32) $token($read(enes.txt,$+(%b)),$+(%d),32)
  while (%g) { if %g != %d && %g != %c { set %h $addtok(%h,$token($read(enes.txt,$+(%b)),$+(%g),32),32) | dec %g } | else { dec %g }  }
  write -l $+ %e enes.txt %h
  echo -a %h
  unset %h
}
Sonuç:

Kod:
yüreğim sorsan düşlerini almaz
dayanmaz.. ömür bahara başka bir belki
almaz sorsan düşlerini yüreğim
yüreğim sorsan düşlerini almaz
anlatmaz hiçbir name..
bir belki dayanmaz.. ömür bahara başka
3 satır var txt'de.
Evet aslında mantık aynı şekilde ben anlatamadım sanırım sorun bende mesela şimdi text dosyasına kayıtlı sözler var ve bu sözleri bot üzerinden sürekli değilde her 1 dakikada bir!.söz NİCK yaptığımızda Nick Söz başka bi .!söz NİCK yaptığımızda Söz nick gibi yaymak mümkünmü @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

SuLh 29 Şubat 2016 01:48
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
tabii ki mümkün, bunu basit bir if koşuluyla yapabiliriz. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:
on *:text:!söz &:#: {
  var %s $r(1,$lines(soz.txt))
  if %hiza = soldan || !%hiza { msg $chan $2 : $read(soz.txt,%s) | set %hiza sagdan }
  else { msg $chan $read(soz.txt,%s) : $2 | set %hiza soldan }
}
Buradaki mantık, sağdan yazdırdığımız da değere soldan'ı sabitliyoruz, bir daha yazılınca soldan yazmış oluyor ve o zamanda sağdan'ı sabitliyoruz.

Kod:
[01:49] <14Ss> !söz Enes
[01:49] <04SuLh> belki bir başka bahara ömür dayanmaz.. : Enes
[01:50] <14Ss> !söz Enes
[01:50] <04SuLh> Enes : yüreğim almaz düşlerini sorsan
[01:50] <14Ss> !söz Enes
[01:50] <04SuLh> anlatmaz hiçbir name.. : Enes


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:01.
Sayfa 34 Toplam 85 Sayfadan « İlkSayfa 2427282930313233 34 353637383940414484 SonSayfa »
Konuya ait 40 Mesajı başka Sayfada göster

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