// Copyright(c) 2002 Crandun Technologies Inc.  All rights reserved.
//
//  Programmer's Notes:
//  Delphi declarations for the CTI-HSIF library functions
//  THIS IS UNSUPPORTED CODE
//

//======================== Driver Setup Functions =========================
function getNewCTIHSIF(): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getNewCTIHSIF@0'
function setReleaseHandle(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setReleaseHandle@4'

function setBoardParams(sensorIndex: Integer, boardIOAddr: PChar, IRQNum: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setBoardParams@12'
function getBoardIOAddr(sensorIndex: Integer, boardAddr: PChar, buflength: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getBoardIOAddr@12'
function getBoardIRQNum(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getBoardIRQNum@4'

function setCalibrationFile(sensorIndex: Integer, filename: PChar): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setCalibrationFile@8' 
function getCalibrationFile(sensorIndex: Integer, filename: PChar, buflen: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getCalibrationFile@12'

function setEncoderCountsPerRev(sensorIndex: Integer, encoderNum: Integer, countsPerRev: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setEncoderCountsPerRev@12'
function getEncoderCountsPerRev(sensorIndex: Integer, encoderNum: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getEncoderCountsPerRev@8'


function setCommOpen(sensorIndex: Integer, commPortName: PChar, baudRate: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setCommOpen@12'
function getIsCommOpen(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsCommOpen@4'
function setCommClosed(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setCommClosed@4'

function setBaudRate(sensorIndex: Integer, baudRate: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setBaudRate@8'
function getBaudRate(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getBaudRate@4'

function setBufferSize(sensorIndex: Integer, nSamples: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setBufferSize@8'
function getBufferSize(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getBufferSize@4'
function setClearBuffer(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setClearBuffer@4'
function getDidBufferOverflow(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getDidBufferOverflow@4'
function setResetBufferOverflow(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setResetBufferOverflow@4' 

function setMotorMaxRPM(sensorIndex: Integer, motorNum: Integer, maxRPM: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMotorMaxRPM@12'
function getMotorMaxRPM(sensorIndex: Integer, motorNum: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMotorMaxRPM@8'

// ================ Sensor Configuration Functions ========================
function setFactoryDefaults(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setFactoryDefaults@4'
function setResetHSIFBoard(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setResetHSIFBoard@4'

function setAnalogOutputCalibrated(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAnalogOutputCalibrated@4'
function setAnalogOutputUnCalibrated(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAnalogOutputUnCalibrated@4'
function getIsAnalogOutputCalibrated(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsAnalogOutputCalibrated@4'
function setAnalogOutputOff(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAnalogOutputOff@4'
function getIsAnalogOutputOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsAnalogOutputOn@4'

function setAnalogZeroCurrent(sensorIndex: Integer, microAmp: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAnalogZeroCurrent@8'
function getAnalogZeroCurrent(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getAnalogZeroCurrent@4'

function getHSIFBufSizeBytes(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getHSIFBufSizeBytes@4'
function getHSIFBufSizeSamples(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getHSIFBufSizeSamples@4' 

function setMotorPower(sensorIndex: Integer, motorNum: Integer, motorPower: Integer, dir: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMotorPower@16'
function getMotorPower(sensorIndex: Integer, motorNum: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMotorPower@8'
function getMotorDirection(sensorIndex: Integer, motorNum: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMotorDirection@8'

function setMotorRPM(sensorIndex: Integer, motorNum: Integer, RPM: Integer, dir: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMotorRPM@16'
function getMotorRPM(sensorIndex: Integer, motorNum: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMotorRPM@8' 

function setSensorMaxRange(sensorIndex: Integer, maxInches: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setSensorMaxRange@8'
function getSensorMaxRange(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getSensorMaxRange@4'

function setSpan(sensorIndex: Integer, dist: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setSpan@8'
function getSpan(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getSpan@4'

function setTempHoldLevel(sensorIndex: Integer, t: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setTempHoldLevel@8'
function getTempHoldLevel(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getTempHoldLevel@4'

function setZeroPt(sensorIndex: Integer, dist: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' nam'_setZeroPt@8'e '
function getZeroPt(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getZeroPt@4'

function setZeroPtUncalibrated(sensorIndex: Integer, dist: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setZeroPtUncalibrated@8'
function getZeroPtUncalibrated(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getZeroPtUncalibrated@4'

//============== Data Acquisition Functions ==================
function setLaserOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setLaserOn@4'
function setLaserOff(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setLaserOff@4'
function getIsLaserOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsLaserOn@4'

function setSampleInterval(sensorIndex: Integer, microSecPerSample: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setSampleInterval@8'
function getSampleInterval(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getSampleInterval@4'

function setSamplesPerSec(sensorIndex: Integer, samplesPerSec: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setSamplesPerSec@8'
function getSamplesPerSec(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getSamplesPerSec@4' 

function getMaxSampleRate(sensorIndex: Integer, seconds: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMaxSampleRate@8'

function setContinuousHSIFOff(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setContinuousHSIFOff@4'
function setContinuousHSIFOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setContinuousHSIFOn@4' 
function getIsContinuousHSIFOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsContinuousHSIFOn@4' 

function getNumSamples(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getNumSamples@4'

function getSamples(sensorIndex: Integer, ByRef sampleArray As HSIF_DATA_PT, arraySize: Integer, minSamplesToTake: Integer, msWait: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getSamples@20'

function getSingleSample(sensorIndex: Integer, ByRef dataPt: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getSingleSample@8'
function getExtSingleSample(sensorIndex: Integer, ByRef extDataPt As HSIF_DATA_PT): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getExtSingleSample@8'

function getNumDataLost(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getNumDataLost@4'
function setResetDataLost(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setResetDataLost@4'

//============ Data Format Functions ====================
function setAngleOutputPolar(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAngleOutputPolar@4'
function setAngleOutputCartesian(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAngleOutputCartesian@4'
function getIsAngleOutputPolar(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsAngleOutputPolar@4' 

function setOutputFormatEnglish(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setOutputFormatEnglish@4' 
function setOutputFormatMetric(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name 'setOutputFormatMetric@4'
function getIsOutputFormatEnglish(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsOutputFormatEnglish@4'

//================= Data Filtering Functions =======================
function setAngleOffset(sensorIndex: Integer, encoderNum: Integer, offset: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setAngleOffset@12'
function getAngleOffset(sensorIndex: Integer, encoderNum: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_setAngleOffset@8'


function setDiscardInvalidOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setDiscardInvalidOn@4' 
function setDiscardInvalidOff(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setDiscardInvalidOff@4'
function getIsDiscardInvalidOn(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsDiscardInvalidOn@4' 

function setMaxValidAmbient(sensorIndex: Integer, amb: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMaxValidAmbient@8' 
function getMaxValidAmbient(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMaxValidAmbient@4'

function setMinValidAmbient(sensorIndex: Integer, amb: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMinValidAmbient@8'
function getMinValidAmbient(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMinValidAmbient@4' 

function setMaxValidAmplitude(sensorIndex: Integer, amp: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMaxValidAmplitude@8'
function getMaxValidAmplitude(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMaxValidAmplitude@4'

function setMinValidAmplitude(sensorIndex: Integer, amp: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMinValidAmplitude@8'
function getMinValidAmplitude(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getMinValidAmplitude@4' 


function setMaxValidAngle(sensorIndex: Integer, encoderNum: Integer, angle: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMaxValidAngle@12'
function getMaxValidAngle(sensorIndex: Integer, encoderNum: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getMaxValidAngle@4' 

function setMinValidAngle(sensorIndex: Integer, encoderNum: Integer, angle: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMinValidAngle@12'
function getMinValidAngle(sensorIndex: Integer, encoderNum: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getMinValidAngle@4' 


function setMaxValidRange(sensorIndex: Integer, rng: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMaxValidRange@8'
function getMaxValidRange(sensorIndex: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getMaxValidRange@4'

function setMinValidRange(sensorIndex: Integer, rng: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMinValidRange@8' 
function getMinValidRange(sensorIndex: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getMinValidRange@4' 


function setRangeOffset(sensorIndex: Integer, offset: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setRangeOffset@8' 
function getRangeOffset(sensorIndex: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getRangeOffset@4'

function setRangeScaleFactor(sensorIndex: Integer, scaleFactor: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setRangeScaleFactor@8'
function getRangeScaleFactor(sensorIndex: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getRangeScaleFactor@4'


function setMaxValidTemp(sensorIndex: Integer, Temp: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMaxValidTemp@8' 
function getMaxValidTemp(sensorIndex: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name '_getMaxValidTemp@4'

function setMinValidTemp(sensorIndex: Integer, Temp: Single): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setMinValidTemp@8'
function getMinValidTemp(sensorIndex: Integer): Single; stdcall; external 'CTI_HSIF.DLL' name  '_getMinValidTemp@4'

//================ Error Handling and Miscellaneous Functions =====================
function getIsError(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getIsError@4'
function getErrorMessage(sensorIndex: Integer, errMsg: PChar, strLen: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getErrorMessage@12' 
function setClearError(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_setClearError@4'

function getFirmwareVersion(sensorIndex: Integer, firmwareVersion: PChar, strLen: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getFirmwareVersion@12'
function getLibraryVersion(sensorIndex: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getLibraryVersion@4'
function getLibraryName(sensorIndex: Integer, libName: PChar, strLen: Integer): Integer; stdcall; external 'CTI_HSIF.DLL' name '_getLibraryName@12'