Talib库C++编译的DLL使用GO语言调用

seven7c

最近在写指标，py的talib库指标很全，但是本人又不会PY，所以就在网上寻找talib的DLL版，看能不能使用易语言调用的。
偶然发现有人用C++编译出来了个DLL。但是是GO 语言调用的。

Go语言我也不会，现在分享出来。

能不能用我也不知道。

如果有哪位兄弟能做个易语言调用的例子 就感激不尽了。

链接：https://share.weiyun.com/89APVfbl 密码：888888

59hdvj

感谢分享

wan942182718

seven7c 发表于 2022-7-26 22:07
对的，要的就是这样的效果。

回复帖不了代码，老报错

我只能说 你下载  ewow64ext  模块调用就行了，（因为它是64dll）

seven7c

wan942182718 发表于 2022-7-26 20:24
这个效果？

对的，要的就是这样的效果。

wan942182718

配合WOW64Ext  模块使用

  

窗口程序集名	保 留	保 留	备 注
程序集1
变量名	类 型	数组	备 注
modtalib	长整数型
m_Z_Initialize	长整数型
m_Z_Acos	长整数型
m_Z_Max	长整数型

子程序名	返回值类型	公开	备 注
TalibX64_Init	逻辑型
参数名	类 型	参考	可空	数组	备 注
path	文本型

modtalib ＝ LoadLibraryEx64 (0, path, )
如果真 (modtalib ≤ 0)
返回 (假)
m_Z_Initialize ＝ GetProcAddress64 (modtalib, “Z_Initialize”)
m_Z_Shutdown ＝ GetProcAddress64 (modtalib, “Z_Shutdown”)
m_Z_Acos ＝ GetProcAddress64 (modtalib, “Z_Acos”)
m_Z_Max ＝ GetProcAddress64 (modtalib, “Z_Max”)

子程序名	返回值类型	公开	备 注
talibX64_Free	逻辑型

返回 (FreeLibrary64 (0, modtalib))

子程序名	返回值类型	公开	备 注
ta_Initialize	整数型

变量名	类 型	静态	数组	备 注
retCode	长整数型

retCode ＝ X64Call (m_Z_Initialize, , , , , , , , , , )
返回 (retCode)

子程序名	返回值类型	公开	备 注
ta_Acos	整数型
参数名	类 型	参考	可空	数组	备 注
startIdx	整数型
endIdx	整数型
inReal	双精度小数型
outBegIdx	整数型
outNBElement	整数型
outReal	双精度小数型

变量名	类 型	静态	数组	备 注
retCode	长整数型

retCode ＝ X64Call (m_Z_Acos, startIdx, endIdx, 取变量数据地址 (inReal), 取变量数据地址 (outBegIdx), 取变量数据地址 (outNBElement), 取变量数据地址 (outReal), , , , )
返回 (retCode)

子程序名	返回值类型	公开	备 注
ta_Max	整数型
参数名	类 型	参考	可空	数组	备 注
startIdx	整数型
endIdx	整数型
inReal	双精度小数型				*float64
optInTimePeriod	整数型
outBegIdx	整数型				*int
outNBElement	整数型				*int
outReal	双精度小数型				*float64

变量名	类 型	静态	数组	备 注
ret	长整数型

' syscall.Syscall9(procZ_Max.Addr(), 7, uintptr(startIdx), uintptr(endIdx), uintptr(unsafe.Pointer(inReal)), uintptr(optInTimePeriod), uintptr(unsafe.Pointer(outBegIdx)), uintptr(unsafe.Pointer(outNBElement)), uintptr(unsafe.Pointer(outReal)), 0, 0)
ret ＝ X64Call (m_Z_Max, startIdx, endIdx, 取变量数据地址 (inReal), optInTimePeriod, 取变量数据地址 (outBegIdx), 取变量数据地址 (outNBElement), 取变量数据地址 (outReal), , , )
返回 (ret)

子程序名	返回值类型	公开	备 注
子程序_test

变量名	类 型	静态	数组	备 注
retCode	整数型
inReal	双精度小数型		0
n	整数型
outBegIdx	整数型
outNBElement	整数型
outReal	双精度小数型		0

调试输出 (ta_Initialize ())
inReal ＝ { 0.5, 0.6, 0.7 }
n ＝ 取数组成员数 (inReal)
重定义数组 (outReal, 假, n)
' outReal=[1.0471975511965979 0.9272952180016123 0.7953988301841436]
retCode ＝ ta_Acos (0, n － 1, inReal, outBegIdx, outNBElement, outReal)
调试输出 (retCode, outBegIdx, outNBElement, outReal)
inReal ＝ { 1, 2, 3, 4, 5, 3, 43.2, 3.2, 3.13 }
n ＝ 取数组成员数 (inReal)
重定义数组 (outReal, 假, n)
' out=[0 0 0 0 5 5 43.2 43.2 43.2]
retCode ＝ ta_Max (0, n － 1, inReal, 5, outBegIdx, outNBElement, outReal)
调试输出 (retCode, outBegIdx, outNBElement, outReal)

