KeyFC欢迎致辞，点击播放
资源、介绍、历史、Q群等新人必读
KeyFC 社区总索引		 如果你找到这个笔记本，请把它邮寄给我们的回忆
KeyFC 漂流瓶传递活动 Since 2011		  

双开脚本(按键精灵6.1)

[ 12779 查看 / 9 回复 ]

返回列表
发新话题 回复该主题
aong678
头像

aong678

  • - 永远光辉的季节 -
  • 来自：火星
  • 性别：男
  • 生日：1989-09-13
  • 注册： 2007-05-03
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • 广东省汕尾市
2007-05-03 08:14 |只看楼主 楼主
t T
需要 按键精灵版本6.1
脚本
  VBSCall RunApp("C:\KEY\CLANNAD\REALLIVE.EXE")
    //日文游戏路径默认为 C:\KEY\CLANNAD\REALLIVE.EXE
    Plugin hwnd1 = Window.GetKeyFocusWnd()
    VBSCall RunApp("C:\KEY\CLANNAD\REALLIVE.EXE")
    //中文游戏路径默认为 C:\KEY\CLANNAD\REALLIVE.EXE
    Plugin hwnd2 = Window.GetKeyFocusWnd()
    Delay 2000
    //延迟时间默认为 2000毫秒
    Sub 1
        WaitKey k
        If k=96
    //游戏中翻页键默认为 96  则数字盘上 0
            Plugin BGKM2.KeyClick(hwnd1,13)
            Plugin BGKM2.KeyClick(hwnd2,13)
        EndIf
        Gosub 1

由脚本启动 翻页键由数字盘上 0  代替Enter 进行翻页
游戏支持全屏不需要切换窗口
但由于同步率并不太理想所以请不要按得太快大约等1秒左右就可以了
启动脚本时需要让按键精灵程序窗口化 不能最小化否则脚本无效


这个脚本需要 361度 的后台操作插件
否则脚本脚本无效(忘记说了。。。。)
请到按键精灵论坛下载该插件 下载后解压于按键精灵目录下 plugin 文件夹中
http://bbs.vrbrothers.com/viewthread.php?tid=33722
最后编辑aong678 最后编辑于 2007-05-13 02:12:34
分享 转发
TOP
刘硕鼠
头像

  • - 永远光辉的季节 -
  • 来自：
  • 性别：土豆
  • 生日：
  • 注册： 2007-03-07
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • [帝都]
2007-05-03 14:51 |只看该用户 2#
t T

回复：双开脚本(按键精灵6.1)

……

如果是窗口方式的话，只需要这样的脚本
MoveTo x1,y1
LeftClick 1
MoveTo x2,y2
LeftClick 1

其中x1,y1 x2,y2分别是两个窗口上的某点，两个窗口只要不完全重合，露出一点即可，按一次两个窗口同步翻页，原理非常简单一看便知

然后利用PowerMenu或类似工具使中文版窗口始终置于最上方即可
最后编辑刘硕鼠 最后编辑于 2007-05-03 14:52:05
TOP
aong678
头像

aong678

  • - 永远光辉的季节 -
  • 来自：火星
  • 性别：男
  • 生日：1989-09-13
  • 注册： 2007-05-03
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • [广东省汕尾市]
2007-05-03 19:05 |只看楼主 3#
t T

回复: 双开脚本(按键精灵6.1)

LS的脚本确实方便多了
以前不知道有能让窗口始终前端显示的软件。。。。
TOP
keakon
头像

  • - 星光等候的天堂 -
  • 来自：
  • 性别：男
  • 生日：1986-05-20
  • 注册： 2006-12-17
  • 精华：0
  • 学分：0 个
  • 好人卡：32 张
  • 好感度：5
  • 四川省成都市
2007-05-05 06:56 |只看该用户 4#
t T

回复：双开脚本(按键精灵6.1)

楼主想法真奇特，收下谢谢了～

『智代after PS2汉化移植完毕』www.keakon.cn
TOP
chaineryu
头像

  • - 星光等候的天堂 -
  • 来自：
  • 性别：男
  • 生日：1985-11-15
  • 注册： 2006-10-31
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • [魔都]
2007-05-05 09:26 |只看该用户 5#
t T

