Mac光标放大移植(Shake to Find Cursor)v1.0官方版内附源码-西西软件下载

Shake to Find Cursor是一款模仿mac系统摇晃鼠标来快速定位光标位置的软件，现在也可以跟在Mac上一样，只需简单地扭动鼠标就可以了！内附官方源码，有需要的小伙伴欢迎来西西下载体验。

软件介绍：

近年来，苹果公司做得比微软更好的事情之一，是他们的方法快速找到你的鼠标光标。目前，在windows中，你必须启用一个选项来点击 "ctrl "来 "突出显示 "他们的光标，但在Mac上，你只需简单地扭动鼠标就可以了！所以，这里是我的版本，这个实用程序是我的版本。

另外，如果你将鼠标悬停在 "摇一摇寻找 "图标上，你将会显示出光标移动了多少英里!

使用说明：

1、下载好后解压，运行EXE即可，软件自动出现在消息栏中说明已经运行

2、下次想要找鼠标，轻轻晃动鼠标，指针就会顿时变大

3、右键软件图标点击Exit退出软件

源码展示：

#Region; ****由AutoIt3Wrapper_GUI创建的指令****

＃AutoIt3Wrapper_Compression = 5;默认3

＃AutoIt3Wrapper_UseUpx = n

#EndRegion; ****由AutoIt3Wrapper_GUI创建的指令****

#include <TrayConstants.au3>; $ TRAY_ICONSTATE_SHOW常量必需。

#include <WindowsConstants.au3>

＃包括<WinAPI.au3>

#include <GDIPlus.au3>

$ gesture1 = “ 46464”

$ gesture2 = “ 19191”

$ gesture3 = “ 73737”

$ gesture4 = “ 28282”

$ gesture5 = “ 64646”

$ gesture6 = “ 91919”

$ gesture7 = “ 37373”

$ gesture8 = “ 82828”

全局常量$ AC_SRC_ALPHA = 1

全局$ oldMX，$ oldMY，$ curMx，$ curMY，$ distX，$ distY，$ distPix

全局$ DPI = 144 ; 我的笔记本电脑是144dpi

全局$ showing = 0

; HotKeySet （“ {END}” ，“ _Quit” ）; 点击“结束” 退出

$ avMousePos = MouseGetPos （）

$ win_mate = GUICreate （'测试' ，64 ，64 ，$ avMousePos [ 0 ] ，$ avMousePos [ 1 ] ，$ WS_POPUP，BITOR （$ WS_EX_LAYERED，$ WS_EX_TOOLWINDOW ））

WinSetOnTop （$ win_mate，`` ，1 ）

_GDIPlus_Startup （）

$ g_hImage = _GDIPlus_BitmapCreateFromMemory （_Torus （））

GUISetState （@SW_SHOW ）

_createTray （）

; 鼠标跟踪计时器

全局$ TIMER = TimerInit （）

全局$ TIMEOUT = 100 ; 1 秒= 1000

全局$ animTIMER = TimerInit （）

全局$ animTIMEOUT = 10 ; 1 秒= 1000

全局$ MouseSizeX = 12

全局$ MouseSizeY = 19

全局$ direction = 0

全局$ oldDirection = 0

全局$ dirChangeCount = 0

全局$ xAxis

全局$ yAxis

全局$ xAxisOld

全局$ yAxisOld

全局$ shakeCount = 0

$ avMousePos = MouseGetPos （）

$ curMX = $ avMousePos [ 0 ]

$ curMY = $ avMousePos [ 1 ]

全局常量$ pi = 3.14159265358979

$ current = “”

$ direction = “”

全球$ pos_old

全球$ pos_new

$ debug =错误

虽然1

$ avMousePos = MouseGetPos （）

如果TimerDiff （$ animTIMER ）> = $ animTIMEOUT然后

$ animTIMER = TimerInit （）

如果$ showing = 0，则

