on *:sockopen:radyokick_hamit_*: {
  sockwrite -n $sockname GET $+(/admin.cgi?pass=,$hget(_rbilgi_ $+ $remove($sockname,radyokick_hamit_),Pass),&mode=kicksrc&pass=,$hget(_rbilgi_ $+ $remove($sockname,radyokick_hamit_),Apass)) HTTP/1.1
  sockwrite -n $sockname Host: $+($hget(_rbilgi_ $+ $remove($sockname,radyokick_hamit_),Host),:,$hget(_rbilgi_ $+ $remove($sockname,radyokick_hamit_),Port))
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
  sockwrite -n $sockname Connection: close 
  sockwrite -n $sockname $crlf
}

alias radyokick {
  if !%:radyokick_ [ $+ [ $1 ] ] {
    ; echo -s $1-
    if !$hget(_rbilgi_ $+ $1) { hmake _rbilgi_ $+ $1 }
    hdegis $1 Durum 0
    hdegis $1 Host $1
    hdegis $1 Port $2
    hdegis $1 Pass $3
    hdegis $1 Apass $4
    hdegis $1 Radyo $5
    hdegis $1 Logo $6-
    sockopen radyokick_hamit_ $+ $1 $1 $2
    .set -u5 %:radyokick_ $+ $1 islem
  }
}