Mari Kita Mencantikkan Lagi mIRC kita ketika berchatting

on ^1:TEXT:*:#:{
  if ($istok($1-,$me,32)) && ($chan !== $active) { 
    echo -a  4 !  Dari  4 $+ $chan   4<  $+ $chr(3) $+ $color(normal text) $+ $nick $+  4>  $+ $chr(3) $+ $color(normal text) $1- | .flash -r3 PM : $nick 
  }
  if ($isowner($chan,$nick) == $true) {
    echo #  13<  $+  6~  $+ $chr(3) $+ $color(normal text) $+ $nick $+  13>  $chr(3) $+ $color(normal text) $+ $1-
    halt
  }
  if ($isadmin($chan,$nick) == $true) {
    echo #  9<  $+  3&  $+ $chr(3) $+ $color(normal text) $+ $nick $+  9>  $chr(3) $+ $color(normal text) $+ $1-
    halt 
  }
  if ($nick isop #) {
    echo #  4<  $+  5@  $+ $chr(3) $+ $color(normal text) $+ $nick $+  4>  $chr(3) $+ $color(normal text) $+ $1-
    halt
  }
  if ($nick ishop #) {
    echo #  8< 7%  $+ $chr(3) $+ $color(normal text) $+ $nick $+  8>  $chr(3) $+ $color(normal text) $+ $1-
    halt
  }
  if ($nick isvo #) {
    echo #  12<  $+  2+  $+ $chr(3) $+ $color(normal text) $+ $nick $+  12>  $chr(3) $+ $color(normal text) $+ $1-
    halt
  }
  if (- isin $left($nick(#,$nick).pnick,$+(-,$len($nick)))) {
    echo #  15< $+  14-  $+ $chr(3) $+ $color(normal text) $+ $nick $+  15>  $chr(3) $+ $color(normal text) $+ $1-
    halt
  }
  else { 
    echo #  14<  $+ $chr(3) $+ $color(normal text) $+ $nick $+  14>  $chr(3) $+ $color(normal text) $+ $1-
    halt
  }
}
on ^*:ACTION:*:#:{ 
  if ($istok($1-,$me,32)) && ($chan !== $active) { 
    echo -a  4 *  Dari  4 $+ $chan   4*  $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1- | .flash -r3 PM : $nick 
  }
  if ($isowner($chan,$nick) == $true) {
    echo # $chr(3) $+ $color(action text) *  6~  $+ $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt
  }
  if ($isadmin($chan,$nick) == $true) {
    echo # $chr(3) $+ $color(action text) $+ *  3&  $+ $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt 
  }
  if ($nick isop #) {
    echo # $chr(3) $+ $color(action text) $+ *  5@  $+ $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt
  }
  if ($nick ishop #) {
    echo # $chr(3) $+ $color(action text) $+ *  7%  $+ $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt
  }
  if ($nick isvo #) {
    echo # $chr(3) $+ $color(action text) $+ *  2+  $+ $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt
  }
  if (- isin $left($nick(#,$nick).pnick,$+(-,$len($nick)))) {
    echo # $chr(3) $+ $color(action text) $+ *  14-  $+ $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt
  }
  else { 
    echo # $chr(3) $+ $color(action text) $+ * $chr(3) $+ $color(action text) $+ $nick $+ $chr(3) $+ $color(action text) $1-
    halt
  }
}
alias isadmin {
  if ($isid) return $iif($nick($1,$2,$mid($prefix,$pos($nickmode,a),1)) || $istok($ial($2).mark,a $+ $1,32),$true,$false)
  .ialmark $2 $($+($,$3,tok($ial($2).mark,a $!+ $!1,32)),2)
}
alias isowner {
  if ($isid) return $iif($nick($1,$2,q) || $istok($ial($2).mark,$1,32),$true,$false)
  .ialmark $2 $($+($,$3,tok($ial($2).mark,$1,32)),2)
}
on *:join:#:{ isowner # $nick rem }
on *:owner:#:{ isowner # $opnick add }
on *:deowner:#:{ isowner # $opnick rem }