$ hWnd = WinGetHandle （$ win_mate ）

DllCall （“ user32.dll” ，“ int” ，“ ShowCursor” ，“ int” ，True ）

万一

如果$ showing = 1 然后

WinMove （$ win_mate，“” ，$ avMousePos [ 0 ] ，$ avMousePos [ 1 ] ）

; 隐藏指针图像中的光标！

$ hWnd = WinGetHandle （$ win_mate ）

DllCall （“ user32.dll” ，“ int” ，“ ShowCursor” ，“ int” ，False ）

本地$ iCursor = MouseGetCursor （）

如果$ MouseSizeX> 12，则

$ MouseSizeX = $ MouseSizeX *。95

$ MouseSizeY = $ MouseSizeY *。95

;创建新图像

$ GC = _GDIPlus_ImageGetGraphicsContext （$ g_hImage ）

$ newBmp = _GDIPlus_BitmapCreateFromGraphics （$ MouseSizeX，$ MouseSizeY，$ GC ）

$ newGC = _GDIPlus_ImageResize （$ g_hImage，$ MouseSizeX，$ MouseSizeY ）;调整图像大小

;画

_GDIPlus_GraphicsDrawImageRect （$ newGC，$ g_hImage，0 ，0 ，$ MouseSizeX，$ MouseSizeY ）

SetBitmap （$ win_mate，$ newGC，255 ，$ MouseSizeX，$ MouseSizeY ）

;克莱纳普

_GDIPlus_GraphicsDispose （$ GC ）

_GDIPlus_GraphicsDispose （$ newGC ）

_GDIPlus_BitmapDispose （$ newBmp ）

其他

SetBitmap （$ win_mate，$ g_hImage，0 ，12 ，19 ）

$显示= 0

万一

如果TimerDiff （$ TIMER ）> = $ TIMEOUT然后

$ TIMER = TimerInit （）

$ oldMX = $ curMX

$ oldMY = $ curMY

$ curMX = $ avMousePos [ 1 ]

$ curMY = $ avMousePos [ 0 ]

$ distX = abs （$ curMX-$ oldMX ）* abs （$ curMX-$ oldMX ）

$ distY = abs （$ curMY-$ oldMY ）* abs （$ curMY-$ oldMY ）

本地$ curDist = int （Sqrt （$ distX + $ distY ））

$ distPix = $ distPix + $ curDist

TraySetToolTip （圆（（$ distPix / $ DPI ）/ 63360 ，4 ）＆“里程” ）; 托盘图标工具提示

如果$ curDist> 150，则

$ a = GetAnglePO （$ curMY - $ oldMY，$ curMX - $ oldMX ）* 57.2957795130823

选择

情况$ a> = 337.5 或$ a < 22.5

$ direction = “ 6”

情况$ a> = 22.5 并且$ a < 67.5

$ direction = “ 3”

情况$ a> = 67.5 且$ a < 112.5

$ direction = “ 2”

情况$ a> = 112.5 并且$ a < 157.5

$ direction = “ 1”

情况$ a> = 157.5 和$ a < 202.5

$ direction = “ 4”

情况$ a> = 202.5 和$ a < 247.5

$ direction = “ 7”

情况$ a> = 247.5 并且$ a < 292.5

$ direction = “ 8”

情况$ a> = 292.5 和$ a < 337.5

$ direction = “ 9”

结束选择

如果$ direction <> StringRight （$ current，1 ）然后$ current＆= $ direction

万一

如果$ debug然后ToolTip （“当前：” ＆@TAB＆$ current＆@CRLF＆“方向：” ＆@TAB＆$ direction ）

如果StringInStr （$ current，$ gesture1 ）或StringInStr （$ current，$ gesture2 ）或StringInStr （$ current，$ gesture3 ）或StringInStr （$ current，$ gesture4 ）或StringInStr （$ current，$ gesture5 ）或StringInStr （$ current，$ current ，$ gesture6 ）或StringInStr （$ current，$ gesture7 ）或StringInStr （$ current，$ gesture8 ）然后

