IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 62 Toplam 85 Sayfadan « İlkSayfa 125255565758596061 62 6364656667686972 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)

By eRhaN 20 Mart 2018 00:18
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Pckopat Bırsey Daha Rıca Etsem Sızden Asırıya Kacıyorsam eger Af ola sımdıden .

Alıntı:
on *:text:!siir*:#:{
var %: = $findfile($qt($mircdirşiirler),*.txt,0)
if !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. }
elseif $2 == random { play -m # $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%:)) ) 5000 }
elseif $2 isnum $+(1-,%:) { play -m # $qt($findfile($qt($mircdirşiirler),*.txt,$2)) 5000 } | else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. }
}
Buna 2 Dakika içersinde, Yalnız 1 defa [!]Siir Komutunu Kullanabilirsiniz. Gıbı bırsey eklıyebılırmıyız 2 dakıka boyunca sıır bıtene kadar tekrar kullanamasın yada tekrar !siir kullanımı ıcın Sıır ın bıtmeısnı beklesın Siir Yazarken Tekrar !siir uygulandıgında Hata Verıp Mırcı kapatıyor Rıca etsem

Alper 20 Mart 2018 09:18
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
By eRhaN Nickli Üyeden Alıntı (Mesaj 1041924733)
Pckopat Bırsey Daha Rıca Etsem Sızden Asırıya Kacıyorsam eger Af ola sımdıden .


Buna 2 Dakika içersinde, Yalnız 1 defa [!]Siir Komutunu Kullanabilirsiniz. Gıbı bırsey eklıyebılırmıyız 2 dakıka boyunca sıır bıtene kadar tekrar kullanamasın yada tekrar !siir kullanımı ıcın Sıır ın bıtmeısnı beklesın Siir Yazarken Tekrar !siir uygulandıgında Hata Verıp Mırcı kapatıyor Rıca etsem
Kod:
on *:text:!siir*:#:{
  var %: = $findfile($qt($mircdirşiirler),*.txt,0)
  if $hget(siir,$nick) { .notice $nick $hget(siir,$nick).unset saniye içersinde, Yalnız 1 defa [!]siir Komutunu Kullanabilirsiniz. }
  elseif !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. }
  elseif $2 == random { play -m # $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%) ) 5000 | .hinc -mu120 siir $nick }
  elseif $2 isnum $+(1-,% { play -m # $qt($findfile($qt($mircdirşiirler),*.txt,$2)) 5000 | .hinc -mu120 siir $nick }
  else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. }
}
Kırmızı ile belirttiğim yerler saniye temsil eder.

By eRhaN 31 Mart 2018 04:27
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Pckopat Tesekkur ederım Yardımların ıcın :)

Kod:
alias -l fltr { if $isid { return /^[.!]bur[cçÇ]\s(?:ko[Ççc]|bo[gğĞ]a|[İiı]k[İiı]zler|yenge[cÇç]|aslan|ba[Şşs]ak|teraz[İıi]|akrep|yay|o[Ğğg]lak|kova|bal[iİı]k)$/Si }
  else { set -e %brc $replace($lower($1),ç,c,ğ,g,ı,i,İ,i,ş,s,Ş,s,Ç,c) | set -e %k_ $2
var %rd $r(111,999999) | sockopen $+(burc,%rd)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(burc,%rd) %brc } }
on *:sockopen:burc*:var %b sockwrite -n $sockname | %b GET /gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ HTTP/1.1 | %b host: $sock($sockname).addr | %b $crlf
on *:sockread:burc*:var %a | sockread %a | if $regex(%a,/(?:<p>.+(<\/p><p>)?<\/p>\z)/) { tokenize 46 $regsubex(b,%a,/\x3C.+\x3E/UgS,) | msg %k_ 2 $* }
on *:sockclose:burc*:msg %k_ 4Kaynak: 5
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:input:#:if !$regex($1,^\/) { if $regex($1-,$fltr) { fltr $2 # } }
on $*:text:$($fltr):#:fltr $2 #
Ozele Gondermesını ve 2 dk zaman ayarını nasıl yapabılırız msg %k_ 2 $* } Bu kısımları degıstırdım ama gene yapamadım

