来自:
http://forum.ahkbbs.cn/thread-12-1-1.html
作了一点点修改,把注释里的替换了一下
;-----------------------------------
;生成 Discuz! 的 AHK 脚本高亮
;ahk_func.h 函数
;ahk_sh.h #开头的命令
;ahk_a.h 内置变量
;-----------------------------------
#SingleInstance force
#v::
content=% ClipBoard%
FileRead, func, ahk_func.h
FileRead, sh, ahk_sh.h
FileRead, a, ahk_a.h
content:= RegExReplace (content, " ( ;.*)", "$1")
content:= RegExReplace (content, func, " $1" )
content:= RegExReplace (content, sh, " $1" )
content:= RegExReplace (content, a, " $1" )
content:= RegExReplace (content, " (/ (|/ )|/ {|/ } )", " $1" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
ClipBoard=%content%
ClipWait
Send, ^v
作了一点点修改,把注释里的替换了一下
;-----------------------------------
;生成 Discuz! 的 AHK 脚本高亮
;ahk_func.h 函数
;ahk_sh.h #开头的命令
;ahk_a.h 内置变量
;-----------------------------------
#SingleInstance force
#v::
content=% ClipBoard%
FileRead, func, ahk_func.h
FileRead, sh, ahk_sh.h
FileRead, a, ahk_a.h
content:= RegExReplace (content, " ( ;.*)", "$1")
content:= RegExReplace (content, func, " $1" )
content:= RegExReplace (content, sh, " $1" )
content:= RegExReplace (content, a, " $1" )
content:= RegExReplace (content, " (/ (|/ )|/ {|/ } )", " $1" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
content:= RegExReplace (content, " (/ [color=red]) (.*? ) (/[color.*?/] ) (.*? ) (/[/color/] ) (.*? ) (/[/color/] )", "$1$2$4$6$7" )
ClipBoard=%content%
ClipWait
Send, ^v