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/)
-   -   Muaf Nick-Kanal (https://www.ircforumlari.net/mirc-scripting-sorunlari/541799-muaf-nick-kanal.html)

Toprak 07 Ağustos 2013 11:28

Muaf Nick-Kanal
 
Evet arkadaşlar bundan sonra mIRC Scripting kısmında "Muaf Nick-Kanal" vs. gibi konular açmak yerine bu sabit konu altına açıyoruz.

Muaf Nick için biraz örnek;

Kod:

on !*:join:#:{
if $istok(Nick1 Nick2 Nick3,$nick,32) { return }
komut
}

Join event'inde kendimizi muaf tutmak için "!" ekliyoruz.
Muaf nick eklemek için $istok yada $read kullanabiliriz.

Kod:

$istok(Nick1 Nick2 Nick3,$nick,32) { return }
$nick :join eventinde kanala giren Nick anlamını taşır zaten herkez bilir.
32 :boşluk anlamında $chr(32) olarak.

Eger $read olarak eklersek şöyle;

Kod:

$read(muafn.txt,w,$nick) { return }
muafn.txt : mIRC klasörümüzde bulunan muaf nick'leri ekledigimiz txt dosyası.
w : txt'de kelime/nick aramak için kullanırız.

Kod:

$read(filename, [ntswrp], [matchtext], [N])
Misal sunucuya giren nick'lerin özeline hoş geldiniz yazalım ve İRCForumlari ve İbrahim nick'ini muaf ekleyelim

Kod:

on *:snotice:*Client connecting on*:{ if $istok(IRCForumlari İbrahim,$9,32) { return } | msg $9 hoş geldiniz. }
Gibi.
Büyük küçük harf duyarlıgı için'de $istokcs kullanırız.

Şöyle;
Kod:

on *:snotice:*Client connecting on*:{ if $istokcs(IRCForumlari İbrahim,$9,32) { return } | msg $9 hoş geldiniz. }
Sunucuya giren kişinin ident'i Sohbet@ ise direk #Sohbet kanalına sajoin'leyelim.

Kod:

