请大佬帮忙 易语言API翻译成火山PC调用

彭彭软件

有没有大佬 帮忙把这4个API函数翻译成火山PC调用的格式

  

DLL命令名	返回值类型	公开	备 注
SCardListReaders	整数型		SCardListReaders函数提供一组命名阅读器组中的阅读器列表，消除重复.调用者提供读者组列表，并接收指定组中的读者列表。无法识别的组名将被忽略。此函数仅返回当前连接到系统并可使用的命名组中的读取器
DLL库文件名:
WinSCard.dll
在DLL库中对应命令名:
SCardListReadersA
参数名	类 型	传址	数组	备 注
hContex	整数型			标识cha询的资源管理器上下文的句柄。资源管理器上下文可以通过之前调用SCardEstablishContext来设置,如果此参数设置为NULL，则对读者的搜索不限于任何上下文
mszGroups	文本型			mszGroups：输入类型；读卡器组名，为NULL时，表示列出所有读卡器。定义到系统的读取器组的名称，作为多字符串。使用NULL值列出系统中的所有读取器（即 SCard$AllReaders 组）。
ReaderList	文本型			mszReaders：输出类型；系统中安装的读卡器的名字，各个名字之间用’\0’分隔，最后一个名字后面为两个连续的’\0’。（列出提供的读卡器组中的读卡器的多字符串。如果此值为NULL，SCardListReaders 将忽略pcchReaders 中提供的缓冲区长度，将如果此参数不是NULL则将返回的缓冲区长度写入 pcchReaders，并返回成功代码
pcchReaders	整数型			pcchReaders：输入输出类型；mszReaders的长度。mszReaders缓冲区的长度（以字符为单位）。此参数接收多字符串结构的实际长度，包括所有尾随空字符。如果缓冲区长度指定为 SCARD_AUTOALLOCATE，则mszReaders将转换为指向字节指针的指针，并接收包含多字符串结构的内存块的地址。这块内存必须用SCardFreeMemory释放。

DLL命令名	返回值类型	公开	备 注
SCardEstablishContext	整数型		返回资源管理器上下文的句柄;如果函数成功，则函数返回 SCARD_S_SUCCESS。如果函数失败，则返回错误代码
DLL库文件名:
WinSCard.dll
在DLL库中对应命令名:
SCardEstablishContext
参数名	类 型	传址	数组	备 注
dwScope	整数型			资源管理器上下文的范围。此参数可以是以下值之一 SCARD_SCOPE_USER:数据库操作在用户的域内执行 ; SCARD_SCOPE_SYSTEM:数据库操作在系统域内执行。调用应用程序必须对任何数据库操作具有适当的访问权限
pvReserved1	整数型			保留供将来使用，必须为NULL。此参数将允许具有适当特权的管理应用程序代表另一个用户进行操作
pvReserved2	整数型			保留供将来使用，必须为NULL。此参数将允许具有适当特权的管理应用程序代表另一个用户进行操作
phContext	整数型			已建立的资源管理器上下文的句柄。这个句柄现在可以提供给其他试图在这个上下文中工作的函数

DLL命令名	返回值类型	公开	备 注
SCardTransmit	整数型		SCardTransmit函数向智能卡发送服务请求并期望从卡接收数据
DLL库文件名:
WinSCard.dll
在DLL库中对应命令名:
SCardTransmit
参数名	类 型	传址	数组	备 注
hCard	整数型			,hCard：输入类型；与智能卡连接的句柄。
pioSendPci	SCARD_IO_REQUEST			,pioSendPci：输入类型；指令的协议头结构的指针，由SCARD_IO_REQUEST结构定义。后面是使用的协议的协议控制信息。一般使用系统定义的结构，SCARD_PCI_T0（T=0协议）、 SCARD_PCI_T1（T=1协议）、SCARD_PCI_RAW（原始协议）。
pbSendBuffer	字节集			,pbSendBuffer：输入类型；要发送到智能卡的数据的指针。（指向要写入卡的实际数据的指针
cbSendLength	整数型			,cbSendLength：输入类型；pbSendBuffer的字节数目。pbSendBuffer参数的长度（以字节为单位）
pioRecvPci	整数型			pioRecvPci：输入输出类型；指令协议头结构的指针，后面是使用的协议的协议控制信息，如果不返回协议控制信息，可以为NULL。
pbRecvBuffer	字节集			pbRecvBuffer：输入输出类型；从智能卡返回的数据的指针。
pcbRecvLength	整数型			pcbRecvLength：输入输出类型；pbRecvBuffer的大小和实际大小。对于 T=0，接收缓冲区必须至少有两个字节长才能接收 SW1 和 SW2 状态字节。

