It's a theme i made, its pretty well laid out, and it works.
Thanks for using.
`Zerg
post any comments you may have.
TRIGGERS:
/theme
oh and F5 and F6 do magical things.
REVISED
10/14/09
Realized when you typed /cs access #chan list it made it all different colors and hard to read
Fixed this.
UPDATES:
8/15/09: Fixed littlefont error
9/2/09: Fixed Timestamp error.
alias theme {
.tokenize 46 * 04 ~&@.* 07 % .* 09 +.* 10.on | .cnick $*
.timestamp -f 14[04ddd14\04hh14:04nn14:04ss 14(04tt14)]
.timestamp on
.timestamp -g (hh:nn:ss)
.font -z 11 Trebuchet MS
.color Action text 06
.color Ctcp text 04
.color Highlight text 04
.color Info text 12
.color Info2 text 12
.color Invite text 05
.color Join text 03
.color Kick text 03
.color Mode text 03
.color Nick text 03
.color Normal text 00
.color Notice text 05
.color Other text 00
.color Own text 00
.color Part text 03
.color Quit text 12
.color Topic text 03
.color Wallops text 00
.color Whois text 0
.color Editbox text 0
.color Listbox text 0
.color Gray text 0
.color Title text 0
.color Treebar text 0
.color Editbox 01
.color Listbox 01
.color Treebar 01
.color Inactive 01
.color BackGround 01
//echo -a $+($chr(169),$chr(90),$chr(101),$chr(114),$chr(103),$chr(44),$chr(32),$chr(48),$chr(56),$chr(47),$chr(48),$chr(50),$chr(47),$chr(48),$chr(57),$chr(26),$date(mm/dd/yy))
}
on ^*:TEXT:*:#: {
if ($nick !ison $chan) {
haltdef
echo -tm $chan $+(<,$chr(3),10,$chr(2),$nick,$chr(3),$chr(2),>) $1-
}
else {
var %n = $iif($nick !isreg $chan,$left($nick($chan,$nick).pnick,1),$chr(240))
haltdef
echo -tm $chan $+(<,$chr(2),$chr(3),$replace(%n,@,4@,%,7%,+,09+,$chr(240),10),$nick,$chr(2),$chr(3),>) $1-
}
}
on ^*:TEXT:*:?: {
haltdef
echo -tm $nick $+(<,$chr(2),$chr(3),10,$nick,$chr(2),$chr(3),>) $1-
}
on ^*:RAWMODE:#: {
haltdef
echo $chan $+($chr(3),3,$timestamp) 03* $nick sets mode: $1-
}
on ^*:JOIN:#: {
if ($nick != $me) {
haltdef
echo $chan $+($chr(3),3,$timestamp) 03* $nick ( $+ $address $+ ) has joined $chan
}
else {
haltdef
echo $chan $+($chr(3),2,$timestamp) 03* Now talking in $chan
}
}
on ^*:PART:#: {
if ($nick != $me) {
haltdef
echo $chan $+($chr(3),3,$timestamp) 03* $nick ( $+ $address $+ ) has parted $chan $iif($1 != $null,$+($chr(40),$1-,$chr(41)),$chr(32))
}
if ($nick == $me) {
echo $chan $+($chr(3),3,$timestamp) 03* You have parted $chan
}
}
on ^*:KICK:#: {
if ($knick != $me) {
haltdef
echo $chan $+($chr(3),3,$timestamp) 03* $knick was kicked by $nick ( $+ $1- $+ )
}
if ($knick == $me) {
haltdef
echo -m $chan $+($chr(3),3,$timestamp) 03* You were kicked from $chan by $nick ( $+ $1- $+ )
}
}
on ^*:NICK: {
haltdef
var %i 1
while ($comchan($newnick,%i)) {
echo $comchan($newnick,%i) $+($chr(3),3,$timestamp) 03* $nick is now known as $newnick $+
inc %i
}
}
on ^*:QUIT: {
haltdef
var %i $comchan($nick,0)
while (%i) {
echo $comchan($nick,%i) $+(2,$timestamp) 12* $nick ( $+ $address $+ ) has quit IRC ( $+ $1- $+ )
dec %i
}
}
on ^*:NOTICE:*:?: {
haltdef
echo -as $+($chr(3),5,$timestamp) $+(05,-,$chr(2),$nick,$chr(2),-) $+(00,$1-)
}
on ^*:NOTICE:*:#: {
haltdef
echo -as $+($chr(3),5,$timestamp) $+(05,-,$chr(2),$nick,$chr(2),:,$chan,-) $+(00,$1-)
}
on ^*:SNOTICE:*: {
haltdef
echo -a $+($chr(3),5,$timestamp) $+(05,-,$chr(2),$nick,$chr(2),-) $+(00,$1-)
}
on ^*:ACTION:*:#: {
if ($nick ison $chan) {
haltdef
var %a = $iif($nick !isreg $chan,$left($nick($chan,$nick).pnick,1),$chr(240))
echo -m $chan $+($chr(3),6,$timestamp) 06* $replace(%a,$chr(240),$chr(32)) $+ $nick $1-
}
else {
haltdef
echo -m $chan $+($chr(3),6,$timestamp) 06* $nick $1-
}
}
on ^*:ACTION:*:?: {
haltdef
echo -m $nick $+($chr(3),6,$timestamp) 06* $nick $1-
}
on *:INPUT:#: {
if ($left($1,1) != /) {
var %n = $iif($me !isreg $chan,$left($nick($chan,$me).pnick,1),$chr(240))
haltdef
echo -t $chan $+(<,$chr(2),$chr(3),$replace(%n,@,4@,%,7%,+,09+,$chr(240),10),$nick,$chr(2),$chr(3),>) $1-
.msg $chan $1-
}
if ($1 == /notice) {
haltdef
.notice $2 $3-
echo -sa $+(2,$timestamp) 05-> $+(·´¯`·.¸¸.-> ,$2,-) $3-
}
if ($1 == /me) {
haltdef
var %a = $iif($nick !isreg $chan,$left($nick($chan,$me).pnick,1),$chr(240))
echo -m $chan $+($chr(3),6,$timestamp) 06* $replace(%a,$chr(240),$chr(32)) $+ $me $2-
.Describe # $2-
}
if ($1 == /describe) {
haltdef
var %a = $iif($nick !isreg $chan,$left($nick($chan,$me).pnick,1),$chr(240))
echo -m $2 $+($chr(3),6,$timestamp) 06* $replace(%a,$chr(240),$chr(32)) $+ $me $3-
.describe $2 $3-
}
}
on *:INPUT:?: {
if ($left($1,1) != /) {
haltdef
echo -t $+(<,$chr(2),$chr(3),10,$me,$chr(3),$chr(2),>) $1-
.msg $active $1-
}
if ($1 == /notice) {
haltdef
.notice $2 $3-
echo -sa $+(05,$timestamp) ->05 $+(-,$2,-) ·´¯`·.¸¸.-> $3- /notice
}
if ($1 == /me) {
haltdef
var %a = $iif($nick !isreg $chan,$left($nick($chan,$me).pnick,1),$chr(240))
echo -m $chan $+($chr(3),6,$timestamp) 06* $replace(%a,$chr(240),$chr(32)) $+ $me $2-
.describe $active $2-
}
if ($1 == /describe) {
haltdef
var %a = $iif($nick !isreg $chan,$left($nick($chan,$me).pnick,1),$chr(240))
echo -m $2 $+($chr(3),6,$timestamp) 06* $replace(%a,$chr(240),$chr(32)) $+ $me $3-
.describe $2 $3-
}
}
Raw *:*: {
if ($numeric == 332) {
haltdef
echo -m $2 $+($chr(3),3,$timestamp) 03 *Topic is ' $+ $3- $+ '
}
if ($numeric == 333) {
haltdef
echo -m $2 $+($chr(3),3,$timestamp) 03* Topic set by $3 on $asctime($4-)
}
}
on ^*:TOPIC:#: {
haltdef
echo -m $chan $+($chr(3),3,$timestamp) 03* $nick changes topic to $+(',$1-,')
}
alias F5 {
set %say $$?="What would you like to /me?""
msg $active /me %say
}
alias F6 {
set %say $$?="What would you like to /notice?""
msg $active /me %say
}
For example, I have something along the lines of you see, if you actually knew how to read at all, you'd know that i'm talking about the if part, which you obviously don't, why don't you go distribute more child porn, ban evade, leech, and take credit for others scripts that obviously isn't yours, Termz. And of course, it's my own alias. If you really would be interested in it, click here.
Hello Zerg, i have some suggestions for you to make. as you can use control+enter to send messages straight to the channel, you could use something else for your on INPUTs. For example, I have something along the lines of
on *:INPUT:#:{
if (/* !iswm $1) || ($ctrlenter) {
haltdef
.msg # $1-
echo -at [ $+ $levelc($me) $+ 14 $+ $me $+ ] $1-
}
}