Campbell COM310 Manual descargar pdf (Pagina 15)

COM310 Voice Communications Modem

If Flags(mykey) Then

VoiceSpeak("ON",0)

Else

VoiceSpeak("OFF",0)

EndIf

VoiceSpeak("50MS PRESS POUND TO TOGGLE 50MS PRESS STAR TO RETURN", 0)

If VoiceKey(KeyTimeout) = POUND Then

flags(mykey) = NOT flags(mykey)

Else

ExitDo

EndIf

Loop

EndIf

Loop ' Port loop

EndSub

DataTable (Test,1,-1)

DataInterval (0,0,Sec,10)

Minimum (1,BatteryV,FP2,0,False)

Sample (1,PTemp,FP2)

Sample (1,TCvalue_F,FP2)

EndTable

' <<<<<<<<<<<<<<<<<< MEASUREMENT PROGRAM >>>>>>>>>>>>>>>>>>

BeginProg

Scan (1,Sec,3,0)

Battery (BatteryV)

PanelTemp (PTemp,250)

TCDiff (TCvalue_F,1,mV2_5C,7,TypeT,PTemp,True,0,250,1.8,32)

' Add measurement code here *******************

CallTable Test

NextScan

' <<< VOICE CALLBACK CODE that executes when alarm conditions are met >>>

SlowSequence

' Slow Sequence do loop forever possibly doing alarm call out

Const NUMPHONES = 3 ' 3 phone numbers to try

Const PHONE1 = "1112223333"

Const PHONE2 = "1112224444"

Const PHONE3 = "1112225555"

Dim i,Phones(NUMPHONES) As String

phones(1) = PHONE1

phones(2) = PHONE2

phones(3) = PHONE3

Alarm = FALSE

ArmAlarm = TRUE

Do ' Forever

Delay(1,1,sec)

If (TCvalue_F < 85) Then

ArmAlarm = TRUE

1 2 ... 10 11 12 13 14 15 16 17 18 19 20 ... 55 56

Comentarios a estos manuales

Sin comentarios

Campbell COM310 Manual Pagina 15

Comentarios a estos manuales

Relacionado con productos y manuales para Redes Campbell COM310