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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   /* Away|MesguL Hariç Nick takısı yasağı */ (https://www.ircforumlari.net/mirc-scripting-sorunlari/512002-away-mesgul-haric-nick-takisi-yasagi.html)

IRC-Dancer 13 Kasım 2012 23:14

/* Away|MesguL Hariç Nick takısı yasağı */
 
Kod:

alias _nickm {
  if ($2 == NICK) { if !%degişdi { if !$regex($right($3,-1),/(away|mesgul)/i) && !$regex($remove($gettok($1,1,33),:),/(away|mesgul)/i) { set -u2 %opnickdeg oke! | set -u2 %enickop $remove($gettok($1,1,33),:) | _sw $sockname who +cn #Staff $right($3,-1) } } }
  if $2 == 352 { if (%opnickdeg == oke!) { set -u1 %degişdi oke! | _sw $sockname os raw svsnick $8 %enickop 0:1 |  _sw $sockname privmsg #Staff %enickop $+ : Mesgul-Away-Disarda  gibi takı'larda Operhelp'ten part yapınız.  } }
}


Örnek :
[23:00:40] *** Vagrant Nick değişerek Deneme-1 Oldu
[23:00:40] <Aux-EXTRA> Vagrant Admin & Operlerin nick degistirmesi yasaktir! Nickinize Away Afk Yok gibi takilar alabilirsiniz.
[23:01:09] *** Deneme-1 Nick değişerek Vagrant Oldu

Kod İşlevi :
Kod Oper Adminlerin ; Nick[Away] - Nick[MesguL] < Hariç başka nick'e geçiş veya başka takı almalarını engelliyor.


Kod Çalışıyor lakin ; Oper giren kişi hangi nickle oper girdiyse , o nick'e geri ceviriyor. . Kayıtlı nick'i alamıyor sebeb ne ola bilir acaba ?


[23:00:25] <S-Aux> [Oper Girisi] spyMASTER [Oper Nick] Xantiave [FLAG] IRC Operatör
[23:00:40] *** spyMASTER Nick değişerek Xantiave Oldu
[23:00:40] <Aux-EXTRA> Xantiave Admin & Operlerin nick degistirmesi yasaktir! Nickinize Away Afk Yok gibi takilar alabilirsiniz.
[23:00:40] *** Xantiave Nick değişerek spyMASTER Oldu

q0kh4n 16 Kasım 2012 09:13

Cevap: /* Away|MesguL Hariç Nick takısı yasağı */
 
sen mi yaptın peki bunu

Krieq 16 Kasım 2012 12:34

Cevap: /* Away|MesguL Hariç Nick takısı yasağı */
 
Kod:

_sw $sockname os raw svsnick $8 %enickop 0:1
kısımda %enickop değeri neyse o nicke çeviriyor.
Kod:

set -u2 %enickop $remove($gettok($1,1,33),:)
bununla da %enickop değerini tanımlıyor.Hangi nicke oper yazılıysa o nicke mi çevirsin istiyorsun anlamadım ama öyleyse oper girişi olduğunda bildirim yapan snotice kodunda %enickop değerini ordaki kayıtlı nicke tanımla.(set -u2 %enickop kısmını bu koddan silerek.)

m-IRC e girmediğimden ancak fikir verebilirim sana.

q0kh4n 17 Kasım 2012 11:01

Cevap: /* Away|MesguL Hariç Nick takısı yasağı */
 
hayır arkadaş kendisine verilen bottan aldığı kodu paylaşmış ama eksik paylaşmış :) bu paylaştığın kod parçası ile senin botun değişen nicki nasıl algılıyor hala anlamış değilim.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 11:01 -->-> Daha önceki mesaj 11:00 --

ve ayrıca belirtmek isterim ki _sw aliaslını sadece WingmaN'da gördüm.

IRC-Dancer 26 Kasım 2012 21:22

Cevap: /* Away|MesguL Hariç Nick takısı yasağı */
 
Alıntı:

Krieq Nickli Üyeden Alıntı (Mesaj 1041244383)
Kod:

_sw $sockname os raw svsnick $8 %enickop 0:1
kısımda %enickop değeri neyse o nicke çeviriyor.
Kod:

set -u2 %enickop $remove($gettok($1,1,33),:)
bununla da %enickop değerini tanımlıyor.Hangi nicke oper yazılıysa o nicke mi çevirsin istiyorsun anlamadım ama öyleyse oper girişi olduğunda bildirim yapan snotice kodunda %enickop değerini ordaki kayıtlı nicke tanımla.(set -u2 %enickop kısmını bu koddan silerek.)

m-IRC e girmediğimden ancak fikir verebilirim sana.

Hemen hemen aynı fikir sayılır , lakin senin dediğinde mantıklı ilgin için teşekkür ederim.

Alıntı:

q0kh4n Nickli Üyeden Alıntı (Mesaj 1041244814)
hayır arkadaş kendisine verilen bottan aldığı kodu paylaşmış ama eksik paylaşmış :) bu paylaştığın kod parçası ile senin botun değişen nicki nasıl algılıyor hala anlamış değilim.


ve ayrıca belirtmek isterim ki _sw aliaslını sadece WingmaN'da gördüm.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Varsa ben verdim bu botu ona diyen varsa beklerim ; Artı ön yargılı olma , kodun eksik olduğunuda nerden çıkardın , kodun tamamı bu.

Toprak 27 Kasım 2012 01:07

Cevap: /* Away|MesguL Hariç Nick takısı yasağı */
 
ben bu kod'u bi yerden hatırlıyorum ama neyse... :) iyi çalışmalar.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 01:07 -->-> Daha önceki mesaj 00:42 --

Evt arkadaşlar log'larda gezerken ufak birşey dikkatimi cekti neden'se benim Vagrant'a verdigim kod ile burdaki kod aynı :) hatta log'larda var;

Kod:

[22:32:18] Ident Oturumu:  Vagrant (v2.3cb@78.181.E7B62AF0.DF8A7324)
[22:32:18] <Vagrant> GhoSt
[22:32:26] <02GhoSt> efendim
[22:32:28] <Vagrant> üstad musayit misin.
[22:32:33] <02GhoSt> evet
[22:32:33] <Vagrant> yine bi kod isticem senden
[22:32:45] <Vagrant> Forumdada goruyon kendı capımda bırsey yapmaya calısıyom.
[22:32:57] <Vagrant> 1 kod yapayım dedım beceremedım.
[22:33:00] <Vagrant> Yardımcı olur musun
[22:33:04] <02GhoSt> elbette
[22:33:07] <02GhoSt> elimden gelen birşeyse
[22:33:12] <Vagrant> Baştan analtım ozaman.
[22:33:16] <02GhoSt> tm
[22:33:25] <Vagrant> Opers < Kanal'ı ıcın Misal
[22:33:42] <Vagrant> GhoSt[dısarda]/[gelecem] < gibi takı alıyorlar.
[22:33:53] <02GhoSt> evet
[22:33:59] <Vagrant> Ben istiyorum ki ; GhoSt[Away]/[MesguL] < Gibi alsınlar.
[22:34:24] <02GhoSt> peki sock bot degilmi ?
[22:34:25] <Vagrant> Bu ( away,mesgul ) takısı hariç takı alırlarsa , tekrardan ana nick'lerine cevrilsin istiyorum.
[22:34:42] <Vagrant> 1'i socket. Dierleri mIRC'ten giriş yapıyor.
[22:34:50] <Vagrant> Bu konuda yardımcı olur musun.
[22:35:05] <02GhoSt> olurum'da socket'e yapcan degilmi
[22:35:20] <Vagrant> Evet.
[22:35:35] <Vagrant> Lakin Sıfırdan yazılması lazım. Ben 1-2 deneme yaptım ama.Beceremedim.
[22:35:51] <02GhoSt> nick eventi'^ne
[22:36:12] <02GhoSt> if *[gelecem]* iswm $remove($gettok($1,1,33),:) {
[22:36:12] <Vagrant> GhoSt ; Hocam istersen team vereyım ?
[22:36:18] <02GhoSt> 1dk :)
[22:36:22] <Vagrant> pardon.
[22:36:24] <02GhoSt> anlatıyım sonra yaparız
[22:36:31] <Vagrant> peki hocam.
[22:36:49] <02GhoSt> mesala; sadece [gelecem] olarak yapalım
[22:37:23] <02GhoSt> if $2 == NICK  { if *[gelecem]* iswm $right($3,-1) {  sw $sockname whois $right($3,-1) } }
[22:37:30] <02GhoSt> ekliycez sonra;
[22:37:36] <02GhoSt> 319'rawda
[22:37:50] <02GhoSt> kanalları saydırcaz eger icinde #Opers' varsa komut uygulatcan bu kadar :)
[22:38:15] <02GhoSt> yardımcı oluyummu yoksa sen yaparmısın
[22:38:19] <02GhoSt> fikri söyledim ben
[22:38:31] <Vagrant> abim sen yapsan
[22:38:35] <02GhoSt> yada
[22:38:39] <Vagrant> ben beceremicem biliom
[22:38:41] <02GhoSt> kısaca whois cekmeyek
[22:38:46] <02GhoSt> who +cn #opers nick
[22:38:52] <02GhoSt> 352'de biter
[22:38:53] <02GhoSt> oke
[22:39:03] <02GhoSt> dur hatta' botum acık benım
[22:39:09] <02GhoSt> onun üzerinde yapıyım
[22:40:14] <02GhoSt> away takıları soylermısın
[22:40:59] <Vagrant> Mesgul / Away < bu kadar
[22:41:10] <02GhoSt> yok diger istenilmeyen takılar
[22:41:22] <Vagrant> oo o epey var
[22:41:31] <Vagrant> Mesgul / Away <  farklı alırsa değissin olmaz mı
[22:42:01] <02GhoSt> hım olmaz işte :)
[22:42:11] <02GhoSt> adam /nick ibrahim yaparsa
[22:42:14] <02GhoSt> yine degişir :)
[22:42:17] <Vagrant> Aynen
[22:42:29] <Vagrant> Opers'de hangı nıckıyle operse o nıckte kalsın
[22:42:38] <Vagrant> mıllet cocukca nıckler degısıor.
[22:42:44] <Vagrant> anlasınlar ıstıyorum.
[22:43:06] <02GhoSt> ozaman nick degişdirdimi tekrar eski nickinemi geçsin
[22:43:49] <Vagrant> Aynen. Oper nicki neyse ona gecsın
[22:44:33] <02GhoSt> aslında söyle yapmak daha mantıklı olur
[22:44:36] <02GhoSt> adam oper girdiginde
[22:44:44] <02GhoSt> girdigi oper nick ile nick aynı degilse
[22:44:52] <02GhoSt> kill atsın yada o nick'e gecirsin
[22:45:04] <Vagrant> onu yaptım: Farklı nıckle girip Oper giriyorsa oper nickine cevırıyor.
[22:45:12] <Vagrant> ama : Ornek
[22:45:16] <Vagrant> GhoSt nıckı
[22:45:25] <Vagrant> GhoSt[yemekteyım]
[22:45:29] <Vagrant> gıbı nıckler alan var
[22:45:43] <Vagrant> Away/mesgul takı haric alan oto oper nickine gecsın ıstıorum.
[22:46:02] <02GhoSt> hım söyle yapalım ozaman
[22:46:09] <02GhoSt> nickin icinde [ ] gecerse
[22:46:17] <02GhoSt> eski nickine geri geçsin
[22:46:25] <02GhoSt> yada takıları belirliyelim
[22:46:29] <Vagrant> GhoSt[away]
[22:46:33] <Vagrant> yaparsa da ıslıcek
[22:46:36] <Vagrant> ozaman muaf tutmamız lazım.
[22:47:16] <02GhoSt> away ile mesgul'u
[22:47:20] <02GhoSt> muaf tutarız
[22:47:33] <Vagrant> tmm hocam
[22:47:36] <Vagrant> uygundur.
[22:48:45] <02GhoSt> tmm o halde öyle yapalım
[22:49:22] <Vagrant> Tamam bekliyorum.
[22:55:15] <02GhoSt> Vagrant
[22:55:24] <02GhoSt> peki hangi nick'e alcak takıyı sildircekmiyiz ?
[22:56:47] <02GhoSt> buyur
[22:56:48] <02GhoSt> 
[22:56:48] <02GhoSt>      if ($2 == NICK) { if $regex($right($3,-1),/(dısarda|yemekteyım)/i) || !$regex($right($3,-1),/(away|mesgul)/i) { set -u2 %opnickdeg oke! | set -u2 %enickop $botfnick($1) | sw $sockname who +cn #Opers $right($3,-1) } }
[22:56:49] <02GhoSt>  if $2 == 352 { if (%opnickdeg == oke!) { sw $sockname os raw svsnick $8 %enickop } }
[22:56:54] <02GhoSt> denemedim :)
[22:57:05] <Vagrant> başı ne olcak
[22:57:08] <Vagrant> direk bumu hocam
[22:57:12] <02GhoSt> evet
[22:57:26] <02GhoSt> $botfnick($1) yerine $remove($gettok($1,1,33),:) yaz
[22:58:08] <Vagrant> if ($2 == NICK) { if $regex($right($3,-1),/(dısarda|yemekteyım)/i) || !$regex($right($3,-1),/(away|mesgul)/i) { set -u2 %opnickdeg oke! | set -u2 %enickop $remove($gettok($1,1,33),:) | sw $sockname who +cn #Opers $right($3,-1) } }
[22:58:08] <Vagrant> if $2 == 352 { if (%opnickdeg == oke!) { sw $sockname os raw svsnick $8 %enickop } }
[22:58:14] <Vagrant> bumudur
[22:58:30] <02GhoSt> evet
[22:58:45] <02GhoSt> $botfnick($1) alias kısaltması sende kullan aklında kalır :)
[22:58:51] <02GhoSt> alias botfnick { return $remove($gettok($1,1,33),:) }
[22:59:07] <Vagrant> [22:59:51] *** Vagrant Nick değişerek Deneme-123 Oldu
[22:59:12] <Vagrant> Olmadı sanırsam
[22:59:20] <02GhoSt> $regex($right($3,-1),/(dısarda|yemekteyım)/i)
[22:59:30] <02GhoSt> away takılarını ekledim sadece
[22:59:43] <02GhoSt> hım 1 dk yanlııs anlamısım
[22:59:46] <02GhoSt> hemen ayarlayım
[22:59:50] <Vagrant> Hanı abim. Away/mesgul'den baska takı alırsa. değişcekti :D
[22:59:55] <Vagrant> tmm tmm sorun deıl bekliyorum ustad.
[23:01:33] <02GhoSt> 
[23:01:33] <02GhoSt>  if ($2 == NICK) { if !$regex($right($3,-1),/(away|mesgul)/i) { set -u2 %opnickdeg oke! | set -u2 %enickop $remove($gettok($1,1,33),:) | sw $sockname who +cn #Opers $right($3,-1) } }
[23:01:33] <02GhoSt>  if $2 == 352 { if (%opnickdeg == oke!) { sw $sockname os raw svsnick $8 %enickop } }
[23:01:35] <02GhoSt> buyur
[23:01:38] <02GhoSt> nickin icen'de
[23:01:45] <02GhoSt> away/mesgul geçmiyorsa
[23:01:52] <02GhoSt> eski nick'e geri geçer
[23:02:41] <Vagrant> [23:03:09] *** Vagrant Nick değişerek Vagrant[deneme] Oldu
[23:02:47] <02GhoSt> degişmedimi ?
[23:02:59] <Vagrant> yok hocam
[23:03:32] <Vagrant> Team vereyim mi ? isterseniz.
[23:06:15] <02GhoSt> Vagrant
[23:06:19] <02GhoSt> hata yok ama esik var
[23:06:21] <Vagrant> buyur abim.
[23:06:22] <02GhoSt> nerde biliyonmu :)
[23:06:27] <Vagrant> :D nirde.
[23:06:48] <02GhoSt> 0:1 esik
[23:06:48] <02GhoSt> :)
[23:07:35] <02GhoSt> ufak birşey daha esik bot nick degişdirdigi için onuda algılıyor ufak bi if ekleyelim 1 dk
[23:08:44] <Vagrant> tmm hocam.
[23:09:45] <02GhoSt> «23:09:39» Nickiniz suan deneme olarak değiştirildi.
[23:09:45] <02GhoSt> «23:09:39» Nickiniz suan GhoSt olarak değiştirildi.
[23:09:46] <02GhoSt> :)
[23:09:58] <Vagrant> tmm'dır :D
[23:10:01] <Vagrant> Alayım üstad :D
[23:10:16] <02GhoSt> 
[23:10:16] <02GhoSt>      if ($2 == NICK) { if !%degişdi { if !$regex($right($3,-1),/(away|mesgul)/i) { set -u2 %opnickdeg oke! | set -u2 %enickop $remove($gettok($1,1,33),:) | swbot who +cn #Yönetim $right($3,-1) } } }
[23:10:16] <02GhoSt>  if $2 == 352 { if (%opnickdeg == oke!) { set -u1 %degişdi oke! | swbot os raw svsnick $8 %enickop 0:1 } }
[23:11:14] <Vagrant> #yönetimi < #Opers
[23:11:16] <Vagrant> yapıyorum
[23:11:18] <02GhoSt> evet
[23:11:24] <02GhoSt> bizim orda #yönetim'de
[23:11:27] <02GhoSt> unutmusum


Dikkat;

Kod:

[22:56:48] <02GhoSt>      if ($2 == NICK) { if $regex($right($3,-1),/(dısarda|yemekteyım)/i) || !$regex($right($3,-1),/(away|mesgul)/i) { set -u2 %opnickdeg oke! | set -u2 %enickop $botfnick($1) | sw $sockname who +cn #Opers $right($3,-1) } }
[22:56:49] <02GhoSt>  if $2 == 352 { if (%opnickdeg == oke!) { sw $sockname os raw svsnick $8 %enickop } }
[22:56:54] <02GhoSt> denemedim :)


Med Cezir 27 Kasım 2012 02:57

Cevap: /* Away|MesguL Hariç Nick takısı yasağı */
 
Konu amacı dışına çıktığı vede manipülasyona açık bir konu olduğu için tarafımca kilitlenmiştir.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:13.

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