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/)
-   -   Event'lardaki ^@* gibi Karakterlerin Anlamları (https://www.ircforumlari.net/mirc-scripting-sorunlari/2290-eventlardaki-gibi-karakterlerin-anlamlari.html)

MaeLStrOm 15 Nisan 2005 23:21

Event'lardaki ^@* gibi Karakterlerin Anlamları
 
yha arkadaşlar remotelerde kullanıyorus ve seviye deniyor sanırım ama anlamını kavramış değilim.ßilgisi olanlardan yardım bekliorum. mesela on 1:TEXT:sjds:sdı ne ßilim ßoyle ßi$e var ya ßa$ında ki ßir sayısı yerinde ßazen @ ßazen ! ßazen ßa$ka ßir sayı oluor. ne i$e yarıo ßunlar acaßa?

Flyman 16 Nisan 2005 01:53

onlarin basindaki mesela @ isareti o kodun sen op oldugunda calismasi gerektigini belirtiyor

MephisTo 16 Nisan 2005 15:02

User level ya da access level diye geçer scripting'de. Ne işe yarar onu anlatalım...

1. seviyedeki olaylara herkes erişim sahibidir. Yani:

on 1:text:selam:?: { msg $nick sana da selam }

Özele kim selam yazarsa yazsın sen de onun özeline "sana da selam" yazarsın otomatik olarak.

Bu seviyeyi 2 3 4 400 400000 4000000000000 vs diye değiştirebilirsin.
Herhangi bir IP adresi, ident veya nicki userlist dediğimiz bu seviyelerin kaydedildiği yere ekleyebilirsin. Örneğin 100. seviyeden birini eklemek istersen /auser 100 nick!*@* yapıp eklersin. Veya *!ident@* *!*@IP şeklinde de ekleyebilirsin. Silmek için de /auser yerine /ruser kullanacaksın.

"İyi güzel hoş yapmış amcam da, bunlar ne işe yarar ki?" diye bir soru belirirse kafanda onu da anlatalım.

User level'lerin en çok kullanıldığı olay kesinlikle karalistelerdir. Örnek bir karaliste:

on @666:join:#: { mode $chan +b $nick | kick $chan $nick Karalistedesin. }

Basit bir karaliste :) Nickleri karalisteye eklemek için /auser 666 nick!*@* yazabilirsiniz.

Peki bu baştaki @ ! gibi işaretler ne işe yarar?

Bu tür işaretler userlevelden önce gelir. Yani 1 2 3 4 400 400000 vs gibi seviyelerden hemen önce gelir. @666 @1 gibi.

@ işaretini kullandığımızda bu kod eğer siz o kanalda opsanız işe yarar. Yani
if $me isop $chan kullanmak yerine @ işaretiyle olayı bitirebilirsiniz.

^ işareti genelde notice ve textlerde kullanılır ama koruma olarak kullanılmaz. Mesela noticeleri başka bir pencerede gösterirken ^ işaretini kullanırsanız noticeyi daha mIRC göstermeden o pencereye taşırsınız. Yani mIRC klasik işlemini yapmadan önce siz olaya el koymuş olursunuz. Örneğin:

on ^*:notice:*not*registered:?:{ if $nick == ChanServ { echo -a Bu nick kayıtlı değil. | halt } }

^ kullanırken halt ı mutlaka kullanmanız gerekiyor. Yoksa hem aktif pencerede bu nick kayıtlı değil uyarısı çıkar, hem de chanserv'den gelen The nickname xxx is not registered uyarısı çıkar. Ama halt ve ^ işaretini kullandığınızda chanserv in uyarısı yerine bu uyarı çıkar.

+ işareti kullandığınızda sadece o seviyedeki user'lar bu olaya erişim sahibi olurlar. Örneğin:

on 5:text:asd:?:{ msg $nick asd ne demek yahu? }

5. seviye ve üstündeki kişiler özelinize asd yazdığınızda asd ne demek yahu? diye cevap verir otomatik olarak onlara. Ama:

