Someone

on ^*:OPEN:?: {
  if (%no.more.pm [ $+ [ $nick ] ] == no1) {
    halt
  }
}
on *:OPEN:?: {  
  if (%message.declined [ $+ [ $nick ] ] == no2) {
    msg $nick 10Do 4NOT10 PM me after having your PM declined, you are now on my ignore list. I will not recive any more PM's from you.
    close -m $nick
    set %no.more.pm [ $+ [ $nick ] ] no1
    halt
    else
  }
  msg $nick 10Please wait while your message for 8\+/7Coins8\+/10 to be 4accepted10 or 4declined10, if I am away I will not recieve this PM.
  echo -a 06/07!0611MESSAGE06/07!0604 $nick 10has messaged you saying:4 $1- $+ 10, Type /acc $nick or /dec $nick $+ .
  set %message.waiting $nick
}
alias acc {
  if (%message.waiting != $null) {
    msg %message.waiting 10Message has been 4accepted10.
    unset %message.waiting  
  }
}
alias dec {
  if (%message.waiting != $null) {
    msg %message.waiting 10Message has been4 declined.
    timermss 1 1 msg %message.waiting 10This means you either have not asked to pm me or you do not have permission to.
    timermsf 1 3 msg %message.waiting 10 You have been deemed unworthy to talk to me, If you continue to PM me without permission you will automatically be put on my ignore list.
    set %message.declined [ $+ [ %message.waiting ] ] no2
    close -m %message.waiting    
    unset %message.waiting  
  }
}
alias del {
  if ($1 == $null) {
    echo -a 10Please enter a name you delete from your ignore list if there.
    halt
    else
  }
  if (%no.more.pm [ $+ [ $1 ] ] == $null && %message.declined [ $+ [ $1 ] ] == $null) { HALT }
  else { 
    unset %no.more.pm [ $+ [ $1 ] ]
    unset %message.declined [ $+ [ $1 ] ]
    echo -a 10The nick "04 $+ $1 $+ 10" has been deleted from your ignore list.
  }