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- }