So, Here's the info...
Basically all the EVENTS (Not Raws) are non-standard.
Have fun!
Goes in Remotes.

alias text.1 { return 9 $+ $chr(171) $+ 14- $+ 3 $+ $chr(171) $+ 14 $+ $1- $+ 3 $+ $chr(187) $+ 14-9 $+ $chr(187) $+  }
alias text.2 { return 4 $+ $chr(215) $+ 14-4(14 $+ $1- $+ 4)14-4 $+ $chr(215) $+  }
alias text.3 { return 4«147º4°14 $+ $1- $+ 4°7º144» }
alias Text.4 { return 9| $+ $P-Type($strip($1-)) $+ 9| }

alias ul return $iif(%ul,$+($upper($left($1,1)),$mid($1,2,$iif($calc($len($1) -1) == 0,$null,$calc($len($1) -1)))),$1-)

alias P-Type {
  var %i 1
  unset %P-Type
  while (%i <= $len($1-)) {
    set %P-Type %P-Type $iif($mid($ul($1-),%i,1) != $chr(32),$+(04-,14,$mid($ul($1-),%i,1),),$null)
    inc %i 1
  }
  Return %P-Type $+ 4-
}

alias tsay {
  if ($me isop $active) { echo -a $timestamp $Text.2(@ $+ $me) $+ 0: $1- }
  elseif ($me ishop $active) { echo -a $timestamp $Text.2(% $+ $me) $+ 0: $1- }
  elseif ($me isvoice $active) { echo -a $timestamp $Text.2(+ $+ $me) $+ 0: $1- }
  else { echo -a $timestamp $Text.2($me) $+ 0: $1- }
  .msg $active $1-
}
alias me {
  haltdef
  echo -a $timestamp $Text.2(Action) $Text.2($me) $+ 0: $1-
  .describe $active $1-
}
alias Notice {
  haltdef
  echo -a $timestamp $Text.2(Notice) $Text.1(For $1) $+ 0: $2-
  .notice $1 $2-
}
alias amsg {
  haltdef
  if ($1 != -g) && ($1 != -p) { amsg 4 $+ $chr(171) $+ 14 $+ $chr(215) $+ 14.15/0|15A-Msg0|15\14.4|14 $+ $1- }
  elseif ($1 = -g) { amsg $riot $Text.2(4G14lobal 4N14otice) 14 $2-  }
  elseif ($1 = -p) { amsg $2- }
}

;-------------
;-Text Events-
;-------------

on ^*:TEXT:*:?: {
  haltdef
  if ($query($nick)) {
    echo $nick $timestamp $Text.2($nick) $+ 0: $1-

  }
}

on ^*:TEXT:*:#: {
  haltdef
  if ($nick isop $chan) { echo $chan $timestamp $Text.2(@ $+ $nick) $+ 0: $1- }
  elseif ($nick ishop $chan) { echo $chan $timestamp $Text.2(% $+ $nick) $+ 0: $1- }
  elseif ($nick isvoice $chan) { echo $chan $timestamp $Text.2(+ $+ $nick) $+ 0: $1- }
  else { echo $chan $timestamp $Text.2($nick) $+ 0: $1- }
}

;---------------
;-Notice Events-
;---------------

