VB.NET
Dim Ret, Cmd(31), Stppu As Integer
Cmd(0) = 2 ' Number of listeners
Cmd(1) = 2 ' Listener address
Cmd(2) = &H69 ' Line code
Cmd(3) = 3 ' Listener address
Cmd(4) = &H6A ' Line code
Stppu = 1 ' PPU output specification
Ret = GpStppoll(Cmd, Stppu)
C
DWORD Ret, Cmd[31], Stppu;
Cmd[0] = 2; /* Number of listeners */
Cmd[1] = 2; /* Listener address */
Cmd[2] = 0x69; /* Line code */
Cmd[3] = 3; /* Listener address */
Cmd[4] = 0x6a; /* Line code */
Stppu = 1; /* PPU output specification */
Ret = GpStppoll(Cmd, Stppu);
C#
uint Ret, Stppu;
uint[] Cmd = new uint[31];
Cmd[0] = 2; /* Number of listeners */
Cmd[1] = 2; /* Listener address */
Cmd[2] = 0x69; /* Line code */
Cmd[3] = 3; /* Listener address */
Cmd[4] = 0x6a; /* Line code */
Stppu = 1; /* PPU output specification */
Ret = gpib.Stppoll(Cmd, Stppu);
Python
Ret, Cmd, Stppu = ctypes.c_ulong(), (ctypes.c_ulong * 31)(), ctypes.c_ulong()
Cmd[0] = 2 # Number of listeners
Cmd[1] = 2 # Listener address
Cmd[2] = 0x69 # Line code
Cmd[3] = 3 # Listener address
Cmd[4] = 0x6a # Line code
Stppu.value = 1 # PPU output specification
Ret.value = GpibPy.GpStppoll(Cmd, Stppu)