$ MouseSizeX = 167

$ MouseSizeY = 251

SetBitmap （$ win_mate，$ g_hImage，255 ，$ MouseSizeX，$ MouseSizeY ）

$显示= 1

$ current = “”

万一

; 如果$ curDist> 250 然后

; 如果（$ xShake或$ yShake ）和$ curDist> 250 然后

; $ MouseSizeX = 167

; $ MouseSizeY = 251

; SetBitmap （$ win_mate，$ g_hImage，255 ，$ MouseSizeX，$ MouseSizeY ）

; $显示= 1

; 万一

万一

切换TrayGetMsg （）

案例$ idWebLink; 跳转到spinalcode.co.uk

ShellExecute （“ www.spinalcode.co.uk” ）

案例$ idAbout; 显示消息框

MsgBox （$ MB_SYSTEMMODAL，“ BigMouse” ，“ BigMouse” 和@CRLF和“按脊髓” 和@CRLF和“许多人认为在Socoder.net上的“ Dan”” 和@CRLF和“以及在UEP.com上的“ UEZ” / forum“ ）

案例$ idExit; 退出循环。

出口环

_退出（）

终端开关

结束

func _createTray （）

Opt （“ TrayMenuMode” ，3 ）; 默认纸盘菜单项将不会显示，并且在选择时不会对其进行检查。这些是TrayMenuMode的选项1 和2 。

全局$ idWebLink = TrayCreateItem （“ SpinalCode.co.uk” ）

全局$ idAbout = TrayCreateItem （“ About” ）

TrayCreateItem （“” ）; 创建分隔线。

全局$ idExit = TrayCreateItem （“ Exit” ）

TraySetState （$ TRAY_ICONSTATE_SHOW ）; 显示纸盘菜单。

TraySetToolTip （“ BigMouse” ）; 托盘图标工具提示

全局$ hBmp = _GDIPlus_BitmapCreateFromMemory （_AutoIt_Icon （））;加载ico并将其转换为GDI +位图

;将位图转换为HIcon

全局$ hIcon = _GDIPlus_HICONCreateFromBitmap （$ hBmp ）

_WinAPI_TraySetHIcon （$ hIcon ）

EndFunc

FUNC _Quit （）

_GDIPlus_ShutDown （）

出口

EndFunc; ==> _ Quit

; ================================================== ================================================== ==========================

; SetBitMap

; ================================================== ================================================== ==========================

Func SetBitmap （$ hGUI，$ hImage，$ iOpacity，$ mx，$ my ）

本地$ hScrDC，$ hMemDC，$ hBitmap，$ hOld，$ pSize，$ tSize，$ pSource，$ tSource，$ pBlend，$ tBlend

$ hScrDC = _WinAPI_GetDC （0 ）

$ hMemDC = _WinAPI_CreateCompatibleDC （$ hScrDC ）

$ hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap （$ hImage ）

$ hOld = _WinAPI_SelectObject （$ hMemDC，$ hBitmap ）

$ tSize = DllStructCreate （$ tagSIZE ）

$ pSize = DllStructGetPtr （$ tSize ）

DllStructSetData （$ tSize ，“ X” ，$ mx ）; _GDIPlus_ImageGetWidth （$ hImage ））

DllStructSetData （$ tSize ，“ Y” ，$ my ）; _GDIPlus_ImageGetHeight （$ hImage ））

$ tSource = DllStructCreate （$ tagPOINT ）

$ pSource = DllStructGetPtr （$ tSource ）

$ tBlend = DllStructCreate （$ tagBLENDFUNCTION ）

$ pBlend = DllStructGetPtr （$ tBlend ）

DllStructSetData （$ tBlend，“ Alpha” ，$ iOpacity ）