on *:snotice:*Client connecting on*:{ if $token($token($10,1,64),1,40) == Sohbet { .sajoin $9 #Sohbet } }
Küçük büyük harf duyarlılıgı için'de 3 tane === koyuyoruz.
Kod:

on *:snotice:*Client connecting on*:{ if $token($token($10,1,64),1,40) === Sohbet { .sajoin $9 #Sohbet } }
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Bu başlık altında Token identifier'larını ögrenebilirsiniz.

Aklıma başka "muaf nick" örnekleri gelmedi bu kadar.

Set 07 Ağustos 2013 15:23

Cevap: Muaf nick
 
Güzel bir düsünce ellerinize saglık ikinizinde ama.. k.bakmayin halen buna inaniyorum ben .. Bizim milletimiz " armut piş , ağzıma düşü " sever, genede zaman gösterir diyelim ve tekrardan tesekkurler bilgilendirmeniz icin. Hayırlı IF'ler.

avdet 12 Aralık 2013 00:53

Cevap: Muaf nick
 
Yıllardır en çok sorulan sorudur muaf nick mevzu. :)

Kimimben 01 Mayıs 2014 17:19

Cevap: Muaf nick
 
Kod:

on *:dialog:adminlist:sclick:5:{ os admin add $did(2) }
on *:dialog:adminlist:dclick:1:os admin del $did(1).seltext | did -d adminlist 1 $did(1).sel
on *:notice:*:*: {
  if ($nick == OperServ) && $dialog(adminlist) && (Şifresi isin $1-) && (*Services*admin*listesinden*silindi* !iswm $1-) { did -a adminlist 6 $5 }
  if (*Services*admin*listesinden*silindi* !iswm $1-) && $dialog(adminlist) && $regsubex($1,/^(\S{1,25})$/S,\1) { did -a adminlist 1 $v1 }
  if (*Services*admin*listesinden*silindi* iswm $1-) && $dialog(adminlist) { did -r adminlist 9 | did -a adminlist 9 Admin Listesinden Silindi }
  if (*Services*admin*listesine*eklendi* iswm $1-) && $dialog(adminlist) { did -r adminlist 9 | did -a adminlist 9 Admin Listesine Eklendi }
}

Bu koda nasıl muaf nick ekleriz

Kimimben 05 Mayıs 2014 12:29

Cevap: Muaf nick
 
Feragat tarafında sorun çözülmüştür tsk ederim.

rewal 27 Aralık 2014 00:01

Konuşan bota muaf nick ekleme
 
Kod:

menu ,menubar {
  .-
  . ® ÖZELBOT
  ..Açık:.enable  #otobot  | .echo -a 0,4 ÖzeL Bot Açıldı
  ..Kapalı:.disable  #otobot    | .echo -a 0,4 ÖzeL Bot Kapatıldı
  .-
}

#otobot on

on *:text:*nasıls?*:?: /.timer  1 5 /msg $nick iyiym sen nasılsın
on *:text:*nerdensin*:?:/.timer  1 5  /msg $nick sağdan soldan
on *:text:*delimisin*:?: /.timer  1 5  /msg $nick sende çok akıllı sayılmazsın
on *:text:*.............
on *:text:*.............
on *:text:*.............

#otobot end


Bu Botuma muaf nick nasıl eklerim yapamadım çok uğrasdım ama olmadı.Yardımcı olursanız sevinirim .Tşk.

Toprak 27 Aralık 2014 00:15

Cevap: Konuşan bota muaf nick ekleme
 
:text: eventinin altına



Token kullanarak;
Kod:

if $istok(nick1 nick2 nick3,$nick,32) { return }
Txt kullanarak;
Kod:

if $read(muafnick.txt,w,$nick) { return }
Regex;
Kod:

if $regex($nick,/^(nick1|nick2|nick3|nick4)$/i) { return }
gibi ekliye bilirsin.

Örn;
Kod:

on *:text:*:#:{
if $regex($1-,/(selam|s\.a|sa|merhaba)/i) {
if $istok(nick1 nick2 nick3,$nick,32) { return }
msg # a.selam $nick
}
}

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yanlış senin kodu düzenliyelim;


Kod:

menu ,menubar {
.-
. ® ÖZELBOT
..Açık:.enable #otobot | .echo -a 0,4 ÖzeL Bot Açıldı
..Kapalı:.disable #otobot | .echo -a 0,4 ÖzeL Bot Kapatıldı
.-
}

#otobot on
on *:text:*:?:{
if $read(muafnick.txt,w,$nick) { return }
if $regex($1-,/(nas[ıiİ]ls[ıiİ]n)/i) { .timer 1 5 /msg $nick iyiym sen nasılsın }
if $regex($1-,/(nerdens[ıiİ]n)/i) { .timer 1 5 /msg $nick sağdan soldan }
if $regex($1-,/(del[ıiİ]m[ıiİ]s[ıiİ]n)/i) { .timer 1 5 /msg $nick sende çok akıllı sayılmazsın }
}
#otobot end


rewal 27 Aralık 2014 01:21

Cevap: Muaf nick
 
#OTOBOT Unknown command

Özelime her gelen nickde bot çalışıyor ancak bu uyarıyı veriyor sebeb ne olabilir

Feragat 27 Aralık 2014 01:47

Cevap: Muaf nick
 
Alıntı:

rewal Nickli Üyeden Alıntı (Mesaj 1041578494)
* Geçersiz format: $regex (Satır 86, 94) diyor bu hatanın sebebi ne olabilir ? herşey normal görünüyor

Açılan her Bracket(Ayraç) - { tekrar kapatılmalıdır.

Kod:

on *:text:*:?:{
if $read(muafnick.txt,w,$nick) { return }
if $regex($1-,/(nas[ıiİ]ls[ıiİ]n)/i) { .timer 1 5 /msg $nick iyiym sen nasılsın }
if $regex($1-,/(nerdens[ıiİ]n)/i) { .timer 1 5 /msg $nick sağdan soldan }
if $regex($1-,/(del[ıiİ]m[ıiİ]s[ıiİ]n)/i) { .timer 1 5 /msg $nick sende çok akıllı sayılmazsın }

on *:text:*:?:{

Burada ayraç açılmış ama altta kapatılmamış.

Örnek:
Kod:

on *:event:*:#:{
if (koşul) { kodlar }
else { kodlar }
}


Doğrusu:

Kod:

on *:text:*:?:{
if $read(muafnick.txt,w,$nick) { return }
if $regex($1-,/(nas[ıiİ]ls[ıiİ]n)/i) { .timer 1 5 /msg $nick iyiym sen nasılsın }
if $regex($1-,/(nerdens[ıiİ]n)/i) { .timer 1 5 /msg $nick sağdan soldan }
if $regex($1-,/(del[ıiİ]m[ıiİ]s[ıiİ]n)/i) { .timer 1 5 /msg $nick sende çok akıllı sayılmazsın }
}


Toprak 27 Aralık 2014 02:23

Cevap: Muaf nick
 
Evet nasıl olduysa kapatmamışım dalgınlıgıma denk gelmiş sanırım =)


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net