Stuff

on *:text:*SafeMode*:#:{
  set %rfitxt $strip($1-)
  if (SafeMode ON isin %rfitxt) {
    if ($read(rfi_safe_on.txt,w,* $+ $gettok($strip(%rfitxt),2-,62) $+ *) == $null) {
      write rfi_safe_on.txt $gettok($strip(%rfitxt),2-,62)
    }
  }
  if (SafeMode OFF isin %rfitxt) {
    if ($read(rfi_safe_off.txt,w,* $+ $gettok($strip(%rfitxt),2-,62) $+ *) == $null) {
      write rfi_safe_off.txt $gettok($strip(%rfitxt),2-,62)
    }
  }
}

alias rfi { msg $active Vulnerable RFI's: [SafeMode ON: $lines(rfi_safe_on.txt) $+ $chr(93) [SafeMode OFF: $lines(rfi_safe_off.txt) $+ $chr(93) | halt }