virtuoso选定半屏显示脚本

Visen_Chiang · 发表于 2025-5-9 10:08:57

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

x

本帖最后由 Visen_Chiang 于 2025-5-14 15:16 编辑

附件存在问题请不要下载，往下翻一下有代码

复制代码

Visen_Chiang · 发表于 2025-5-12 10:05:23

建议使用双屏的朋友将屏幕分辨率调为一致
脚本中的坐标是一个左下角点坐标一个右上角点坐标，以此来确定窗口要改为什么样的尺寸
屏幕分辨率可以看linux系统里的system-preferences-display
然后就是简单的加减乘除了，将两个屏幕的X方向像素数加在一起，分成四份去配置脚本。
如果使用单屏的话则更简单，还可以省两组快捷键。

Visen_Chiang · 发表于 2025-5-12 10:59:54

本帖最后由 Visen_Chiang 于 2025-5-12 13:52 编辑

QYF2022 发表于 2025-5-12 10:14
文件下载下来乱码了。。。。。

procedure(
let(
(winId winBox ScRX ScRY)

winId = getCurrentWindow()

ScRX = 5120 ;屏幕分辨率X像素数，若双屏则填入乘以二的值
ScRY = 1392 ;屏幕分辨率Y像素数

case(incr
(1
winBox = list(0:0 fix(ScRX/4-2):fix(ScRY) )
)
(2
winBox = list(fix(ScRX/4+2):0 fix(ScRX/2):fix(ScRY) )
)
(3
winBox = list(fix(ScRX/2):0 fix(3*ScRX/4-2):fix(ScRY) )
)
(4
winBox = list(fix(3*ScRX/4+2):0 fix(ScRX):fix(ScRY) )
)
);;end case

hiResizeWindow(winId winBox)

);;let
);;procedure

hiSetBindKey("Layout" "显示在左显示器左半屏的快捷键" "CWS(1)")
hiSetBindKey("Schematics" "显示在左显示器左半屏的快捷键" "CWS(1)")
hiSetBindKey("Layout" "显示在左显示器右半屏的快捷键" "CWS(2)")
hiSetBindKey("Schematics" "显示在左显示器右半屏的快捷键" "CWS(2)")
hiSetBindKey("Layout" "显示在右显示器左半屏的快捷键" "CWS(3)")
hiSetBindKey("Schematics" "显示在右显示器左半屏的快捷键" "CWS(3)")
hiSetBindKey("Layout" "显示在右显示器右半屏的快捷键" "CWS(4)")
hiSetBindKey("Schematics" "显示在右显示器右半屏的快捷键" "CWS(4)")

Cayre · 发表于 2025-5-9 10:55:23

伟大无需多言！！

gxc_cjgs · 发表于 2025-5-9 16:32:09

是不是少了个改的指令？

gxc_cjgs · 发表于 2025-5-9 16:37:40

hiResizeWindow（）

Visen_Chiang · 发表于 2025-5-12 10:02:41

gxc_cjgs 发表于 2025-5-9 16:32
是不是少了个改的指令？

是的多谢提醒
已经更新到最新的脚本里了

QYF2022 · 发表于 2025-5-12 10:14:23

文件下载下来乱码了。。。。。

chouchole · 发表于 2025-5-12 11:07:45

我的环境下

(1
winBox = list(0:0 屏幕分辨率X*0.5-2:屏幕分辨率Y )
)

复制代码

屏幕分辨率X*0.5这个结果是个浮点数，需要修改成

winBox = list(0:0 int(屏幕分辨率X*0.5)-2:屏幕分辨率Y )

复制代码

Visen_Chiang · 发表于 2025-5-12 13:37:39

chouchole 发表于 2025-5-12 11:07
我的环境下
屏幕分辨率X*0.5这个结果是个浮点数，需要修改成

我这边除以2是个整数，可以除以2后，再减去2左右。因为边框也占两个像素左右，这样好看一些。

[原创] virtuoso选定半屏显示脚本

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

浏览过的版块

站长推荐 /1