on +5:text:asd:?:{ msg $nick asd ne demek yahu? }

yaptığınızda sadece 5. seviyedekilere cevap verir. 6. seviye veya 7 8 9000. seviyedekiler bu olaya erişim sahibi değillerdir.

* işareti de bütün seviyedeki nickler için geçerlidir.

Anlamadığın bir yer var mı?

DefauLt 16 Nisan 2005 16:26

Güzel anlatmışsın kardeşim. Ben de biraz eklenti yapayım.

! öneği (örnek on !1:text):
Örneğin, 1 leveli herkese açık. Fakat siz 1 levelini öne sürerken, ekstradan sizin listenizde de bulunup bulunmadığını kontrol ettirmek istiyorsunuz. Bu gibi durumlarda ! kullanılır.

& öneği (örnek on &*:text:):
Bu öneği kullandığınızda, mIRC bu eventı en son olarak değerlendirmeye alır. Eğer aynı eventta, başka bir kodunuzda halt veya haltdef ile durdurma yapmışsanız, işleme konulmaz. Eğer event başka bir kodunuzda durdurulmak istenmemişse bu event en son devreye girer.

$ öneği (örnek on $*:text:m//switches:):
Bu önek regular expression'dan çeviri yapmak için kullanılır. İşleme konulması için belirli koşulları vardır. İlgilenenler araştırma yapabilir.

AlemTEAM 16 Nisan 2005 16:35

gerçekten güzel anlatımlar! bi konu seçeyim de akşama bi anlatımda ben yapayım :P

MephisTo 16 Nisan 2005 16:40

Alıntı:

DefauLt Nickli Üyeden Alıntı
Güzel anlatmışsın kardeşim.

Teşekkürler DefauLt, sensiz olmuyor gerçi :P

Alıntı:

AlemTEAM Nickli Üyeden Alıntı
gerçekten güzel anlatımlar!

Teşekkürler :)


Alıntı:

AlemTEAM Nickli Üyeden Alıntı
bi konu seçeyim de akşama bi anlatımda ben yapayım :P

Aslında çok iyi coder'lar var bu forumda, bu tür şeylere ağırlık verirsek güzel olur. Seviniriz :)

MaeLStrOm 16 Nisan 2005 21:34

cok teşekkür ederim bilgili olupta bizi umursayan insanları gormek gercekten cok güzel..

WingmaN 17 Nisan 2005 09:46

Alıntı:

maelstrom Nickli Üyeden Alıntı
cok teşekkür ederim bilgili olupta bizi umursayan insanları gormek gercekten cok güzel..

Burda sen , ben diye bir ayrım yok :) Herkesin yardım edilmesi gereken yanları vardır ;)

ReaLizm 25 Nisan 2005 10:01

Bu forumda gerçekten istenildigi taktirde çok güzel ve yararlı bilgiler ögrenilebiliyor ama bunları ögrenmek için istemek lazım:)

Pegasus 28 Nisan 2005 10:26

valla burda herkez birbirine yardım cı oluyor burası bence bu alemin gerçek yardım portalı gidip başka biyerde desen adam sana bukadar uzun yazı yazmakla uraşmaz bile

MephisTo 16 Mayıs 2005 17:22

Alıntı:

PeGaSuS Nickli Üyeden Alıntı
burası bence bu alemin gerçek yardım portalı gidip başka biyerde desen adam sana bukadar uzun yazı yazmakla uraşmaz bile

Geç oldu biraz cevap vermek için ama içimde kalmasın :) Kim benim gibi düşünüyor bilemem fakat elbet insan bir yerden sonra sıkılır bu kadar kod yaz et cart curt, anlatımlara yoğunluk gösterirsek bizim yerimizi alacak arkadaşlar yetiştirebiliriz. Boş vakitlerimde yapmaya çalışıyorum birşeyler ama yetmiyor vaktim bu aralar. İngilizcesi olan ve mIRC hakkında biraz bilgisi olan arkadaşlar help dosyasında çeviri yapabilir mesela, o kadar da zor birşey değil.

