?? transmit.vb
字號:
'**********************廣播電視發射機公共命名空間***************************
'***********修改時間:2007年8月10日
'***********編寫人:鮑輝
'***********針對與廣西聯正達合作的機房遠控系統
Imports System.Math
Imports System.String
Imports Microsoft.VisualBasic.Strings
Namespace Transmitter
''''''''''''主控單元
Public Structure MasterUnit
Public bConnectState As Boolean '''通訊狀態
Public bDsw As Boolean '''駐波比過荷
'******************************************************************
Public bFlow As Boolean '''風機狀態
Public bOpenOrClose As Boolean '''視頻保護 false-無視頻輸入,true-有視頻輸入
Public bIO As Boolean '''缺相保護
Public bBackupState As Boolean '''主備激勵器 true-備,false-主
Public bAntenna As Boolean '''假負載/天線 true-假負載,false-天線
Public bRemote As Boolean '''本控/遙控 true-遙控,false-本控
Public bBalance As Boolean '''不平衡功率狀態new
Public bOpen As Boolean '''開機狀態new
Public bInterface As Boolean '''各接口保護功能new
Public dPo As Double '''總入射功率
Public dPr As Double '''總反射功率
Public dVswr As Double '''駐波比
Public dUnbalacePower1 As Double '''不平衡功率1new
Public dUnbalacePower2 As Double '''不平衡功率2new
Public dUnbalacePower3 As Double '''不平衡功率3new
Public dbalacePower As Double '''平衡功率new
Public dVoltage As Double '''總電壓
Public dCurrent As Double '''總電流
Public dTemputer As Double '''環境溫度
Public dTotaltime As Double '''工作累計時
Public strSamplingTime As String '''取樣時間new
Public iAlarm As Integer '''告警狀態
Public bTemp As Boolean '''過溫保護
'********************************************************************
Public iVolType As Integer '''發射機工作電壓類型
Public dPressure As Double '''氣壓
Public iDevStatus As Integer '''設備狀態
Public bConnectDatabase As Boolean
End Structure
''''''''''''前級功放
Public Structure DriverUnit
'********************************************************************
Public bPull As Boolean '''過流保護false-正常,true-報警
Public bTemp As Boolean '''過溫保護
Public bDsw As Boolean '''過荷保護
Public bAGCOrMGC As Boolean '''推動功放的AGC/MGC狀態
Public dOutputPower As Double '''輸出功率
Public dReflectPower As Double '''反射功率
Public dTemputer As Double '''溫度
Public dCurrent As Double '''電流
Public dVoltage As Double '''電壓
Public dAGCVol As Double '''AGC電壓
'********************************************************************
Public bConnectDatabase As Boolean
End Structure
''''''''''''功放單元
Public Structure AmplifierUnit
'********************************************************************
Public bPull As Boolean '''過流保護or過載(1,true)
Public bTemp As Boolean '''過溫保護or過熱(1,true)
Public bDsw As Boolean '''過荷保護
Public bPnP As Boolean '''熱插拔new
Public bOverInspirit As Boolean '''過激勵new(1,true)
Public bPcbok As Boolean '''是否插好new(1,ok)
Public bWork As Boolean '''工作/待機STBY new(1,work)
Public bNobal As Boolean '''不平衡(1,true)
Public bDcov As Boolean '''直流過壓(1,true)
Public dInputPower As Double '''輸入功率(W)new
Public dOutputPower As Double '''輸出功率(W)
Public dReflectPower As Double '''反射功率(W)
Public dRefPower As Double '''平衡功率new
Public dUnbalacePower1 As Double '''不平衡功率1new
Public dUnbalacePower2 As Double '''不平衡功率2new
Public dVswr As Double '''駐波比
Public dTemputer As Double '''模塊溫度
Public dTCurrent As Double '''模塊推動電流
Public dCurrent As Double '''電流
Public dVoltage As Double '''電壓
Public dCurrent1 As Double '''電流1
Public dCurrent2 As Double '''電流2
Public dCurrent3 As Double '''電流3
Public dCurrent4 As Double '''電流4
Public dCurrent5 As Double '''電流5
Public dCurrent6 As Double '''電流6
Public dCurrent7 As Double '''電流7
Public dCurrent8 As Double '''電流8
Public dDrivePower As Double '''推動級功率new
' Public dDC As Double '''直流50V new
'********************************************************************
Public bConnectDatabase As Boolean
End Structure
''''''''''''激勵器
Public Structure InspiritUnit
'***************************************************
Public dFrequency As Double '''頻率
Public dRFOutput As Double '''輸出電平
Public dAudioMod As Double '''音頻調制度
Public dVideoMod As Double '''視頻調制度
Public dTVPercent As Double '''圖像伴音功率比
Public dWorkVol As Double '''工作電壓
Public dAGCLevel As Double '''AGC電平
Public dIncidencePower As Double '''入射功率
Public dTemputer As Double '''溫度
Public dVoltage As Double '''電壓
Public dCurrent As Double '''電流
Public bPull As Boolean '''過流保護false-正常,true-報警
Public bTemp As Boolean '''過溫保護
Public bDsw As Boolean '''過荷保護
Public bAGCorMGC As Boolean '''AGC or MGC狀態
Public bRemote As Boolean '''本控/遙控
'*****************************************************
Public bVideoInput As Boolean '''有無視頻輸入 false-無,true-有
Public bConnectDatabase As Boolean
End Structure
''''''''''''激勵器管理單元,主要針對吉兆調頻發射機new
Public Structure InspiritManagerUnit
'***************************************************
Public iEXON As Integer '''在線 0,ON 1,OFF
Public iEXWK As Integer '''工作 0,WORK 1,STBY
Public iXAIN As Integer '''音頻輸入 0,YES 1,NO
Public ibXDD As Integer '''斷電自動切換 0,YES 1,NO
Public iXWY As Integer '''無音頻自動切換 0,YES 1,NO
'*****************************************************
Public bConnectDatabase As Boolean
End Structure
''''''''''''RVR激勵器-RVREX,RVR PTXLCD30激勵器
Public Structure RVRInspiritUnit
'***************************************************0-true,1-false
Public iOnair As Integer '''0,工作 1,待機
Public iRemote As Integer '''0,遙控 1,本控
Public iStok As Integer '''0,功率正常 1,未到設定值
Public iGeneral As Integer '''1,正常 0,故障
Public iUnlock As Integer '''本振 0,失鎖 1,正常
Public iSwr As Integer '''0,正常 1,過載
Public iPilota As Integer '''0 -Pilota Off,0 -Pilota On
Public iEmphasis As Integer '''預加重模式 0-us,1-50us
Public iAudioMode As Integer '''音頻模式 0-單聲道MONO,1-立體聲Stereo
Public iImpedance As Integer '''輸入阻抗 0- 600 ,1-10K
Public bAin As Boolean '''音頻 true-有,false-無
Public dLeft As Double '''左聲道輸入電平 單位:%
Public dRight As Double '''右聲道輸入電平 單位:%
Public dPwr As Double '''功率設定值 單位:W
Public dPhase As Double '''相位設定值 單位:%
Public dFreq As Double '''頻率 單位:MHz
Public dFwr As Double '''輸出功率 單位:W
Public dRflp As Double '''反射功率 單位:W
Public dModulazione As Double '''調制度 單位:%
'*****************************************************
Public bConnectDatabase As Boolean
End Structure
''''''''''''EKA激勵器-EkaEX,EKA MIRA V4.1激勵器
Public Structure EKAInspiritUnit
'***************************************************1-true,0-false
Public iStereo As Integer '''立體聲
Public iProgramming As Integer '''編程模式工作
Public iRemote As Integer '''遙控
Public iPllUnlock As Integer '''本振失鎖
Public iTemperature As Integer '''過熱
Public iReflected As Integer '''過載
Public iForward As Integer '''AGC
Public iGeneral As Integer '''故障
Public iEmphasis As Integer '''預加重模式17H.7/6 0(00B)-flat,1(01B)-50us,2(11B)-75us
Public iAudioMode As Integer '''音頻模式17H.5/2/1 0(011B)-立體聲編碼CODER,1(101B)-單聲道MONO,2(110B)-復合聲道MPX
Public iStereoCoder As Integer '''立體聲編碼器
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -