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

unpainful 21 Şubat 2016 18:35
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
SuLh Nickli Üyeden Alıntı (Mesaj 1041745149)
Bunu input eventi ile gerçekleştirebilirsin.

Kod:
on *:input:*: {
  if $1 = .away {
    if %awaydurum = on {
      echo -a Away konumundan çıktın.
      away
      nick %eskinick
      set %awaydurum off
      return
    }
    if %awaydurum = off || !%awaydurum {
      echo -a Away konumuna geçtin.
      away Yokum
      set %eskinick $me
      nick $me $+ -Away
      set %awaydurum on
      return
    }
  }
}
Alıntı:
Toprak Nickli Üyeden Alıntı (Mesaj 1041745167)
Bunu da kullanabilirsiniz;

Kod:
on *:input:*: {
  if $regex($1,/[!.]away/Si) {
    $iif($away,nick $remove($me,`Away),nick $+($me,`Away))
    $iif($away,.away,.away Meşgul)
  }
}
Teşekkür ederim ilginiz için fakat bunu bota ekleyip kullanıcıların yaptığı zaman işlem görmesini sağlayabilir miyiz

Bot üstünde !nick yeninick yapınca nickini seçtiği nick
!away yapınca nick|away takısı ve tekrarında !away yazısında nickine dönmesi gibi.

Not : düzenlemek istedim fakat süre aşımına uğradığım için mesajı yenileyemedim , teşekkürler

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:35 -->-> Daha önceki mesaj 17:17 --

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , sizinde olabilirmi acaba bilginiz bu konuda?

YouMyCure 21 Şubat 2016 20:07
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
unpainful Nickli Üyeden Alıntı (Mesaj 1041745192)
Teşekkür ederim ilginiz için fakat bunu bota ekleyip kullanıcıların yaptığı zaman işlem görmesini sağlayabilir miyiz

Bot üstünde !nick yeninick yapınca nickini seçtiği nick
!away yapınca nick|away takısı ve tekrarında !away yazısında nickine dönmesi gibi.

Not : düzenlemek istedim fakat süre aşımına uğradığım için mesajı yenileyemedim , teşekkürler

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:35 -->-> Daha önceki mesaj 17:17 --

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , sizinde olabilirmi acaba bilginiz bu konuda?
input eventi kendi yazdıklarınızı algılari başka bir mirc üzerinden işlem yaptırmak için text eventini kullanmanız gerekmektedir,

Kod:
on *:text:*:#: {
  if $regex($1,/[!.]nick/Si) {
  if !$2 { msg $chan Lütfen nick belirtiniz $nick . | return }
  $iif($nick == $2,msg $chan Zaten $2 Nickindesiniz,os raw svsnick $nick $2 :0)
  }
  if $regex($1,/[!.]away/Si) {
  if !$2 {
    if *|away* iswm $nick { os raw svsnick $nick $gettok($nick,1,124) :0 | msg $chan $gettok($nick,1,124) away konumundan çıktınız. }
    else { os raw svsnick $nick $+($nick,|away) :0 | msg $chan $+($nick,|away) away nicki aldınız. }
  }
  else { msg $nick Lütfen Sadece !away veya .away şeklinde kullanınız. $nick }
  }
}
bu kod işini görür.

forumda arama yapsan bulabilirdin;
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Toprak 21 Şubat 2016 23:12
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Bunu da kullanabilirsiniz;