Death 03 Haziran 2005 11:39

valla okumadim yazilanlari ama ben de yazayim. mesela userlist'inde 5. seviyeden kisiler etkilensin diyosan o sayi yerine 5 yazarsin. 1 = herkes demek sanirim.
mesela 5. user seviyesine kötü nickleri eklersin ve şöyle bi kod yaparsIn :

on 5:JOIN:#: { kick $nick kötü nick }

(unutmusum kodlari.... :( )

DontpaniC 26 Nisan 2007 20:59

Yanıt: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
on 1:text:selam:?: { msg $nick sana da selam }

ßurdaki "?" Ne anLama GeLiyo :S Ögrencem Hepsini Kacarı yok :)

McKruGer 26 Nisan 2007 22:52

Cevap: Yanıt: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Alıntı:

DontpaniC Nickli Üyeden Alıntı
on 1:text:selam:?: { msg $nick sana da selam }

ßurdaki "?" Ne anLama GeLiyo :S Ögrencem Hepsini Kacarı yok :)

? işareti orada özeline biri selam verdiği zaman kodun işlemesi içindir. Eğer kanalda sana selam verildiği zaman sen otomatik vermesini istiyorsan o ? işaretinin yerine # işaretini koyacaksın. yani:

on 1:text:selam:#: { msg $nick sana da selam } kodu olur.

DontpaniC 27 Nisan 2007 01:02

Yanıt: Cevap: Yanıt: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Alıntı:

McKruGer Nickli Üyeden Alıntı
? işareti orada özeline biri selam verdiği zaman kodun işlemesi içindir. Eğer kanalda sana selam verildiği zaman sen otomatik vermesini istiyorsan o ? işaretinin yerine # işaretini koyacaksın. yani:

on 1:text:selam:#: { msg $nick sana da selam } kodu olur.

Yani özeLde Gecen Text anLâmInda dimi :S özeL ıcın kuLLanıyoruz yani.

_KaRiNCa_ 12 Ekim 2007 22:49

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
# = kanal içindir
? = özel içindir
* = hem kanal hem özel içindir

örnek

on 1:text:#:S.a: { msg $chan A.s $nick }
şeklinde ewentimizi açarsak kanalda birisi S.a dediğinde oto A.s deriz o nicke.

