Unnamed

on $*:TEXT:/^[!]access/Si:#: {
    ;[/**N**O**T**E**S**|Checking for flood control|**N**O**T**E**S**/]
  if ($($+(%,awarned,$chan,$nick),2) == 1) { halt }
  if ($($+(%,accesslimit,$chan,$nick),2) == 1) { notice $nick Please wait 1 minute. | set $+(%,awarned,$chan,$nick) 1 | timerawarned $+ $chan $+ $nick 1 20 unset $+(%,awarned,$chan,$nick) | halt }
  if ($nick isop #) { 
    ;[/**N**O**T**E**S**|Sets chest's channel and open status|**N**O**T**E**S**/]
    set $+(%,openchest,$2) $chan
    set $+(%,chest,$chan,$2) open
    ;[/**N**O**T**E**S**|Announcing access|**N**O**T**E**S**/]
    notice $nick 10Sending offer to7 $2
    notice $2 7 $+ $nick 10has given you access to a chest in7 $chan $+ 10! You have one minute to accept with4 !chest
    ;[/**N**O**T**E**S**|Idle out for chest|**N**O**T**E**S**/]
    timer. $+ $2 1 60 notice $2 4Chest locked!!
    timer.1 $+ $2 1 61 unset $+(%,chest,$chan,$2)
    ;[/**N**O**T**E**S**|Increases granted access count|**N**O**T**E**S**/]
    writeini access.ini chests $address($nick,2) $iif($readini(access.ini,chests,$address($nick,2)), $calc($readini(access.ini,chests,$address($nick,2)) + 1), 1)
    ;[/**N**O**T**E**S**|Spam control for chest access|**N**O**T**E**S**/]
    $iif($nick != demon,set $+(%,accesslimit,$chan,$nick) 1,halt) | $iif($nick != demon,timera $+ $chan $+ $nick 1 60 unset $+(%,accesslimit,$chan,$nick), halt)
  }
}