回复：双开脚本(按键精灵6.1)

Plugin hwnd = Window.GetKeyFocusWnd()
For 10000000
    WaitKey last_click
    Plugin Window.SendKeyPress(hwnd,13)
EndFor

这个最简单了。。连换窗口都不需要，后台操作日文版的旧可以了
TOP
刘硕鼠
头像

  • - 永远光辉的季节 -
  • 来自：
  • 性别：土豆
  • 生日：
  • 注册： 2007-03-07
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • [帝都]
2007-05-06 01:26 |只看该用户 6#
t T

回复: 双开脚本(按键精灵6.1)

原帖由 chaineryu 于 2007-5-5 9:26:00 发表
Plugin hwnd = Window.GetKeyFocusWnd()
For 10000000
    WaitKey last_click
    Plugin Window.SendKeyPress(hwnd,13)
EndFor

这个最简单了。。连换窗口都不需要，后台操作日文版的旧可以了


你这个没有测试过吧，SendKeyPress这个对Clannad好像无效的说

btw:我为什么不能引用..................
最后编辑刘硕鼠 最后编辑于 2007-05-06 01:27:42
TOP
keakon
头像

  • - 星光等候的天堂 -
  • 来自：
  • 性别：男
  • 生日：1986-05-20
  • 注册： 2006-12-17
  • 精华：0
  • 学分：0 个
  • 好人卡：32 张
  • 好感度：5
  • 四川省成都市
2007-05-06 06:38 |只看该用户 7#
t T

回复：双开脚本(按键精灵6.1)

嗯，是不能用SendKeyPress，但可以用其他办法，麻烦些＝。＝

『智代after PS2汉化移植完毕』www.keakon.cn
TOP
chaineryu
头像

  • - 星光等候的天堂 -
  • 来自：
  • 性别：男
  • 生日：1985-11-15
  • 注册： 2006-10-31
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • [魔都]
2007-05-07 21:54 |只看该用户 8#
t T

回复: 双开脚本(按键精灵6.1)

原帖由 刘硕鼠 于 2007-5-6 1:26:00 发表
[quote]原帖由 chaineryu 于 2007-5-5 9:26:00 发表
Plugin hwnd = Window.GetKeyFocusWnd()
For 10000000
    WaitKey last_click
    Plugin Window.SendKeyPress(hwnd,13)
EndFor

这个最简单了。......



可以用的，只要多运行几次。。到成功为止。。。而且偶尔会出错和停摆，做点微妙的调整就ok了


我就是这么玩得嗯，并且在多台电脑上试过了
TOP
equaliser
头像

  • - 永远光辉的季节 -
  • 来自：
  • 性别：土豆
  • 生日：
  • 注册： 2007-05-07
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • 江苏省南京市
2007-05-09 21:50 |只看该用户 9#
t T

回复：双开脚本(按键精灵6.1)

SendKeyPress有用，但是加上WaitKey就完全失效

不解
TOP
aong678
头像

aong678

  • - 永远光辉的季节 -
  • 来自：火星
  • 性别：男
  • 生日：1989-09-13
  • 注册： 2007-05-03
  • 精华：0
  • 学分：0 个
  • 好人卡：30 张
  • 好感度：0
  • 广东省汕尾市
2007-05-13 02:18 |只看楼主 10#
t T

回复：双开脚本(按键精灵6.1)

修改了脚本 能够自行翻页了 不过同步率差了点

顺便把以前的脚本贴下
VBSCall RunApp("C:\KEY\CLANNAD\REALLIVE.EXE")
Plugin hwnd1 = Window.GetKeyFocusWnd()
VBSCall RunApp("C:\KEY\CLANNAD\REALLIVE.EXE")
Plugin hwnd2 = Window.GetKeyFocusWnd()
Delay 2000
For 10000000000
    Plugin BGKM2.KeyClick(hwnd1,13)
    Plugin BGKM2.KeyClick(hwnd2,13)
    Delay 3000
EndWhile
同样需要插件 同步率好
不过每3秒就会自动翻页 需要设置暂停键在每次翻页后3秒内暂停脚本再按暂停键继续脚本
TOP
返回列表
上一主题 | 下一主题