on *:sockopen:il:{ sockwrite -nt $sockname GET $+(/,$sock($sockname).mark,/) HTTP/1.1 | sockwrite -nt $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname $crlf }
on *:sockread:il:{ 
  var %:il | sockread %:il 
  if (*<span id="result-distance">* iswm %:il)  { echo -a 4KM: $htmlfree(%:il) } 
  if (*<span id="result-hour">* iswm %:il)  { echo -a 4SAAT: $htmlfree(%:il) } 
  if (*<span class="ajaxHarita">* iswm %:il)  { echo -a 4HARITA: $token(%:il,4,34) } 
}
alias _bak { if ($1) { sockopen il illerarasimesafe.com 80 | sockmark il $1 } }
alias htmlfree { 
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) 
  return %x 
}

4KM: 562 Km
4SAAT: Yaklaşık 6 saat 39 dakika
4HARITA: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
type="text/javascript" src="https://code.jquery.com/jquery-1.12.0.min.js">

 










    

        

         
         

        

        
        
            

                __________________

             
Dünyanın en güzel yeri neresi biliyor musun? Biraz kenara kaysana... 

            
        
        

        


        

    

alias -l hesap sockclose yolbul | sockopen yolbul 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80   
on *:sockopen:yolbul:var %_ sockwrite -n $sockname | %_ GET / $+ %m $+ / HTTP/1.1 | %_ host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:sockread:yolbul:var %yolbul | sockread %yolbul | if $regex(%yolbul,/<strong>.+<\/strong><\/font>.*/Sg) { msg %p $replace($regsubex(%yolbul,/\x3C.+\x3E/gUS,), Kaç Km?, Mesafe:,  Kaç Saat?, Zaman:) }
on *:input:#:{ if $regex($1-,/^[.!]km\s+\S+\s+\S+$/Si) { set %p # | set -e %m $replacecs($lower($2),ı,i,ğ,g,ç,c,ö,o,ü,u,ş,s,Ü,u,Ö,o,Ğ,g,Ç, $&
  c,I,i,İ,i,Ş,s) $+ _ $+ $replacecs($lower($3),ı,i,ğ,g,ç,c,ö,o,ü,u,ş,s,Ü,u,Ö,o,Ğ,g,Ç,c,I,i,İ,i,Ş,s) | hesap } }

 <Feragat> !km ankara istanbul
 <Feragat> Mesafe: İstanbul ile Ankara arası 454 Km'dir.
 <Feragat> Zaman: Bu mesafe, 4 saat 39 dakika sürecektir.

alias -l hesap sockclose yolbul | sockopen yolbul 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80   
on *:sockopen:yolbul:{ 
  var %_ sockwrite -n $sockname 
  %_ GET $+(/,%m,/) HTTP/1.1 
  %_ host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:sockread:yolbul:{ 
  var %yolbul 
  sockread %yolbul 
  if <h1> isin %yolbul || <span class=orange id=dInfoMile> isin %yolbul || <span class=orange id=dInfoHour> isin %yolbul { 
    msg %p $iif(? isin %yolbul, $token($regsubex(%yolbul,/\x3C.+\x3E/gUS,),2,63), $regsubex(%yolbul,/\x3C.+\x3E/gUS,)) 
  }
}
on *:input:#:{ 
  if $regex($1-,/^[.!]km\s+\S+\s+\S+$/Si) { 
    set %p $chan 
    set -e %m $replacecs($lower($2),ı,i,ğ,g,ç,c,ö,o,ü,u,ş,s,Ü,u,Ö,o,Ğ,g,Ç, $&
      c,I,i,İ,i,Ş,s) $+ _ $+ $replacecs($lower($3),ı,i,ğ,g,ç,c,ö,o,ü,u,ş,s,Ü,u,Ö,o,Ğ,g,Ç,c,I,i,İ,i,Ş,s) 
    hesap 
  } 
}

[00:08] <deneme1> !km istanbul izmir
[00:08] <deneme1> İzmir ile İstanbul arası mesafe
[00:08] <deneme1> 568 Km
[00:08] <deneme1> 8 saat 30 dakika