theme for mirc

By sukhbira on Apr 07, 2012

Screenshots

A very detailed MTS Theme for mIRC 42 scrumptious themes. Has nice clean look and has op Joins, Whois, Quit, etc. New schemes marked with *. NO EFFECT ON COLOR TEXT :)
I personally love this theme

on *:Load:{
  Echo -a 10(12 You have just loaded BaazTheme - Theme By Baaz10)
}
on ^*:TEXT:*:#:{
  if ($nick isop $chan) {
    echo $chan $timestamp 12(12 $+ 3@12 $+ $nick $+ 12) $1-
    goto end
  }
  elseif ($nick ishop $chan) {
    echo $chan $timestamp 10(12 $+ 3@13 $+ $nick $+ 10) $1-

    goto end
  }
  elseif ($nick isvoice $chan) {
    echo $chan $timestamp 10(15 $+ 3+13 $+ $nick $+ 10)3 $1-
    goto end
  }
  else { 
    echo $chan $timestamp 10(12 $+ $nick $+ 10)1 $1- 

  }
  :end
  haltdef
}
on ^*:TEXT:*:?:{
  echo $nick $timestamp 10(4 $+ $nick $+ 10)1 $1-
  haltdef
}
on *:INPUT:?:{
  if (/ !isin $left($1,1)) {
    echo -a $timestamp 10(5 $+ $nick $+ 10)5 $1-
    .privmsg $active $1-
    haltdef
  }
}
alias hop {
  if ($chan != $null) {
    echo -a $timestamp 10(12 $+ Hopping $chan $+ 10)
    /.hop
    halt
  }
  if ($chan == $null) {
    echo -a 10(8,2 $+ Error You Are Not On $chan $+ 10) 
    halt
  }
}
on ^*:JOIN:#:{  
  echo $Chan $timestamp 10(4»» $+ Join $+ 10) $+ (12 $+ $nick $+ 10) $+ (12»» $address($nick,1) $+ 4»»»)  
  haltdef
}
on ^*:part:#:{ 
  if ($nick == $me) { halt }
  if ($1-) { 
    echo $chan $timestamp 10(13 $+ Part $+ 12) $+ (12 $+ $nick $+ 10) $+ (4 $address($nick,1) $+ 10)  
  }
  if (!$1-) { 
  echo $chan $timestamp 10(15 $+ Part $+ 12) $+ (13 $+ $nick $+ 10) $+ (12 $address($nick,1) $+ 10)  }
  haltdef
}
on ^*:RAWMODE:#:{
  echo $chan $timestamp 10(12 $+ Mode Change $+ 10) $+ (3 $+ $nick Set mode $1- in $chan $+ 10)
  haltdef
}
on ^*:QUIT:{
  var %p = 0 | while (%p < $comchan($nick,0)) { inc %p | echo $comchan($nick,%p) $timestamp 10(12 $+ Quit $+ 5) $+ 10(5 $+ $remove($nick,$mid($1,1, $+ $pos($1,~,2))) $+ 10) $+ 10(7 $+ Reason $+ : $+ $iif($1- == $null || $1 == quit:,No Reason Specified.,$1-) $+ 10)
    haltdef
  }  
}
on ^*:NICK:{
  var %i = 0 | while (%i < $comchan($newnick,0)) { inc %i | echo $comchan($newnick,%i) $timestamp 10(12 $+ Nick Change $+ 10) (12 $+ $nick Is Now 13 $newnick 10) 
    haltdef
  }
}
on ^*:NOTICE:*:*:{
  if ($activecid == $cid) {
    if ([Welcome- isin $1-) && ($nick == $me) echo $remove($1,[Welcome-,]) $timestamp 10(12 $+ Greet $+ 10) $2-
    if ([Welcome- !isin $1-) echo -a $timestamp 10(12 <- Notice From $nick $+ 10) (13 $+ Msg: $1- $+ 10)
    HALT
  }
  if ($activecid != $cid) {
    if ([Welcome- isin $1-) && ($nick == $me) echo $remove($1,[Welcome-,]) $timestamp 10(12 $+ Greet $+ 10)
    if ([Welcome- !isin $1-) {
    if ([Welcome- !isin $1-) echo -a $timestamp 10(6 <- Notice From $nick $+ 10) (4 $+ Msg: $1- $+ 10)    }
    haltdef
  }
}

.privmsg $chan $1-

alias msg {
  if ($me isop $1) {
    echo $1 $timestamp 10(7 $+ $me $+ 10) $2-
    goto end
  }
  if ($me ishop $1) {
    echo $1 $timestamp 10(6 $+ $me $+ 10) $2-
    goto end
  }
  if ($me isvoice $1) {
    echo $1 $timestamp 10(6 $+ $me $+ 10) $2-
    goto end
  }
  else { 
    echo $1 $timestamp 10(3 $+ $me $+ 10) $2-
    goto end
  }
  :end
  .privmsg $1 $2-
  haltdef
}
alias notice {
  echo -a $timestamp 10(12 $+ -> For $1 $+ 10) 10(13 Msg: $2- $+ 10)
  .notice $1 $2-
  haltdef
}

on ^*:INVITE:*:{
  if ($activecid == $cid) {
    echo -a $timestamp 10(7 $+ $nick invites you to $chan $+ 10)
    haltdef
  }
  if ($activecid != $cid) {
    echo -a $timestamp 10(12 $+ $nick invites you to $chan $+ 10)
    haltdef
  }
}
on ^*:TOPIC:*:{
  if ($1-) {
    echo $chan $timestamp 10(12 $+ Topic Change By $nick $+ 10) 10( $+ $1- $+ 10)
  }
  if (!$1-) {
  echo $chan $timestamp 10(12 $+ Topic Change By $nick $+ 10) 10( $+ $1- $+ 10)  }
  haltdef
}
on ^*:snotice:*:{
  echo -a $timestamp 10(12 $+ Server Notice $+ 10) $+ 10(4 $+ $2- $+ 10)
  haltdef
}

Comments

Sign in to comment.
WildTiger   -  Dec 17, 2015

Thank you so much :) but how can i use colors for nicklist only Ircops and admins orange color ?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.