Alper 31 Mart 2018 09:39
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
By eRhaN Nickli Üyeden Alıntı (Mesaj 1041929944)
Pckopat Tesekkur ederım Yardımların ıcın :)

Kod:
alias -l fltr { if $isid { return /^[.!]bur[cçÇ]\s(?:ko[Ççc]|bo[gğĞ]a|[İiı]k[İiı]zler|yenge[cÇç]|aslan|ba[Şşs]ak|teraz[İıi]|akrep|yay|o[Ğğg]lak|kova|bal[iİı]k)$/Si }
  else { set -e %brc $replace($lower($1),ç,c,ğ,g,ı,i,İ,i,ş,s,Ş,s,Ç,c) | set -e %k_ $2
var %rd $r(111,999999) | sockopen $+(burc,%rd)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(burc,%rd) %brc } }
on *:sockopen:burc*:var %b sockwrite -n $sockname | %b GET /gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ HTTP/1.1 | %b host: $sock($sockname).addr | %b $crlf
on *:sockread:burc*:var %a | sockread %a | if $regex(%a,/(?:<p>.+(<\/p><p>)?<\/p>\z)/) { tokenize 46 $regsubex(b,%a,/\x3C.+\x3E/UgS,) | msg %k_ 2 $* }
on *:sockclose:burc*:msg %k_ 4Kaynak: 5
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:input:#:if !$regex($1,^\/) { if $regex($1-,$fltr) { fltr $2 # } }
on $*:text:$($fltr):#:fltr $2 #
Ozele Gondermesını ve 2 dk zaman ayarını nasıl yapabılırız msg %k_ 2 $* } Bu kısımları degıstırdım ama gene yapamadım
Kod:
alias -l fltr { if $isid { return /^[.!]bur[cçÇ]\s(?:ko[Ççc]|bo[gğĞ]a|[İiı]k[İiı]zler|yenge[cÇç]|aslan|ba[Şşs]ak|teraz[İıi]|akrep|yay|o[Ğğg]lak|kova|bal[iİı]k)$/Si }
  else {
    set -e %brc $replace($lower($1),ç,c,ğ,g,ı,i,İ,i,ş,s,Ş,s,Ç,c)
    set -e %n_ $2
    var %rd $r(111,999999)
    sockopen $+(burc,%rd)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
    sockmark $+(burc,%rd) %brc
  }
}
on *:sockopen:burc*:var %b sockwrite -n $sockname | %b GET /gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ HTTP/1.1 | %b host: $sock($sockname).addr | %b $crlf
on *:sockread:burc*:var %a | sockread %a | if $regex(%a,/(?:<p>.+(<\/p><p>)?<\/p>\z)/) { tokenize 46 $regsubex(b,%a,/\x3C.+\x3E/UgS,) | msg %n_ 2 $* | .hinc -mu60 burc %n_ }
on *:sockclose:burc*:msg %n_ 4Kaynak: 5
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:input:#:if !$regex($1,^\/) { if $regex($1-,$fltr) { fltr $2 # } }
on $*:text:$($fltr):#: {
  if $hget(burc,$nick) { .notice $nick 2!Burç komutunu tekrar kullanmak için4 $hget(burc,$nick).unset 2saniye beklemeniz gerekmetedir. | return }
  fltr $2 $nick
}
Bu şekilde dener misin bi

