DCX wallops ircd
Platform: mIRC
Published Sep 25, 2011
Updated Nov 16, 2011
this is a dcx wallops that I had help creating. the original code was from aurora and then adapted from D34ths code
but I have recoded to be ircd base only meaning it has svsnick exiting and such rather than just SNOTICE
image of the full irc is here wallops is down the bottom
on *:START: { wbar }
alias wbar {
if ($dialog(wbar)) { dialog -x wbar }
dialog -m wbar wbar
Unset %Linez.Wallopz
}
alias DCX_wbar {
}
dialog wbar {
title ""
size 2 2 1366 35
option dbu
}
alias NWStart {
.timer 1 0 xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ckb 0 0 $color(4) $color(1) Information $chr(9) +ck 0 0 $color(4) $color(1) STARTUP $chr(9) +ck 0 0 $color(4) $color(1) MiRC Started
.timer 1 1 xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(1) $time(hh:nn:ss tt) $chr(9) +ckb 0 0 $color(15) $color(1) Information $chr(9) +ck 0 0 $color(4) $color(1) STARTUP $chr(9) +ck 0 0 $color(15) $color(1) Created By Cayne/BigSteve
.timer 1 2 xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(1) $time(hh:nn:ss tt) $chr(9) +ckb 0 0 $color(15) $color(1) Information $chr(9) +ck 0 0 $color(4) $color(1) STARTUP $chr(9) +ck 0 0 $color(15) $color(1) Scripts Loaded $Script(0)
.timer 1 3 xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(1) $time(hh:nn:ss tt) $chr(9) +ckb 0 0 $color(15) $color(1) Information $chr(9) +ck 0 0 $color(4) $color(1) STARTUP $chr(9) +ck 0 0 $color(15) $color(1) Your are running mIRC version $version
.timer 1 4 xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(1) $time(hh:nn:ss tt) $chr(9) +ckb 0 0 $color(15) $color(1) Information $chr(9) +ck 0 0 $color(4) $color(1) STARTUP $chr(9) +ck 0 0 $color(15) $color(1) Client working on Windows $os
Set %Linez.Wallopz 5
}
on *:dialog:wbar:init:*: {
dcx Mark $dname DCX_wbar
xdialog -q $dname +r cross
xdialog -c $dname 1 listview 0 0 1360 100 report fullrow grid
xdid -t $dname 1 +c 0 80 Event Time $chr(9) +c 0 100 Server $chr(9) -l 0 100 Type $chr(9) +l 0 880 Message
.timer 1 0 xdock -m $dialog($dname).hwnd +b
.timer 1 1 NWStart
}
#SNote On
on *:SNOTICE:*: {
if ($4 == from) && ($2 !== Global) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(4) $color(1) $server $chr(9) +ck 0 0 $color(4) $color(1) $2 $chr(9) +ck 0 0 $color(4) $color(1) $strip($5-) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
elseif ($4 == from) && ($2 == Global) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(4) $color(1) $server $chr(9) +ck 0 0 $color(4) $color(1) GLOBALOPS $chr(9) +ck 0 0 $color(4) $color(1) $strip($5-) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
elseif ($4 == Client) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(4) $color(1) $server $chr(9) +ck 0 0 $color(4) $color(1) $5 $chr(9) +ck 0 0 $color(4) $color(1) $strip($6-) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
elseif ($8 == forced) && ($12 == nickname) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(4) $color(1) $server $chr(9) +ck 0 0 $color(4) $color(1) SVSNICK $chr(9) +ck 0 0 $color(4) $color(1) $strip($4) -> $strip($14) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
elseif ($7 == changed) && ($8 == his/her) && ($9 == nickname) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(4) $color(1) $server $chr(9) +ck 0 0 $color(4) $color(1) NICK $chr(9) +ck 0 0 $color(4) $color(1) $strip($4) -> $strip($11) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
else { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(4) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(4) $color(1) $server $chr(9) +ck 0 0 $color(4) $color(1) SNOTICE $chr(9) +ck 0 0 $color(4) $color(1) $2- | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
}
on *:WALLOPS:*: { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(12) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(15) $color(12) $server $chr(9) +ck 0 0 $color(15) $color(12) WALLOPS $chr(9) +ck 0 0 $color(15) $color(12) $1- | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
on *:CONNECT: { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(15) $color(1) $server $chr(9) +ck 0 0 $color(15) $color(1) Connection $chr(9) +ck 0 0 $color(15) $color(1) Connected | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.wallopz }
On *:Text:*:*:{
If ($Active != $Chan) {
If ($me Isin $1-) || ($Regex($1-,Steve) >= 1) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(8) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(8) $color(1) $server $chr(9) +ck 0 0 $color(8) $color(1) NICKCALL $chr(9) +ck 0 0 $color(8) $color(1) $Nick Has Said Your Name On $Chan With Message $Strip($1-) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.wallopz }
}
}
On *:Action:*:*:{
If ($Active != $Chan) {
If ($me Isin $1-) || ($Regex($1-,Steve) >= 1) { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(8) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(8) $color(1) $server $chr(9) +ck 0 0 $color(8) $color(1) NICKCALL $chr(9) +ck 0 0 $color(8) $color(1) $Nick Has Said Your Name On $Chan With Message $Strip($1-) | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.wallopz }
}
}
on *:DISCONNECT: { .xdid -a wbar 1 0 0 +ck 0 0 0 0 $color(15) $color(1) $time(hh:nn:ss tt) $chr(9) +ck 0 0 $color(15) $color(1) $server $chr(9) +ck 0 0 $color(15) $color(1) Connection $chr(9) +ck 0 0 $color(15) $color(1) Disconnected | Inc %Linez.Wallopz | xdid -V wbar 1 %Linez.Wallopz }
#Snote End
alias mdx { return DLL\mdx.dll }
alias moo { return DLL\moo.dll }
alias hos { return DLL\hos.dll }
alias views { return DLL\views.mdx }
alias bars { return DLL\bars.mdx }
alias custom { return DLL\mircustom.dll }
alias ctl { return DLL\ctl_gen.mdx }
alias dmdx { return DLL\dialog.mdx }
alias views { return DLL\views.mdx }
alias mdxin { dll $mdx SetMircVersion $version | dll $mdx MarkDialog $dname }
alias popupsd { return DLL\POPUPS.DLL }
alias de { return DLL\darkenginex.dll }
