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
  }
}

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
  }
}

alias hdegis {
  if $hget(_rbilgi_ $+ $1,$2) { hdel _rbilgi_ $+ $1 $2 }
  hadd -m _rbilgi_ $+ $1 $2 $3-
}

alias nc { return $mid($1-,2) }

Bunlar identifier bilgileri;
; $1 == nick!ident@host
; $2 == privmsg
; $3 == #kanal
; $4 == :!kick
      elseif $nc($4) == !kick {
        radyokick 212.175.122.102 1453 yayınşifresi adminşifresi $3 YuunikFm
        sw $sockname privmsg $3 Radyonuz kicklenmiştir! İyi yayınlar.
      }