on ^*:NOTICE:*:*: {
  haltdef
  if ($activecid == $cid) {
    if ([Welcome- isin $1-) && ($nick == $me) { echo $remove($1,[Welcome-,]) $timestamp $Text.1(Welcome) $2- }
    elseif ($nick !isin $readini(Malice-iRc.ini,Blocked,Notice)) { echo -a $timestamp $Text.2(Notice) $Text.2($nick) $+ 0: $1- }
  }
  elseif ($activecid != $cid) {
    if ([Welcome- isin $1-) && ($nick == $me) { echo $remove($1,[Welcome-,]) $timestamp $Text.1(Welcome) $2- }
    else { echo -a $timestamp $Text.2(Notice) $Text.1($nick ( $+ $server $+ )) $+ 0: $1- }
  }
}

;---------------
;-Action Events-
;---------------
on ^*:ACTION:*:#: {
  haltdef
  echo $chan $timestamp $Text.2(Action) $Text.2($nick) $+ 0: $1-
}
on ^*:ACTION:*:?: {
  haltdef
  echo $nick $timestamp $Text.2(Action) $Text.2($nick) $+ 0: $1-
}

;-----------------
;-Modes and Topic-
;-----------------

on ^*:RAWMODE:#: {
  haltdef
  echo $chan $timestamp $Text.2(Raw-Mode) $Text.1(By $nick) $Text.1(Mode Change: $1-)
}
on ^*:OP:*: {
  haltdef
  echo $chan $timstamp $timestamp $Text.2(Op) $Text.1(By $nick for $opnick)
  if ($opnick = $me) {
    if ($chan = #sanctuary) { halt }
    inc %Op-Times
    msg $chan $Text.2(Thanks for the $Text.1(Op (+o)) $nick $+ ! I've Been Opped For The $ord(%Op-Times) Time!)
  }
}
on ^*:DEOP:*: {
  haltdef
  echo $chan $timestamo $timestamp $Text.2(Deop) $Text.1(By $nick for $opnick)
}
on ^*:VOICE:*: {
  haltdef
  echo $chan $timestamp $Text.2(Voice) $Text.1(By $nick for $vnick)
  if ($vnick = $me) {
    if ($chan = #sanctuary) { halt }
    inc %V-Times
    msg $chan $Text.2(Thanks for the $Text.1(Voice(+v)) $nick $+ ! I've Been Voiced For The $ord(%V-Times) Time!)
  }
}
on ^*:DEVOICE:*: {
  haltdef
  echo $chan $timestamp $Text.2(Devoice) $Text.1(By $nick for $vnick)
}
on ^*:TOPIC:#: {
  haltdef
  echo $chan $timestamp $Text.2(Topic) $Text.1($nick Changed the topic to $1- $+ )
}
on ^*:HELP:#: {
 haltdef
 echo $chan $timestamp $Text.2(Help-Op (Half-Op)) $Text.1(By $nick for $hnick)
 if ($hnick = $me) {
  inc %h-times
  msg $chan $Text.2(Thanks for the $Text.1(HelpOp(+h)) $nick $+ ! I've Been Half-Opped For The $ord(%h-times) Time!)
 }
}
on ^*:DEHELP:#: {
 haltdef
 echo $chan $timestamp $Text.2(DeHelp-Op(DeHalf-Op)) $Text.1(By $nick for $hnick)
}

;-----------------------
;-Join/Part/Quits/Nicks-
;-----------------------

on ^*:JOIN:#: {
  haltdef
  var %nick = $mid($address($nick,5),1,$calc($pos($address($nick,5),!,$count($address($nick,5),!)) - 1))
  var %address = $remove($address($nick,5),$mid($address($nick,5),1,$pos($address($nick,5),!,$count($address($nick,5),!))))
  echo $chan $timestamp $Text.2(Join) $Text.1($nick 4/14 ( $+ %address $+ ) Has Joined $chan on $server)
  if ($nick == $me) { msg $chan $Text.1($dx(Welcome To Hell.)) $logo }
;  if ($chan != #Lobby) && (($nick = TragiK) || ($nick = Tragedy) || ($nick = J-Havoc) || ($nick = Defying_Gravity) || ($nick = Wr34k*ng*H4v0c)) { msg $chan $Fukt }
}

on ^*:PART:#: {
  haltdef
  var %nick = $mid($address($nick,5),1,$calc($pos($address($nick,5),!,$count($address($nick,5),!)) - 1))
  var %address = $remove($address($nick,5),$mid($address($nick,5),1,$pos($address($nick,5),!,$count($address($nick,5),!))))
  echo $chan $timestamp $Text.2(Part) $Text.1($nick 4/14 ( $+ %address $+ ) Has Parted $chan $+ . Reason: $iif($1-,$1-,N/A))
}

on ^*:NICK: {
  haltdef
  var %chan = 1
  var %chans = $comchan($newnick,0)
  while (%chan <= %chans) {
    echo $comchan($newnick,%chan) $timestamp $Text.2(Nick Change) $Text.1($nick is now using the $newnick Handle in %chans Common with you.)
    inc %chan
  }
}
on ^*:QUIT: {
  haltdef
  var %nick = $mid($address($nick,5),1,$calc($pos($address($nick,5),!,$count($address($nick,5),!)) - 1))
  var %address = $remove($address($nick,5),$mid($address($nick,5),1,$pos($address($nick,5),!,$count($address($nick,5),!))))
  var %chc = 1
  var %chb = $comchan($nick,0)
  while (%chc <= %chb) {
    echo $comchan($nick,%chc) $timestamp $Text.2(Quit) $Text.1($nick 4/14 ( $+ %address $+ ) Has Quit from $server $+ . ( $+ $serverip $+ ) Reason: $iif($1-,$1-,N/A))
    inc %chc
  }
}

;-----------------
;-Everything else-
;-----------------

on ^*:KICK:#: {
  haltdef
  echo $chan $timestamp $Text.2(Kick) $Text.1($nick kicked $knick from $chan $+ . Reason: $iif($1-,$1-,N/A))
}
on ^*:BAN:#: {
  haltdef
  echo $chan $timestamp $Text.2(Ban) $Text.1($nick Banned $banmask in $chan)
}
on ^*:UNBAN:#: {
  haltdef
  echo $chan $timestamp $text.2(Unban) $Text.1($nick Unbanned $banmask in $chan)
}

on *:INPUT:*: {
  if (/ !isin $left($1,1)) { 
   haltdef
    .tsay $1-
  }
}
on *:PONG: {
haltdef
echo -a 4(14 $+ $server $+ 4)15-9(14 $+ $time(ddd hh:nn:ss tt) $+ 9)14-9(4P14ong9)15-4(14 $+ $1- $+ 4)
}
CTCP ^*:*VERSION*:*: {
  haltdef
  ctcpreply $nick VERSION $Logo $S-cript 
  ctcpreply $nick VERSION $Fukt 
  halt
}

ctcp ^*:*PING*:*: {
  haltdef
  ctcpreply $nick PING $Logo
  halt
}
ctcp ^*:*:*: { haltdef | echo -a 4(14 $+ $server $+ 4)14-9(14CTCP9)14-4(14 $+ $nick ( $+ $1 $+ ) $+ 4)14 $1- }
alias xctcpreply {
 echo -a 4(14CTCP-Reply4)14-4(14 $+ $1 $+ 4)14-9(04 $+ $2 $+ 9)04 $3-
 .ctcpreply $1-
}
ctcpreply ^*:*:*: { haltdef | echo -a 4(14 $+ $server $+ 4)14-9(14CTCP9)14-4(14 $+ $nick ( $+ $1 $+ ) $+ 4)14 $1- }