DLL命令名	返回值类型	公开	备 注
SCardConnect	整数型		SCardConnect函数在调用应用程序和特定读取器包含的智能卡之间建立连接（使用特定资源管理器上下文）。如果指定的读卡器中不存在卡，则返回错误。
DLL库文件名:
WinSCard.dll
在DLL库中对应命令名:
SCardConnectA
参数名	类 型	传址	数组	备 注
hContext	整数型			输入类型；ScardEstablishContext()建立的资源管理器上下文的句柄。
szReader	文本型			,输入类型；包含智能卡的读卡器名称（读卡器名称由ScardListReaders()给出）
dwShareMode	整数型			,dwShareMode：输入类型；应用程序对智能卡的操作方式，SCARD_SHARE_SHARED（多个应用共享同一个智能卡）、SCARD_SHARE_EXCLUSIVE（应用独占智能卡）、SCARD_SHARE_DIRECT（应用将智能卡作为私有用途，直接操纵智能卡，不允许其它应用访问智能卡）。
dwPreferredProtocols	整数型			,dwPreferredProtocols：输入类型；连接使用的协议，SCARD_PROTOCOL_T0（使用T=0协议）、SCARD_PROTOCOL_T1（使用T=1协议）。可接受的连接协议的位掩码。可能的值可以与OR操作结合使用。
phCard	整数型			phCard：输出类型；与智能卡连接的句柄。
PdwActiveProtocol	整数型			PdwActiveProtocol：输出类型；实际使用的协议。

