XYplorer Beta Club

Code: Select all

#NoTrayIcon
#SingleInstance force
#Persistent

xyClass := "ThunderRT6FormDC"

SysGet, m, MonitorCount
Loop, %m%
	SysGet, mon%A_Index%, Monitor, %A_Index%

leftX := 120
leftY := 10
leftWidth = 1550
leftHeigth = 1000

rightX := mon2Left + 120
rightY := 10
rightWidth = 1550
rightHeigth = 1000

SetTimer, MoveXY, 250
return

MoveXY:
if WinExist("ahk_class" . xyClass)
{
	WinGetPos, xPos, , , , ahk_class %xyClass%
	if (xPos >= mon2Left) {
		WinMove, ahk_class %xyClass%, , rightX, rightY, rightWidth, rightHeigth
	} else {
		WinMove, ahk_class %xyClass%, , leftX, leftY, leftWidth, leftHeigth
	}
}
return

Code: Select all

    $posLimit = 4;
    end $posLimit > 9, "Do not set the position limit to a value greater then 9!";
    $helperApp = self("path") . "\XYplorer_ManageWindowPosition.exe";

    $winPositions = <<<>>>
>>>;

    $curPosition = runret("""$helperApp"" /get");
    $saveCurPosMenuEntry = "&Save (" . trim(replace($curPosition, "|", " "), "<crlf>") . ")";
    $winPositionCount = gettoken(trim($winPositions, "<crlf>"), "count", "<crlf>"); // How many stored positions?

    // Purge entries if $posLimit was changed
    if ($winPositionCount > $posLimit) {
        $i = 1;
        $tmpWinPositions = "";
        foreach($item, $winPositions, "<crlf>") {
            if ($i > $posLimit) {
                break;
            } else {
                $tmpWinPositions = $tmpWinPositions . $item . "<crlf>";
            }
            $i++;
        }
        $tmpWinPositions = trim($tmpWinPositions, "<crlf>");
        $content = regexreplace(readfile(self("file")), "(\$[w]inPositions = <<<>>>)([\s\S]+?)(>>>;)", "$1<crlf>$tmpWinPositions<crlf>$3");
        writefile(self("file"), $content);
        $winPositions = $tmpWinPositions;
    }

    // Display position entries through popup menu
    $popupEntries = "";
    if ($winPositionCount == 0) {
        $popupEntries = "No positions to restore...";
    } else {
        $i = 1;
        foreach($pos, $winPositions, "<crlf>") {
            $popupEntries = $popupEntries . "&" . $i++ . " - " . replace($pos, "|", " ") . "|";
        }
    }
    $popup = popupmenu("$saveCurPosMenuEntry|-|$popupEntries", -1, -1);

    if (strpos($popup, "save") != -1) { // Save a new entry
        $i = 2;
        $tmpWinPositions = trim($curPosition, "<crlf>");
        if ($winPositionCount >= 1) {
            foreach ($item, $winPositions, "<crlf>") {
                if ($i <= $posLimit) {
                    $tmpWinPositions = $tmpWinPositions . "<crlf>" . $item;
                }
                $i++;
            }
        }
        $content = regexreplace(readfile(self("file")), "(\$[w]inPositions = <<<>>>)([\s\S]+?)(>>>;)", "$1<crlf>$tmpWinPositions<crlf>$3");
        writefile(self("file"), $content);
        status "Current position saved!", "006400", "ready";

    } elseif (strpos($popup, "-") != -1) { // Move window
        $newPosition = regexreplace($popup, "^.*?(?=x)|[xywh]:");
        run """$helperApp"" /move $newPosition", , 2, 0;
    }