AutoIt3 非API 高德地图坐标转百度

在AutoIt3中，你可以使用'Run'函数来运行一个命令行程序，并通过'StdoutRead'来获取程序的输出结果。因此，你可以使用高德地图的Web API来实现坐标转换，并通过AutoIt3来获取转换后的结果。下面是一个示例代码：

#include <Constants.au3>

Local $sCoord = '116.481488,39.990464' ; 高德地图经纬度坐标

; 调用高德地图Web API进行坐标转换
Local $sURL = 'https://restapi.amap.com/v3/assistant/coordinate/convert?locations=' & $sCoord & '&coordsys=autonavi&output=json&key=YOUR_AMAP_API_KEY'
Local $sCommand = 'curl.exe -s '' & $sURL & '''
Local $iPID = Run(@ComSpec & ' /c ' & $sCommand, '', @SW_HIDE, $STDOUT_CHILD)

; 读取命令行输出结果
Local $sOutput = ''
While 1
    Local $sLine = StdoutRead($iPID)
    If @error Then ExitLoop
    $sOutput &= $sLine
WEnd

; 解析JSON结果
Local $aResult = StringRegExp($sOutput, ''locations':'([^']+)'', 1)
If IsArray($aResult) Then
    Local $sBaiduCoord = $aResult[0] ; 百度地图经纬度坐标
    MsgBox($MB_OK, '坐标转换结果', '高德地图坐标: ' & $sCoord & @CRLF & '百度地图坐标: ' & $sBaiduCoord)
Else
    MsgBox($MB_OK, '错误', '坐标转换失败')
EndIf

请注意，在上面的示例代码中，我们使用了'curl.exe'来发送HTTP请求并获取API的响应结果。你需要将'curl.exe'放置在AutoIt3脚本的相同目录下，或者将其路径添加到环境变量中。

此外，你还需要将代码中的'YOUR_AMAP_API_KEY'替换为你自己的高德地图API密钥。