.版本 2<br /> <br /> .DLL命令 SCardListReaders, 整数型, "WinSCard.dll", "SCardListReadersA", 公开, SCardListReaders函数提供一组命名阅读器组中的阅读器列表，消除重复.调用者提供读者组列表，并接收指定组中的读者列表。无法识别的组名将被忽略。此函数仅返回当前连接到系统并可使用的命名组中的读取器<br />     .参数 hContex, 整数型, , 标识cha询的资源管理器上下文的句柄。资源管理器上下文可以通过之前调用SCardEstablishContext来设置,如果此参数设置为NULL，则对读者的搜索不限于任何上下文<br />     .参数 mszGroups, 文本型, , mszGroups：输入类型；读卡器组名，为NULL时，表示列出所有读卡器。定义到系统的读取器组的名称，作为多字符串。使用NULL值列出系统中的所有读取器（即 SCard$AllReaders 组）。<br />     .参数 ReaderList, 文本型, 传址, mszReaders：输出类型；系统中安装的读卡器的名字，各个名字之间用’\0’分隔，最后一个名字后面为两个连续的’\0’。（列出提供的读卡器组中的读卡器的多字符串。如果此值为NULL，SCardListReaders 将忽略pcchReaders 中提供的缓冲区长度，将如果此参数不是NULL则将返回的缓冲区长度写入 pcchReaders，并返回成功代码<br />     .参数 pcchReaders, 整数型, 传址, pcchReaders：输入输出类型；mszReaders的长度。mszReaders缓冲区的长度（以字符为单位）。此参数接收多字符串结构的实际长度，包括所有尾随空字符。如果缓冲区长度指定为 SCARD_AUTOALLOCATE，则mszReaders将转换为指向字节指针的指针，并接收包含多字符串结构的内存块的地址。这块内存必须用SCardFreeMemory释放。<br /> <br /> .DLL命令 SCardEstablishContext, 整数型, "WinSCard.dll", "SCardEstablishContext", 公开, 返回资源管理器上下文的句柄;如果函数成功，则函数返回 SCARD_S_SUCCESS。如果函数失败，则返回错误代码<br />     .参数 dwScope, 整数型, , 资源管理器上下文的范围。此参数可以是以下值之一 SCARD_SCOPE_USER:数据库操作在用户的域内执行 ; SCARD_SCOPE_SYSTEM:数据库操作在系统域内执行。调用应用程序必须对任何数据库操作具有适当的访问权限<br />     .参数 pvReserved1, 整数型, , 保留供将来使用，必须为NULL。此参数将允许具有适当特权的管理应用程序代表另一个用户进行操作<br />     .参数 pvReserved2, 整数型, , 保留供将来使用，必须为NULL。此参数将允许具有适当特权的管理应用程序代表另一个用户进行操作<br />     .参数 phContext, 整数型, 传址, 已建立的资源管理器上下文的句柄。这个句柄现在可以提供给其他试图在这个上下文中工作的函数<br /> <br /> .DLL命令 SCardTransmit, 整数型, "WinSCard.dll", "SCardTransmit", 公开, SCardTransmit函数向智能卡发送服务请求并期望从卡接收数据<br />     .参数 hCard, 整数型, , ,hCard：输入类型；与智能卡连接的句柄。<br />     .参数 pioSendPci, SCARD_IO_REQUEST, , ,pioSendPci：输入类型；指令的协议头结构的指针，由SCARD_IO_REQUEST结构定义。后面是使用的协议的协议控制信息。一般使用系统定义的结构，SCARD_PCI_T0（T=0协议）、 SCARD_PCI_T1（T=1协议）、SCARD_PCI_RAW（原始协议）。<br />     .参数 pbSendBuffer, 字节集, , ,pbSendBuffer：输入类型；要发送到智能卡的数据的指针。（指向要写入卡的实际数据的指针<br />     .参数 cbSendLength, 整数型, , ,cbSendLength：输入类型；pbSendBuffer的字节数目。pbSendBuffer参数的长度（以字节为单位）<br />     .参数 pioRecvPci, 整数型, , pioRecvPci：输入输出类型；指令协议头结构的指针，后面是使用的协议的协议控制信息，如果不返回协议控制信息，可以为NULL。<br />     .参数 pbRecvBuffer, 字节集, 传址, pbRecvBuffer：输入输出类型；从智能卡返回的数据的指针。<br />     .参数 pcbRecvLength, 整数型, 传址, pcbRecvLength：输入输出类型；pbRecvBuffer的大小和实际大小。对于 T=0，接收缓冲区必须至少有两个字节长才能接收 SW1 和 SW2 状态字节。<br /> <br /> .DLL命令 SCardConnect, 整数型, "WinSCard.dll", "SCardConnectA", 公开, SCardConnect函数在调用应用程序和特定读取器包含的智能卡之间建立连接（使用特定资源管理器上下文）。如果指定的读卡器中不存在卡，则返回错误。<br />     .参数 hContext, 整数型, , 输入类型；ScardEstablishContext()建立的资源管理器上下文的句柄。<br />     .参数 szReader, 文本型, , ,输入类型；包含智能卡的读卡器名称（读卡器名称由ScardListReaders()给出）<br />     .参数 dwShareMode, 整数型, , ,dwShareMode：输入类型；应用程序对智能卡的操作方式，SCARD_SHARE_SHARED（多个应用共享同一个智能卡）、SCARD_SHARE_EXCLUSIVE（应用独占智能卡）、SCARD_SHARE_DIRECT（应用将智能卡作为私有用途，直接操纵智能卡，不允许其它应用访问智能卡）。<br />     .参数 dwPreferredProtocols, 整数型, , ,dwPreferredProtocols：输入类型；连接使用的协议，SCARD_PROTOCOL_T0（使用T=0协议）、SCARD_PROTOCOL_T1（使用T=1协议）。可接受的连接协议的位掩码。可能的值可以与OR操作结合使用。<br />     .参数 phCard, 整数型, 传址, phCard：输出类型；与智能卡连接的句柄。<br />     .参数 PdwActiveProtocol, 整数型, 传址, PdwActiveProtocol：输出类型；实际使用的协议。

