設定例

VB.NET用

Dim Ret, Srlen, Cmd(31) As Integer

Dim Srbuf As String   ' 受信バッファ

Cmd(0) = 2   ' トーカ+リスナ数(マスタモード時)

Cmd(1) = 3   ' トーカアドレス

Cmd(2) = 1   ' リスナアドレス

Srlen = 256   ' 最大受信可能バイト長

Ret = GpListen(Cmd, Srlen, Srbuf)

 

C言語用

DWORD Ret, Srlen, Cmd[31];

BYTE Srbuf[256];   /* 受信バッファ */

Cmd[0] = 2;   /* トーカ+リスナ数(マスタモード時)*/

Cmd[1] = 3;   /* トーカアドレス */

Cmd[2] = 1;   /* リスナアドレス */

Srlen = 256;   /* 最大受信可能バイト長 */

Ret = GpListen(Cmd, &Srlen, Srbuf);

 

C#用

uint Ret, Srlen;

uint[] Cmd = new uint[31];

StringBuilder Srbuf = new StringBuilder(256);   /* 受信バッファ */

Cmd[0] = 2;   /* トーカ+リスナ数(マスタモード時)*/

Cmd[1] = 3;   /* トーカアドレス */

Cmd[2] = 1;   /* リスナアドレス */

Srlen = 256;   /* 最大受信可能バイト長 */

Ret = gpib.Listen(Cmd, out Srlen, Srbuf);

 

Python用

Ret, Srlen, Cmd = ctypes.c_ulong(), ctypes.c_ulong(), (ctypes.c_ulong * 31)()

Srbuf = (ctypes.c_ubyte * 256)()   # 受信バッファ

Cmd[0] = 2   # トーカ+リスナ数(マスタモード時)

Cmd[1] = 3   # トーカアドレス

Cmd[2] = 1   # リスナアドレス

Srlen.value = 256   # 最大受信可能バイト長

Ret.value = GpibPy.GpListen(Cmd, ctypes.byref(Srlen), Srbuf)