on 1:text:?:S.a: { msg $nick A.s $nick eğer meşgul değilsem özelime bakacağım yoksa biraz bekleticem (: }
şeklinde açarcak ewenti özelimize bi nick S.a yazdığında oto A.s nick vs. vs.

on 1:text:*:S.a: { msg $nick A.s $nick }
şeklinde olursa özelde yada kanalda S.a denildiğinde o nicke A.s deriz

Vamp 23 Kasım 2007 14:41

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
/auser 666 nick!*@* diye ekledıgımızde nıcke ve ipe ban attıktan sonra kıckliyor.Ben burda Sadece nıcke ban Ve ondan sonra kick atmak ıcın ne yapabılırım?
Birde Bu 666 yazıyorum basına bununda ne anlama geldıgnı bılmıyorum.

L4roXyL 23 Kasım 2007 16:08

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
/auser bir remote komutu'dur.
mIRC Help dosyasından belirtilen kullanım biçimi;
/auser [-a] <levels> <nick|address> [info]
Şeklindedir.

Yani auser kullanıcı listesi oluşturmak, isteğe göre bu kullanıcı listesine işlev yapmak için kullanılır.
Örneğin; /auser 60 deneme yaptığımızda, deneme kullanıcısı 60 level(değer) olarak kullanıcı listesine eklenir.
Mesela 60 olarak belirttiğimiz değer'e işlev yapalım.
Örneğin, 60 değer'ine eklediğimiz nick'lerden herhangi birisi kanal'a giriş yapar ise, kanal'dan uzaklaştıralım.

on 60:join:#: { if $me isop # { ban -k # $nick 2 Yasaklı auser listesindesiniz. $level($nick) } }

Buradalk $level eklenilen verinin levels değerini verir.
Yani yukarıda belirttiğimiz gibi, /auser 60 deneme yaptığımızda;
//echo -a $level(deneme) yaparsak, 60 sonucunu alırız.

Birde; /auser için $ulist(kullanıcı,level,N) identifier'ı vardır.
//echo -a $ulist(*,60,0) yaptığında, 60 olarak belirlediğin level'deki verilerin sayısını alırsın.

Kullanıcı listesine eklediğimiz deneme verisini silmek içinse; /ruser deneme yapman yeterli olur.


Şimdi gelelim senin sorununa;
/auser ile eklediğin verinin yapıcağın işlev ile alakası yoktur.
Yani sorgulamadan sonraki işlev ile nick'e ve IP'e ban atıyorsundur.
Sadece nick'e ban ve kick uygulatmak istiyorsan;

on 666:join:#: { if $me isop # { mode # +b $nick | kick # $nick sebeb. } }

Şeklinde yapabilirsin.

Vamp 23 Kasım 2007 16:32

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
ÖnceLikLe Çok Tşk EDerım.Uzun zamandır Foruma bakardım ancak kendım ugrasmaya bugun başladım.
on 666:join:#: { if $me isop # { mode # +b $nick | kick # $nick sebeb. } }

Şeklinde yapabilirsin. Demişşin Peki bunu

on 666:join:#: {@ # { mode # +b $nick | kick # $nick sebeb. } }
Şeklindede yapabılırmıyız?
Ayrıca Bunlar Benım Halfop oldugum kanalda calısırmı. (Calışmaz gıbı gorunuyor.) Onun ıcınde (@,%) seklınde bı ekleme yaparsak halfop oluncada calısırmı?
[16:38] * .... sets mode: +b [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
VE senın verdıgıni ekledım yine ıpe ban attı.

L4roXyL 23 Kasım 2007 17:36

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Tabiki @ # şeklinde olmaz.
Şöyle yapabilirsin;

on 666:join:#: { if $count($nick(#,$me).pnick,@,&,%,~) >= 1 { mode # +b $nick | kick # $nick sebebin. } }

Denedim ve kesinlikle nick'e ban atıyor.

sh4d3 23 Kasım 2007 21:00

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Peki ! işareti neye yarıyor bunuda açıklarmısınız?

SuNSeT 23 Kasım 2007 21:53

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Bildigim kadariyla, ! (ünlem) işareti o kod'un kendi üstünde calişmamasi dir.

L4roXyL 23 Kasım 2007 21:55

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
"!" karakter'inin mantığı basit aslında.
Şöyleki;
on *:join:#: şeklinde bir event düşünün.
Buradaki; *: kısmı dışarıdan veri girenler demektir.
Yani mantık şu, kanal'a giren kullanıcı nerden gidiyor? Tabiki dışardan.
Yani buradaki * karakter'i onun için kullanılır.

Şimdi gelelim mantığa, bir kanal'a girerken biz'de dışardan giriyoruz.
İşte burada event başına ! karakterini koyunca, biz girdiğimiz'de event negatif oluyor. Yani deaktif oluyor.
Yani aslında şöyle oluyor, sizin anlıyacağınız bir dille anlatmak istiyorum zor oluyor ama :)
Kısacası şu; ! karakterini event başına koyarsanız, sizi kapsıyan veriler'i görmez.

Örnek verelim;

on *:join:#:msg # $nick hoşgeldin.
Yaptığımız'da kanal'a giren biz dahi olsak msg işlevini gerçekleştirir.
Ama eğer event başına ! karakter'ini koyarsak gerçekleştirmez.
on !*:join:#:msg # $nick hoşgeldin.

Bir örnek daha verelim;
on *:voice:#:msg # $vnick voice oldun.
Yaptığımız'da $vnick biz dahi olsak msg işlevini gerçekleştirir.
Ama yine event başına ! karakterini koyar isek, gerçekleştirmez.
on !*:voice:#:msg # $vnick voice oldun.

sh4d3 23 Kasım 2007 22:36

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Peki L4roXyL bi koruma yaparken diyelim

Kod:


on @*:text:*:#:{
  if ($nick == $me) { halt }


Böyle yapılıyor bunu kısa yoldan

Kod:


on !@*:text:*:#:{


veya


Kod:


on @!*:text:*:#:{


gibi gibi yapabilirmiyiz o 2. satırı kaldırmak için?

L4roXyL 24 Kasım 2007 00:22

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
İşte bu önemli bir olay.
on *:text:*:#: event'inde ! kullanmana gerek yoktur.
Çünki buradaki mantık yukarı'dada söylediğimiz gibi, event başında * dışarıdan gelen veriler için kullanılır.
Yani on text event'inde dışarıdan gelen text'ler için uygulanır.
Sen dışardan içeriye text gönderemezsin, içeriden dışarıya gönderebilirsin.
Bu yüzden on text event'inde ! kullanmaya gerek yoktur.

Ayreıca;
on *:text:*:#: { if $nick == $me { halt } olayı geçersizdir.
Yani $nick == $me olamaz bu kullanımda.

sh4d3 24 Kasım 2007 00:29

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Peki dışardan gelen text mesajları değilde diyelim op olunduğunda

Kod:


on @!*:op:#:{


böylemi yoksa


Kod:


on !@*:op:#:{


böylemi yapılması lazım?

L4roXyL 24 Kasım 2007 00:54

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Mesela;
on *:op:#:msg # $opnick op oldun.
Şeklinde bir snippet var.
Burada op olan kim olursa olsun, msg uygulanır.
Ama eğer event başında, ! kullanırsan ve op veren sen isen, msg uygulanmaz. Yani çalışmıyacaktır.
Op veren başkası ise, msg yine uygulanır.

Senin dediğine tam olarak gelince, kullanmak istediğin işlev'e bağlı olarak,
Mesela diyelim'ki;
Eğer kanal'da op veren ben değilsem ve kanal'da op isem;
on @!*:op:#:
Şeklinde yapabilirsin.

sh4d3 24 Kasım 2007 13:11

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Hah şimdi oldu.:)