By eRhaN 05 Nisan 2018 20:25
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Kod:
#IRCHelp on
on *:text:*:?: {
  if !NickServ iswm $1- {
    /timer 1 0 msg $nick  .:: Nickserv Hakkında Komutlar Sıralanıyor ::.
    /timer 1 1 msg $nick
    /timer 1 2 msg $nick 14 1- Nick Kaydetmek icin 7.nreg14 yazarak komutu öğrenebilirsiniz.. 
    /timer 1 3 msg $nick 14 2- Nick Droplamak icin 7.drop 14yazarak komutu öğrenebilirsiniz.. 
    /timer 1 4 msg $nick 14 3- Nick E-mail Değişmek icin 7.nmail14 yazarak komutu öğrenebilirsiniz.. 
    /timer 1 5 msg $nick 14 4- Nick UrL Değişmek icin 7.nurl 14yazarak komutu öğrenebilirsiniz...
    /timer 1 6 msg $nick 14 5- Nick İnfosunu Görmek icin 7.ninfo 14yazarak komutu öğrenebilirsiniz.. 
    /timer 1 7 msg $nick 14 6- Nick Sifrenizi E-mail'e Yollamak icin 7.nsend 14yazarak komutu öğrenebilirsiniz..
    /timer 1 8 msg $nick 14 7- Nick Sifrenizi Değiştirmek icin 7.nsifre 14yazarak komutu öğrenebilirsiniz..
    /timer 1 9 msg $nick 14 8- Askıda Kalan Nickinizi Düşürmek icin 7.nghost 14yazarak komutu öğrenebilirsiniz..
    /timer 1 10 msg $nick 14 9- Nickinize Memo Gelmesin İstiyorsanız 7.nnmemo14 yazarak komutu öğrenebilirsiniz..
    /timer 1 11 msg $nick 14 10- Nickinizin Baskası Tarafından Kullanılmasını İstemiyorsanız 7.nkill14 yazarak komutu öğrenebilirsiniz..
    /timer 1 12 msg $nick 14 11- Nick E-mail adresinizin Herkez Tarafından Görülmesini istiyorsanız 7.nshow14 yazarak komutu öğrenebilirsiniz..
    /timer 1 12 msg $nick
    /timer 1 14 msg $nick  Size sunmuş oldugum komut parametreleri yetersiz geldiyse Kanal Operatörlerinden yardım isteyebilirsiniz.
  }
  if .nreg isin $1- {
    msg $nick Nickinizi Kaydetmek ( Sifrelemek ) icin  /ns register sifre e-mailadress  Örnek : /ns register 123456 e-mailadres
  }
  if .ndrop isin $1- {
    msg $nick Nickinizi Droplamak ( Kayıtları Silmek ) icin  /ns drop nick  Örnek : /ns drop StanteaR
  }
  if .nma?l iswm $1- {
    msg $nick Nickinizin E-mailini Değiştirmek icin  /ns set email yenie-mail  Örnek : /ns set user@adres user@adres  komutunu kullandıktan sonra yeni e-mail adresinize gelen onay kodunu giriniz.
  }
  if .nurl isin $1- {
    msg $nick Nickinizin URL ( Webadres ) Değiştirmek icin  /ns set url yeni url  Örnek :  /ns set url adres 
  }
  if .n?nfo iswm $1- {
    msg $nick Nickinizin İnfosunu Yada Herhangi Bir Nick'in İnfosunu Görmek icin  /ns info nick  Örnek : /ns info OzAn
  }
  if .nsend isin $1- {
    msg $nick Nickinizin Sifresini E-mailinize Göndermek İstiyorsanız..  /ns sendpass nick  Örnek :  /ns sendpass OzAn
  }
  if .ns?fre iswm $1- {
    msg $nick Nickinizin Sifresini Değiştirmek icin  /ns set password Yenisifreniz  Örnek :  /ns set password 321654
  }
  if .nghost isin $1- {
    msg $nick Nickiniz askıda Kaldı ve Düşürmek istiyorsunuz Su Komutu Uygulayınız.. /ns ghost nick sifreniz  Örnek :  /ns ghost OzAn 123456
  }
  if .nnmemo isin $1- {
    msg $nick Nickinize Memo Gelmesini İstemiyor iseniz Su Komutu Uygulayınız..  /ns SET nomemo ON
  }
  if .nk?ll iswm $1- {
    msg $nick Nickinizin Baskası Tarafından Kullanılmasını İstemiyorsanız Su Komutu Uygulayınız..  /ns set KILL on
  }
  if .nshow isin $1- {
    msg $nick Nickinizdeki E-mail Adresini Herkezin Görmesini İstiyorsanız Su Komutu Uygulayınız..  /ns set showemail off 
  }
  if !Chanserv isin $1- {
    /timer 1 0 msg $nick  .:: Chanserv Hakkındaki Komutlar Sıralanıyor ::.
    /timer 1 1 msg $nick 
    /timer 1 4 msg $nick 14 1- Kanal Kaydetmek icin 7.creg 14yazarak komutu öğrenebilirsiniz..
    /timer 1 5 msg $nick 14 2- Kanal Droplamak icin 7.cdrop 14yazarak komutu öğrenebilirsiniz..
    /timer 1 6 msg $nick 14 3- Kanal Founderi Değiştirmek icin 7.cfon14 yazarak komutu öğrenebilirsiniz..
    /timer 1 7 msg $nick 14 4- Kanal Sifresi Değiştirmek icin 7.csifre14 yazarak komutu öğrenebilirsiniz..
    /timer 1 8 msg $nick 14 5- Kanal E-mail Değiştirmek icin 7.cmail14 yazarak komutu öğrenebilirsiniz..
    /timer 1 9 msg $nick 14 6- Kanalınıza gönderilen memoları kapatmak yada okuyabilme yetki düzeyini ayarlamak icin 7.cmemo14 yazarak komutu öğrenebilirsiniz..
    /timer 1 10 msg $nick 14 7- Kanalınıza giremiyorsanız INVITE modunda yada BANLI iseniz 4.invite14 yazarak komutu öğrenebilirsiniz..
    /timer 1 11 msg $nick 14 8- Kanalınıza SOP eklemek,silmek istiyorsanız 7.csop14 yazarak komutu öğrenebilirsiniz..
    /timer 1 12 msg $nick 14 9- Kanalınıza AOP eklemek,silmek istiyorsanız 7.caop14 yazarak komutu öğrenebilirsiniz..
    /timer 1 13 msg $nick 14 10- Kanalınıza VOP(voice(+)) eklemek istiyorsanız 7.cvop14 yazarak komutu öğrenebilirsiniz..
    /timer 1 14 msg $nick 14 11- Kanalınıza akick atmak icin 4.cakick14 yazarak komutu öğrenebilirsiniz..
    /timer 1 15 msg $nick 14 12- Kanalınıza accesslilerin ( SOP,AOP,VOP ve UOP ) dışında kimsenin girememesi için .7crest14 yazarak komutu öğrenebilirsiniz..
    /timer 1 16 msg $nick 14 13- Kanalınıza OP olan birinin hangi nicki identify ederek bu seviyeye geldiğini vede access'inin,ne olup olmadığını görmek için7 .why14 yazarak komutu öğrenebilirsiniz..
    /timer 1 17 msg $nick 14 15- Kanalınıza bir başka kanala linklemek(yönlendirmek) istiyorsanız 7.link14 yazarak komutu öğrenebilirsiniz...
    /timer 1 18 msg $nick 14 16- Kanalınıza Giris Mesajı atmak icin7 .cent14 yazarak komutu öğrenebilirsiniz..
    /timer 1 19 msg $nick 14 17- Kanalınızda op olan tüm kullanıcıları bir seferde deop edebilmek için 7.mdeop14 yazarak komutu öğrenebilirsiniz..
    /timer 1 20 msg $nick 14 18- Kanalınızdaki herkesi atmak için 7.mkick14 yazarak komutu öğrenebilirsiniz..
    /timer 1 21 msg $nick 14 19- Yetkili oldugunuz bi kanaldan size atılan banı kaldırmak için 7.cunban14 yazarak komutu öğrenebilirsiniz..
    /timer 1 22 msg $nick
    /timer 1 25 msg $nick  Size sunmuş oldugum komut parametreleri yetersiz geldiyse Kanal Operatörlerinden yardım isteyebilirsiniz.
  }
  if .caop isin $1- {
    msg $nick : AOP eklemek için ( Founder,Sop iseniz ), 4/chanserv aop #kanal add Nick
    msg $nick : AOP silmek için ( Founder,Sop iseniz ), 4/chanserv aop #kanal del Nick
  }
  if .csop isin $1- {
    msg $nick : SOP eklemek için ( Founder iseniz ), 4/chanserv sop #kanal add Nick
    msg $nick : SOP silmek için ( Founder iseniz ), 4/chanserv sop #kanal del Nick
  }
  if .cvop isin $1- {
    msg $nick : VOP eklemek için, ( kanalda en az sop accessiniz olmalı ) 4/chanserv vop #kanal add nick
    msg $nick : VOP silmek için, ( kanalda en az sop accessiniz olmalı ) 4/chanserv vop #kanal del nick
  }
  if .mkick isin $1- {
    msg $nick Kanaldaki herkesi atmak için SOP veya FOUNDER olmak gerekiyor, 4/chanserv mkick #kanal
  }
  if .mdeop isin $1- {
    msg $nick Kanaldaki herkesi deop etmek için SOP veya FOUNDER olmak gerekiyor, 4/chanserv mdeop #kanal
  }
  if .l?nk isin $1- {
    msg $nick, Kanal Yönlendirmek için, /mode #1.kanal +lO 1 #2.Kanal
  }
  if .why isin $1- {
    msg $nick : Kanalda OP olan birinin hangi nicki identify ederek bu seviyeye geldiğini vede access in,nolup olmadığını görmek için, 4/chanserv why #kanal nick
  }
  if .crest isin $1- {
    msg $nick : Kanala accesslilerin ( SOP,AOP,VOP ve UOP ) dışında kimsenin girememesi için, 4/chanserv set #kanal restrict ON Kaldırmak için 4/chanserv set #kanal restrict OFF
  }
  if .cunban isin $1- {
    msg $nick : Chanserv i kullanarak size atılan ban'ı kaldırmak için, 4/chanserv unban #kanal me
  }
  if .creg isin $1- {
    msg $nick Kanalınızı Kaydetmek İstiyorsanız Su Komutu Uygulayınız  /cs register #kanal sifre acıklama  Örnek : /cs register #sohbet 123456 Hoşgeldiniz
  }
  if .cdrop isin $1- {
    msg $nick Kanalınızı Droplamak ( Kayıtları Silmek ) icin Su Komutu Uygulayınız  /cs identify #kanalınız sifreniz  /cs drop #kanalınız  Örnek : /cs identify #sohbet 123456  /cs drop #sohbet
  }
  if .cfon isin $1- {
    msg $nick Kanalınızın Founderini Değiştirmek icin Su Komutu Uygulayınız  /cs identify #kanalınız sifreniz  /cs set #kanalınız founder yenifounder  Örnek :  /cs identify #sohbet 123456  /cs set #sohbet founder OzAn 
  }
  if .cs?fre iswm $1- {
    msg $nick Kanalınızın Sifresini Değiştirmek icin Su Komutu Uygulayınız  /cs set #kanaliniz password yenisifre  Örnek : /cs set #sohbet password 321654
  }
  if .cma?l iswm $1- {
    msg $nick Kanalınızın E-mail adresini Değiştirmek icin Su Komutu Uygulayınız  /cs set #kanalınız email yenie-mail  Örnek :  /cs set #sohbet email adres
  }
  if .cmemo iswm $1- {
    msg $nick Kanala memo yolladığınız zaman alacak alt düzeyi belirlemek için, 4/chanserv set #kanal memo none|aop|sop|founder
  }
  if .invite isin $1- {
    msg $nick Kanal +i modunda ise vede kanalda en az AOP access iniz var ise kanala girmek için, 4/chanserv invite #kanal nick
  }
  if .cent isin $1- {
    msg $nick Kanalınıza Giriş Mesajı atmak icin /cs set #kanal entrymsg mesajınız  Örnek : /cs set #sohbet entrymsg Hoşgeldiniz.
  }
  if .cak?ck iswm $1- {
    msg $nick Kanalınızda akick almak icin Su Komutu Uygulayınız /cs akick #kanal add nick!*@* sebeb  Örnek : /cs akick #sohbet add OzAn!*@* Rahatsızlık
  }
  if !MemoServ iswm $1- {
    /timer 1 0 msg $nick  .:: Memoserv Hakkındaki Komutlar Sıralanıyor ::.
    /timer 1 1 msg $nick
    /timer 1 3 msg $nick 14 1- Memo Göndermek icin 7.msend14 yazarak komutu öğrenebilirsiniz..
    /timer 1 4 msg $nick 14 2- Memo Okumak icin 7.mread14 yazarak komutu öğrenebilirsiniz..
    /timer 1 5 msg $nick 14 3- Memo Listesini Görmek icin 7.mlist14 yazarak komutu öğrenebilirsiniz..
    /timer 1 6 msg $nick 14 4- Memolarınızı E-mail adresinize Göndermek icin 7.mfor14 yazarak komutu öğrenebilirsiniz..
    /timer 1 7 msg $nick 14 5- Memolarınızı Silmek icin 7.mdel 14yazarak komutu öğrenebilirsiniz..
    /timer 1 8 msg $nick 14 6- Memolarınıza Limit Koymak icin 7.mlim 14yazarak komutu öğrenebilirsiniz..
    /timer 1 9 msg $nick 14 7- Memolarınız Hakkındaki Bilgileri Görmek icin 7.minfo 14yazarak komutu öğrenebilirsiniz..
    /timer 1 10 msg $nick 14 8- Herhangi Bir Kullanıcının Size Memo Göndermesini İstemiyorsanız 4.mig 14yazarak komutu öğrenebilirsiniz..
    /timer 1 10 msg $nick
    /timer 1 12 msg $nick  Size sunmuş oldugum komut parametreleri yetersiz geldiyse Kanal Operatörlerinden yardım isteyebilirsiniz.
  }
  if .msend isin $1- {
    msg $nick Memo Göndermek icin Su Komutu Uygulayınız.. /ms send nick mesajınız  Örnek :  /ms send StanteaR Selam 
  }
  if .mread isin $1- {
    msg $nick Memo Okumak icin Su Komutu yazarak komutu öğrenebilirsiniz.. /ms read memonumarası  Örnek :  /ms send 1
  }
  if .ml?st iswm $1- {
    msg $nick Memo Listenizi Görmek icin Su Komutu Uygulayınız  /ms list 
  }
  if .mfor isin $1- {
    msg $nick Memolarınızı E-mail adresinize Göndermek icin Su komutu Uygulayınız /ms forward all
  }
  if .mdel isin $1- {
    msg $nick Memolarınızı Silmek icin Su Komutu Uygulayınız  /ms del memonumarası  Örnek :  /ms del 1
  }
  if .ml?m iswm $1- {
    msg $nick Memolarınıza Limit Koymak icin Su Komutu Uygulayınız /ms set limit LIMITSAYISI  Örnek : /ms set limit 10
  }
  if .m?nfo iswm $1- {
    msg $nick Memolarınız Hakkındaki Bilgileri Görmek icin Su Komutu Uygulayınız  /ms info 
  }
  if .m?g iswm $1- {
    msg $nick Herhangi Bir Kullanıcının Size Memo Göndermesini Engellemek icin Su Komutu Uygulayınız /ms ignore add nick  Örnek : /ms ignore add OzAn
  }
}
on 1s:JOIN:#Help: {
  msg $nick 14Merhaba 7 $nick
  msg $nick Help Kanalına Giriş Yaptınız.
  msg $nick Size Yardımcı olunması için + verilmesini Bekleyiniz.
  msg $nick Sorununuz Yoksa Odadan Çıkış Yapabilirsiniz.
  msg $nick Komutlar Hakkında Bilgi Almak Icın Özelime Şu Komutlari Yazınız.
  msg $nick 7 Komutların Flood Amaclı kullanılması 4 [ 7Kill 4] 7 Sebebidir.
  msg $nick 7 !Chanserv
  msg $nick 7 !Nickserv
  msg $nick 7 !MemoServ
  msg $nick 14İyi S0hbetler.
}
#IRCHelp end
Buna Oper Girenlerin !operserv Yazdıgında Operserv komutlarını gostermesını nasıl saglayabılırım !operserv den Op Sop normal userı muaf tutmak ıcın Sadece Oper Gırene Oper girdiginiz ıcın !operserv komutlarınada bakabılırsınız gıbı bırsey . Bide Muaf Tutma ımkanı varmı belırlı nıcklerı

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