DllStructSetData （$ tBlend，“ Format” ，$ AC_SRC_ALPHA ）

_WinAPI_UpdateLayeredWindow （$ hGUI，$ hScrDC，0 ，$ pSize，$ hMemDC，$ pSource，0 ，$ pBlend，$ ULW_ALPHA ）

_WinAPI_ReleaseDC （0 ，$ hScrDC ）

_WinAPI_SelectObject （$ hMemDC，$ hOld ）

_WinAPI_DeleteObject （$ hBitmap ）

_WinAPI_DeleteDC （$ hMemDC ）

EndFunc; ==> SetBitmap

; HTTPS ：//www.autoitscript.com/forum/topic/134350-file-to-base64-string-code-generator-v120-build-2015-01-20-embed-your-files-easily/

Func _WinAPI_TraySetHIcon （$ hIcon ）;功能通过Mat

本地常量$ tagNOTIFYICONDATA = _

“ dword大小；” ＆_

“拥有温德；” ＆_

“ uint ID；” ＆_

“ uint标志；” ＆_

“ uint CallbackMessage;” ＆_

“ ptr图标；” ＆_

“ wchar Tip [128];” ＆_

“双字状态；” ＆_

“双字StateMask；” ＆_

“ wchar Info [256];” ＆_

“ uint超时；” ＆_

“ wchar InfoTitle [64];” ＆_

“ dword InfoFlags；” ＆_

“ dword数据1； word数据2； word数据3；字节Data4 [8]；” ＆_

“ ptr BalloonIcon”

本地CONST $ TRAY_ICON_GUI = WinGetHandle （AutoItWinGetTitle （）），$ NIM_ADD = 0 ，$ NIM_MODIFY = 1 ，$ NIF_MESSAGE = 1 ，$ NIF_ICON = 2 ，$ AUT_WM_NOTIFYICON = $ WM_USER + 1 ，$ AUT_NOTIFY_ICON_ID = 1

本地$ tNOTIFY = DllStructCreate （$ tagNOTIFYICONDATA ）

DllStructSetData （$ tNOTIFY，“ Size” ，DllStructGetSize （$ tNOTIFY ））

DllStructSetData （$ tNOTIFY，“ Wnd” ，$ TRAY_ICON_GUI ）

DllStructSetData （$ tNOTIFY，“ ID” ，$ AUT_NOTIFY_ICON_ID ）

DllStructSetData （$ tNOTIFY，“ Icon” ，$ hIcon ）

DllStructSetData （$ tNOTIFY，“ Flags” ，BitOR （$ NIF_ICON，$ NIF_MESSAGE ））

DllStructSetData （$ tNOTIFY，“ CallbackMessage” ，$ AUT_WM_NOTIFYICON ）

本地$ aRet = DllCall （“ shell32.dll” ，“ int” ，“ Shell_NotifyIconW” ，“ dword” ，$ NIM_MODIFY，“ ptr” ，DllStructGetPtr （$ tNOTIFY ））

如果（@error ）然后返回SETERROR （1 ，0 ，0 ）

返回$ aRet [ 0 ] <> 0

EndFunc; ==> _ Tray_SetHIcon

Func _AutoIt_Icon （$ bSaveBinary = False，$ sSavePath = @ScriptDir ）

本地$ AutoIt_Icon

