on *:TEXT:PERMBAN*:?:{

  if ($readini(database/global.ini,owner,$address($nick,2) == owner)) || $readini(database/users.ini,users,$address($nick,2) == master) || $readini(database/users.ini,users,$address($nick,2) == owner) {

    if ($2 == help) {

      Notice $nick Permban allows you to ban a user permanatly from your channel.

      notice $nick Usage : /msg $me permban <channel> <nick>

      halt

    }

    else {    

      if ($2) && (!$3) {

        notice $nick forgot to type a nickname

      }

      else {

        if ($chr(35) isin $2) {

          writeini database/banlist.ini permbans $2 $address($3,2)

          notice $nick $3 has been permanent banned in the channel $2

          ban $2 $3 You have been PERM. BANNED from this channel!!!

        }

        else {

          notice $nick Permban : not enough parameters

          notice $nick Try /msg $me Permban help for info

        }

      }

      close -m $nick

    }

    else {

      notice $nick You don't have acces to this command

    }

  }

}