2012-09-27 20:32:27 +00:00
|
|
|
/*
|
|
|
|
bug.n -- tiling window management
|
2015-01-25 12:07:37 +00:00
|
|
|
Copyright (c) 2010-2015 Joshua Fuhs, joten
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
2015-01-25 12:07:37 +00:00
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
2012-09-27 20:32:27 +00:00
|
|
|
GNU General Public License for more details.
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-25 12:07:37 +00:00
|
|
|
@license GNU General Public License version 3
|
|
|
|
../LICENSE.md or <http://www.gnu.org/licenses/>
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-25 13:04:17 +00:00
|
|
|
@version 9.0.0
|
2012-09-27 20:32:27 +00:00
|
|
|
*/
|
2011-07-27 17:43:34 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_init(m) {
|
2015-01-30 22:38:40 +00:00
|
|
|
Local appBarMsg, anyText, color, color0, GuiN, h1, h2, i, id, id0, text, text0, titleWidth, trayWndId, w, wndId, wndTitle, wndWidth, x1, x2, y1, y2
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
If (SubStr(Config_barWidth, 0) = "%") {
|
2012-09-27 20:32:27 +00:00
|
|
|
StringTrimRight, wndWidth, Config_barWidth, 1
|
|
|
|
wndWidth := Round(Monitor_#%m%_width * wndWidth / 100)
|
2015-01-30 19:13:10 +00:00
|
|
|
} Else
|
2012-09-27 20:32:27 +00:00
|
|
|
wndWidth := Config_barWidth
|
2014-12-13 15:12:38 +00:00
|
|
|
|
|
|
|
wndWidth := Round(wndWidth * Config_scalingFactor)
|
|
|
|
If (Config_verticalBarPos = "tray" And m = Manager_taskBarMonitor) {
|
|
|
|
Bar_ctrlHeight := Round(Bar_ctrlHeight * Config_scalingFactor)
|
|
|
|
Bar_height := Round(Bar_height * Config_scalingFactor)
|
|
|
|
}
|
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
Monitor_#%m%_barWidth := wndWidth
|
|
|
|
titleWidth := wndWidth
|
|
|
|
h1 := Bar_ctrlHeight
|
|
|
|
x1 := 0
|
|
|
|
x2 := wndWidth
|
|
|
|
y1 := 0
|
|
|
|
y2 := (Bar_ctrlHeight - Bar_textHeight) / 2
|
2015-01-30 19:13:10 +00:00
|
|
|
h2 := Bar_textHeight
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-10-02 10:11:00 +00:00
|
|
|
;; Create the GUI window
|
2012-09-27 20:32:27 +00:00
|
|
|
wndTitle := "bug.n_BAR_" m
|
|
|
|
GuiN := (m - 1) + 1
|
2012-09-28 15:46:17 +00:00
|
|
|
Debug_logMessage("DEBUG[6] Bar_init(): Gui, " . GuiN . ": Default", 6)
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, %GuiN%: Default
|
2012-10-01 19:20:45 +00:00
|
|
|
Gui, Destroy
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, +AlwaysOnTop -Caption +LabelBar_Gui +LastFound +ToolWindow
|
2015-01-30 19:13:10 +00:00
|
|
|
Gui, Color, %Config_backColor_#1_#3%
|
|
|
|
Gui, Font, c%Config_fontColor_#1_#3% s%Config_fontSize%, %Config_fontName%
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
;; Views
|
|
|
|
Loop, % Config_viewCount {
|
|
|
|
w := Bar_getTextWidth(" " Config_viewNames_#%A_Index% " ")
|
|
|
|
Bar_addElement(m, "view_#" A_Index, " " Config_viewNames_#%A_Index% " ", x1, y1, w, Config_backColor_#1_#1, Config_foreColor_#1_#1, Config_fontColor_#1_#1)
|
2012-09-27 20:32:27 +00:00
|
|
|
titleWidth -= w
|
|
|
|
x1 += w
|
|
|
|
}
|
2012-10-02 10:11:00 +00:00
|
|
|
;; Layout
|
2015-01-30 19:13:10 +00:00
|
|
|
w := Bar_getTextWidth(" ?????? ")
|
|
|
|
Bar_addElement(m, "layout", " ?????? ", x1, y1, w, Config_backColor_#1_#2, Config_foreColor_#1_#2, Config_fontColor_#1_#2)
|
2012-09-27 20:32:27 +00:00
|
|
|
titleWidth -= w
|
|
|
|
x1 += w
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-10-02 10:11:00 +00:00
|
|
|
;; The x-position and width of the sub-windows right of the window title are set from the right.
|
2015-01-30 22:38:40 +00:00
|
|
|
;; <view>;<layout>;<title>;<shebang>;<time>;<date>;<anyText>;<batteryStatus>;<volumeLevel>
|
|
|
|
color := "4"
|
|
|
|
id := "shebang"
|
|
|
|
text := " #! "
|
|
|
|
If Config_readinTime {
|
|
|
|
color .= ";5"
|
|
|
|
id .= ";time"
|
|
|
|
text .= "; ??:?? "
|
|
|
|
}
|
|
|
|
If Config_readinDate {
|
|
|
|
color .= ";6"
|
|
|
|
id .= ";date"
|
|
|
|
text .= "; ??, ??. ???. ???? "
|
|
|
|
}
|
|
|
|
If Config_readinVolume {
|
|
|
|
color .= ";9"
|
|
|
|
id .= ";volume"
|
|
|
|
text .= "; VOL: ???% "
|
|
|
|
}
|
|
|
|
anyText := Config_readinAny()
|
|
|
|
If anyText {
|
|
|
|
color .= ";7"
|
|
|
|
id .= ";anyText"
|
|
|
|
text .= ";" anyText
|
|
|
|
}
|
|
|
|
If Config_readinBat {
|
|
|
|
color .= ";8"
|
|
|
|
id .= ";batteryStatus"
|
|
|
|
text .= "; BAT: ???% "
|
|
|
|
}
|
|
|
|
StringSplit, color, color, `;
|
|
|
|
StringSplit, id, id, `;
|
|
|
|
StringSplit, text, text, `;
|
|
|
|
Loop, % id0 {
|
|
|
|
If (id%A_Index% = "shebang")
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, -Disabled
|
2015-01-30 22:38:40 +00:00
|
|
|
w := Bar_getTextWidth(text%A_Index%)
|
|
|
|
x2 -= w
|
|
|
|
titleWidth -= w
|
|
|
|
i := color%A_Index%
|
|
|
|
Bar_addElement(m, id%A_Index%, text%A_Index%, x2, y1, w, Config_backColor_#1_#%i%, Config_foreColor_#1_#%i%, Config_fontColor_#1_#%i%)
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-10-02 10:11:00 +00:00
|
|
|
;; Window title (remaining space)
|
2015-01-30 19:13:10 +00:00
|
|
|
If Not Config_singleRowBar {
|
2012-09-27 20:32:27 +00:00
|
|
|
titleWidth := wndWidth
|
|
|
|
x1 := 0
|
|
|
|
y1 += h1
|
|
|
|
y2 += h1
|
|
|
|
}
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_addElement(m, "title", "", x1, y1, titleWidth, Config_backColor_#1_#3, Config_foreColor_#1_#3, Config_fontColor_#1_#3)
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
If (Config_horizontalBarPos = "left")
|
|
|
|
x1 := 0
|
|
|
|
Else If (Config_horizontalBarPos = "right")
|
2014-12-13 15:12:38 +00:00
|
|
|
x1 := Monitor_#%m%_width - wndWidth / Config_scalingFactor
|
2012-09-27 20:32:27 +00:00
|
|
|
Else If (Config_horizontalBarPos = "center")
|
2014-12-13 15:12:38 +00:00
|
|
|
x1 := (Monitor_#%m%_width - wndWidth / Config_scalingFactor) / 2
|
|
|
|
Else If (Config_horizontalBarPos >= 0)
|
2012-09-27 20:32:27 +00:00
|
|
|
x1 := Config_horizontalBarPos
|
|
|
|
Else If (Config_horizontalBarPos < 0)
|
2014-12-13 15:12:38 +00:00
|
|
|
x1 := Monitor_#%m%_width - wndWidth / Config_scalingFactor + Config_horizontalBarPos
|
2012-09-27 20:32:27 +00:00
|
|
|
If Not (Config_verticalBarPos = "tray" And m = Manager_taskBarMonitor)
|
|
|
|
x1 += Monitor_#%m%_x
|
2014-12-13 15:12:38 +00:00
|
|
|
x1 := Round(x1)
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_#%m%_titleWidth := titleWidth
|
|
|
|
Monitor_#%m%_barX := x1
|
|
|
|
y1 := Monitor_#%m%_barY
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
If Monitor_#%m%_showBar
|
|
|
|
Gui, Show, NoActivate x%x1% y%y1% w%wndWidth% h%Bar_height%, %wndTitle%
|
|
|
|
Else
|
|
|
|
Gui, Show, NoActivate Hide x%x1% y%y1% w%wndWidth% h%Bar_height%, %wndTitle%
|
2014-09-30 11:08:48 +00:00
|
|
|
WinSet, Transparent, %Config_barTransparency%, %wndTitle%
|
2012-09-27 20:32:27 +00:00
|
|
|
wndId := WinExist(wndTitle)
|
2015-01-30 19:13:10 +00:00
|
|
|
If (Config_verticalBarPos = "tray" And m = Manager_taskBarMonitor) {
|
2012-09-27 20:32:27 +00:00
|
|
|
trayWndId := WinExist("ahk_class Shell_TrayWnd")
|
|
|
|
DllCall("SetParent", "UInt", wndId, "UInt", trayWndId)
|
2015-01-30 19:13:10 +00:00
|
|
|
} Else {
|
2012-09-27 20:32:27 +00:00
|
|
|
appBarMsg := DllCall("RegisterWindowMessage", Str, "AppBarMsg")
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-10-02 10:11:00 +00:00
|
|
|
;; appBarData: http://msdn2.microsoft.com/en-us/library/ms538008.aspx
|
2012-09-27 20:32:27 +00:00
|
|
|
VarSetCapacity(Bar_appBarData, 36, 0)
|
2012-12-15 19:56:18 +00:00
|
|
|
offset := NumPut( 36, Bar_appBarData)
|
|
|
|
offset := NumPut( wndId, offset+0)
|
|
|
|
offset := NumPut( appBarMsg, offset+0)
|
|
|
|
offset := NumPut( 1, offset+0)
|
|
|
|
offset := NumPut( x1, offset+0)
|
|
|
|
offset := NumPut( y1, offset+0)
|
|
|
|
offset := NumPut( x1 + wndWidth, offset+0)
|
|
|
|
offset := NumPut(y1 + Bar_height, offset+0)
|
|
|
|
offset := NumPut( 1, offset+0)
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
DllCall("Shell32.dll\SHAppBarMessage", "UInt", (ABM_NEW := 0x0) , "UInt", &Bar_appBarData)
|
|
|
|
DllCall("Shell32.dll\SHAppBarMessage", "UInt", (ABM_QUERYPOS := 0x2), "UInt", &Bar_appBarData)
|
|
|
|
DllCall("Shell32.dll\SHAppBarMessage", "UInt", (ABM_SETPOS := 0x3) , "UInt", &Bar_appBarData)
|
2012-10-02 10:11:00 +00:00
|
|
|
;; SKAN: Crazy Scripting : Quick Launcher for Portable Apps (http://www.autohotkey.com/forum/topic22398.html)
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2012-12-05 12:39:51 +00:00
|
|
|
Bar_initCmdGui()
|
2012-10-01 18:06:48 +00:00
|
|
|
{
|
2015-01-30 19:13:10 +00:00
|
|
|
Global Bar_#0_#0, Bar_#0_#0H, Bar_#0_#0W, Bar_cmdGuiIsVisible, Config_backColor_#1_#3, Config_barCommands, Config_fontName, Config_fontSize, Config_foreColor_#1_#3
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_cmdGuiIsVisible := False
|
|
|
|
wndTitle := "bug.n_BAR_0"
|
|
|
|
Gui, 99: Default
|
|
|
|
Gui, +LabelBar_cmdGui
|
|
|
|
IfWinExist, %wndTitle%
|
|
|
|
Gui, Destroy
|
2012-10-01 18:06:48 +00:00
|
|
|
Gui, +LastFound -Caption +ToolWindow +AlwaysOnTop +Delimiter`;
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, Color, Default
|
|
|
|
Gui, Font, s%Config_fontSize%, %Config_fontName%
|
2012-10-01 18:06:48 +00:00
|
|
|
StringSplit, cmd, Config_barCommands, `;
|
2015-01-30 19:13:10 +00:00
|
|
|
Gui, Add, ComboBox, x10 y0 r%cmd0% w300 Background%Config_backColor_#1_#3% c%Config_fontColor_#1_#3% Simple vBar_#0_#0 gBar_cmdGuiEnter, % Config_barCommands
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, Add, Button, Y0 Hidden Default gBar_cmdGuiEnter, OK
|
|
|
|
GuiControlGet, Bar_#0_#0, Pos
|
2012-10-01 18:06:48 +00:00
|
|
|
Bar_#0_#0W += 20
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, Show, Hide w%Bar_#0_#0W% h%Bar_#0_#0H%, %wndTitle%
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_addElement(m, id, text, x, y1, width, backColor, foreColor, fontColor) {
|
|
|
|
Local y2
|
|
|
|
|
|
|
|
y2 := y1 + (Bar_ctrlHeight - Bar_textHeight) / 2
|
|
|
|
Gui, Add, Text, x%x% y%y1% w%width% h%Bar_ctrlHeight% BackgroundTrans vBar_#%m%_%id%_event gBar_GuiClick,
|
|
|
|
Gui, Add, Progress, x%x% y%y1% w%width% h%Bar_ctrlHeight% Background%backColor% c%foreColor% vBar_#%m%_%id%_highlighted
|
|
|
|
GuiControl, , Bar_#%m%_%id%_highlighted, 100
|
|
|
|
Gui, Font, c%fontColor%
|
|
|
|
Gui, Add, Text, x%x% y%y2% w%width% h%Bar_textHeight% BackgroundTrans Center vBar_#%m%_%id%, %text%
|
|
|
|
}
|
|
|
|
|
2011-07-27 17:43:34 +00:00
|
|
|
Bar_cmdGuiEnter:
|
2015-01-25 21:26:17 +00:00
|
|
|
If (A_GuiControl = "OK") Or (A_GuiControl = "Bar_#0_#0" And A_GuiControlEvent = "DoubleClick") {
|
2012-10-01 18:06:48 +00:00
|
|
|
Gui, Submit, NoHide
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_cmdGuiIsVisible := False
|
|
|
|
Gui, Cancel
|
|
|
|
WinActivate, ahk_id %Bar_aWndId%
|
2012-10-01 18:06:48 +00:00
|
|
|
Main_evalCommand(Bar_#0_#0)
|
|
|
|
Bar_#0_#0 := ""
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
Return
|
|
|
|
|
2015-01-25 21:26:17 +00:00
|
|
|
Bar_cmdGuiEscape:
|
|
|
|
Bar_cmdGuiIsVisible := False
|
|
|
|
Gui, Cancel
|
|
|
|
WinActivate, ahk_id %Bar_aWndId%
|
|
|
|
Return
|
|
|
|
|
2012-12-05 12:39:51 +00:00
|
|
|
Bar_getHeight()
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Global Bar_#0_#1, Bar_#0_#1H, Bar_#0_#2, Bar_#0_#2H, Bar_ctrlHeight, Bar_height, Bar_textHeight
|
|
|
|
Global Config_fontName, Config_fontSize, Config_singleRowBar, Config_spaciousBar, Config_verticalBarPos
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
wndTitle := "bug.n_BAR_0"
|
|
|
|
Gui, 99: Default
|
|
|
|
Gui, Font, s%Config_fontSize%, %Config_fontName%
|
|
|
|
Gui, Add, Text, x0 y0 vBar_#0_#1, |
|
|
|
|
GuiControlGet, Bar_#0_#1, Pos
|
|
|
|
Bar_textHeight := Bar_#0_#1H
|
2012-12-05 12:39:51 +00:00
|
|
|
If Config_spaciousBar
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, Add, ComboBox, r9 x0 y0 vBar_#0_#2, |
|
|
|
|
GuiControlGet, Bar_#0_#2, Pos
|
|
|
|
Bar_ctrlHeight := Bar_#0_#2H
|
2012-12-05 12:39:51 +00:00
|
|
|
}
|
2012-10-02 10:11:00 +00:00
|
|
|
Else
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_ctrlHeight := Bar_textHeight
|
|
|
|
Gui, Destroy
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_height := Bar_ctrlHeight
|
|
|
|
If Not Config_singleRowBar
|
|
|
|
Bar_height *= 2
|
2012-12-05 12:39:51 +00:00
|
|
|
If (Config_verticalBarPos = "tray")
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
WinGetPos, , , , buttonH, Start ahk_class Button
|
|
|
|
WinGetPos, , , , barH, ahk_class Shell_TrayWnd
|
2013-01-17 20:21:28 +00:00
|
|
|
If WinExist("Start ahk_class Button") And (buttonH < barH)
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_height := buttonH
|
|
|
|
Else
|
|
|
|
Bar_height := barH
|
|
|
|
Bar_ctrlHeight := Bar_height
|
|
|
|
If Not Config_singleRowBar
|
|
|
|
Bar_ctrlHeight := Bar_height / 2
|
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2012-12-05 12:39:51 +00:00
|
|
|
Bar_getTextWidth(x, reverse=False)
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Global Config_fontSize
|
2012-12-05 12:39:51 +00:00
|
|
|
|
|
|
|
If reverse
|
2012-10-02 10:11:00 +00:00
|
|
|
{ ;; 'reverse' calculates the number of characters to a given width.
|
2012-09-27 20:32:27 +00:00
|
|
|
w := x
|
|
|
|
i := w / (Config_fontSize - 1)
|
|
|
|
If (Config_fontSize = 7 Or (Config_fontSize > 8 And Config_fontSize < 13))
|
|
|
|
i := w / (Config_fontSize - 2)
|
|
|
|
Else If (Config_fontSize > 12 And Config_fontSize < 18)
|
|
|
|
i := w / (Config_fontSize - 3)
|
|
|
|
Else If (Config_fontSize > 17)
|
|
|
|
i := w / (Config_fontSize - 4)
|
|
|
|
textWidth := i
|
2012-12-05 12:39:51 +00:00
|
|
|
}
|
|
|
|
Else
|
2012-10-02 10:11:00 +00:00
|
|
|
{ ;; 'else' calculates the width to a given string.
|
2012-09-27 20:32:27 +00:00
|
|
|
textWidth := StrLen(x) * (Config_fontSize - 1)
|
|
|
|
If (Config_fontSize = 7 Or (Config_fontSize > 8 And Config_fontSize < 13))
|
|
|
|
textWidth := StrLen(x) * (Config_fontSize - 2)
|
|
|
|
Else If (Config_fontSize > 12 And Config_fontSize < 18)
|
|
|
|
textWidth := StrLen(x) * (Config_fontSize - 3)
|
|
|
|
Else If (Config_fontSize > 17)
|
|
|
|
textWidth := StrLen(x) * (Config_fontSize - 4)
|
|
|
|
}
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
Return, textWidth
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2011-09-02 17:46:07 +00:00
|
|
|
Bar_GuiClick:
|
2012-09-27 20:32:27 +00:00
|
|
|
Manager_winActivate(Bar_aWndId)
|
2015-01-30 19:13:10 +00:00
|
|
|
If (A_GuiEvent = "Normal") {
|
|
|
|
If (SubStr(A_GuiControl, -13) = "_shebang_event") {
|
|
|
|
If Not Bar_cmdGuiIsVisible
|
|
|
|
If Not (SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6) = Manager_aMonitor)
|
|
|
|
Manager_activateMonitor(SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6))
|
|
|
|
Bar_toggleCommandGui()
|
|
|
|
} Else {
|
|
|
|
If Not (SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6) = Manager_aMonitor)
|
|
|
|
Manager_activateMonitor(SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6))
|
|
|
|
If (SubStr(A_GuiControl, -12) = "_layout_event")
|
|
|
|
View_setLayout(-1)
|
|
|
|
Else If InStr(A_GuiControl, "_view_#") And (SubStr(A_GuiControl, -5) = "_event")
|
|
|
|
Monitor_activateView(SubStr(A_GuiControl, InStr(A_GuiControl, "_view_#", False, 0) + 7, 1))
|
|
|
|
}
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
Return
|
|
|
|
|
2011-09-02 17:46:07 +00:00
|
|
|
Bar_GuiContextMenu:
|
2012-09-27 20:32:27 +00:00
|
|
|
Manager_winActivate(Bar_aWndId)
|
2015-01-30 19:13:10 +00:00
|
|
|
If (A_GuiEvent = "RightClick") {
|
|
|
|
If (SubStr(A_GuiControl, -12) = "_layout_event") {
|
2012-09-27 20:32:27 +00:00
|
|
|
If Not (SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6) = Manager_aMonitor)
|
2015-01-28 19:12:57 +00:00
|
|
|
Manager_activateMonitor(SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6))
|
2015-01-27 21:13:03 +00:00
|
|
|
View_setLayout(0, +1)
|
2015-01-30 19:13:10 +00:00
|
|
|
} Else If InStr(A_GuiControl, "_view_#") And (SubStr(A_GuiControl, -5) = "_event") {
|
2012-09-27 20:32:27 +00:00
|
|
|
If Not (SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6) = Manager_aMonitor)
|
2015-01-28 19:26:43 +00:00
|
|
|
Manager_setWindowMonitor(SubStr(A_GuiControl, 6, InStr(A_GuiControl, "_#", False, 0) - 6))
|
2015-01-30 19:13:10 +00:00
|
|
|
Monitor_setWindowTag(SubStr(A_GuiControl, InStr(A_GuiControl, "_view_#", False, 0) + 7, 1))
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
Return
|
|
|
|
|
|
|
|
Bar_loop:
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_updateStatus()
|
2011-07-27 17:43:34 +00:00
|
|
|
Return
|
|
|
|
|
2012-12-05 12:39:51 +00:00
|
|
|
Bar_move(m)
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Local wndTitle, x, y
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
x := Monitor_#%m%_barX
|
|
|
|
y := Monitor_#%m%_barY
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
wndTitle := "bug.n_BAR_" m
|
|
|
|
WinMove, %wndTitle%, , %x%, %y%
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2012-12-05 12:39:51 +00:00
|
|
|
Bar_toggleCommandGui()
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Local wndId, x, y
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, 99: Default
|
2012-12-05 12:39:51 +00:00
|
|
|
If Bar_cmdGuiIsVisible
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_cmdGuiIsVisible := False
|
|
|
|
Gui, Cancel
|
|
|
|
Manager_winActivate(Bar_aWndId)
|
2012-12-05 12:39:51 +00:00
|
|
|
}
|
|
|
|
Else
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Bar_cmdGuiIsVisible := True
|
|
|
|
x := Monitor_#%Manager_aMonitor%_barX + Monitor_#%Manager_aMonitor%_barWidth - Bar_#0_#0W
|
2012-10-01 19:48:24 +00:00
|
|
|
If (Config_verticalBarPos = "top") Or (Config_verticalBarPos = "tray" And (Manager_taskBarPos = "top" Or Not Manager_aMonitor = Manager_taskBarMonitor))
|
2012-09-27 20:32:27 +00:00
|
|
|
y := Monitor_#%Manager_aMonitor%_y
|
|
|
|
Else
|
|
|
|
y := Monitor_#%Manager_aMonitor%_y + Monitor_#%Manager_aMonitor%_height - Bar_#0_#0H
|
|
|
|
Gui, Show
|
|
|
|
WinMove, bug.n_BAR_0, , %x%, %y%
|
|
|
|
GuiControl, Focus, % Bar_#0_#0
|
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2012-12-05 12:39:51 +00:00
|
|
|
Bar_toggleVisibility(m)
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
Local GuiN
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
GuiN := (m - 1) + 1
|
2012-12-05 12:39:51 +00:00
|
|
|
If Monitor_#%m%_showBar
|
2012-10-02 10:11:00 +00:00
|
|
|
{
|
2012-09-27 20:32:27 +00:00
|
|
|
If Not (GuiN = 99) Or Bar_cmdGuiIsVisible
|
|
|
|
Gui, %GuiN%: Show
|
2012-12-05 12:39:51 +00:00
|
|
|
}
|
2012-10-02 10:11:00 +00:00
|
|
|
Else
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, %GuiN%: Cancel
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_updateLayout(m) {
|
|
|
|
Local aView, GuiN
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
aView := Monitor_#%m%_aView_#1
|
|
|
|
GuiN := (m - 1) + 1
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControl, %GuiN%: , Bar_#%m%_layout, % View_#%m%_#%aView%_layoutSymbol
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_updateStatus() {
|
2015-01-30 22:38:40 +00:00
|
|
|
Local anyContent, anyText, bat1, bat2, bat3, GuiN, m, mute, vol
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Loop, % Manager_monitorCount {
|
2012-09-27 20:32:27 +00:00
|
|
|
m := A_Index
|
|
|
|
GuiN := (m - 1) + 1
|
2012-09-28 15:46:17 +00:00
|
|
|
Debug_logMessage("DEBUG[6] Bar_updateStatus(): Gui, " . GuiN . ": Default", 6)
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, %GuiN%: Default
|
2015-01-30 19:13:10 +00:00
|
|
|
If Config_readinBat {
|
2015-01-30 22:38:40 +00:00
|
|
|
ResourceMonitor_getBatteryStatus(bat1, bat2)
|
|
|
|
bat3 := SubStr(" " bat1, -2)
|
|
|
|
If (bat1 < 10) And (bat2 = "off") {
|
2015-01-30 19:13:10 +00:00
|
|
|
;; Change the color, if the battery level is below 10%
|
2015-01-30 22:38:40 +00:00
|
|
|
GuiControl, +Background%Config_backColor_#3_#8% +c%Config_foreColor_#3_#8%, Bar_#%m%_batteryStatus_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#3_#8%, Bar_#%m%_batteryStatus
|
|
|
|
} Else If (bat2 = "off") {
|
2015-01-30 19:13:10 +00:00
|
|
|
;; Change the color, if the pc is not plugged in
|
2015-01-30 22:38:40 +00:00
|
|
|
GuiControl, +Background%Config_backColor_#2_#8% +c%Config_foreColor_#2_#8%, Bar_#%m%_batteryStatus_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#2_#8%, Bar_#%m%_batteryStatus
|
2015-01-30 19:13:10 +00:00
|
|
|
} Else {
|
2015-01-30 22:38:40 +00:00
|
|
|
GuiControl, +Background%Config_backColor_#1_#8% +c%Config_foreColor_#1_#8%, Bar_#%m%_batteryStatus_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#1_#8%, Bar_#%m%_batteryStatus
|
2012-12-05 12:39:51 +00:00
|
|
|
}
|
2015-01-30 22:38:40 +00:00
|
|
|
GuiControl, , Bar_#%m%_batteryStatus_highlighted, %bat3%
|
|
|
|
GuiControl, , Bar_#%m%_batteryStatus, % " BAT: " bat3 "% "
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
|
|
|
anyText := Config_readinAny()
|
2015-01-30 19:13:10 +00:00
|
|
|
If anyText {
|
|
|
|
GuiControlGet, anyContent, , Bar_#%m%_anyText
|
2012-09-27 20:32:27 +00:00
|
|
|
If Not (anyText = anyContent)
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControl, , Bar_#%m%_anyText, % anyText
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2015-01-30 22:38:40 +00:00
|
|
|
If Config_readinVolume {
|
|
|
|
SoundGet, vol, MASTER, VOLUME
|
|
|
|
SoundGet, mute, MASTER, MUTE
|
|
|
|
vol := Round(vol)
|
|
|
|
If (mute = "On") {
|
|
|
|
;; Change the color, if the mute is on
|
|
|
|
GuiControl, +Background%Config_backColor_#1_#9% +c%Config_foreColor_#1_#9%, Bar_#%m%_volume_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#1_#9%, Bar_#%m%_volume
|
|
|
|
} Else {
|
|
|
|
GuiControl, +Background%Config_backColor_#2_#9% +c%Config_foreColor_#2_#9%, Bar_#%m%_volume_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#2_#9%, Bar_#%m%_volume
|
|
|
|
}
|
|
|
|
GuiControl, , Bar_#%m%_volume_highlighted, %vol%
|
|
|
|
GuiControl, , Bar_#%m%_volume, % " VOL: " SubStr(" " vol, -2) "% "
|
|
|
|
}
|
|
|
|
If Config_readinDate
|
|
|
|
GuiControl, , Bar_#%m%_date, % " " A_DDD ", " A_DD ". " A_MMM ". " A_YYYY " "
|
2012-12-05 12:39:51 +00:00
|
|
|
If Config_readinTime
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControl, , Bar_#%m%_time, % " " A_Hour ":" A_Min " "
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_updateTitle() {
|
2012-09-27 20:32:27 +00:00
|
|
|
Local aWndId, aWndTitle, content, GuiN, i, title
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2014-03-09 18:16:35 +00:00
|
|
|
WinGet, aWndId, ID, A
|
|
|
|
WinGetTitle, aWndTitle, ahk_id %aWndId%
|
|
|
|
If InStr(Bar_hideTitleWndIds, aWndId ";") Or (aWndTitle = "bug.n_BAR_0")
|
|
|
|
aWndTitle := ""
|
2015-01-25 18:38:10 +00:00
|
|
|
If Window_#%aWndId%_isFloating
|
2014-03-09 18:16:35 +00:00
|
|
|
aWndTitle := "~ " aWndTitle
|
|
|
|
If (Manager_monitorCount > 1)
|
|
|
|
aWndTitle := "[" Manager_aMonitor "] " aWndTitle
|
2012-09-27 20:32:27 +00:00
|
|
|
title := " " . aWndTitle . " "
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
If (Bar_getTextWidth(title) > Bar_#%Manager_aMonitor%_titleWidth) {
|
|
|
|
;; Shorten the window title if its length exceeds the width of the bar
|
2012-09-27 20:32:27 +00:00
|
|
|
i := Bar_getTextWidth(Bar_#%Manager_aMonitor%_titleWidth, True) - 6
|
|
|
|
StringLeft, title, aWndTitle, i
|
|
|
|
title := " " . title . " ... "
|
|
|
|
}
|
2014-03-25 19:47:07 +00:00
|
|
|
StringReplace, title, title, &, &&, All ;; Special character '&', which would underline the next letter.
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Loop, % Manager_monitorCount {
|
2012-09-27 20:32:27 +00:00
|
|
|
GuiN := (A_Index - 1) + 1
|
2012-09-28 15:46:17 +00:00
|
|
|
Debug_logMessage("DEBUG[6] Bar_updateTitle(): Gui, " . GuiN . ": Default", 6)
|
2012-09-27 20:32:27 +00:00
|
|
|
Gui, %GuiN%: Default
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControlGet, content, , Bar_#%A_Index%_title
|
|
|
|
If (A_Index = Manager_aMonitor) {
|
2012-09-27 20:32:27 +00:00
|
|
|
If Not (content = title)
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControl, , Bar_#%A_Index%_title, % title
|
2012-09-27 20:32:27 +00:00
|
|
|
} Else If Not (content = "")
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControl, , Bar_#%A_Index%_title,
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
|
|
|
Bar_aWndId := aWndId
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Bar_updateView(m, v) {
|
2012-09-30 20:36:42 +00:00
|
|
|
Local managedWndId0, wndId0, wndIds
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-27 20:32:27 +00:00
|
|
|
GuiN := (m - 1) + 1
|
|
|
|
Gui, %GuiN%: Default
|
2012-09-30 20:36:42 +00:00
|
|
|
Debug_logMessage("DEBUG[6] Bar_updateView(): m: " . m . "; Gui, " . GuiN . ": Default", 6)
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2012-09-30 20:36:42 +00:00
|
|
|
StringTrimRight, wndIds, Manager_managedWndIds, 1
|
|
|
|
StringSplit, managedWndId, wndIds, `;
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
If (v = Monitor_#%m%_aView_#1) {
|
|
|
|
;; Set foreground/background colors if the view is the current view.
|
|
|
|
GuiControl, +Background%Config_backColor_#2_#1% +c%Config_foreColor_#2_#1%, Bar_#%m%_view_#%v%_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#2_#1%, Bar_#%m%_view_#%v%
|
|
|
|
} Else {
|
|
|
|
;; Set foreground/background colors.
|
|
|
|
GuiControl, +Background%Config_backColor_#1_#1% +c%Config_foreColor_#1_#1%, Bar_#%m%_view_#%v%_highlighted
|
|
|
|
GuiControl, +c%Config_fontColor_#1_#1%, Bar_#%m%_view_#%v%
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2012-12-05 12:39:51 +00:00
|
|
|
|
2015-01-30 19:13:10 +00:00
|
|
|
Loop, %Config_viewCount% {
|
2012-09-30 20:36:42 +00:00
|
|
|
StringTrimRight, wndIds, View_#%m%_#%A_Index%_wndIds, 1
|
|
|
|
StringSplit, wndId, wndIds, `;
|
2015-01-30 19:13:10 +00:00
|
|
|
GuiControl, , Bar_#%m%_view_#%A_Index%_highlighted, % wndId0 / managedWndId0 * 100 ;; Update the percentage fill for the view.
|
|
|
|
GuiControl, , Bar_#%m%_view_#%A_Index%, % Config_viewNames_#%A_Index% ;; Refresh the number on the bar.
|
2012-09-27 20:32:27 +00:00
|
|
|
}
|
2011-07-27 17:43:34 +00:00
|
|
|
}
|