Sabahtan beri bunu demeye çalışıyordum..

Önce ünlemmi yoksa @mi

sonunda almam gereken cevabı aldım

tşk ederim...

Martinus 21 Şubat 2008 03:55

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Cidden cok güzel bilgiler.

Elix 13 Nisan 2009 01:12

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
on !*:voice:#:msg # $vnick voice oldun.
peki bunu
on !*:op:#:msg # $vnick operator oldun.
$vnick olarak yazılan yeri $?nick yapmamıs lasım. ve +a +q -a -q bunları nasıl bellirteblliriz .

uFuK 13 Nisan 2009 01:40

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
ELix $?nick şeklinde çalışacağını sanmıyorum denemedim ama öyle çalışmaz.

+a +q gibi modları değiştirmek için rawmode kullanırız.

PHP- Kodu:

on *:Rawmode:#:{  
  
if ($== +o)  {  
    
msg $chan Op Oldun TebriklerGörürüm Ben Seni Şimdi.. (: 
  }  


+o'yu editle kendine göre.
+v olur +h olur +a olur vs. vs..

Elix 13 Nisan 2009 01:47

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
tesk ederim orda benim $?nick den kasdım. $vnick kullanımındaki v nicn yerine ne gelmesi lasım anlamında idi .

uFuK 13 Nisan 2009 02:07

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
$opnick = Operatör
$vnick = Voice
$hnick = halfop

Elix 13 Nisan 2009 18:17

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
+a ve ~ +q nasıl oluyor ilgin icin teskler. ayrıca.

FLu 19 Mayıs 2009 20:06

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Güzel yararlı paylaşımlar olmuş teşekürler..

Heavenly 21 Mayıs 2009 12:15

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Kod:

on @*:TEXT:*:#:{
  var %::chan = $chan
  var %::nick = $nick
  var %p = 0
  while (%p < $numtok($1-,32)) {
    inc %p
    if ($nick !isop $chan) {
      if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
      zline %::nick 5 TERBİYELİ  OL ! ! !  2 Küfür Aciz insan'ların  İşidir 1 !!! 7 $server 4 $me   2 BanLanan nick : %::nick 5 $date 4 $time 1BakSen ServeR 2SeCurity 14ProteCtiOns 12Systems | Window -e @RAPOR | titlebar @RAPOR Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @RAPOR »10 Suç:7 KüFüR :(4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
     
    }
  }
}