$ AutoIt_Icon＆= 'iVBORw0KGgoAAAANSUhEUgAAAPsAAAD7CAYAAACscuKmAAAALHRFWHRDcmVhdGlvbiBUaW1lAFRodSAxOCBKdWwgMjAxOSAxNzozNDoxNiAtMDAwMEZoKToAAAAHdElNRQfjBxQJOCb7HN3dAAAACXBIWXMAAArwAAAK8AFCrDSYAAAABGdBTUEAALGPC / xhBQAABrxJREFUeNrt3AlyFEkQRUEY4 / 5XZiZZBiGpu2vJLSLcD4BVV + bTlwDTly9xfF / 9ABDZP6sf4CTBw0XRYm8EDxdEjL0RPJwUNfZG8HBC5NgbwcNB0WNvBA8HZIi9ETy8kCX2RvDwRKbYG8HDA9libwQPn8gYeyN4eCdr7I3g4Y3MsTeCh1 + yx94IHr7UiL0RPOVVib0RPKVVir0RPGVVi70RPCVVjL0RPOVUjb0RPKVUjr0RPGVUj70RPCWkif3791vNCp700sTeCB4eSxV7I3j4XLrYG8HDRyljbwQPf0sbeyN4 + CN17I3g4af0sTeChyKxN4KnujKxN4KnslKxN4KnqnKxN4KnopKxN4KnmrKxN4KnktKxN4KnivKxN4KnArH / IniyE / sbgiczsb8jeLIS + ycET0Zif0DwZCP2JwRPJmJ / QfBkIfYDBE8GYj9I8EQn9hMET2RiP0nwRCX2CwRPRGK / SPBEI / YbBE8kYr9J8EQh9g4ETwRi70Tw7E7sHQmenYm9M8GzK7EPIHh2JPZBBM9uxD6Q4NmJ2AcTPLsQ + wSCZwdin0TwrCb2iQTPSmKfTPCsIvYFBM8KYl9E8Mwm9oUEz0xiX0zwzCL2DQieGcS + CcEzmtg3InhGEvtmBM8oYt + Q4BlB7JsSPL2JfWOCpyexb07w9CL2AARPD2IPQvDcJfZABM8dYg9G8Fwl9oAEzxViD0rwnCX2wATPGWIPTvAcJfYEBM8RYk9C8Lwi9kQEzzNiT0bwPCL2hATPZ8SelOB5T + yJCZ63xJ6c4PlN7AUInkbsRQgesRci + NrEXozg6xJ7QYKvSexFCb4esRcm + FrEXpzg6xA7gi9C7Pwg + PzEzv8En5vY + Yvg8xI7Hwg + J7HzKcHnI3YeEnwuYucpwechdl4SfA5i5xDBxyd2DhN8bGLnFMHHJXZOE3xMYucSwccjdi4TfCxi5xbBxyF2bhN8DGKnC8HvT + x0I / i9iZ2uBL8vsdOd4PckdoYQ / H7EzjCC34vYGUrw + xA7wwl + D2JnCsGvJ3amEfxaYmcqwa8jdqYT / BpiZwnBzyd2lhH8XGJnKcHPI3aWE / wcYmcLgh9P7GxD8GOJna0Ifhyxsx3BjyF2tiT4 / sTOtgTfl9jZmuD7ETvbE3wfYicEwd8ndsIQ / D1iJxTBXyd2whH8NWInJMGfJ3bCEvw5Yic0wR8ndsIT / DFiJwXBvyZ20hD8c2InFcE / JnbSEfznxE5Kgv9I7KQl + L + JndQE / 4fYSU / wP31b / QD08 / Xr19WPkFULPvzLtexwTPiFF3siN79d5bXQL1jscE7Y4MWejHWfIuRLFjtcEy54sW + MX9 + OW / dpQr1osW / EP52FFCb4SLfr6UuNvmbvQ + / + xeW5 8Yh0NzjAsm / AojOD2Bd7FPoGP7vH / laJD8S + kEVnJrEvciR0605PYl / AorOC2Cc7G7p1pxexT2TRWUnsk9wJ3brTg9gnsOjsQOyD9QrdunOX2Aey6OxE7IOMCN26c4fYB7Do7EjsnY0O3bpzldg7sujsTOydzAzdunOF2Duw6EQg9ptW / TYY685ZYr / Br30iErFf1DF0684UYr / AohOR2E8aFLp1Zzixn2DRiUzsB00I3bozlNgPsOhkIPYXJodu3RlG7E9YdDIR + wMLQ7fuDCH2T1h0MhL7O5uEbt3pTuxvbBI6DCH2XzYM3brTldi / bBk6dFc + 9s1Dt + 50Uzr2zUOHrsrGHih0604XJWMPFDp0Uy72oKFbd24rFXvQ0KGLMrEnCN26c0uJ2BOEDreljz1Z6Nady1LHnix0uCVt7IlDt + 5ckjL2xKHDZeliLxK6dee0VLEXCR0uiXTBRy5CpPfw1uV3cnOdf / DFNZZUy36RS0cJ1WOPHrqf3TmscuzRQ4dTqsaeKXTrziEVY88UOhxWLfasoVt3XqoUe9bQ4ZAqsVcI3brzVIXYK4QOL2WPvVro1p2HMsdeLXR4KlIQZ77yR / pcI0z / P / M9vjP4 / UcNeB / 859vqBxjAZZmoY + QMFumkjkxOpM8z2tB1Hxy5cxwg07K7IBNY8rgindyzuYn0OWbqtu4LInemnWVYdpdiIEueR6ST / GylIj3 / KTH + / dqZDhJ52V2KXJznYJFe8NuFivTcO9h53Z3lJBGX3eXIwTlOFumFfw / 2vLvZZd2d4SJefB2rY3fXFnMAtawI3h3bRMSf2YlB5JtxIPWMXnd3alOWnV5EvjkHVFPPdXeHgrDsXCXyYBxYXVfX3Z0JyrJzlMiDc4C1 + E0 / hVh2HhF5Mg6U9 + vuTiRl2flN5Mn9CxEq4KGERnxPAAAAAElFTkSuQmCC”