.版本 2<br /> <br /> .程序集 程序集1<br /> .程序集变量 modtalib, 长整数型<br /> .程序集变量 m_Z_Initialize, 长整数型<br /> .程序集变量 m_Z_Acos, 长整数型<br /> .程序集变量 m_Z_Max, 长整数型<br /> <br /> .子程序 TalibX64_Init, 逻辑型<br /> .参数 path, 文本型<br /> modtalib ＝ LoadLibraryEx64 (0, path, )<br /> .如果真 (modtalib ≤ 0)<br />     返回 (假)<br /> .如果真结束<br /> m_Z_Initialize ＝ GetProcAddress64 (modtalib, “Z_Initialize”)<br /> m_Z_Shutdown ＝ GetProcAddress64 (modtalib, “Z_Shutdown”)<br /> m_Z_Acos ＝ GetProcAddress64 (modtalib, “Z_Acos”)<br /> m_Z_Max ＝ GetProcAddress64 (modtalib, “Z_Max”)<br /> <br /> .子程序 talibX64_Free, 逻辑型<br /> 返回 (FreeLibrary64 (0, modtalib))<br /> <br /> .子程序 ta_Initialize, 整数型<br /> .局部变量 retCode, 长整数型<br /> <br /> retCode ＝ X64Call (m_Z_Initialize, , , , , , , , , , )<br /> 返回 (retCode)<br /> <br /> .子程序 ta_Acos, 整数型<br /> .参数 startIdx, 整数型<br /> .参数 endIdx, 整数型<br /> .参数 inReal, 双精度小数型, 数组<br /> .参数 outBegIdx, 整数型, 参考<br /> .参数 outNBElement, 整数型, 参考<br /> .参数 outReal, 双精度小数型, 参考 数组<br /> .局部变量 retCode, 长整数型<br /> <br /> retCode ＝ X64Call (m_Z_Acos, startIdx, endIdx, 取变量数据地址 (inReal), 取变量数据地址 (outBegIdx), 取变量数据地址 (outNBElement), 取变量数据地址 (outReal), , , , )<br /> 返回 (retCode)<br /> <br /> .子程序 ta_Max, 整数型<br /> .参数 startIdx, 整数型<br /> .参数 endIdx, 整数型<br /> .参数 inReal, 双精度小数型, 数组, *float64<br /> .参数 optInTimePeriod, 整数型<br /> .参数 outBegIdx, 整数型, 参考, *int<br /> .参数 outNBElement, 整数型, 参考, *int<br /> .参数 outReal, 双精度小数型, 参考 数组, *float64<br /> .局部变量 ret, 长整数型<br /> <br /> ' syscall.Syscall9(procZ_Max.Addr(), 7, uintptr(startIdx), uintptr(endIdx), uintptr(unsafe.Pointer(inReal)), uintptr(optInTimePeriod), uintptr(unsafe.Pointer(outBegIdx)), uintptr(unsafe.Pointer(outNBElement)), uintptr(unsafe.Pointer(outReal)), 0, 0)<br /> ret ＝ X64Call (m_Z_Max, startIdx, endIdx, 取变量数据地址 (inReal), optInTimePeriod, 取变量数据地址 (outBegIdx), 取变量数据地址 (outNBElement), 取变量数据地址 (outReal), , , )<br /> 返回 (ret)<br /> <br /> .子程序 子程序_test<br /> .局部变量 retCode, 整数型<br /> .局部变量 inReal, 双精度小数型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 outBegIdx, 整数型<br /> .局部变量 outNBElement, 整数型<br /> .局部变量 outReal, 双精度小数型, , "0"<br /> <br /> 调试输出 (ta_Initialize ())<br /> <br /> inReal ＝ { 0.5, 0.6, 0.7 }<br /> n ＝ 取数组成员数 (inReal)<br /> 重定义数组 (outReal, 假, n)<br /> ' outReal=[1.0471975511965979 0.9272952180016123 0.7953988301841436]<br /> retCode ＝ ta_Acos (0, n － 1, inReal, outBegIdx, outNBElement, outReal)<br /> 调试输出 (retCode, outBegIdx, outNBElement, outReal)<br /> <br /> <br /> inReal ＝ { 1, 2, 3, 4, 5, 3, 43.2, 3.2, 3.13 }<br /> n ＝ 取数组成员数 (inReal)<br /> 重定义数组 (outReal, 假, n)<br /> ' out=[0 0 0 0 5 5 43.2 43.2 43.2]<br /> retCode ＝ ta_Max (0, n － 1, inReal, 5, outBegIdx, outNBElement, outReal)<br /> 调试输出 (retCode, outBegIdx, outNBElement, outReal)

wan942182718

seven7c 发表于 2022-7-26 10:11
可以麻烦你写个简单的调用例子吗？

这个效果？

seven7c

老牛的记忆365 发表于 2022-7-26 15:23
用 tradingview  吧，语法简单

想在易语言的写的软件上使用，TV 能用，但是美时都需要盯着。

老牛的记忆365

用 tradingview  吧，语法简单

wan942182718

seven7c 发表于 2022-7-26 10:11
可以麻烦你写个简单的调用例子吗？

直接用记事本打开go文件就能看到调用方法了

seven7c

wan942182718 发表于 2022-7-25 23:43
go 里面可以用，参数传的都是数据指针

可以麻烦你写个简单的调用例子吗？