AgeCommon.cpp
上传用户:gelin96
上传日期:2017-01-08
资源大小:20993k
文件大小:6k
源码类别:

MTK

开发平台:

C++ Builder

  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.  *   AgeCommon.cpp
  40.  *
  41.  * Project:
  42.  * --------
  43.  *   Maui META APP
  44.  *
  45.  * Description:
  46.  * ------------
  47.  *  Agilent 8960 common 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.  ****************************************************************************/
  65. #include <vcl.h>
  66. #include <math.h>
  67. #include "visatype.h"
  68. #include "visa.h"
  69. #include "age1960.h"
  70. #pragma hdrstop
  71. // equipment
  72. #include "AgeCommon.h"
  73. #ifndef  _VISA_COMMON_H_
  74. #include "visa_common.h"
  75. #endif
  76. #include "meta_utils.h"
  77. #include "man_dll.h"
  78. #pragma package(smart_init)
  79. //---------------------------------------------------------------------------
  80. ViStatus age_QueryTaModel( ViSession vi, AnsiString* asTaModel )
  81. {
  82.     char str[512];
  83.     AnsiString asQueryTaModel, asStr;
  84.     ViStatus vistat;
  85.     unsigned long num;
  86.     char buf[BUFSIZE];
  87.     asQueryTaModel = "SYST:CURR:TA:MODEL?";
  88.     strcpy(str, asQueryTaModel.c_str());
  89.     vistat=viWrite(vi, str, strlen(str), &num);
  90.     if( vistat!=VI_SUCCESS ) return vistat;
  91.     vistat=viRead(vi, buf, BUFSIZE, &num);
  92.     if( vistat!=VI_SUCCESS ) return vistat;
  93.     buf[num-1]=NULL;
  94.     asStr=(AnsiString)buf;
  95.     getTaModelFromStr( asStr, *asTaModel);
  96.     return vistat;
  97. }
  98. //------------------------------------------------------------------------------
  99. ViStatus age_FetchAvgFreqError(ViSession vi, ViReal64 *p_virFreqErr)
  100. {
  101.     AnsiString as_cmd, asBase, asExponent;;
  102.     ViStatus vistat;
  103.     unsigned long num;
  104.     char buf[BUFSIZE];
  105.     // init
  106.     as_cmd = "INIT:PFER";
  107.     vistat = viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  108.     if (vistat != VI_SUCCESS)
  109.     {
  110.         return vistat;
  111.     }
  112.     as_cmd = "FETCH:PFER:FERR:AVER?";
  113.     vistat=viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  114.     if( vistat!=VI_SUCCESS ) return vistat;
  115.     vistat=viRead(vi, buf, BUFSIZE, &num);
  116.     if( vistat!=VI_SUCCESS ) return vistat;
  117.     buf[num-1]=NULL;
  118.     AnsiString asStr(buf);
  119.     if (!getBaseFromStr(asStr, asBase))
  120.     {
  121.         return VI_ERROR_ABORT;
  122.     }
  123.     if (!getExponentFromStr(asStr, asExponent))
  124.     {
  125.         return VI_ERROR_ABORT;
  126.     }
  127.     *p_virFreqErr = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  128.     // abort
  129.     as_cmd = "ABORT:PFER";
  130.     vistat = viWrite(vi, as_cmd.c_str(), strlen(as_cmd.c_str()), &num);
  131.     if (vistat != VI_SUCCESS)
  132.     {
  133.         return vistat;
  134.     }
  135.     return vistat;
  136. }
  137. //------------------------------------------------------------------------------
  138. ViStatus age_ReadAvgFreqError(ViSession vi, ViReal64 *p_virFreqErr)
  139. {
  140.     AnsiString asPFERRead, asBase, asExponent;;
  141.     ViStatus vistat;
  142.     unsigned long num;
  143.     char buf[BUFSIZE];
  144.     asPFERRead = "READ:PFER:FERR:AVER?";
  145.     vistat=viWrite(vi, asPFERRead.c_str(), strlen(asPFERRead.c_str()), &num);
  146.     if( vistat!=VI_SUCCESS ) return vistat;
  147.     vistat=viRead(vi, buf, BUFSIZE, &num);
  148.     if( vistat!=VI_SUCCESS ) return vistat;
  149.     buf[num-1]=NULL;
  150.     AnsiString asStr(buf);
  151.     if( getBaseFromStr( asStr, asBase ) == false )  return VI_ERROR_ABORT;
  152.     if( getExponentFromStr( asStr, asExponent )== false )  return VI_ERROR_ABORT;
  153.     *p_virFreqErr = (ViReal64) atof(asBase.c_str()) *  pow10( asExponent.ToInt() );
  154.     return vistat;
  155. }