Theme for irc

By sukhbira on Apr 06, 2012

Screenshots

it's not much. But it's my theme. Any corrections you can see please let me know.. I already posted the screenshot before, but I know with the snippet people are going to want to see..

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+15 $+ $nick $+ 10) $1-
    goto end
  }
  else { 
    echo $chan $timestamp 10(12 $+ $nick $+ 10) $1-

  }
  :end
  haltdef
}
on ^*:TEXT:*:?:{
  echo $nick $timestamp 10(4 $+ $nick $+ 10) $1-
  haltdef
}
on *:INPUT:#:{ 
  if (/ !isin $left($1,1)) {
    if ($me isop $chan) {
      echo -a $timestamp 10(6 $+ 3@15 $+ $nick $+ 10) $1-
      goto end
    }
    elseif ($me ishop $chan) {
      echo -a $timestamp 10(6 $+ 3@15 $+ $nick $+ 10) $1-
      goto end
    }
    elseif ($me isvoice $chan) {
      echo -a $timestamp 10(7 $+ 3+15 $+ $nick $+ 10) $1-
      goto end
    }
    else { 
    echo -a $timestamp 10(5 $+ $nick $+ 10) $1-   }
    :end
    .privmsg $chan $1-
    haltdef
  }
}

on *:INPUT:?:{
  if (/ !isin $left($1,1)) {
    echo -a $timestamp 10(5 $+ $nick $+ 10) $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(15 $+ $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(15 $+ Server Notice $+ 10) $+ 10(15 $+ $2- $+ 10)
  haltdef
}
raw 311:*:{
  Echo -a 12(12 Nick: $2 10) 
  Echo -a 10(13 Host: $3 $+ @ $+ $4 10)
  Echo -a 10(4 name: $6- 10)
  halt
}
raw 312:*:Echo -a 10(12 Server: $3 10) | halt
raw 319:*:Echo -a 10(13 Channels: $3- 10) | halt
raw 317:*:Echo -a 10(15 Idle: $duration($3) 10) | halt 
raw 313:*:Echo -a 10(15 $2- 10) | halt
raw 301:*:Echo -a 10(15 Away: $3- 10) |halt
raw 318:*:halt

Comments

Sign in to comment.
Wade   -  Apr 06, 2012

you can use "echo -t" that will echo the line prefixed with $timestamp, so you dont need to add $timestamp manually.

also you may want to look at $nick().pnick instead of repeatedly checking if $nick isop, ishop, isvoice etc. (remember you have $left() and $right() :P )

You also have a random privmsg command on line 110, but other than that looking good :)

 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.