Kod:
on *:text:*:#:{
  if $regex($1,/^[!.](away|me[sşŞ][gğĞ]ul)$/Si) {
    os raw svsnick $nick $iif(!$regex($nick,/\`Away/i),$+($nick,`Away),$remove($nick,`Away)) 0:1
    msg # $regsubex($nick,/(.)/g,\t) Away $iif(!$regex($nick,/\`Away/i),konumuna gectiniz.,konumundan çıktınız.)
  }
  elseif $regex($1,/^[!.]n[ıiİ]ck$/Si) {
    if !$2 { msg # Lütfen nick belirtiniz. | return }
    if !$regex($2,/^([a-zA-ZĞğıİöÖüÜşŞçÇ_^\133\135}{][a-zA-ZĞğıİöÖüÜşŞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Nick rakamlardan oluşamaz. | return }
    $iif($nick == $2,msg # Kafanmı iyi.,os raw svsnick $nick $2 0:1)
  }
}

Koddan görüntüler;

Kod:
[23:05:21] <02Toprak> !away
[23:05:22] <02Toprak> yaz
[23:05:22] <02Toprak> bir
[23:05:25] <07Entrance> !away
[23:05:25] <02Toprak> Entrance Away konumuna gectiniz.
[23:05:25] * Entrance Nick değişerek Entrance`Away Oldu
[23:05:28] <02Toprak> bir daha
[23:05:32] <07Entrance`Away> !away
[23:05:32] <02Toprak> Entrance`Away Away konumundan çıktınız.
[23:05:32] * Entrance`Away Nick değişerek Entrance Oldu
[23:05:35] <02Toprak> tmm sağolasın
[23:05:36] <02Toprak> =)
[23:05:41] <07Entrance> rica. d,
[23:08:48] <02Toprak> Entrance
[23:08:52] <02Toprak> !nick 654654
[23:08:53] <02Toprak> yaz
[23:10:04] <07Entrance> !nick 654654
[23:10:04] <02Toprak> Nick rakamlardan oluşamaz.
[23:10:27] <07Entrance> !nick taner
[23:10:28] * Entrance Nick değişerek taner Oldu

unpainful 22 Şubat 2016 13:24
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Evet teşekkürler , verdiğiniz 2 şekildede çalışmakta

Rakun 22 Şubat 2016 13:48
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
Rakun Nickli Üyeden Alıntı (Mesaj 1041745139)
Arkadaşlar tekrar merhaba,

Benim şöyle bir koda ihtiyacım var.

Örneğin ; kanallara op ekleyeceğim zaman, eklemeden önce bir dialog panel üzerinde ident karşılaştırması yapmak istiyorum. Daha önceden farklı bir nickle aynı identi op olarak eklemiş miyim,eklememiş miyim bunu görmek istiyorum.

Bunu da şu şekilde yapmak istiyorum. Bir Txt nin içerisine mevcut opların identlerini kaydedeceğim ve yeni bir op ekleyeceğim zaman bu identler içerisinde tarama yapıcak dialog panelden. Eğer bu txt nin içerisinde ki identten çıkarsa bana böyle bir ident mevcut diye uyarı vericek ya da ekrana yazıcak. Eğer böyle bir ident yok ise, ident kaydı bulunamadı gibisinden ekrana yazıcak ya da uyarı vericek.

Eğer eklediğim op hiç bir ident ile eşleşmiyor ise de bu op'un identini txt'ye kaydedicek.

Bunu yapmamız mümkün müdür ?

Yardımcı olacak arkadaşlara şimdiden teşekkür ederim.


Sent from my iPhone 6 using Tapatalk

:( ?


Sent from my iPhone 6 using Tapatalk

YouMyCure 22 Şubat 2016 20:15
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
Rakun Nickli Üyeden Alıntı (Mesaj 1041745513)
:( ?


Sent from my iPhone 6 using Tapatalk
selam ;
Kod:
alias tarama { dialog -m identtara identtara }
dialog identtara {
  title "ident taraması"
  size -1 -1 133 71
  option dbu
  box "", 1, 2 1 129 60
  text "taranacak identi yazınız", 2, 2 9 128 8, center
  edit "", 3, 8 18 116 10, center
  button "TARA !", 4, 37 30 55 22
  link "YouMyCure", 5, 99 62 31 8
}
dialog identsonuc {
  title "ident taraması sonuç"
  size -1 -1 187 31
  option dbu
  box "", 1, 2 1 183 22
  link "YouMyCure", 5, 152 23 31 8
  edit "", 2, 5 6 177 14, read
}
on *:dialog:*:*:*: {
  if $dname == identtara {
    unset %&:_
    if $devent == sclick && $did == 4 {
      if !$did(3) {
        set %&:_ Lütfen taranacak ident giriniz.
        dialog -x $dname $dname
        dialog -m identsonuc identsonuc
        return
      }
      var %:_ymc = 1
      while (%:_ymc <= $lines(identop.txt)) {
        if $did(3) == $read(identop.txt,%:_ymc) {
          set %&:_ $did(3) identi listede bulundu....
          dialog -x $dname $dname
          dialog -m identsonuc identsonuc
          return
        }
        inc %:_ymc 
      }
      set %&:_ $did(3) identi bulunamadı ve listeye eklendi....
      write identop.txt $did(3)
      dialog -x $dname $dname
      dialog -m identsonuc identsonuc
    }
  }
  if $dname == identsonuc && $devent == init {
    did -a identsonuc 2 %&:_
  }
}
kırmızı olarak yazdığım txt isimlerini değiştirerek kullanabilirsiniz,
Kod:
/tarama
komutuyla çalıştırıp ilgili bölmeye tarama yapılacak ident adresini yazarsanız size yeni bir dialog penceresinde işlem sonucu geri dönüş yapılacaktır, eğer belirtilen txt içerisinde belirttiğiniz ident varsa ** identi listede bulundu.... , yoksa ** identi bulunamadı ve listeye eklendi.... , şeklinde mesajlar dönecektir... sanırım olayı doğru anladım.
iyi forumlar.

Rakun 23 Şubat 2016 10:21
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
YouMyCure Nickli Üyeden Alıntı (Mesaj 1041745647)
selam ;
Kod:
alias tarama { dialog -m identtara identtara }
dialog identtara {
  title "ident taraması"
  size -1 -1 133 71
  option dbu
  box "", 1, 2 1 129 60
  text "taranacak identi yazınız", 2, 2 9 128 8, center
  edit "", 3, 8 18 116 10, center
  button "TARA !", 4, 37 30 55 22
  link "YouMyCure", 5, 99 62 31 8
}
dialog identsonuc {
  title "ident taraması sonuç"
  size -1 -1 187 31
  option dbu
  box "", 1, 2 1 183 22
  link "YouMyCure", 5, 152 23 31 8
  edit "", 2, 5 6 177 14, read
}
on *:dialog:*:*:*: {
  if $dname == identtara {
    unset %&:_
    if $devent == sclick && $did == 4 {
      if !$did(3) {
        set %&:_ Lütfen taranacak ident giriniz.
        dialog -x $dname $dname
        dialog -m identsonuc identsonuc
        return
      }
      var %:_ymc = 1
      while (%:_ymc <= $lines(identop.txt)) {
        if $did(3) == $read(identop.txt,%:_ymc) {
          set %&:_ $did(3) identi listede bulundu....
          dialog -x $dname $dname
          dialog -m identsonuc identsonuc
          return
        }
        inc %:_ymc 
      }
      set %&:_ $did(3) identi bulunamadı ve listeye eklendi....
      write identop.txt $did(3)
      dialog -x $dname $dname
      dialog -m identsonuc identsonuc
    }
  }
  if $dname == identsonuc && $devent == init {
    did -a identsonuc 2 %&:_
  }
}
kırmızı olarak yazdığım txt isimlerini değiştirerek kullanabilirsiniz,
Kod:
/tarama
komutuyla çalıştırıp ilgili bölmeye tarama yapılacak ident adresini yazarsanız size yeni bir dialog penceresinde işlem sonucu geri dönüş yapılacaktır, eğer belirtilen txt içerisinde belirttiğiniz ident varsa ** identi listede bulundu.... , yoksa ** identi bulunamadı ve listeye eklendi.... , şeklinde mesajlar dönecektir... sanırım olayı doğru anladım.
iyi forumlar.

Çoook teşekkür ederim, tam olarak istediğim böyle bir şey idi. Elleriniz dert görmesin. Peki bunu, şu şekilde de yapabilir miyiz ?

Mesela /tarama yazıp gelen dialogta ident'i girip sorgulattığımız zaman,sorgulanan ident bulunduğunda ident'i ile beraber ekrana yazdırabilir miyiz ? Yani örnek: abcdefg ident'ini ben tarama yaptım böyle bir ident'i buldu diyelim, bu ident Abcd01 nickine aittir gibisinden.. Yani sonuçta kanallara op ekleyeceğim zaman daha önce o identin hangi nicke ait olup olmadığını da görmüş olmak istiyorum. Öyle bir ident bulamadığı zaman direkt txt'ye kaydediyor zaten bu kısım süper oldu tam istediğim gibi.

Dediğim gibi taradığımız ident'i daha önce hangi nickle op olarak eklemişim görebilirsem süper olur.

Teşekkürler emeğine.


Sent from my iPhone 6 using Tapatalk

YouMyCure 23 Şubat 2016 16:46
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
Rakun Nickli Üyeden Alıntı (Mesaj 1041745830)
Çoook teşekkür ederim, tam olarak istediğim böyle bir şey idi. Elleriniz dert görmesin. Peki bunu, şu şekilde de yapabilir miyiz ?

Mesela /tarama yazıp gelen dialogta ident'i girip sorgulattığımız zaman,sorgulanan ident bulunduğunda ident'i ile beraber ekrana yazdırabilir miyiz ? Yani örnek: abcdefg ident'ini ben tarama yaptım böyle bir ident'i buldu diyelim, bu ident Abcd01 nickine aittir gibisinden.. Yani sonuçta kanallara op ekleyeceğim zaman daha önce o identin hangi nicke ait olup olmadığını da görmüş olmak istiyorum. Öyle bir ident bulamadığı zaman direkt txt'ye kaydediyor zaten bu kısım süper oldu tam istediğim gibi.

Dediğim gibi taradığımız ident'i daha önce hangi nickle op olarak eklemişim görebilirsem süper olur.

Teşekkürler emeğine.


Sent from my iPhone 6 using Tapatalk
1- nicklerin tamamının tarama yapıldığı an sunucuda olması gerek ( pek mümkün değil )
2- nicklerin tamamını identleri ile birlikte txt dosyasına kaydetmeniz gerek
3- whowas yetkiniz olması gerek.

Rakun 23 Şubat 2016 17:31
Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
YouMyCure Nickli Üyeden Alıntı (Mesaj 1041746032)
1- nicklerin tamamının tarama yapıldığı an sunucuda olması gerek ( pek mümkün değil )

2- nicklerin tamamını identleri ile birlikte txt dosyasına kaydetmeniz gerek

3- whowas yetkiniz olması gerek.

Yok yok, öyle değil tamamen yanlış anladınız beni. Mesela şimdi ben txt içerisine nick ve identleri kaydedeceğim ya, diyelim ilerde kanallara op ekleyeceğim de tarama yaptığım da, /tarama diyip gelen dialogta identi yazdığım da örneğin ; bu ident abcdefg nickine aittir yani tamamen txt içerisine kaydettiğim ve yaptığı tarama verisini vericek bana. Eğer böyle bir ident txt nin içerisinde yok ise de böyle bir ident ve nick bulunamadı ve kaydedildi diyecek.

İdenti kaydettikten sonra ben son eklenen (kaydedilen) identin yanına nicki yazıcam txt'yi açıp olay bu yani :)

Yani daha önce başka bir nickle bu identi op olarak eklemiş miyim, eklememiş miyim görmek için

Sent from my iPhone 6 using Tapatalk

YouMyCure 24 Şubat 2016 14:32
Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:
Rakun Nickli Üyeden Alıntı (Mesaj 1041746039)
Yok yok, öyle değil tamamen yanlış anladınız beni. Mesela şimdi ben txt içerisine nick ve identleri kaydedeceğim ya, diyelim ilerde kanallara op ekleyeceğim de tarama yaptığım da, /tarama diyip gelen dialogta identi yazdığım da örneğin ; bu ident abcdefg nickine aittir yani tamamen txt içerisine kaydettiğim ve yaptığı tarama verisini vericek bana. Eğer böyle bir ident txt nin içerisinde yok ise de böyle bir ident ve nick bulunamadı ve kaydedildi diyecek.

İdenti kaydettikten sonra ben son eklenen (kaydedilen) identin yanına nicki yazıcam txt'yi açıp olay bu yani :)

Yani daha önce başka bir nickle bu identi op olarak eklemiş miyim, eklememiş miyim görmek için

Sent from my iPhone 6 using Tapatalk
Kod:
alias tarama { dialog -m identtara identtara }
dialog identtara {
  title "ident taraması"
  size -1 -1 133 71
  option dbu
  box "", 1, 2 1 129 60
  text "taranacak identi yazınız", 2, 2 9 128 8, center
  edit "", 3, 8 18 116 10, center
  button "TARA !", 4, 37 30 55 22
  link "YouMyCure", 5, 99 62 31 8
}
dialog identsonuc {
  title "ident taraması sonuç"
  size -1 -1 187 31
  option dbu
  box "", 1, 2 1 183 22
  link "YouMyCure", 5, 152 23 31 8
  edit "", 2, 5 6 177 14, read
}
on *:dialog:*:*:*: {
  if $dname == identtara {
    unset %&:_
    if $devent == sclick && $did == 4 {
      if !$did(3) {
        set %&:_ Lütfen taranacak ident giriniz.
        dialog -x $dname $dname
        dialog -m identsonuc identsonuc
        return
      }
      var %:_ymc = 1
      while (%:_ymc <= $lines(identop.txt)) {
        if $did(3) == $gettok($read(identop.txt,%:_ymc),1,32) {
          set %&:_ $did(3) identi listede bulundu.... $gettok($read(identop.txt,%:_ymc),2,32) nickine ait....
          dialog -x $dname $dname
          dialog -m identsonuc identsonuc
          return
        }
        inc %:_ymc 
      }
      set %&:_ $did(3) identi bulunamadı ve listeye eklendi....
      write identop.txt $did(3)
      dialog -x $dname $dname
      dialog -m identsonuc identsonuc
    }
  }
  if $dname == identsonuc && $devent == init {
    did -a identsonuc 2 %&:_
  }
}
kodu bu şekilde güncelle, txt yede veriler şu şekilde eklenecek;
Kod:
deneme YouMyCure
ident SuLh
ident3 Feragat
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 00:30.
Sayfa 32 Toplam 85 Sayfadan « İlkSayfa 2225262728293031 32 333435363738394282 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