rendered paste bodyon *:LOAD:{
.color background 1
.color background 1
.color Action text 07
.color Ctcp text 04
.color Highlight text 04
.color Info text 11
.color Info2 text 11
.color Invite text 07
.color Join text 08
.color Kick text 09
.color Mode text 09
.color Nick text 00
.color Normal text 00
.color Notice text 08
.color Other text 07
.color Own text 00
.color Part text 08
.color Quit text 08
.color Topic text 00
.color Wallops text 14
.color Whois text 07
linee
echo -at $c6(Loaded:) $c7(DevilDRake's) $c6(First Theme) $c7(-) $c5(BlackRain)
linee
}
On *:START:{
timestamp on
tsu
}
; Change colours to your liking here
alias c5 return $+($chr(3),06,$1-,$chr(3))
alias c6 return $+($chr(3),07,$1-,$chr(3))
alias c7 return $+($chr(3),12,$1-,$chr(3))
alias c8 return $+($chr(3),00,$1-,$chr(3))
alias c9 return $+($chr(3),04,$1-,$chr(3))
Alias tsu {
; this is for if you change the colours above
; that way your timestamp changes with it
timestamp -f $c5(«) $+ $c7($chr(40)) $+ $c6(hh) $+ $c5(:) $+ $c6(nn) $+ $c5(:) $+ $c6(ss) $c6(TT) $+ $c7($chr(41)) $+ $c5(»)
echo -at TimeStamp Updated
}
On ^*:JOIN:#:{
echo -t $chan $c7($chr(40)) $+ $c6(Join) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6($nick) $c7($chr(40)) $+ $c5($address($nick,5)) $+ $c7($chr(41))
haltdef
}
On ^*:PART:#:{
echo -t $chan $c7($chr(40)) $+ $c6(Part) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6($nick) $c7($chr(40)) $+ $c5($address($nick,5)) $+ $c7($chr(41))
haltdef
}
On ^*:RAWMODE:#:{
echo -t $chan $c7($chr(40)) $+ $c6(Mode) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6($nick) $c6(sets) $c7($chr(40)) $+ $c5($1-) $+ $c7($chr(41))
haltdef
}
On ^*:ACTION:*:#:{
echo -t $chan $c7($chr(40)) $+ $c6(Action) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6($nick) $c5($1-)
haltdef
}
Alias Me {
if (!$1-) { /echo -a * /me: insufficient parameters
}
else {
.describe # $$1-
echo -t $chan $c7($chr(40)) $+ $c6(Action) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6($me) $c5($1-)
haltdef
}
}
On ^*:QUIT:{
var %x $comchan($nick,0)
while %x {
echo -t $comchan($nick,%x) $c7($chr(40)) $+ $c5($nick) $c6(has Quit) $+ $c7($chr(41)) $c6(Quit Message:) $c5($1-)
dec %x
haltdef
}
}
On ^*:KICK:#:{
echo -t $chan $c7($chr(40)) $+ $c6(Kick) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6($nick) $c5(kicks) $c7($knick) $c7($chr(40)) $+ $c5(Reason:) $c6($1-) $+ $c7($chr(41))
haltdef
}
On ^*:NOTICE:*:?:{
echo -at $chan $c7($chr(40)) $+ $c9(Notice) $c5(from) $c9($nick) $+ $c7($chr(41)) $c9($1-)
haltdef
}
on ^*:INVITE:#:{
echo -at $c7($chr(40)) $+ $c6(Invite) $c5(from) $c6($nick) $+ $c7($chr(41)) $c6(Join) $c7($chan)
haltdef
}
On ^*:CTCPREPLY:VERSION*:{
echo -at $c7($chr(40)) $+ $c6(Version) $c5(Reply from) $c6($nick) $+ $c7($chr(41)) $c6(IRC CLIENT:) $c7($1-)
haltdef
}
On ^*:CTCPREPLY:PING*:{
echo -at $c7($chr(40)) $+ $c6(Ping) $c5(Reply from) $c6($nick) $+ $c7($chr(41)) $c6(Ping Reply:) $c7($1-)
haltdef
}
On ^*:CTCPREPLY:TIME*:{
echo -at $c7($chr(40)) $+ $c6(Time) $c5(Reply from) $c6($nick) $+ $c7($chr(41)) $c6(Current Time:) $c7($1-)
haltdef
}
On ^*:NICK:{
var %y $comchan($newnick,0)
while %y {
echo -t $comchan($newnick,%y) $c7($chr(40)) $+ $c6(Nickchange) $+ $c7($chr(41)) $c6($nick) $c7(is now known as) $c6($newnick)
dec %y
haltdef
}
}
on ^*:TEXT:*:?:{
if ($nick != $active) {
echo -at $c7($chr(40)) $+ $c6(Query) $c5(from) $c6($nick) $+ $c7($chr(41)) $c6($1-)
}
echo -t $nick $c5(«) $+ $c7($chr(40)) $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
on ^*:TEXT:*:#:{
if ($nick == $me) {
halt
}
elseif ($nick isop $chan) {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9() $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
elseif ($nick ishop $chan) {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9() $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
elseif ($nick isvoice $chan) {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9() $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
else {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
}
on *:INPUT:*:{
if ($left($1,1) != /) {
if ($me isop $chan) {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9() $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
elseif ($me ishop $chan) {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9() $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
elseif ($me isvoice $chan) {
echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9() $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)))
haltdef
}
else {
echo -at $c5(«) $+ $c7($chr(40)) $+ $c6($me) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1))
haltdef
}
.msg $active $upper($left($1-,1)) $+ $right($1-,-1)
}
}
On *:BAN:#:{
Var %a $nick($chan,0)
while %a {
If ($banmask iswm $address($nick($chan,%a),5)) {
var %b %b $nick($chan,%a)
echo -t $chan $c7($chr(40)) $+ $c6(Ban) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6(Ban affects:) $c5(%b)
}
dec %a
}
else {
echo -t $chan $c7($chr(40)) $+ $c6(Ban) $c5(in) $c6($chan) $+ $c7($chr(41)) $c6(Ban affects:) $c5(Nobody In the Current Channel)
}
}