; 
alias /blist { 
  /writeini blist.ini $chan $chan ($writeini(blist.ini,n,$chan,$chan) 
  on *:JOIN:#:{ 
    if ( $nick == $me ) {
      /set $readini(blist.ini,n,$chan,$chan)
      /msg $chan This Channel Is In My Blacklist
      /part $chan BLACKLIST
      /halt  
    }  
    else {
      /msg $chan This Channel Is currently 9 SAFE1 This Channel Is Not In My Blacklist.
    }
  } 
}
on *:INVITE:#:{ 
  if ( $nick == $me ) { 
    /readini blist.ini $chan $chan $calc($readini(blist.ini,n,$chan,$chan)+1) 
  }
}
;
alias /delblist {
  /remini -n blist.ini $1 $1
  /echo -t  $1 $1 has been removed from the blacklist.
}
;