Setup Example

image\head10.gif VB.NET

Dim Ret As Integer

Dim Str(4) As Byte

Dim ShtData(2) As Short

Dim ArraySize As Integer

 

Str(0) = &H10

Str(1) = &H00

Str(2) = &H55

Str(3) = &Hcc

ShtData(0) = 0

ShtData(1) = 0

ArraySize = 2

Ret = GpCnvCviArray(Str, ShtData, ArraySize)

 

(Result)

ShtData[0] : 0x1000(4096)

ShtData[1] : 0x55cc(21964)

 

image\head10.gif C

DWORD Ret;

BYTE Str[4];

short ShtData[2];

DWORD ArraySize;

 

Str[0] = 0x10;

Str[1] = 0x00;

Str[2] = 0x55;

Str[3] = 0xcc;

ShtData[0] = 0;

ShtData[1] = 0;

ArraySize = 2;

Ret = GpCnvCviArray(Str, ShtData, ArraySize);

 

(Result)

ShtData[0] : 0x1000(4096)

ShtData[1] : 0x55cc(21964)

 

image\head10.gif C#

uint Ret;

byte[] Str = new byte[4];

short[] ShtData = new short[2];

uint ArraySize;

 

Str[0] = 0x10;

Str[1] = 0x00;

Str[2] = 0x55;

Str[3] = 0xcc;

ShtData[0] = 0;

ShtData[1] = 0;

ArraySize = 2;

Ret = gpib.CnvCviArray(Str, ShtData, ArraySize);

 

(Result)

ShtData[0] : 0x1000(4096)

ShtData[1] : 0x55cc(21964)

 

image\head10.gif Python

Ret = ctypes.c_ulong()

Str = (ctypes.c_ubyte * 4)()

ShtData = (ctypes.c_short * 2)()

ArraySize = ctypes.c_ulong()

 

Str[0] = 0x10

Str[1] = 0x00

Str[2] = 0x55

Str[3] = 0xcc

ShtData[0] = 0

ShtData[1] = 0

ArraySize.value = 2

Ret.value = GpibPy.GpCnvCviArray(Str, ShtData, ArraySize)

 

(Result)

ShtData[0] : 0x1000(4096)

ShtData[1] : 0x55cc(21964)