开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > MTK > 查看源码
Age1968A.cpp
资源名称：Maui_META_src_v5.0808.0.zip　[点击查看]
上传用户：gelin96
上传日期：2017-01-08
资源大小：20993k
文件大小：36k
源码类别：

MTK

开发平台：

C++ Builder

Age1968A.cpp：源码内容
  1. /*****************************************************************************
  2. *  Copyright Statement:
  3. *  --------------------
  4. *  This software is protected by Copyright and the information contained
  5. *  herein is confidential. The software may not be copied and the information
  6. *  contained herein may not be used or disclosed except with the written
  7. *  permission of MediaTek Inc. (C) 2005
  8. *
  9. *  BY OPENING THIS FILE, BUYER HEREBY UNEQUIVOCALLY ACKNOWLEDGES AND AGREES
  10. *  THAT THE SOFTWARE/FIRMWARE AND ITS DOCUMENTATIONS ("MEDIATEK SOFTWARE")
  11. *  RECEIVED FROM MEDIATEK AND/OR ITS REPRESENTATIVES ARE PROVIDED TO BUYER ON
  12. *  AN "AS-IS" BASIS ONLY. MEDIATEK EXPRESSLY DISCLAIMS ANY AND ALL WARRANTIES,
  13. *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
  14. *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT.
  15. *  NEITHER DOES MEDIATEK PROVIDE ANY WARRANTY WHATSOEVER WITH RESPECT TO THE
  16. *  SOFTWARE OF ANY THIRD PARTY WHICH MAY BE USED BY, INCORPORATED IN, OR
  17. *  SUPPLIED WITH THE MEDIATEK SOFTWARE, AND BUYER AGREES TO LOOK ONLY TO SUCH
  18. *  THIRD PARTY FOR ANY WARRANTY CLAIM RELATING THERETO. MEDIATEK SHALL ALSO
  19. *  NOT BE RESPONSIBLE FOR ANY MEDIATEK SOFTWARE RELEASES MADE TO BUYER'S
  20. *  SPECIFICATION OR TO CONFORM TO A PARTICULAR STANDARD OR OPEN FORUM.
  21. *
  22. *  BUYER'S SOLE AND EXCLUSIVE REMEDY AND MEDIATEK'S ENTIRE AND CUMULATIVE
  23. *  LIABILITY WITH RESPECT TO THE MEDIATEK SOFTWARE RELEASED HEREUNDER WILL BE,
  24. *  AT MEDIATEK'S OPTION, TO REVISE OR REPLACE THE MEDIATEK SOFTWARE AT ISSUE,
  25. *  OR REFUND ANY SOFTWARE LICENSE FEES OR SERVICE CHARGE PAID BY BUYER TO
  26. *  MEDIATEK FOR SUCH MEDIATEK SOFTWARE AT ISSUE.
  27. *
  28. *  THE TRANSACTION CONTEMPLATED HEREUNDER SHALL BE CONSTRUED IN ACCORDANCE
  29. *  WITH THE LAWS OF THE STATE OF CALIFORNIA, USA, EXCLUDING ITS CONFLICT OF
  30. *  LAWS PRINCIPLES.  ANY DISPUTES, CONTROVERSIES OR CLAIMS ARISING THEREOF AND
  31. *  RELATED THERETO SHALL BE SETTLED BY ARBITRATION IN SAN FRANCISCO, CA, UNDER
  32. *  THE RULES OF THE INTERNATIONAL CHAMBER OF COMMERCE (ICC).
  33. *
  34. *****************************************************************************/
  35. /*****************************************************************************
  36.  *
  37.  * Filename:
  38.  * ---------
  39.  *   Age1968a.cpp
  40.  *
  41.  * Project:
  42.  * --------
  43.  *   Maui META APP
  44.  *
  45.  * Description:
  46.  * ------------
  47.  *  Agilent 1968A software utility source
  48.  *
  49.  * Author:
  50.  * -------
  51.  *  Andy Ueng (mtk00490)
  52.  *
  53.  *============================================================================
  54.  *             HISTORY
  55.  * Below this line, this part is controlled by PVCS VM. DO NOT MODIFY!!
  56.  *------------------------------------------------------------------------------
  57.  * $Revision$
  58.  * $Modtime$
  59.  * $Log$
  60.  * 
  61.  *------------------------------------------------------------------------------
  62.  * Upper this line, this part is controlled by PVCS VM. DO NOT MODIFY!!
  63.  *============================================================================
  64.  ****************************************************************************/
  66. #include <vcl.h>
  67. #include <math.h>
  68. #include "visatype.h"
  69. #include "visa.h"
  70. #include "age1960.h"
  72. #pragma hdrstop
  74. #include "man_dll.h"
  75. #include "meta_utils.h"
  76. #include "meta_msg.h"
  77. #include "Age1968A.h"
  78. #include "AgeCommon.h"
  80. #ifndef  _VISA_COMMON_H_
  81. #include "visa_common.h"
  82. #endif
  84. // misc
  85. #ifndef  _FT_UTILS_H_
  86. #include "ft_utils.h"
  87. #endif
  89. #ifndef  _GSM_UTILS_H_
  90. #include "gsm_utils.h"
  91. #endif
  93. #pragma package(smart_init)
  95. //---------------------------------------------------------------------------
  96. ViStatus age1968A_operatingMode(ViSession vi, E_AGE_OPERATING_MODE OperatingMode)
  97. {
  98.     AnsiString asOperatingMode;
  99.     ViStatus vistat;
  101.     switch (OperatingMode)
  102.     {
  103.         case OPERATING_MODE_ACTIVE:
  104.         {
  105.             asOperatingMode = "CALL:OPERating:MODE CALL";
  106.         }
  107.         break;
  109.         case OPERATING_MODE_GSM_CW:
  110.         {
  111.             asOperatingMode = "CALL:OPERating:MODE CW";
  112.         }
  113.         break;
  115.         case OPERATING_MODE_GSM_BCH:
  116.         {
  117.             asOperatingMode = "CALL:OPERating:MODE GBTest";
  118.         }
  119.         break;
  121.         case OPERATING_MODE_GSM_BCH_TCH:
  122.         {
  123.              asOperatingMode = "CALL:OPERATING:MODE GBTTest";
  124.         }
  125.         break;
  127.         case OPERATING_MODE_GPRS_BCH:
  128.         {
  129.              asOperatingMode = "CALL:OPERATING:MODE PBTest";
  130.         }
  131.         break;
  133.         case OPERATING_MODE_GPRS_BCH_PDTCH:
  134.         {
  135.              asOperatingMode = "CALL:OPERATING:MODE PBPTest";
  136.         }
  137.         break;
  139.         case OPERATING_MODE_EGPRS_BCH:
  140.         {
  141.              asOperatingMode = "CALL:OPERATING:MODE EBTest";
  142.         }
  143.         break;
  145.         case OPERATING_MODE_EGPRS_BCH_PDTCH:
  146.         {
  147.              asOperatingMode = "CALL:OPERATING:MODE EBPTest";
  148.         }
  149.         break;
  151.         default:
  152.         {
  153.              asOperatingMode = "CALL:OPERATING:MODE GBTTest";
  154.         }
  155.         break;
  156.     }
  158.     vistat = age1960_cmd(vi, asOperatingMode.c_str());
  159.     if (vistat != VI_SUCCESS)
  160.     {
  161.         return vistat;
  162.     }
  164.     return VI_SUCCESS;
  165. }
  167. //===========================================================================
  168. ////////////////////////////    CW mode      ////////////////////////////////
  169. //===========================================================================
  170. ViStatus age1968A_cellPower_CW(ViSession vi, double dBm)
  171. {
  172.     AnsiString as_cmd = "CALL:POWer:CW " + Double_To_AnsiString(dBm);
  173.     ViStatus vistat = age1960_cmd(vi, as_cmd.c_str());
  174.     if (vistat != VI_SUCCESS)
  175.     {
  176.         return vistat;
  177.     }
  179.     return VI_SUCCESS;
  180. }
  182. //---------------------------------------------------------------------------
  183. ViStatus age1968A_GenFreq_CW(ViSession vi, FrequencyBand FreqBand, short arfcn)
  184. {
  185.     double d_CenterFreq;
  186.     getCenterFreq(FreqBand, arfcn, false, &d_CenterFreq);
  187.     AnsiString as_cmd = "CALL:CELL:RFGENERATOR:FREQUENCY:SELECTED " + Double_To_AnsiString(d_CenterFreq) + "MHZ";
  188.     ViStatus vistat = age1960_cmd(vi, as_cmd.c_str());
  189.     if (vistat != VI_SUCCESS)
  190.     {
  191.         return vistat;
  192.     }
  194.     return VI_SUCCESS;
  195. }
  197. //===========================================================================
  198. /////////////////////////          PDTCH     ////////////////////////////////
  199. //===========================================================================
  200. ViStatus age1968A_PDTCHMSTargetPower(ViSession vi, double dBm)
  201. {
  202.     AnsiString as_cmd;
  203.     ViStatus vistat;
  205.     as_cmd = "RFAN:CONT:POW:AUTO OFF";
  206.     vistat = age1960_cmd(vi,as_cmd.c_str());
  207.     if (vistat != VI_SUCCESS)
  208.     {
  209.         return vistat;
  210.     }
  212.     as_cmd = "RFAN:MAN:POW:BURS " + Double_To_AnsiString(dBm);
  213.     vistat = age1960_cmd(vi,as_cmd.c_str());
  214.     if (vistat != VI_SUCCESS)
  215.     {
  216.         return vistat;
  217.     }
  218.     
  219.     return VI_SUCCESS;
  220. }
  222. //---------------------------------------------------------------------------
  223. ViStatus age1968A_PDTCHMSTxLevel(ViSession vi, int i_PCL)
  224. {
  225.     AnsiString as_cmd;
  226.     ViStatus vistat;
  228.     as_cmd = "RFAN:CONT:POW:AUTO ON";
  229.     vistat = age1960_cmd(vi,as_cmd.c_str());
  230.     if (vistat != VI_SUCCESS)
  231.     {
  232.         return vistat;
  233.     }
  235.     as_cmd = "CALL:PDTCH:MS:TXLevel:BURSt " + IntToStr(i_PCL);
  236.     vistat = age1960_cmd(vi,as_cmd.c_str());
  237.     if (vistat != VI_SUCCESS)
  238.     {
  239.         return vistat;
  240.     }
  242.     return VI_SUCCESS;
  243. }
  245. //---------------------------------------------------------------------------
  246. ViStatus age1968A_PDTCHARFCN(ViSession vi, short s_ARFCN)
  247. {
  248.     AnsiString as_cmd;
  249.     ViStatus vistat;
  251.     as_cmd = "CALL:PDTCH:ARFCn:SELected " + IntToStr(s_ARFCN);
  252.     vistat = age1960_cmd( vi,as_cmd.c_str());
  253.     if (vistat != VI_SUCCESS)
  254.     {
  255.         return vistat;
  256.     }
  259.     return VI_SUCCESS;
  261. }
  263. //===========================================================================
  264. //////////////////////////////// TX power  //////////////////////////////////
  265. //===========================================================================
  266. ViStatus age1968A_Config_ExpectedTxPower(ViSession vi, bool b_auto_control, double d_expected_power)
  267. {
  268.     AnsiString as_cmd;
  269.     ViStatus vistat;
  271.     if (b_auto_control)
  272.     {
  273.         as_cmd = "RFANalyzer:CONTrol:POWer:AUTO ON";
  274.         vistat = age1960_cmd( vi,as_cmd.c_str());
  275.         if (vistat != VI_SUCCESS)
  276.         {
  277.             return vistat;
  278.         }
  279.     }
  280.     else
  281.     {
  282.         as_cmd = "RFANalyzer:CONTrol:POWer:AUTO OFF";
  283.         vistat = age1960_cmd(vi,as_cmd.c_str());
  284.         if (vistat != VI_SUCCESS)
  285.         {
  286.             return vistat;
  287.         }
  289.         as_cmd = "RFANalyzer:MANual:POWer:BURSt " + Double_To_AnsiString(d_expected_power);
  290.         vistat = age1960_cmd(vi,as_cmd.c_str());
  291.         if (vistat != VI_SUCCESS)
  292.         {
  293.             return vistat;
  294.         }
  295.     }
  297.     return VI_SUCCESS;
  298. }
  300. //--------------------------------------------------------------------------
  301. ViStatus age1968A_initMeasFcn_EGPRS_TXPOWER(ViSession vi)
  302. {
  303.     AnsiString as_cmd;
  304.     ViStatus vistat;
  306.     as_cmd = "INITIATE:ETXPOWER";
  307.     vistat = age1960_cmd( vi,as_cmd.c_str());
  308.     if (vistat != VI_SUCCESS)
  309.     {
  310.         return vistat;
  311.     }
  313.     return VI_SUCCESS;
  314. }
  316. //---------------------------------------------------------------------------
  317. ViStatus age1968A_TXPowerContOn(ViSession vi)
  318. {
  319.     AnsiString as_cmd;
  320.     ViStatus vistat;
  322.     as_cmd = "SET:TXPower:CONT ON";
  323.     vistat = age1960_cmd(vi, as_cmd.c_str());
  324.     if (vistat != VI_SUCCESS)
  325.     {
  326.         return vistat;
  327.     }
  329.     return VI_SUCCESS;
  330. }
  332. //---------------------------------------------------------------------------
  333. ViStatus age1968A_TXPowerContOff(ViSession vi)
  334. {
  335.     AnsiString as_cmd;
  336.     ViStatus vistat;
  338.     as_cmd = "SET:TXPower:CONT OFF";
  339.     vistat = age1960_cmd(vi, as_cmd.c_str());
  340.     if (vistat != VI_SUCCESS)
  341.     {
  342.         return vistat;
  343.     }
  345.     return VI_SUCCESS;
  346. }
  348. //---------------------------------------------------------------------------
  349. ViStatus age1968A_EPSK_TXPowerContOn(ViSession vi)
  350. {
  351.     AnsiString as_cmd;
  352.     ViStatus vistat;
  354.     as_cmd = "SET:ETXPower:CONT ON";
  355.     vistat = age1960_cmd(vi, as_cmd.c_str());
  356.     if (vistat != VI_SUCCESS)
  357.     {
  358.         return vistat;
  359.     }
  361.     return VI_SUCCESS;
  362. }
  364. //---------------------------------------------------------------------------
  365. ViStatus age1968A_EPSK_TXPowerContOff(ViSession vi)
  366. {
  367.     AnsiString as_cmd;
  368.     ViStatus vistat;
  370.     as_cmd = "SET:ETXPower:CONT OFF";
  371.     vistat = age1960_cmd(vi, as_cmd.c_str());
  372.     if (vistat != VI_SUCCESS)
  373.     {
  374.         return vistat;
  375.     }
  377.     return VI_SUCCESS;
  378. }
  380. //---------------------------------------------------------------------------
  381. ViStatus age1968A_ConfigTxPower(ViSession vi, int iMeasureCount, int iTriSour, int iDelay, int iTriQual, int iTimeout)
  382. {
  383.     AnsiString asTXPowerSnum, asTXPowerTriSour, asTXPowerTimeout, asTXPowerDelay, asTXPowerTriQual;
  384.     ViStatus vistat;
  386.     // set measurecount
  387.     asTXPowerSnum = "SETUP:TXPOWER:COUNT:SNUMBER " + IntToStr(iMeasureCount);
  388.     vistat = age1960_cmd(vi,asTXPowerSnum.c_str());
  389.     if (vistat != VI_SUCCESS)
  390.     {
  391.         return vistat;
  392.     }
  394.     // triger source
  395.     switch (iTriSour)
  396.     {
  397.       case age1960_TRIG_AUTO:
  398.         {
  399.           asTXPowerTriSour = "SETUP:TXPOWER:TRIGGER:SOURCE AUTO";
  400.         }
  401.       break;
  403.       case age1960_TRIG_PROT:
  404.         {
  405.           asTXPowerTriSour = "SETUP:TXPOWER:TRIGGER:SOURCE PROTocol";
  406.         }
  407.       break;
  409.       case age1960_TRIG_RF_RISE:
  410.         {
  411.           asTXPowerTriSour = "SETUP:TXPOWER:TRIGGER:SOURCE RISE";
  412.         }
  413.       break;
  415.       case age1960_TRIG_IMMEDIATE:
  416.         {
  417.           asTXPowerTriSour = "SETUP:TXPOWER:TRIGGER:SOURCE IMMediate";
  418.         }
  419.       break;
  421.       default: // set to auto
  422.         {
  423.           asTXPowerTriSour = "SETUP:TXPOWER:TRIGGER:SOURCE AUTO";
  424.         }
  425.       break;
  426.     }
  428.     vistat = age1960_cmd(vi,asTXPowerTriSour.c_str());
  429.     if (vistat != VI_SUCCESS)
  430.     {
  431.         return vistat;
  432.     }
  434.     // set delay
  435.     asTXPowerDelay = "SETUP:TXPOWER:TRIGGER:DELAY " + IntToStr( iDelay ); // sec
  436.     vistat = age1960_cmd(vi,asTXPowerDelay.c_str());
  437.     if (vistat != VI_SUCCESS)
  438.     {
  439.         return vistat;
  440.     }
  442.     // set trigger qualifier
  443.     if (AGE1960_TX_POWER_TRIGGER_QUALIFIER_ON == iTriQual)
  444.     {
  445.         asTXPowerTriQual = "SETUP:TXPOWER:TRIGGER:QUALIFIER ON";
  446.     }
  447.     else
  448.     {
  449.         asTXPowerTriQual = "SETUP:TXPOWER:TRIGGER:QUALIFIER OFF";
  450.     }
  451.     vistat = age1960_cmd(vi,asTXPowerTriQual.c_str());
  452.     if (vistat != VI_SUCCESS)
  453.     {
  454.         return vistat;
  455.     }
  457.     // set timeout
  458.     asTXPowerTimeout = "SETUP:TXPOWER:TIMEOUT:STIME " + IntToStr(iTimeout); // sec
  459.     vistat = age1960_cmd(vi,asTXPowerTimeout.c_str());
  460.     if (vistat != VI_SUCCESS)
  461.     {
  462.         return vistat;
  463.     }
  465.     return VI_SUCCESS;
  466. }
  468. //---------------------------------------------------------------------------
  469. ViStatus age1968A_Config_EPSK_TxPower(ViSession vi, int iMeasureCount, int iTriSour, int iDelay, int iTriQual, int iTimeout)
  470. {
  471.     AnsiString as_cmd;
  472.     ViStatus vistat;
  474.     // set modulation
  475.    // as_cmd = "SETup:ETXPower:MODulation EPSK";
  476.    // if ( vistat = age1960_cmd(vi, as_cmd.c_str())!= VI_SUCCESS )
  477.    // {
  478.    //     return vistat;
  479.    //}
  481.     // set measurecount
  482.     as_cmd = "SETUP:ETXPOWER:COUNT:SNUMBER " + IntToStr(iMeasureCount);
  483.     vistat = age1960_cmd(vi, as_cmd.c_str());
  484.     if (vistat != VI_SUCCESS )
  485.     {
  486.         return vistat;
  487.     }
  489.     // triger source
  490.     switch (iTriSour)
  491.     {
  492.       case age1960_TRIG_AUTO:
  493.         {
  494.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE AUTO";
  495.         }
  496.       break;
  498.       case age1960_TRIG_PROT:
  499.         {
  500.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE PROTocol";
  501.         }
  502.       break;
  504.       case age1960_TRIG_RF_RISE:
  505.         {
  506.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE RISE";
  507.         }
  508.       break;
  510.       case age1960_TRIG_IMMEDIATE:
  511.         {
  512.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE IMMediate";
  513.         }
  514.       break;
  516.       default: // set to auto
  517.         {
  518.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE AUTO";
  519.         }
  520.       break;
  521.     }
  523.     vistat = age1960_cmd(vi, as_cmd.c_str());
  524.     if (vistat != VI_SUCCESS)
  525.     {
  526.         return vistat;
  527.     }
  529.     // set delay
  530.     as_cmd = "SETUP:ETXPOWER:TRIGGER:DELAY " + IntToStr(iDelay); // sec
  531.     vistat = age1960_cmd(vi, as_cmd.c_str());
  532.     if (vistat != VI_SUCCESS)
  533.     {
  534.         return vistat;
  535.     }
  536. #if 0
  537.     // set trigger qualifier
  538.     if (iTriQual == AGE1960_TX_POWER_TRIGGER_QUALIFIER_ON )
  539.     {
  540.         as_cmd = "SETUP:ETXPOWER:TRIGGER:QUALIFIER ON";
  541.     }
  542.     else
  543.     {
  544.         as_cmd = "SETUP:ETXPOWER:TRIGGER:QUALIFIER OFF";
  545.     }
  546.     if (vistat = age1960_cmd(vi, s_cmd.c_str())!= VI_SUCCESS )
  547.     {
  548.         return vistat;
  549.     }
  551.     // set timeout
  552.     as_cmd = "SETUP:ETXPOWER:TIMEOUT:STIME " + IntToStr( iTimeout ); // sec
  553.     if ( vistat = age1960_cmd(vi, as_cmd.c_str())!= VI_SUCCESS )
  554.     {
  555.         return vistat;
  556.     }
  557. #endif
  558.     return vistat;
  560. }
  562. //------------------------------------------------------------------------------
  563. ViStatus age1968A_ReadTxPower(ViSession vi, ViReal64 *p_virTX)
  564. {
  565.     AnsiString asTXPowerRead, asStr, asIntegrity, asTxPower, asBase, asExponent;;
  566.     ViStatus vistat;
  567.     unsigned long num;
  568.     char buf[BUFSIZE];
  570.     asTXPowerRead = "READ:TXP?";
  571.     vistat=viWrite(vi, asTXPowerRead.c_str(), strlen(asTXPowerRead.c_str()), &num);
  572.     if( vistat!=VI_SUCCESS ) return vistat;
  573.     //Sleep( 100 );
  574.     vistat=viRead(vi, buf, BUFSIZE, &num);
  575.     if( vistat!=VI_SUCCESS ) return vistat;
  577.     buf[num-1]=NULL;
  578.     asStr=(AnsiString)buf;
  579.     if( getIntegrityFromStr( asStr, asIntegrity ) == false )  return VI_ERROR_ABORT;
  580.     if( (asIntegrity.ToInt() != (int) INTEGRITY_NORMAL)       &&
  581.         (asIntegrity.ToInt() != (int) INTEGRITY_OVER_RANGE)   &&
  582.         (asIntegrity.ToInt() != (int) INTEGRITY_UNDER_RANGE )
  583.       )
  584.     {
  585.         return VI_ERROR_ABORT;
  586.     }
  587.     if( getTxPowerFromStr( asStr, asTxPower ) == false )  return VI_ERROR_ABORT;
  588.     if( getBaseFromStr( asTxPower, asBase ) == false )  return VI_ERROR_ABORT;
  589.     if( getExponentFromStr( asTxPower, asExponent )== false )  return VI_ERROR_ABORT;
  590.     //if( asExponent.ToInt() >= 0 )
  591.     {
  592.        *p_virTX = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  593.     }
  594.     //Application->MessageBox( temp.c_str() , "Warning", MB_OK );
  595.     //if( temp.Pos("NAN") ) return vistat;
  597.     //temp=temp.SubString(1, temp.Pos(",")-1);
  598.     //*p_virTX = atof(temp.c_str());
  600.     return vistat;
  602. }
  604. //------------------------------------------------------------------------------
  605. ViStatus age1968A_ReadEGPRSTxPower(ViSession vi, ViReal64 *p_virTX)
  606. {
  607.     AnsiString asTXPowerRead, asStr, asIntegrity, asTxPower, asBase, asExponent;;
  608.     ViStatus vistat;
  609.     unsigned long num;
  610.     char buf[BUFSIZE];
  612.     asTXPowerRead = "READ:ETXPower?";
  613.     vistat=viWrite(vi, asTXPowerRead.c_str(), strlen(asTXPowerRead.c_str()), &num);
  614.     if( vistat!=VI_SUCCESS ) return vistat;
  615.     //Sleep( 100 );
  616.     vistat=viRead(vi, buf, BUFSIZE, &num);
  617.     if( vistat!=VI_SUCCESS ) return vistat;
  619.     buf[num-1]=NULL;
  620.     asStr=(AnsiString)buf;
  621.     if( getEpskIntegrityFromStr( asStr, asIntegrity ) == false )  return VI_ERROR_ABORT;
  622.     if( (asIntegrity.ToInt() != (int) INTEGRITY_NORMAL)                      &&
  623.         (asIntegrity.ToInt() != (int) INTEGRITY_OVER_RANGE)                  &&
  624.         (asIntegrity.ToInt() != (int) INTEGRITY_UNDER_RANGE )                &&
  625.         (asIntegrity.ToInt() != (int) INTEGRITY_SYNC_NOT_FOUND)              &&
  626.         (asIntegrity.ToInt() != (int) INTEGRITY_TRIGGER_EARLY_OR_FALL_EARLY) &&
  627.         (asIntegrity.ToInt() != (int) INTEGRITY_TRIGGER_LATE_OR_RISE_LATE)
  628.       )
  629.     {
  630.         return VI_ERROR_ABORT;
  631.     }
  632.     if( getEpskTxPowerFromStr( asStr, asTxPower ) == false )  return VI_ERROR_ABORT;
  633.     if( getEpskBaseFromStr( asTxPower, asBase ) == false )  return VI_ERROR_ABORT;
  634.     if( getEpskExponentFromStr( asTxPower, asExponent )== false )  return VI_ERROR_ABORT;
  635.     //if( asExponent.ToInt() >= 0 )
  636.     {
  637.        *p_virTX = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  638.     }
  639.     //Application->MessageBox( temp.c_str() , "Warning", MB_OK );
  640.     //if( temp.Pos("NAN") ) return vistat;
  642.     //temp=temp.SubString(1, temp.Pos(",")-1);
  643.     //*p_virTX = atof(temp.c_str());
  645.     return vistat;
  647. }
  649. //==============================================================================
  650. /////////////////////////////////   PFER    ////////////////////////////////////
  651. //==============================================================================
  652. ViStatus age1968A_confPFER(ViSession vi, int iMeasureCount, int iTriSour,
  653.                                        int iDelay, int iTriQual, int iTimeout)
  654. {
  655.     AnsiString as_cmd;
  656.     ViStatus vistat;
  658.     // burst sync
  659.     as_cmd = "SETUP:PFERROR:SYNC MIDAMBLE";
  660.     vistat = age1960_cmd(vi, as_cmd.c_str());
  661.     if (vistat != VI_SUCCESS)
  662.     {
  663.         return vistat;
  664.     }
  666.     // set measurecount
  667.     as_cmd = "SETup:PFERror:COUNt:NUMBer " + IntToStr(iMeasureCount);
  668.     vistat = age1960_cmd(vi, as_cmd.c_str());
  669.     if (vistat != VI_SUCCESS)
  670.     {
  671.         return vistat;
  672.     }
  674.     // triger source
  675.     switch (iTriSour)
  676.     {
  677.       case age1960_TRIG_AUTO:
  678.         {
  679.           as_cmd = "SETup:PFERror:TRIG:SOURce AUTO";
  680.         }
  681.       break;
  683.       case age1960_TRIG_PROT:
  684.         {
  685.           as_cmd = "SETup:PFERror:TRIG:SOURce PROTocol";
  686.         }
  687.       break;
  689.       case age1960_TRIG_RF_RISE:
  690.         {
  691.           as_cmd = "SETup:PFERror:TRIG:SOURce RISE";
  692.         }
  693.       break;
  695.       case age1960_TRIG_IMMEDIATE:
  696.         {
  697.           as_cmd = "SETup:PFERror:TRIG:SOURce IMMediate";
  698.         }
  699.       break;
  701.       default: // set to auto
  702.         {
  703.           as_cmd = "SETup:PFERror:TRIG:SOURce AUTO";
  704.         }
  705.       break;
  706.     }
  708.     vistat = age1960_cmd(vi,as_cmd.c_str());
  709.     if (vistat != VI_SUCCESS)
  710.     {
  711.         return vistat;
  712.     }
  714.     // set delay
  715.     as_cmd = "SETup:PFERror:TRIGger:DELay " + IntToStr(iDelay); // sec
  716.     vistat = age1960_cmd(vi, as_cmd.c_str());
  717.     if (vistat != VI_SUCCESS)
  718.     {
  719.         return vistat;
  720.     }
  722.     // set trigger qualifier
  723.     if (AGE1960_TX_POWER_TRIGGER_QUALIFIER_ON == iTriQual)
  724.     {
  725.         as_cmd = "SETup:PFERror:TRIGger:QUALifier:GSM ON";
  726.     }
  727.     else
  728.     {
  729.         as_cmd = "SETup:PFERror:TRIGger:QUALifier:GSM OFF";
  730.     }
  731.     vistat = age1960_cmd(vi, as_cmd.c_str());
  732.     if (vistat != VI_SUCCESS)
  733.     {
  734.         return vistat;
  735.     }
  737.     // set timeout
  738.     as_cmd = "SETup:PFERror:TIMeout:TIME " + IntToStr(iTimeout); // sec
  739.     vistat = age1960_cmd(vi, as_cmd.c_str());
  740.     if (vistat != VI_SUCCESS)
  741.     {
  742.         return vistat;
  743.     }
  745.     return VI_SUCCESS;
  746. }
  748. //------------------------------------------------------------------------------
  749. ViStatus age1968A_ReadFreqError(ViSession vi, ViReal64 *p_virFreqErr)
  750. {
  751.     AnsiString asPFERRead, asStr, asIntegrity, asTxPower, asBase, asExponent;;
  752.     ViStatus vistat;
  753.     unsigned long num;
  754.     char buf[BUFSIZE];
  756.     asPFERRead = "READ:PFER?";
  757.     vistat=viWrite(vi, asPFERRead.c_str(), strlen(asPFERRead.c_str()), &num);
  758.     if( vistat!=VI_SUCCESS ) return vistat;
  759.     vistat=viRead(vi, buf, BUFSIZE, &num);
  760.     if( vistat!=VI_SUCCESS ) return vistat;
  762.     buf[num-1]=NULL;
  763.     asStr=(AnsiString)buf;
  764.     if( getIntegrityFromStr( asStr, asIntegrity ) == false )  return VI_ERROR_ABORT;
  765.     if( (asIntegrity.ToInt() != (int) INTEGRITY_NORMAL) && (asIntegrity.ToInt() != (int) INTEGRITY_OVER_RANGE) && (asIntegrity.ToInt() != (int) INTEGRITY_UNDER_RANGE ))
  766.     {
  767.         return VI_ERROR_ABORT;
  768.     }
  769.     if( getTxPowerFromStr( asStr, asTxPower ) == false )  return VI_ERROR_ABORT;
  770.     if( getBaseFromStr( asTxPower, asBase ) == false )  return VI_ERROR_ABORT;
  771.     if( getExponentFromStr( asTxPower, asExponent )== false )  return VI_ERROR_ABORT;
  773.     {
  774.        *p_virFreqErr = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  775.     }
  778.     return vistat;
  780. }
  782. //---------------------------------------------------------------------------
  783. ViStatus age1968A_ConfigTSC(ViSession vi, int i_TSC)
  784. {
  785.     AnsiString asTSC;
  786.     ViStatus vistat;
  787.     unsigned long num;
  789.     // set measurecount
  790.     asTSC = "CALL:BURSt:TYPE TSC" + IntToStr(i_TSC);
  791.     vistat = age1960_cmd(vi, asTSC.c_str());
  792.     if (vistat != VI_SUCCESS)
  793.     {
  794.         return vistat;
  795.     }
  796.     return vistat;
  798. }
  801. //------------------------------------------------------------------------------
  802. ViReal64 __fastcall get_Original_Offset(ViReal64  *p_IQTFreqs, ViReal64 *p_IQTResults, ViInt32   IQTTuningCount)
  803. {
  805.     for(int i=0; i<IQTTuningCount; i++)
  806.     {
  807.         if( *(p_IQTFreqs+i) == IQT_ORIGINAL_OFFSET_FREQ )
  808.         {
  809.             return *(p_IQTResults+i);
  810.         }
  811.     }
  812.     return NAN;
  814. }
  816. //------------------------------------------------------------------------------
  817. ViReal64 __fastcall get_IQ_Imbalance(ViReal64  *p_IQTFreqs, ViReal64 *p_IQTResults, ViInt32   IQTTuningCount)
  818. {
  820.     for(int i=0; i<IQTTuningCount; i++)
  821.     {
  822.         if( *(p_IQTFreqs+i) == IQT_IQ_IMBALANCE_FREQ )
  823.         {
  824.             return *(p_IQTResults+i);
  825.         }
  826.     }
  827.     return NAN;
  829. }
  831. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  832. ViStatus age1968A_Config_DynPower(ViSession vi, int iMeasureCount, int iTimeout)
  833. {
  834.     AnsiString as_cmd;
  835.     ViStatus vistat;
  837.     as_cmd = "SETup:DPOWer:CONTinuous OFF";
  838.     vistat = age1960_cmd(vi,as_cmd.c_str());
  839.     if (vistat != VI_SUCCESS)
  840.     {
  841.         return vistat;
  842.     }
  844.     as_cmd = "SETUP:DPOWER:COUNT:NUMBER:SELECTED " + IntToStr(iMeasureCount);
  845.     vistat = age1960_cmd(vi,as_cmd.c_str());
  846.     if (vistat != VI_SUCCESS)
  847.     {
  848.         return vistat;
  849.     }
  851.     as_cmd = "SETup:DPOWer:TIMeout " + IntToStr( iTimeout ) + "S";
  852.     vistat = age1960_cmd(vi,as_cmd.c_str());
  853.     if (vistat != VI_SUCCESS)
  854.     {
  855.         return vistat;
  856.     }
  858.     return VI_SUCCESS;
  859. }
  862. //==============================================================================
  863. ////////////////////////////         EPSK        ///////////////////////////////
  864. //==============================================================================
  865. ViStatus age1968A_Config_EPSK_CodingScheme(ViSession vi, int i_MCS)
  866. {
  867.     AnsiString as_cmd;
  868.     ViStatus vistat;
  869.     unsigned long num;
  871.     as_cmd = "CALL:PDTCH:MCSCheme:EBPTest MCS" + IntToStr(i_MCS) + "P1";
  872.     vistat = age1960_cmd(vi, as_cmd.c_str());
  873.     if (vistat != VI_SUCCESS)
  874.     {
  875.         return vistat;
  876.     }
  877.     return vistat;
  878. }
  880. //---------------------------------------------------------------------------
  881. ViStatus age1968A_confTXPower( ViSession vi, int iMeasureCount, int iTriSour,
  882.                                int iDelay, int iTriQual, int iTimeout )
  883. {
  885.     AnsiString as_cmd;
  886.     ViStatus vistat;
  888.     // set measure count
  889.     as_cmd = "SETUP:ETXPOWER:COUNT:SNUMBER " + IntToStr(iMeasureCount);
  890.     vistat = age1960_cmd(vi, as_cmd.c_str());
  891.     if (vistat != VI_SUCCESS)
  892.     {
  893.         return vistat;
  894.     }
  896.     // triger source
  897.     switch (iTriSour)
  898.     {
  899.       case age1960_TRIG_AUTO:
  900.         {
  901.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE AUTO";
  902.         }
  903.       break;
  905.       case age1960_TRIG_PROT:
  906.         {
  907.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE PROTocol";
  908.         }
  909.       break;
  911.       case age1960_TRIG_RF_RISE:
  912.         {
  913.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE RISE";
  914.         }
  915.       break;
  917.       case age1960_TRIG_IMMEDIATE:
  918.         {
  919.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE IMMediate";
  920.         }
  921.       break;
  923.       default: // set to auto
  924.         {
  925.           as_cmd = "SETUP:ETXPOWER:TRIGGER:SOURCE AUTO";
  926.         }
  927.       break;
  928.     }
  930.     vistat = age1960_cmd(vi, as_cmd.c_str());
  931.     if (vistat != VI_SUCCESS)
  932.     {
  933.         return vistat;
  934.     }
  936.     // set delay
  937.     as_cmd = "SETUP:ETXPOWER:TRIGGER:DELAY " + IntToStr(iDelay); // sec
  938.     vistat = age1960_cmd(vi, as_cmd.c_str());
  939.     if (vistat != VI_SUCCESS)
  940.     {
  941.         return vistat;
  942.     }
  944.     // set trigger qualifier
  945.     if (AGE1960_TX_POWER_TRIGGER_QUALIFIER_ON == iTriQual)
  946.     {
  947.         as_cmd = "SETUP:ETXPOWER:TRIGGER:QUALIFIER ON";
  948.     }
  949.     else
  950.     {
  951.         as_cmd = "SETUP:ETXPOWER:TRIGGER:QUALIFIER OFF";
  952.     }
  953.     vistat = age1960_cmd(vi, as_cmd.c_str());
  954.     if (vistat != VI_SUCCESS)
  955.     {
  956.         return vistat;
  957.     }
  959.     // set timeout
  960.     as_cmd = "SETUP:ETXPOWER:TIMEOUT:STIME " + IntToStr(iTimeout); // sec
  961.     vistat = age1960_cmd(vi, as_cmd.c_str());
  962.     if (vistat != VI_SUCCESS)
  963.     {
  964.         return vistat;
  965.     }
  966.     return vistat;
  967. }
  969. //----------------------------------------------------------------------------
  970. ViStatus age1968A_FetchEpskTxPower(ViSession vi, ViReal64 *p_virTX)
  971. {
  972.     AnsiString asTXPowerFetch, asStr, asIntegrity, asTxPower, asBase, asExponent;;
  973.     ViStatus vistat;
  974.     unsigned long num;
  975.     char buf[BUFSIZE];
  977.     asTXPowerFetch = "FETCh:ETXP:POW:BURSt?";
  978.     vistat=viWrite(vi, asTXPowerFetch.c_str(), strlen(asTXPowerFetch.c_str()), &num);
  979.     if( vistat!=VI_SUCCESS ) return vistat;
  980.     //Sleep( 100 );
  981.     vistat=viRead(vi, buf, BUFSIZE, &num);
  982.     if( vistat!=VI_SUCCESS ) return vistat;
  984.     buf[num-1]=NULL;
  985.     asStr=(AnsiString)buf;
  986.     if( getIntegrityFromStr( asStr, asIntegrity ) == false )  return VI_ERROR_ABORT;
  987.     if( (asIntegrity.ToInt() != (int) INTEGRITY_NORMAL) && (asIntegrity.ToInt() != (int) INTEGRITY_OVER_RANGE) && (asIntegrity.ToInt() != (int) INTEGRITY_UNDER_RANGE ))
  988.     {
  989.         return VI_ERROR_ABORT;
  990.     }
  991.     if( getTxPowerFromStr( asStr, asTxPower ) == false )  return VI_ERROR_ABORT;
  992.     if( getBaseFromStr( asTxPower, asBase ) == false )  return VI_ERROR_ABORT;
  993.     if( getExponentFromStr( asTxPower, asExponent )== false )  return VI_ERROR_ABORT;
  994.     //if( asExponent.ToInt() >= 0 )
  995.     {
  996.        *p_virTX = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  997.     }
  998.     //Application->MessageBox( temp.c_str() , "Warning", MB_OK );
  999.     //if( temp.Pos("NAN") ) return vistat;
  1001.     //temp=temp.SubString(1, temp.Pos(",")-1);
  1002.     //*p_virTX = atof(temp.c_str());
  1004.     return vistat;
  1006. }
  1008. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  1009. ViStatus age1968A_Config_EPSK_ModACcuracy(ViSession vi, int iMeasureCount, int iTriSour, int iDelay, int iTimeout)
  1010. {
  1011.     AnsiString as_cmd;
  1012.     ViStatus vistat;
  1014.     // set single
  1015.     as_cmd = "SETup:EMACcuracy:CONTinuous OFF";
  1016.     vistat = age1960_cmd(vi,as_cmd.c_str());
  1017.     if (vistat != VI_SUCCESS)
  1018.     {
  1019.         return vistat;
  1020.     }
  1022.     as_cmd = "SETup:EMACcuracy:IQIMbalance:STATe ON";
  1023.     vistat = age1960_cmd(vi,as_cmd.c_str());
  1024.     if (vistat != VI_SUCCESS)
  1025.     {
  1026.         return vistat;
  1027.     }
  1029.     // set measurecount
  1030.     as_cmd = "SETup:EMACcuracy:COUNT:SNUMBER " + IntToStr(iMeasureCount);
  1031.     vistat = age1960_cmd(vi,as_cmd.c_str());
  1032.     if (vistat != VI_SUCCESS)
  1033.     {
  1034.         return vistat;
  1035.     }
  1037.     // triger source
  1038.     switch (iTriSour)
  1039.     {
  1040.       case age1960_TRIG_AUTO:
  1041.         {
  1042.           as_cmd = "SETup:EMACcuracy:TRIGGER:SOURCE AUTO";
  1043.         }
  1044.       break;
  1046.       case age1960_TRIG_PROT:
  1047.         {
  1048.           as_cmd = "SETup:EMACcuracy:TRIGGER:SOURCE PROTocol";
  1049.         }
  1050.       break;
  1052.       case age1960_TRIG_RF_RISE:
  1053.         {
  1054.           as_cmd = "SETup:EMACcuracy:TRIGGER:SOURCE RISE";
  1055.         }
  1056.       break;
  1058.       case age1960_TRIG_IMMEDIATE:
  1059.         {
  1060.           as_cmd = "SETup:EMACcuracy:TRIGGER:SOURCE IMMediate";
  1061.         }
  1062.       break;
  1064.       default: // set to auto
  1065.         {
  1066.           as_cmd = "SETup:EMACcuracy:TRIGGER:SOURCE AUTO";
  1067.         }
  1068.       break;
  1069.     }
  1070.     vistat = age1960_cmd(vi, as_cmd.c_str());
  1071.     if (vistat != VI_SUCCESS)
  1072.     {
  1073.         return vistat;
  1074.     }
  1076.     // set delay
  1077.     as_cmd = "SETup:EMACcuracy:TRIGGER:DELAY " + IntToStr(iDelay); // sec
  1078.     vistat = age1960_cmd(vi,as_cmd.c_str());
  1079.     if (vistat != VI_SUCCESS)
  1080.     {
  1081.         return vistat;
  1082.     }
  1084.     // set timeout
  1085.     as_cmd = "SETup:EMACcuracy:TIMEOUT:STIME " + IntToStr(iTimeout); // sec
  1086.     vistat = age1960_cmd(vi,as_cmd.c_str());
  1087.     if (vistat != VI_SUCCESS)
  1088.     {
  1089.         return vistat;
  1090.     }
  1092.     return vistat;
  1093. }
  1095. //----------------------------------------------------------------------------
  1096. ViStatus age1968A_Fetch_EPSK_Average_PhaseError(ViSession vi, ViReal64 *p_virPhErr)
  1097. {
  1098.     AnsiString as_cmd, asStr, asIntegrity, as_OOS, as_SBS, asBase, asExponent;
  1099.     ViStatus vistat;
  1100.     unsigned long num;
  1101.     char buf[BUFSIZE];
  1103.     // init
  1104.     as_cmd = "INIT:EMACcuracy:ON";
  1105.     vistat = viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1106.     if (vistat != VI_SUCCESS)
  1107.     {
  1108.         return vistat;
  1109.     }
  1111.     // fetch
  1112.     as_cmd = "FETCh:EMACcuracy:PERRor:RMS?";
  1113.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1114.     if (vistat != VI_SUCCESS)
  1115.     {
  1116.         return vistat;
  1117.     }
  1119.     vistat=viRead(vi, buf, BUFSIZE, &num);
  1120.     if( vistat!=VI_SUCCESS ) return vistat;
  1122.     buf[num-1]=NULL;
  1123.     asStr=(AnsiString)buf;
  1125.     if (!getBaseFromStr(asStr, asBase))
  1126.     {
  1127.         return VI_ERROR_ABORT;
  1128.     }
  1130.     if (!getExponentFromStr(asStr, asExponent))
  1131.     {
  1132.         return VI_ERROR_ABORT;
  1133.     }
  1135.     *p_virPhErr = (ViReal64) atof(asBase.c_str()) * pow10(asExponent.ToInt());
  1136.    // *p_virPhErr = 0 - *p_virOOS;
  1138.     // abort
  1139.     as_cmd = "ABORt:EMACcuracy";
  1140.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1141.     if( vistat!=VI_SUCCESS ) return vistat;
  1143.     return vistat;
  1145. }
  1147. //----------------------------------------------------------------------------
  1148. ViStatus age1968A_Fetch_EPSK_Average_OrignalOffset(ViSession vi, ViReal64 *p_virOOS )
  1149. {
  1150.     AnsiString as_cmd, asStr, asIntegrity, as_OOS, as_SBS, asBase, asExponent;
  1151.     ViStatus vistat;
  1152.     unsigned long num;
  1153.     char buf[BUFSIZE];
  1155.     as_cmd = "INIT:EMACcuracy:ON";
  1156.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1157.     if( vistat!=VI_SUCCESS ) return vistat;
  1159.     as_cmd = "FETCh:EMACcuracy:OOFFset?";
  1160.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1161.     if( vistat!=VI_SUCCESS ) return vistat;
  1162.     //Sleep( 100 );
  1163.     vistat=viRead(vi, buf, BUFSIZE, &num);
  1164.     if( vistat!=VI_SUCCESS ) return vistat;
  1166.     buf[num-1]=NULL;
  1167.     asStr=(AnsiString)buf;
  1168.     if (asStr.AnsiPos("9.91E37"))
  1169.     {
  1170.         return VI_ERROR_INV_EXPR;
  1171.     }
  1172.         
  1173.     if (!getBaseFromStr(asStr, asBase))
  1174.     {
  1175.         return VI_ERROR_ABORT;
  1176.     }
  1178.     if (!getExponentFromStr(asStr, asExponent))
  1179.     {
  1180.         return VI_ERROR_ABORT;
  1181.     }
  1183.     *p_virOOS = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  1184.     *p_virOOS = 0 - *p_virOOS;
  1186.     as_cmd = "ABORt:EMACcuracy";
  1187.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1188.     if( vistat!=VI_SUCCESS ) return vistat;
  1190.     return vistat;
  1192. }
  1194. //----------------------------------------------------------------------------
  1195. ViStatus age1968A_Fetch_EPSK_Average_IQImbalance(ViSession vi, ViReal64 *p_virSBS)
  1196. {
  1197.     AnsiString as_cmd, asStr, asIntegrity, as_OOS, as_SBS, asBase, asExponent;
  1198.     ViStatus vistat;
  1199.     unsigned long num;
  1200.     char buf[BUFSIZE];
  1202.     as_cmd = "INIT:EMACcuracy:ON";
  1203.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1204.     if( vistat!=VI_SUCCESS ) return vistat;
  1206.     as_cmd = "FETCh:EMACcuracy:IQIMbalance?";
  1207.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1208.     if( vistat!=VI_SUCCESS ) return vistat;
  1209.     //Sleep( 100 );
  1210.     vistat=viRead(vi, buf, BUFSIZE, &num);
  1211.     if( vistat!=VI_SUCCESS ) return vistat;
  1213.     buf[num-1]=NULL;
  1214.     asStr=(AnsiString)buf;
  1215.     if (asStr.AnsiPos("9.91E37"))
  1216.     {
  1217.         return VI_ERROR_INV_EXPR;
  1218.     }
  1220.     if (!getBaseFromStr(asStr, asBase))
  1221.     {
  1222.         return VI_ERROR_ABORT;
  1223.     }
  1225.     if (!getExponentFromStr(asStr, asExponent))
  1226.     {
  1227.         return VI_ERROR_ABORT;
  1228.     }
  1230.     *p_virSBS = (ViReal64) atof(asBase.c_str()) *  pow10(asExponent.ToInt());
  1232.     as_cmd = "ABORt:EMACcuracy";
  1233.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1234.     if( vistat!=VI_SUCCESS ) return vistat;
  1236.     return vistat;
  1238. }
  1240. //----------------------------------------------------------------------------
  1241. ViStatus age1968A_Fetch_EPSK_Average_TxIq(ViSession vi, ViReal64 *p_virSBS, ViReal64 *p_virOOS)
  1242. {
  1243.     AnsiString as_cmd, asStr, asIntegrity, as_OOS, as_SBS, asBase, asExponent;
  1244.     ViStatus vistat;
  1245.     unsigned long num;
  1246.     char buf[BUFSIZE];
  1248.     as_cmd = "INIT:EMACcuracy:ON";
  1249.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1250.     if( vistat!=VI_SUCCESS ) return vistat;
  1252.     as_cmd = "FETCh:EMACcuracy?";
  1253.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1254.     if( vistat!=VI_SUCCESS ) return vistat;
  1256.     vistat=viRead(vi, buf, BUFSIZE, &num);
  1257.     if( vistat!=VI_SUCCESS ) return vistat;
  1259.     buf[num-1]=NULL;
  1260.     asStr=(AnsiString)buf;
  1261.     if (asStr.AnsiPos("9.91E37"))
  1262.     {
  1263.         return VI_ERROR_INV_EXPR;
  1264.     }
  1266.     if (!getBaseFromStr(asStr, asBase))
  1267.     {
  1268.         return VI_ERROR_ABORT;
  1269.     }
  1271.     if (!getExponentFromStr(asStr, asExponent))
  1272.     {
  1273.         return VI_ERROR_ABORT;
  1274.     }
  1275.     
  1276.     *p_virSBS = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  1277.     
  1278.     as_cmd = "ABORt:EMACcuracy";
  1279.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  1280.     if( vistat!=VI_SUCCESS ) return vistat;
  1282.     return vistat;
  1284. }