on *:input:*:{
  if $regex($1-,/^[!.]namaz (.+)/i) {
    .set -u10 %namazchan $chan
    namazvakit $2-
  }
}
on $*:Text:/^[!.]namaz (.+)/i:#sohbet,#felsefe,#radyo,#mirchelp:{
  if %namazchan {
    msg # < $+ $nick $+ > Namaz vakit sorgulamasi yaparken 10 sn beklemelisiniz.
    return
  }
  .set -eu10 %namazchan $chan
  .set -eu10 %namaznick $nick
  namazvakit $2-
}

alias namazvakit {
  set %namaz_ $trkarakter($1-)
  sockclose namazvakit | sockopen namazvakit 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
}
on *:sockopen:namazvakit:{
  if $sockerr { .sockclose $sockname | echo -a Socket Hatasi }
  var %ko = sockwrite -n $sockname
  %ko GET /search?client=opera&q= $+ $replacex(%namaz_,$chr(32),+) $+ + $+ namaz+vakitleri $+  &sourceid=opera&ie=UTF-8&oe=UTF-8 HTTP/1.0
  %ko Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:sockread:namazvakit:{
  var %nam
  sockread -f %nam 
  if *hab?rt?rk* iswm %nam {
    if $regex(%nam,/NAMAZ VAKİTLERİ · İmsak (\d+:\d+) · Güneş (\d+:\d+) · Öğle (\d+:\d+) · İkindi (\d+:\d+) · Akşam (\d+:\d+) · Yatsı (\d+:\d+)(.+)/i) {
      msg %namazchan < $+ %namaznick $+ > <Namaz Vakitleri> Imsak: $regml(1) Gunes: $regml(2) Ogle: $regml(3) Ikindi: $regml(4)  Aksam: $regml(5) Yatsi: $regml(6)
      sockclose namazvakit
    }
  }
}
alias -l trkarakter return $replacex($1-,ı,$eval(%C4%B1,0),İ,$eval(%C4%B0,0),ğ,$eval(%C4%9F,0),Ğ,$eval(%C4%9E,0),Ş,$eval(%C5%9E,0),ş,$eval(%C5%9F,0),ö,$eval(%C3%B6,0),Ö,$eval(%C3%96,0),ç,$eval(%C3%A7,0),Ç,$eval(%C3%87,0),ü,$eval(%C3%BC,0),Ü,$eval(%C3%9C,0))