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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Hava durumu remotesi hk. (https://www.ircforumlari.net/mirc-scripting-sorunlari/695265-hava-durumu-remotesi-hk.html)

Hava durumu remotesi hk.

Selamlar, aşağıdaki kodu tek bir nicke özel olarak nasıl ayarlayabiliriz?
Mesela sadece 'x' nicki !havadurumu yazdığında çalışsın.

Kod:

alias havadurumu { 

  var %sn havadurumu- $+ $ticks 

  sockopen %sn mynet.com 80 

  sockmark %sn $1- 

  echo -a $1- 

} 

on *:sockopen:havadurumu-*:{ 

  var %k sockwrite -tn $sockname 

  %k GET /havadurumu/asya/turkiye/ $+ $replace($gettok($sock($sockname).mark,1,189),$chr(32),/) HTTP/1.1 

  %k host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:sockread:havadurumu-*:{ 

  var %a 

  sockread %a 

  if Moved Permanently isin %a { $gettok($sock($sockname).mark,2,189) [HATA] Sorgulanan adres bulunamadı. } 

  var %b $remove($utfdecode($nohtml(%a)),$chr(9)) 

  if itemprop isin %a { $gettok($sock($sockname).mark,2,189) 7 ~~~~12 $replace($remove(%b,hava durumu),&gt;,>) İçin 5 Günlük Hava Tahmini 7~~~~ } 

  if span class="hv isin %a { 

    if day isin %a { set %hvdrm $+(10[,%b,]) $str(- ,$iif($len(%b) == 4,9,$calc(11- $iif(ş isin %b,$calc($len(%b) +1),$len(%b))))) } 

    if mood isin %a { set %hvdrm %hvdrm  3Hava olayı:3 %b } 

    if deg1 isin %a { set %hvdrm %hvdrm  - 4En yüksek: %b } 

    if deg2 isin %a { set %hvdrm %hvdrm  1* 10En düşük: %b | $gettok($sock($sockname).mark,2,189) %hvdrm } 

  } 

} 

on *:text:!havadurumu *:#:havadurumu $replace($2-,Ç,c,ç,c,Ğ,g,ğ,g,ı,i,İ,i,Ö,o,ö,o,Ş,s,ş,s,Ü,u,ü,u) $+ ½ $+ msg # 
 

alias noHTML return $regsubex($1, /<[^>]+(?:>|$)|^[^<>]+>/g, $null)

Cevap: Hava durumu remotesi hk.

Bu kısmı;

Kod:

on *:text:!havadurumu *:#:havadurumu $replace($2-,Ç,c,ç,c,Ğ,g,ğ,g,ı,i,İ,i,Ö,o,ö,o,Ş,s,ş,s,Ü,u,ü,u) $+ ½ $+ msg #

Böyle değiş;

Kod:

on *:text:*:#:if $regex($1,/[!.]havadurumu/Si) && $regex($nick,/^(nick1|nick2|nick3)$/i) { havadurumu $replace($2-,Ç,c,ç,c,Ğ,g,ğ,g,ı,i,İ,i,Ö,o,ö,o,Ş,s,ş,s,Ü,u,ü,u) $+ ½ $+ msg # }

Cevap: Hava durumu remotesi hk.

Alıntı:

Toprak Nickli Üyeden Alıntı (Mesaj 1041659494)

Bu kısmı;

Kod:

on *:text:!havadurumu *:#:havadurumu $replace($2-,Ç,c,ç,c,Ğ,g,ğ,g,ı,i,İ,i,Ö,o,ö,o,Ş,s,ş,s,Ü,u,ü,u) $+ ½ $+ msg #

Böyle değiş;

Kod:

on *:text:*:#:if $regex($1,/[!.]havadurumu/Si) && $regex($nick,/^(nick1|nick2|nick3)$/i) { havadurumu $replace($2-,Ç,c,ç,c,Ğ,g,ğ,g,ı,i,İ,i,Ö,o,ö,o,Ş,s,ş,s,Ü,u,ü,u) $+ ½ $+ msg # }

Çok başarılı kod çalışıyor teşekkür ederim.
Fazla olmazsa bir şey daha soracağım buna kendimi de dahil etmek istesem farklı bir sayfa açıp koda input mu eklemem gerekli yoksa bu koda kendimi de dahil edebilir miyim?

Cevap: Hava durumu remotesi hk.

Alıntı:

oFLidu Nickli Üyeden Alıntı (Mesaj 1041659813)

Yeni sayfa acman gerekmiyor, bu kodun hemen altina input eklesende cakismamasi gerek normalde.

TEXT Eventi cünki, sen özelde veya kanalda aldigin Mesajlarda devreye girebilir. Senin yazdigin Mesajlarda calismasini istedigini bir Kod icinde INPUT Eventi kullanilir.

INPUT Kullanimida bu sekilde oluyor

on *:INPUT:#/?/*:{ Uygulayacagin Komut }

# : Hangi Kanalda calismasini istersen
? : Bir Özel Pencerede calismasini istersern
* : Herhangi bir yere yazdiginda, calismasi icin.

tabi = ve ! de olucak sanirsam, ama onunla kafasini karistirmak istemem. INPUT un en cok kullanildigi sekil bunlarin 3 ü.