注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

Undefined

For imagination,for science,for justice.

 
 
 

日志

 
 

[AHK]鼠标中键环形菜单2.7版  

2010-03-28 12:55:00|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

效果图

[AHK]鼠标中键环形菜单2.7版 - NiGH - 天·NiGH[对不起][AHK]鼠标中键环形菜单2.7版 - NiGH - 天·NiGH[对不起]

 

代码如下:

 

  • ; AutoHotkey Version: 1.0.47.6
  • ; Language: English
  • ; Platform: vista
  • ; Author: NiGH jiyucheng007@163.com
  • ; Blog: http://blog.jiyucheng007.163.com/
  • txt := "本作品以署名-非商业性使用-相同方式共享 3.0 Unported的创作共用协议发布`n您可以自由: `n 复制、发行、展览、表演、放映、广播或通过信息网络传播本作品 `n 创作演绎作品`n惟须遵守下列条件: `n 署名. 您必须按照作者或者许可人指定的方式对作品进行署名。 `n 非商业性使用. 您不得将本作品用于商业目的。 `n 相同方式共享. 如果您改变、转换本作品或者以本作品为基础进行创作,您只能采用与本协议相同的许可协议发布基于本作品的演绎作品。 `n 对任何再使用或者发行,您都必须向他人清楚地展示本作品使用的许可协议条款。 `n 如果得到著作权人的许可,您可以不受任何这些条件的限制。"
  • fileinstall 48x48.ico, 48x48.ico
  • fileinstall 1.png, 1.png
  • fileinstall movie.ico, movie.ico
  • fileinstall Pointix.ico, Pointix.ico
  • fileinstall replays.ico, replays.ico
  • fileinstall L3.ico, L3.ico
  • fileinstall ucl.ico, ucl.ico
  • #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.

  • CoordMode, Mouse, Screen

  • SendMode Input ; Recommended for new scripts due to its superior speed and reliability.

  • SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.

  • ;MouseGetPos, x, y

  • IniRead, p1, set.ini, path, p1

  • IniRead, p2, set.ini, path, p2

  • IniRead, p3, set.ini, path, p3

  • IniRead, p4, set.ini, path, p4

  • IniRead, p5, set.ini, path, p5

  • IniRead, p6, set.ini, path, p6

  • Gui, -Caption +ToolWindow +Disable

  • Gui, 2:-Caption +AlwaysOnTop +Owner

  • Gui, 3:-Caption +Owner +ToolWindow

  • gui, Color, black

  • Gui, 2:Color, black

  • Gui, Add, Picture, w400 h400, 1.png

  • Gui, 2:Add, Picture, , ;将GUI2的图片控件的ClassNN起始值+1,以区别于背景

  • Gui, 2:Add, Picture, w70 h70 x200 y70 vico2, 48x48.ico

  • Gui, 2:Add, Picture, w70 h70 x290 y130 vico3, movie.ico

  • Gui, 2:Add, Picture, w70 h70 x290 y240 vico4, Pointix.ico

  • Gui, 2:Add, Picture, w70 h70 x200 y290 vico5, replays.ico

  • Gui, 2:Add, Picture, w70 h70 x110 y240 vico6, L3.ico

  • Gui, 2:Add, Picture, w70 h70 x110 y130 vico7, ucl.ico

  • Gui, Show, x-800 y-800, Eyes ;在屏幕外进行 GUI 界面初始化

  • WinSet, TransColor, black 20, A

  • Gui, 2:Show, x-800 y-800 w500 h500, Icon ;在屏幕外进行 GUI 界面初始化

  • WinSet, TransColor, black 150, A

  • Gui, Hide

  • Gui, 2:Hide

  • Gui, 3:add, Edit, x162 y22 w140 h20 +Center vp1, % p1 ;设置的界面

  • Gui, 3:add, Edit, x282 y72 w150 h20 +Center vp2, % p2

  • Gui, 3:add, Edit, x282 y142 w150 h20 +Center vp3, % p3

  • Gui, 3:add, Edit, x122 y192 w220 h20 +Center vp4, % p4

  • Gui, 3:add, Edit, x42 y142 w150 h20 +Center vp5, % p5

  • Gui, 3:add, Edit, x42 y72 w150 h20 +Center vp6, % p6

  • Gui, 3:add, Button, x182 y42 w100 h20 gs1, 1号装填

  • Gui, 3:add, Button, x302 y92 w100 h20 gs2, 2号装填

  • Gui, 3:add, Button, x302 y162 w100 h20 gs3, 3号装填

  • Gui, 3:add, Button, x182 y212 w100 h20 gs4, 4号装填

  • Gui, 3:add, Button, x72 y162 w100 h20 gs5, 5号装填

  • Gui, 3:add, Button, x72 y92 w100 h20 gs6, 6号装填

  • Gui, 3:add, Button, x192 y82 w90 h80 gfire, 发射

  • gui, 3:show, x-500 y-500 ;设置界面初始化

  • WinSet, TransColor, F0F0F0 170, A

  • gui, 3:Hide

  • Menu, tray, NoStandard ;去除默认菜单项

  • Menu, Tray, Add, 设置, 设置 ;设置菜单项

  • Menu, tray, Add, 关于作者, 关于作者 ;添加一个菜单项。

  • Menu, Tray, Add, 关于, 关于

  • Menu, tray, add, 退出, GuiClose

  • SetTimer, Label0, 50

  • Return

  • 关于:

  • MsgBox, % txt

  • Return

  • 设置:

  • Gui, 3:Show, Center

  • Return

  • s1:

  • FileSelectFile, temp, 35, , 选择你的弹药

  • GuiControl,, p1, %temp%

  • Return

  • s2:

  • FileSelectFile, temp, 35, , 选择你的弹药

  • GuiControl,, p2, %temp%

  • Return

  • s3:

  • FileSelectFile, temp, 35, , 选择你的弹药

  • GuiControl,, p3, %temp%

  • Return

  • s4:

  • FileSelectFile, temp, 35, , 选择你的弹药

  • GuiControl,, p4, %temp%

  • Return

  • s5:

  • FileSelectFile, temp, 35, , 选择你的弹药

  • GuiControl,, p5, %temp%

  • Return

  • s6:

  • FileSelectFile, temp, 35, , 选择你的弹药

  • GuiControl,, p6, %temp%

  • Return

  • fire:

  • Gui, 3:Submit

  • IniWrite, %p1%, set.ini, path, p1

  • IniWrite, %p2%, set.ini, path, p2

  • IniWrite, %p3%, set.ini, path, p3

  • IniWrite, %p4%, set.ini, path, p4

  • IniWrite, %p5%, set.ini, path, p5

  • IniWrite, %p6%, set.ini, path, p6

  • Return

  • 关于作者:

  • run, http://jiyucheng007.blog.163.com/

  • Return

  • Label0:

  • {

  • KeyWait, MButton, D ;等待鼠标中键被按下

  • MouseGetPos, x, y

  • Gui, Show, % "x"x-200 "y"y-200

  • Gui, 2:Show, % "x"x-200 "y"y-200 ;使得界面以鼠标为中心展开

  • SetTimer, checkpos, 50

  • KeyWait, MButton, U ;等待鼠标中键松开

  • SetTimer, run, -1 ;关于命令执行的 Label

  • SetTimer, checkpos, Off ;停止鼠标位置检测

  • Gui, 2:Cancel

  • Gui, Cancel

  • }

  • Return

  • run:

  • If (c = "Static7") ;执行相应的命令

  • {

  • SplitPath, p6, , dir6

  • Run, % p6, % dir6

  • }

  • If (c = "Static6")

  • {

  • SplitPath, p5, , dir5

  • Run, % p5, % dir5

  • }

  • If (c = "Static5")

  • {

  • SplitPath, p4, , dir4

  • Run, % p4, % dir4

  • }

  • If (c = "Static4")

  • {

  • SplitPath, p3, , dir3

  • Run, % p3, % dir3

  • }

  • If (c = "Static3")

  • {

  • SplitPath, p2, , dir2

  • Run, % p2, % dir2

  • }

  • If (c = "Static2")

  • {

  • SplitPath, p1, , dir1

  • Run, % p1, % dir1

  • }

  • Exit

  • checkpos:

  • MouseGetPos, , , , c

  • StringRight, num, c, 1

  • If ((num >= 2) and (num <= 7))

  • SetTimer, ico%num%, -1

  • Else

  • SetTimer, recover, -1 ;检测鼠标位置,使得鼠标所停留的图标突出显示,且离开后恢复

  • Return

  • recover:

  • GuiControl, 2:movedraw, ico2, w40 h40 ;恢复图标大小

  • GuiControl, 2:movedraw, ico3, w40 h40

  • GuiControl, 2:movedraw, ico4, w40 h40

  • GuiControl, 2:movedraw, ico5, w40 h40

  • GuiControl, 2:movedraw, ico6, w40 h40

  • GuiControl, 2:movedraw, ico7, w40 h40

  • Exit

  • ico2:

  • GuiControl, 2:Movedraw, ico2, w60 h60 ;图标突出显示

  • Exit

  • ico3:

  • GuiControl, 2:Movedraw, ico3, w60 h60

  • Exit

  • ico4:

  • GuiControl, 2:Movedraw, ico4, w60 h60

  • Exit

  • ico5:

  • GuiControl, 2:Movedraw, ico5, w60 h60

  • Exit

  • ico6:

  • GuiControl, 2:Movedraw, ico6, w60 h60

  • Exit

  • ico7:

  • GuiControl, 2:Movedraw, ico7, w60 h60

  • Exit

  • 2guiclose:

  • GuiClose:

  • ExitApp

 

素材 及 编译好的 文件 见http://ahk.5d6d.com/thread-2732-1-1.html

  评论这张
 
阅读(297)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018