本地$ bString = 二进制（_WinAPI_Base64Decode （$ AutoIt_Icon ））

如果$ bSaveBinary然后

本地$ hFile = FileOpen （$ sSavePath＆“ \ AutoIt.ico” ，18 ）

FileWrite （$ hFile，$ bString ）

FileClose （$ hFile ）

万一

返回$ bString

EndFunc; ==> _ AutoIt_Icon

Func _WinAPI_DisplayTransparentBitmapInGUI （$ hHBitmap，$ hGUI，$ iOpacity = 0xFF ）

如果不BITAND （GUIGetStyle （$ HGUI ）[ 1 ] ，$ WS_EX_LAYERED ）= $ WS_EX_LAYERED然后返回SETERROR （1 ，0 ，0 ）

本地常量$ hScrDC = _WinAPI_GetDC （0 ），$ hMemDC = _WinAPI_CreateCompatibleDC （$ hScrDC ），$ hOld = _WinAPI_SelectObject （$ hMemDC，$ hHBitmap ）

本地$ tSize = DllStructCreate （$ tagSIZE ）

$ tSize.X = $ iW

$ tSize.Y = $ iH

本地$ tSource = DllStructCreate （$ tagPOINT ）

本地$ tBlend = DllStructCreate （$ tagBLENDFUNCTION ）

$ tBlend.Alpha = $ iOpacity

$ tBlend.Format = 1

_WinAPI_UpdateLayeredWindow （$ hGUI，$ hScrDC，0 ，DllStructGetPtr （$ tSize ），$ hMemDC，DllStructGetPtr （$ tSource ），0 ，DllStructGetPtr （$ tBlend ），$ ULW_ALPHA ）

_WinAPI_ReleaseDC （0 ，$ hScrDC ）

_WinAPI_SelectObject （$ hMemDC，$ hOld ）

_WinAPI_DeleteObject （$ hHBitmap ）

_WinAPI_DeleteDC （$ hMemDC ）

返回真

EndFunc

;代码下面被产生的：“文件为Base64字符串” 码发生器V1 0.19 生成2014 - 11 - 14

Func _Torus （$ bSaveBinary = False，$ sSavePath = @ScriptDir ）

本地$ Pointer