Ben Bunu özelde Flood engellemek ıcın muaf seklınde denedım ama olmadı yukarda kı kod ıcın
Kod:
on *:text:*:?: {
  .inc -u5 $+(%,flood,$nick)
  if ($me isin $1-) && !$regex($nick,/^(Nick1|nick2|nick3)$/i) {
    if $($+(%,flood,$nick),2) == 3 { userip $nick | set %nick $nick | .set %flood on }
    if $($+(%,flood,$nick),2) >= 4 { Kill $nick Özel Flood! | unset $+(%,flood,$nick) }
  }

  Raw 340:*: {
    if (%flood == on) {
      /msg #admin İşlem : %Nick ,  İp : $gettok($2,2,64) , Ip Adresi İşlenen : Özel Flood!
      .timer 1 2 /unset %nick
      .timer 1 3 /set %flood off
    }
  }
nerde hata yapyıgımı soylebılırmısınız yada yukardakıne gore adminler i muaf tutup normal usere uygulunabılırmı

By eRhaN 06 Nisan 2018 06:45
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Kod:
on *:snotice:*:{
  if (*client*connect* iswm $1-) {
    var %difyip = $remove($token($10,2,64),$chr(41)), %difynick = $9, %difyident = $remove($token($10,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyip %difynick 14Ident: %difyident 02Son Girişi: $+($time,-,$date)
  }
  elseif (*changed*his*her*nickname* iswm $1-) {
    var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynickz,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyzip %difynickz 14Ident: %difyidentz 02Son Girişi: $+($time,-,$date)
  }
}
;kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz
on *:text:!arsiv &:#Admin:{
  if $regex($2,/^\d+.\d+/) {
    if $read(arsiv.txt,r,/^\Q $+ $2 $+ \E\s/) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /^\Q $+ $2 $+ \E\s/
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
  if $regex($2,/^[^\d]/) {
    if $read(arsiv.txt,r,/[^:]\s\Q $+ $2 $+ \E\s/i) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /[^:]\s\Q $+ $2 $+ \E\s/i
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
}
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] un yazdıgı bu kod da [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[06:42] [S] Client connecting at irc.Mobilcet.Com: Sss (Mobilcet@5.177.137.229)

web gırısını algılayıp kaydetmıyor Degıstırecebılecek olan varmı tesekkurler sımdıden

Alper 07 Nisan 2018 09:42
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
By eRhaN Nickli Üyeden Alıntı (Mesaj 1041932468)
Kod:
on *:snotice:*:{
  if (*client*connect* iswm $1-) {
    var %difyip = $remove($token($10,2,64),$chr(41)), %difynick = $9, %difyident = $remove($token($10,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyip %difynick 14Ident: %difyident 02Son Girişi: $+($time,-,$date)
  }
  elseif (*changed*his*her*nickname* iswm $1-) {
    var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynickz,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyzip %difynickz 14Ident: %difyidentz 02Son Girişi: $+($time,-,$date)
  }
}
;kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz
on *:text:!arsiv &:#Admin:{
  if $regex($2,/^\d+.\d+/) {
    if $read(arsiv.txt,r,/^\Q $+ $2 $+ \E\s/) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /^\Q $+ $2 $+ \E\s/
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
  if $regex($2,/^[^\d]/) {
    if $read(arsiv.txt,r,/[^:]\s\Q $+ $2 $+ \E\s/i) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /[^:]\s\Q $+ $2 $+ \E\s/i
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
}
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] un yazdıgı bu kod da [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[06:42] [S] Client connecting at irc.Mobilcet.Com: Sss (Mobilcet@5.177.137.229)

web gırısını algılayıp kaydetmıyor Degıstırecebılecek olan varmı tesekkurler sımdıden
Kod:
on *:snotice:*:{
  if $regex($4-,/(Client Connecting.+)/i) {
    var %difyip = $token($token($regml(1),2,64),1,41), %difynick = $token($token($regml(1),1,40),2,58), %difyident = $token($token($regml(1),2,40),1,64)
    if $read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyip %difynick 14Ident: %difyident 02Son Girişi: $+($time,-,$date)
  }
  elseif (*changed*his*her*nickname* iswm $1-) {
    var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynickz,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyzip %difynickz 14Ident: %difyidentz 02Son Girişi: $+($time,-,$date)
  }
}
;kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz
on *:text:!arsiv &:#Admin:{
  if $regex($2,/^\d+.\d+/) {
    if $read(arsiv.txt,r,/^\Q $+ $2 $+ \E\s/) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /^\Q $+ $2 $+ \E\s/
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
  if $regex($2,/^[^\d]/) {
    if $read(arsiv.txt,r,/[^:]\s\Q $+ $2 $+ \E\s/i) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /[^:]\s\Q $+ $2 $+ \E\s/i
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
}

Alper 07 Nisan 2018 10:01
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
Kod:
on *:text:*:?: {
  .inc -u5 $+(%,flood,$nick)
  if ($me isin $1-) && !$regex($nick,/^(Nick1|nick2|nick3)$/i) {
    if $($+(%,flood,$nick),2) == 3 { userip $nick | set %nick $nick | .set %flood on }
    if $($+(%,flood,$nick),2) >= 4 { Kill $nick Özel Flood! | unset $+(%,flood,$nick) }
  }

  Raw 340:*: {
    if (%flood == on) {
      /msg #admin İşlem : %Nick ,  İp : $gettok($2,2,64) , Ip Adresi İşlenen : Özel Flood!
      .timer 1 2 /unset %nick
      .timer 1 3 /set %flood off
    }
  }
nerde hata yapyıgımı soylebılırmısınız yada yukardakıne gore adminler i muaf tutup normal usere uygulunabılırmı
Kod:
on *:text:*:?: {
  .inc -u5 $+(%,flood,$nick)
  if !$regex($nick,/^(pC`kOpAt|nick2|nick3)$/i) {
    if $($+(%,flood,$nick),2) == 3 { userip $nick | set %nick $nick | .set %flood on }
    if $($+(%,flood,$nick),2) >= 4 { Kill $nick Özel Flood! | unset $+(%,flood,$nick) }
  }
}

Raw 340:*: {
  if (%flood == on) {
    /msg #admin İşlem : %Nick ,  İp : $gettok($2,2,64) , Ip Adresi İşlenen : Özel Flood!
    .timer 1 2 /unset %nick
    .timer 1 3 /set %flood off
  }
}

By eRhaN 07 Nisan 2018 10:26
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
pckopat Nickli Üyeden Alıntı (Mesaj 1041933116)
Kod:
on *:snotice:*:{
  if $regex($4-,/(Client Connecting.+)/i) {
    var %difyip = $token($token($regml(1),2,64),1,41), %difynick = $token($token($regml(1),1,40),2,58), %difyident = $token($token($regml(1),2,40),1,64)
    if $read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyip %difynick 14Ident: %difyident 02Son Girişi: $+($time,-,$date)
  }
  elseif (*changed*his*her*nickname* iswm $1-) {
    var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynickz,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyzip %difynickz 14Ident: %difyidentz 02Son Girişi: $+($time,-,$date)
  }
}
;kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz
on *:text:!arsiv &:#Admin:{
  if $regex($2,/^\d+.\d+/) {
    if $read(arsiv.txt,r,/^\Q $+ $2 $+ \E\s/) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /^\Q $+ $2 $+ \E\s/
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
  if $regex($2,/^[^\d]/) {
    if $read(arsiv.txt,r,/[^:]\s\Q $+ $2 $+ \E\s/i) {
      msg $chan $2 arşivi listeleniyor
      filter -ffcg arsiv.txt depo.txt /[^:]\s\Q $+ $2 $+ \E\s/i
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
}
Boyle bır hata verıyor
[10:25] <%ZehiR> !arsiv Ercan
[10:25] <%AntiDote> Ercan arşivi listeleniyor
(10:25:36) • Quit : AntiDote (~
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Sebep : Connection reset by peer)
Listeleniyor yazdıktan sonra baglantısı kesılıyor diger Muaf kodu ıcınde tesekkur ederım

Alper 07 Nisan 2018 10:58
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
By eRhaN Nickli Üyeden Alıntı (Mesaj 1041933130)
Boyle bır hata verıyor
[10:25] <%ZehiR> !arsiv Ercan
[10:25] <%AntiDote> Ercan arşivi listeleniyor
(10:25:36) • Quit : AntiDote (~
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Sebep : Connection reset by peer)
Listeleniyor yazdıktan sonra baglantısı kesılıyor diger Muaf kodu ıcınde tesekkur ederım
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Bir sıkıntı gözükmüyor.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 03:43.
Sayfa 62 Toplam 85 Sayfadan « İlkSayfa 125255565758596061 62 6364656667686972 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