Campbell COM310 Manual descarregar pdf (Página 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

Comentários a estes Manuais

Sem comentários

Campbell COM310 Manual Página 15

Comentários a estes Manuais

Manuais e produtos relacionados com Redes Campbell COM310