呵呵仙

其实怎么说呢?你只要了解要相关数据是何形试结构,万能的指针(易语言叫整数型,火山叫变整数)就完全可以解决传参的问题!!

彭彭软件

这是4个函数 的易语言调用

  

子程序名	返回值类型	公开	备 注
LJ_连接卡片	整数型		LJ_连接卡片  成功返回卡片句柄 失败返回0
参数名	类 型	参考	可空	数组	备 注
读卡器句柄	整数型
读卡器名称	文本型

变量名	类 型	静态	数组	备 注
SCARD_S_SUCCESS	整数型			连接状态
卡片句柄	整数型			卡片句柄
Protocol	整数型

SCARD_S_SUCCESS ＝ SCardConnect (读卡器句柄, 读卡器名称, #SCARD_SHARE_SHARED, 十六进制 ( #SCARD_PROTOCOL_T1 ), 卡片句柄, Protocol)
如果真 (SCARD_S_SUCCESS ＝ 0)
' 调试输出 (获取ID卡号 (卡片句柄))
返回 (卡片句柄)
返回 (0)

子程序名	返回值类型	公开	备 注
LJ_获取读卡器名称	文本型		LJ_获取读卡器名称 返回读卡器型号名称
参数名	类 型	参考	可空	数组	备 注
句柄	整数型

变量名	类 型	静态	数组	备 注
SCARD_S_SUCCESS	整数型
长度	整数型
SCARD_READERSTATE	文本型

SCARD_READERSTATE ＝ API_取空白文本 (128)
长度 ＝ 取文本长度 (SCARD_READERSTATE)
SCARD_S_SUCCESS ＝ SCardListReaders (句柄, “”, SCARD_READERSTATE, 长度)
返回 (SCARD_READERSTATE)

子程序名	返回值类型	公开	备 注
LJ_连接卡片	整数型		LJ_连接卡片  成功返回卡片句柄 失败返回0
参数名	类 型	参考	可空	数组	备 注
读卡器句柄	整数型
读卡器名称	文本型

变量名	类 型	静态	数组	备 注
SCARD_S_SUCCESS	整数型			连接状态
卡片句柄	整数型			卡片句柄
Protocol	整数型

SCARD_S_SUCCESS ＝ SCardConnect (读卡器句柄, 读卡器名称, #SCARD_SHARE_SHARED, 十六进制 ( #SCARD_PROTOCOL_T1 ), 卡片句柄, Protocol)
如果真 (SCARD_S_SUCCESS ＝ 0)
' 调试输出 (获取ID卡号 (卡片句柄))
返回 (卡片句柄)
返回 (0)

子程序名	返回值类型	公开	备 注
_通用读取	文本型
参数名	类 型	参考	可空	数组	备 注
指令	文本型				如 FFCA000000 读取卡号
返回字节长度	整数型

变量名	类 型	静态	数组	备 注
RecvBuff	字节集
SendLen	整数型
RecvLen	整数型
ioRequest	SCARD_IO_REQUEST
SendBuff	字节集

返回字节长度 ＝ 返回字节长度 ＋ 4
SendLen ＝ 取文本长度 (指令) ÷ 2
RecvLen ＝ 返回字节长度 ＋ 4
ioRequest.cbPciLength ＝ 8
RecvBuff ＝ 取空白字节集 (到整数 (返回字节长度 ÷ 2))  ' 可设置获取卡号的长度
SendBuff ＝ 字节集_十六进制到字节集 (指令)  ' “FFCA000000”获取卡号指令
SCardTransmit (全_LJ_卡片句柄, ioRequest, SendBuff, SendLen, 0, RecvBuff, RecvLen)
返回 (字节集_字节集到十六进制 (RecvBuff))

.版本 2<br /> <br /> .子程序 LJ_连接卡片, 整数型, , LJ_连接卡片  成功返回卡片句柄 失败返回0<br /> .参数 读卡器句柄, 整数型<br /> .参数 读卡器名称, 文本型<br /> .局部变量 SCARD_S_SUCCESS, 整数型, , , 连接状态<br /> .局部变量 卡片句柄, 整数型, , , 卡片句柄<br /> .局部变量 Protocol, 整数型<br /> <br /> SCARD_S_SUCCESS ＝ SCardConnect (读卡器句柄, 读卡器名称, #SCARD_SHARE_SHARED, 十六进制 (#SCARD_PROTOCOL_T1), 卡片句柄, Protocol)<br /> .如果真 (SCARD_S_SUCCESS ＝ 0)<br />     ' 调试输出 (获取ID卡号 (卡片句柄))<br />     返回 (卡片句柄)<br /> .如果真结束<br /> 返回 (0)<br /> <br /> .版本 2<br /> <br /> .子程序 LJ_获取读卡器名称, 文本型, , LJ_获取读卡器名称 返回读卡器型号名称<br /> .参数 句柄, 整数型<br /> .局部变量 SCARD_S_SUCCESS, 整数型<br /> .局部变量 长度, 整数型<br /> .局部变量 SCARD_READERSTATE, 文本型<br /> <br /> SCARD_READERSTATE ＝ API_取空白文本 (128)<br /> 长度 ＝ 取文本长度 (SCARD_READERSTATE)<br /> SCARD_S_SUCCESS ＝ SCardListReaders (句柄, “”, SCARD_READERSTATE, 长度)<br /> 返回 (SCARD_READERSTATE)<br /> <br /> .版本 2<br /> <br /> .子程序 LJ_连接卡片, 整数型, , LJ_连接卡片  成功返回卡片句柄 失败返回0<br /> .参数 读卡器句柄, 整数型<br /> .参数 读卡器名称, 文本型<br /> .局部变量 SCARD_S_SUCCESS, 整数型, , , 连接状态<br /> .局部变量 卡片句柄, 整数型, , , 卡片句柄<br /> .局部变量 Protocol, 整数型<br /> <br /> SCARD_S_SUCCESS ＝ SCardConnect (读卡器句柄, 读卡器名称, #SCARD_SHARE_SHARED, 十六进制 (#SCARD_PROTOCOL_T1), 卡片句柄, Protocol)<br /> .如果真 (SCARD_S_SUCCESS ＝ 0)<br />     ' 调试输出 (获取ID卡号 (卡片句柄))<br />     返回 (卡片句柄)<br /> .如果真结束<br /> 返回 (0)<br /> <br /> <br /> .版本 2<br /> <br /> .子程序 _通用读取, 文本型<br /> .参数 指令, 文本型, , 如 FFCA000000 读取卡号<br /> .参数 返回字节长度, 整数型<br /> .局部变量 RecvBuff, 字节集<br /> .局部变量 SendLen, 整数型<br /> .局部变量 RecvLen, 整数型<br /> .局部变量 ioRequest, SCARD_IO_REQUEST<br /> .局部变量 SendBuff, 字节集<br /> <br /> 返回字节长度 ＝ 返回字节长度 ＋ 4<br /> SendLen ＝ 取文本长度 (指令) ÷ 2<br /> RecvLen ＝ 返回字节长度 ＋ 4<br /> ioRequest.cbPciLength ＝ 8<br /> RecvBuff ＝ 取空白字节集 (到整数 (返回字节长度 ÷ 2))  ' 可设置获取卡号的长度<br /> SendBuff ＝ 字节集_十六进制到字节集 (指令)  ' “FFCA000000”获取卡号指令<br /> SCardTransmit (全_LJ_卡片句柄, ioRequest, SendBuff, SendLen, 0, RecvBuff, RecvLen)<br /> 返回 (字节集_字节集到十六进制 (RecvBuff))

大司命

检查看看有没有带W结尾的api！没有你就只能命名为变整数，通过utf8到多字节后传指针~

彭彭软件

大司命 发表于 2023-12-13 21:12
检查看看有没有带W结尾的api！没有你就只能命名为变整数，通过utf8到多字节后传指针~ ...

刚刚接触火山 这个确实 不会操作