Forums Feature Suggestions $isalias().AsNative

alias myUnsafe {

  ;; if mIRC supports the 'unsafe' identifier
  if ($isalias(unsafe).AsNative) {
    return $unsafe($1-)
  }

  ;; otherwise, use a scripted equivalent. 
  elseif (!$lock(encode)) {
    return $!decode( $+ $encode($1-,m) $+ ,m)
  }
  elseif ($~prop == undo) {
    !return $~regsubex($~1-, /\\([\da-f]{2})/gi, $~chr($~base(\t, 16, 10)))
  }
  else {
    var %regex = /((?:[#,()\\])|(?:(?<= |^)[%$])|(?:(?<= |^)[\Q{}[]|\E](?= |$)))/g
    if ($regsubex($1,%regex,\ $+ $~base($~asc(\t),10,16,2)) !=== $~1) {
      return $!myUnsafe( $+ $v1 $+ ).undo
    }
    !return $~1-
  }
}