取色器(小改一点)

感觉之前那个有点反人类,可能你们用的不多所以不觉得 :>)  所以说是需求让我们相遇了

和之前大体一样,新增取色后按R复制RGBA格式的和按F复制16进制格式的

CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
MouseGetPos, x, y
PixelGetColor, color, x, y, RGB
MsgBox % "x: " x   "   y: "y  "`t RGB:" SubStr(color,3) "`n 按R复制rgba `t 按F复制16进制"
r::
Clipboard := "rgba("ToBase("0x" . SubStr( color, 3,2),10)","ToBase("0x" . SubStr(color, 5,2),10)","ToBase("0x" . SubStr(color, 7,2),10)",1)"
ExitApp
f::
Clipboard := "#"SubStr(color,3)
ExitApp
/**
* @description: 16转10
* @param {String,Number} ToBase(0xFFFFFF,10)
* @return {Number}
*/
ToBase(n,b){
    return (n < b ? "" : ToBase(n//b,b)) . ((d:=Mod(n,b)) < 10 ? d : Chr(d+55))  
}
声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。

给TA捐赠
共{{data.count}}人
人已捐赠
其他

如何批量分类整理照片

2021-4-21 14:19:31

其他

AHKReader : 一个用 Autohotkey 开发的网络文章聚合阅读器

2021-4-24 1:02:54

3 条回复 A文章作者 M管理员
  1. hexuren

    加油

  2. BigOrange

    确实, 现在看是有点菜

个人中心
购物车
优惠劵
有新私信 私信列表
搜索