$ Pointer＆= 'iVBORw0KGgoAAAANSUhEUgAAAKcAAAD7CAYAAAAPWoRgAAAALHRFWHRDcmVhdGlvbiBUaW1lAFRodSAxOCBKdWwgMjAxOSAxNzozNDoxNiAtMDAwMEZoKToAAAAHdElNRQfjBxIQIy5qbVlWAAAACXBIWXMAAAsSAAALEgHS3X78AAAABGdBTUEAALGPC / xhBQAABntJREFUeNrt3e1SE0EQRuGQ8v5vGatRFEI2OzvTPf11nj8qVFnuzvEFklDcbrfb + w0I6P73VwJFOPcvvydQhHJ / + DOBIoz7k7cRKEK4H7ydQOHu / uJ9BApX95P3EyjcnMUpCBQuRuIUBIrtRuMUBIqtrsQpCBTbXI1TECi2mIlTECjMzcYpCBSmVuIUBAozq3EKAoUJjTgFgUKdVpyCQKFKM05BoFCjHacgUKiwiFMQKJZZxSkIFEtO43x / X2qMQDFtaDkJFB6GP6wTKHa79DkngWKny18QESh2mfpqnUCxw / RDSQQKa0uPcxIoLC0 / CE + gsKLyDBGBwoLa05cECm2qz60TKDSpv / CDQKHF5FVJBAoNZi + ZI1Cssnw9J4FiiWmcgkAxyzxOQaCYsSVOQaC4alucgkBxxdY4BYFi1PY4BYFihEucgkBxxi1OQaB4xTVOQaA44h6nIFA8EyJOQaB4FCZOQaD4KlScgkDxKVycgkAhQsYpCBRh4xQE2lvoOAWB9hU + TkGgPaWIUxBoP2niFATaS6o4BYH2kS5OQaA9pIxTEGh9aeMUBFpb6jgFgdaVPk5BoDWViFMQaD1l4hQEWkupOAWB1lEuTkGgNZSMUxBofmXjFASaW + k4BYHmVT5OQaA5tYhTEGg + beIUBJpLqzgFgebRLk5BoDm0jFMQaHxt4xQEGlvrOAWBxtU + TkGgMRHnXwQaD3F + QaCxEOcDAo2DOJ8g0BiI8wCB + iPOFwjUF3GeIFA / xDmAQH0Q5yAC3Y84LyDQvYjzIgLdhzgnEOgexDmJQO0R5wICtUWciwjUDnEqIFAbxKmEQPURpyIC1UWcyghUD3EaIFAdxGmEQNcRpyECXUOcxgh0HnFuQKBziHMTAr2OODci0GuIczMCHUecDgh0DHE6IdBzxOmIQF8jTmcEeow4AyDQ54gzCAL9iTgDIdDviDMYAv2POAMi0D + IMygCJc7QugdKnMF1DpQ4E + gaKHEm0TFQ4kykW6DEmUynQIkzoS6BEmdSHQIlzsSqB0qcyVUOlDgLqBoocRZRMVDiLKRaoMRZTKVAibOgKoESZ1EVAiXOwrIHSpzFZQ6UOBvIGihxNpExUOJsJFugxNlMpkCJs6EsgRJnUxkCJc7GogdKnM1FDpQ4ETZQ4sSHiIESJ / 6JFihx4ptIgRInfogSKHHiqQiBEicOeQdKnHjJM1DixCmvQIkTQzwCJU4M2x0oceKSnYESJy7bFShxYsqOQIkT06wD / eV9gRm8vb15 / xOqkkAPby7LCW + HC0qcAxY / fOHc0xtMnIjiR6DEOYj13OLbTSZORPMv0DZxanzFzXpu83GjW8TJQ0EpvcupvZyD7GvxGKbG9SzGzv + UQaWXk8XMrWycR2EG + Nwz94eijUrGyWLWUC7OkTBZzxxKxcli1lImzqthsp7xlYiTxawpfZwrYbKesaWOk8WsLW2cWmGynnGljJPF7CFdnBZhsp4xpYqTxewlTZzWYbKe8aSIk8XsKXycO8NkPWMJHSeL2VvYOL1ebc56xhEyTr4NAiJcnIphsp7JhYqTxcRXYeI0CpP1TCxEnCwmnnGPc0OYrGdSrnGymHjFLc7NYbKeCbnEyWJixPY4HcNkPZPZGieLiSu2xRkkTNYzkS1xBgkTyZjHGTBM1jMJ0zgDholEzOIMHibrmYBJnMHDRBLqcSYKk / UMTjXORGEiAbU4k4bJegamEmfSMBHccpwFwmQ9g1qKs0CYCGw6zmJhsp4BTcVZLEwEdTnOwmGynsFcirNwmAhoOM4mYbKegQzF2SRMBHP689YV / v6Mpu8JP89dj + XrOcvcJPiwijN7mHzuGYBFnNnDRBDacVYKk / V0phlnpTARgFacVcNkPR1pxFk1TDhbjbNDmKynk5U4O4QJR7NxdguT9XQwE2e3MOHk6nPr3cPc / py74o9YTHd2vypfXGb83M / x5eRO / We6nsZRpjrHkeVMdUFZsZQ / nS0nd + w5tfV0iDLNmb5azjQXkRFLee5oOblz57I9fpjuTJ8tZ7qLwEtpz / NxOdNeiJPI65n + LL8uZ / qLwYcy5 / i5nGUuyEGU9Sx3huUuyIF3nGXPsOyFbeYRaPmzu / LcOmIoH2W7C93Aej3bnRXLGV + 7KNtfuBHN9Wx / NixnPO2j / MSN0De7npzFA5bTH1Ee4MbY4LsLFLCc + xHlIG6Uncf15F5fxHLaI8pJvwEKweChpswmuQAAAABJRU5ErkJggg ==”

