Screenshot:
Hawkee cut off the last part of the bar, full screenshot here: https://puu.sh/uSC1r/edb552213f.png
Wrote a little titlebar/statusbar in DCX. You will need DCX.dll as well as the following aliases:
dir.dll { return $shortfn($mircdir) $+ dll\ }
dcx { if ($isid) returnex $dll($dir.dll $+ dcx.dll,$1,$2-) | else dll " $+ $dir.dll $+ dcx.dll" $1 $2- }
udcx { if ($dcx(IsUnloadSafe)) $iif($menu, .timer 1 0) dll -u dcx.dll | else echo 4 -qmlbfti2 [DCX] Unable to Unload Dll. }
xdid { if ( $isid ) returnex $dcx( _xdid, $1 $2 $prop $3- ) | dcx xdid $2 $3 $1 $4- }
xdialog { if ( $isid ) returnex $dcx( _xdialog, $1 $prop $2- ) | dcx xdialog $2 $1 $3- }
xdock { if ($isid) returnex $dcx( _xdock, $1 $prop $2- ) | dcx xdock $1- }
xstatusbar { !if ($isid) returnex $dcx( _xstatusbar, mIRC $prop $1- ) | dcx xstatusbar $1- }
xtreebar { !if ($isid) returnex $dcx( _xtreebar, mIRC $prop $1- ) | dcx xtreebar $1- }
xtray { if ($isid) returnex $dcx(TrayIcon, $1 $prop $2-) | dcx TrayIcon $1- }
xpop { if ( $isid ) returnex $dcx( _xpop, $1 $prop $2- ) | dcx xpop $2 $1 $3- }
xpopup { if ( $isid ) returnex $dcx( _xpopup, $1 $prop $2- ) | dcx xpopup $2 $1 $3- }
xmenubar { if ($isid) returnex $dcx(_xmenubar, $prop $1-) | dcx xmenubar $1- }
mpopup { dcx mpopup $1 $2 }
dcxml dcx dcxml $1-
tab {
var %i = 1, %tab
while (%i <= $0) {
if ($eval($+($,%i),2) != $null) { %tab = $instok(%tab,$eval($+($,%i),2),$calc($numtok(%tab,9) + 1),9) }
inc %i
}
return %tab
}
xdc return xdialog -c $dname
blk return xdialog -g $dname +b $rgb(0,0,0)
Here is my titlebar/statusbar system. Hope you like it.
on *:load: {
.echo -aq $input(Author: Protheus $+ $crlf $+ $crlf $+ Addon: Titlebar System $chr(40) $+ v1.0 $+ $chr(41) $+ $crlf $+ $crlf $+ Released on: 1/07/2017 $+ $crlf $+ $crlf $+ Contact: lokiisagod@live.com $+ $crlf $+ $crlf $+ Thank you for using this Addon!,igo,Addon: Titlebar System $chr(40) $+ v1.0 $+ $chr(41))
.echo -sa _____________________________________________________
.echo -sa 0,1 Loading 9,1Titlebar System0,1 Add-On...
.echo -sa 0,1 You are running mIRC $version on Windows $+ $os
.echo -sa ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: {
.echo -aq $input(Author: Protheus $+ $crlf $+ $crlf $+ Addon: Titlebar System $chr(40) $+ v1.0 $+ $chr(41) $+ $crlf $+ $crlf $+ Released on: 1/07/2017 $+ $crlf $+ $crlf $+ Contact: lokiisagod@live.com $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: Titlebar System $chr(40) $+ v1.0 $+ $chr(41))
}
alias tbar {
if ($dialog(tbar)) { dialog -x tbar }
dialog -m tbar tbar
}
alias DCX_tbar {
}
dialog tbar {
title ""
size -1 -1 1600 1
option dbu
}
on *:dialog:tbar:init:*: {
dcx Mark $dname tbar_cb
$blk
$xdc 1 list 0 8 200 20 nosel
xdid -f $dname 1 +a ansi 8 Verdana
xdid -C $dname 1 +t $color(3)
xdid -C $dname 1 +b $color(1)
xdid -a $dname 1 1 3{14- Server 14-3}9 $+($iif($scid($activecid).server,$scid($activecid).server,Not Connected))
$xdc 2 list 235 8 200 20 nosel
xdid -f $dname 2 +a ansi 8 Verdana
xdid -C $dname 2 +t $color(3)
xdid -C $dname 2 +b $color(1)
xdid -a $dname 2 1 3{14- $active 14-3}9 $chan($active).mode
$xdc 3 list 480 8 200 20 nosel
xdid -f $dname 3 +a ansi 8 Verdana
xdid -C $dname 3 +t $color(3)
xdid -C $dname 3 +b $color(1)
xdid -a $dname 3 1 3{14- Nickname 14-3}9 $nick
$xdc 4 list 725 8 200 20 nosel
xdid -f $dname 4 +a ansi 8 Verdana
xdid -C $dname 4 +t $color(3)
xdid -C $dname 4 +b $color(1)
xdid -a $dname 4 1 3{14- Usermodes 14-3}9 $usermode
$xdc 5 list 962 8 226 20 nosel
xdid -f $dname 5 +a ansi 8 Verdana
xdid -C $dname 5 +t $color(3)
xdid -C $dname 5 +b $color(1)
xdid -a $dname 5 1 3{14- Date 14-3}9 $day $+ , $date(mmmm dd yyyy)
xdock -m $dialog(tbar).hwnd +t
}
alias tbar_cb { }
on *:ACTIVE:*: {
if ($dialog(tbar)) {
xdid -o tbar 1 1 3{14- Server 14-3}9 $+($iif($scid($activecid).server,$scid($activecid).server,Not Connected))
xdid -o tbar 2 1 3{14- $active 14-3}9 $chan($active).mode
xdid -o tbar 3 1 3{14- Nickname 14-3}9 $nick
xdid -o tbar 4 1 3{14- Usermodes 14-3}9 $usermode
xdid -o tbar 5 1 3{14- Date 14-3}9 $day $+ , $date(mmmm dd yyyy)
}
}