elımde su sekılde bı kufur koruma kodu var zlıne'a cevırdım cokta guzel calısıyo ama event'tekı on @*:TEXT:*:#:{ @ 'u sılıpte calıstırmayı denedım calısmadı ılla @'tayken calısıyo ama deop'ken calısmıyo burda ne gıbı bı yanlıslık yapmıs olabılırım acaba?


Kod:

on @*:TEXT:*:#:{
  var %::chan = $chan
  var %::nick = $nick
  var %p = 0
  while (%p < $numtok($1-,32)) {
    inc %p
    if ($nick !isop $chan) {
      if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
      zline %::nick 5 TERBİYELİ  OL ! ! !  2 Küfür Aciz insan'ların  İşidir 1 !!! 7 $server 4 $me   2 BanLanan nick : %::nick 5 $date 4 $time 1BakSen ServeR 2SeCurity 14ProteCtiOns 12Systems | Window -e @RAPOR | titlebar @RAPOR Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @RAPOR »10 Suç:7 KüFüR :(4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
     
    }
  }
}
on @*:action:*:#:{
  var %::chan = $chan
  var %::nick = $nick
  var %p = 0
  while (%p < $numtok($1-,32)) {
    inc %p
    if ($nick !isop $chan) {
      if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
    zline %::nick 5 TERBİYELİ  OL ! ! !  2 Küfür Aciz insan'ların  İşidir 1 !!! 7 $server 4 $me   2 BanLanan nick : %::nick 5 $date 4 $time 1BakSen ServeR 2SeCurity 14ProteCtiOns 12Systems | Window -e @RAPOR | titlebar @RAPOR Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @RAPOR »10 Suç:7 KüFüR :(4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
     
    }
  }
}
on @*:notice:*:#:{
  var %::chan = $chan
  var %::nick = $nick
  var %p = 0
  while (%p < $numtok($1-,32)) {
    inc %p
    if ($nick !isop $chan) {
      if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
      zline %::nick 5 TERBİYELİ  OL ! ! !  2 Küfür Aciz insan'ların  İşidir 1 !!! 7 $server 4 $me   2 BanLanan nick : %::nick 5 $date 4 $time 1BakSen ServeR 2SeCurity 14ProteCtiOns 12Systems | Window -e @RAPOR | titlebar @RAPOR Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @RAPOR »10 Suç:7 KüFüR :(4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
     
    }
  }
}
alias badword {
  if ($1 == add) {
    set %badwords $addtok(%badwords,$2,32)
    echo -a 14»1»15»1 Listeye $2 Eklendi..!
  }
  if ($1 == del) {
    if ($istok(%badwords,$2,32)) {
      set %badwords $remtok(%badwords,$2,32)
      echo -a 14»1»15»1 Listeden $2 Silindi..!
    }
  }
  if ($1 == delall) {
    unset %badwords
    echo -a 14»1»15»1 Kufur Listesi Boşaltıldı..!
  }
  if ($1 == list) {
    if ($window(@Kufur-List) == $null) {
      window -ab @Kufur-List
    }
    if ($numtok(%badwords,32) == 0) { aline @Kufur-List 14»1»15»1 Listede Hicbir Kelime YoK..! | halt }
    aline @Kufur-List 14»1»14»1 KufurLu Kelimeler Listeleniyor... 4ToPLam Kufur : ( $+ $numtok(%badwords,32) $+ )
    var %n = 1
    while (%n <= $numtok(%badwords,32)) {
      aline $color(info 2) @Kufur-List 4»»» $gettok(%badwords,%n,32)
      inc %n
    }
    aline @Kufur-List 14»1»15»1 LisTe Sonu ..
  }
}
alias Badword dialog -m Badword Badword
dialog Badword {
  title "Kufur Koruma"
  size -1 -1 355 200
  button "«:KaPaT:»"2, 25 125 300 25,ok
  button "«:Kufur Korumayı Aktif Yap:»"3, 25 25 150 25
  button "«:Kufur Korumayı KapaT:»"4, 175 25 150 25
  button "«:Kelime EkLe:»"5, 25 50 150 25
  button "«:KeLime SiL:»"6, 175 50 150 25
  button "«:Listedeki Tum Kelimeleri SiL:»"7, 25 75 300 25
  button "«:Kufur Listesine Bak:»"8, 25 100 300 25
  box "Kufur Koruma "9, 2 1 350 190
}
on 1:dialog:Badword:sclick:*:{
  if ($did == 3) { /set %badword.detect on | echo -a 3«(14 *** Kufur Koruması Simdi ACIK 3)» }
  if ($did == 4) { /unset %badword.detect | echo -a 3«(14 *** Kufur Koruması Simdi KAPALI 3)» }
  if ($did == 5) { /badword add $$?="Kufur Gir:" }
  if ($did == 6) { /badword del $$?="Kufur Gir:" }
  if ($did == 7) { /badword delall }
  if ($did == 8) { /badword list }
}
Menu Channel {
  |-Kufur Koruma-|:/dialog -m Badword Badword
}
alias badnick { Window -e @RAPOR | titlebar @RAPOR Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @RAPOR »10 10Suç:7BaDnick 10Nick:7 $nick 10KaNaL:7 # 10 BaN Süresi:7 Süresiz 10 Zaman:7 $time | ban # $nick 2 | kick # $nick 4 $chan 12 kanaLı 2Sohbet odalaSı kurallarına ( 4 Uygun bir nick KuLLanmama 2) sebebinden dolayı  4 $chan 2 odasından 4 Süresiz 2 uzakla$tırıldınız.Daha fazla bilgi icin 4/motd 2yazınız ! | halt }
#blacklist on
on karaliste:JOiN:#:{
  var %::chan = $chan
  var %::nick = $nick
  if (%nickkor == ON) {
  zline %::nick 5 TERBİYELİ  OL ! ! !  2 Küfür Aciz insan'ların  İşidir 1 !!! 7 $server 4 $me   2 BanLanan nick : %::nick 5 $date 4 $time 1BakSen ServeR 2SeCurity 14ProteCtiOns 12Systems
 
  }
}
#blacklist END

buda kodun tamamı

StanteaR 28 Mayıs 2009 14:12

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Arkadaslar mircimdakı bazı korumalarda koruma acık olarak deop ıken o korumalar o kısıyı atmaya calısıyor ve oyle oluncada Mirc Operator degılsınız uyarısı verıyor ben sadece op ıken o işlemi yapmak ıstıyorum deop ıken calısmasını ıstemıyorum onun ıcın hangı ıslemı yapmam gerekır

Lucifer 28 Mayıs 2009 17:44

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
Korumalarının Başlarına @ işareti eklersen Op olduğunda çalışacaktır.

Örnek ;

on @*:TEXT:*:#:{
on @*:Join:*:#:{

Bu şekilde sadece Op olduğunda kodun işlem yapar, deopken yapmaz.

Heavenly 29 Mayıs 2009 12:42

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
on *:TEXT:*:#:{
on *:Join:*:#:{

şu sekılde duzelttıgımde ıslev gorur mu? denedım ıslev gormedı cunku

canatan1982 29 Mayıs 2009 21:55

Cevap: Event'lardaki ^@* gibi Karakterlerin Anlamları
 
slmsavaştanrısı zeusun sonu olacak ölümsüzmuhteşemkarizmanın tanımlayıcısı


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

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