本地$ bString = 二进制（_WinAPI_Base64Decode （$ Pointer ））

如果$ bSaveBinary然后

本地$ hFile = FileOpen （$ sSavePath＆“ \ Pointer.png” ，18 ）

FileWrite （$ hFile，$ bString ）

FileClose （$ hFile ）

万一

返回$ bString

EndFunc; ==> _ Torus

Func _WinAPI_Base64Decode （$ sB64String ）

本地$ aCrypt = DllCall （“ Crypt32.dll” ，“ bool” ，“ CryptStringToBinaryA” ，“ str” ，$ sB64String，“ dword” ，0 ，“ dword” ，1 ，“ ptr” ，0 ，“ dword *” ，0 ，“ ptr” ，0 ，“ ptr” ，0 ）

如果@error或不$ aCrypt [ 0 ] ，然后返回SETERROR （1 ，0 ，“” ）

本地$ bBuffer = DllStructCreate （“ byte [” ＆$ aCrypt [ 5 ] ＆“]” ）

$ aCrypt = DllCall （“ Crypt32.dll” ，“ bool” ，“ CryptStringToBinaryA” ，“ str” ，$ sB64String，“ dword” ，0 ，“ dword” ，1 ，“ struct *” ，$ bBuffer，“ dword *” ，$ aCrypt [ 5 ] ，“ ptr” ，0 ，“ ptr” ，0 ）

如果@error或不$ aCrypt [ 0 ] ，然后返回SETERROR （2 ，0 ，“” ）

返回DllStructGetData （$ bBuffer，1 ）

EndFunc; ==> _ WinAPI_Base64Decode

Func GetAnglePO （$ x，$ y ） ; by布莱德维希

选择

案例$ x> 0

如果$ y> = 0 那么

返回ATan （$ y / $ x ）

其他

返回ATan （$ y / $ x ）+ 2 * $ pi

万一

情况$ x = 0