Section 7. Installation
SubMenu
("Control ")
'Create Submenu named PanelTemps
MenuItem
("Count to LED",CountDown)
'Create menu item CountDown
MenuPick
(15,30,45,60)
'Create a pick list for CountDown
MenuItem
("Manual LED",toggleLED)
'Manual LED control Menu Item
MenuPick
(On,Off)
EndSubMenu
EndMenu
'End custom menu creation
'Main Program
BeginProg
CycleNotes = "??????"
'Initialize Notes Sub Menu,
'write ????? as a null
Scan
(1,Sec,3,0)
'Measurements
PanelTemp
(RefTemp,250)
'Measure Reference Temperature
'Measure Two Thermocouples
TCDiff
(TCTemp(),2,mV2_5C,1,TypeT,RefTemp,True,0,_60Hz,1.0,0)
CallTable
TempC
'Call data table
'Menu Item "Make Notes" Support Code
If
CycleNotes = "Accept"
Then
CallTable
Notes
'Write data to Notes data table
CycleNotes = "Accepted"
'Write "Accepted" after written
Delay
(1,500,mSec)
'Pause so user can read "Accepted"
SelectNote = ""
'Clear pick list note
EnterNote = ""
'Clear free entry note
CycleNotes = "??????"
'Write ????? as a null prompt
EndIf
If
CycleNotes = "Clear"
Then
'Clear notes when requested
SelectNote = ""
'Clear pick list note
EnterNote = ""
'Clear free entry note
CycleNotes = "??????"
'Write ????? as a null prompt
EndIf
'Menu Item "Control" Menu Support Code
CountDown = CountDown - 1
'Count down by 1
If
CountDown <= 0
'Stop count down from passing 0
CountDown = 0
EndIf
If
CountDown > 0
Then
StartFlag = True
'Indicate countdown started
EndIf
If
StartFlag = True
AND
CountDown = 0
Then
'Interprocess count down
'and manual LED
ToggleLED = True
StartFlag = False
EndIf
If
StartFlag = True
AND
CountDown <> 0
Then
'Interprocess count down and manual LED
ToggleLED = False
EndIf
PortSet
(4,ToggleLED)
'Set control port according
'to result of processing
NextScan
EndProg
187
Summary of Contents for CR1000
Page 2: ......
Page 4: ......
Page 6: ......
Page 32: ......
Page 36: ......
Page 38: ......
Page 40: ......
Page 60: ...Section 4 System Quickstart Figure 16 PC200W View Line Graph 60 ...
Page 96: ......
Page 98: ...98 ...
Page 302: ......
Page 453: ...Section 8 Operation Figure 115 Using the Keyboard Display 453 ...
Page 456: ...Section 8 Operation Figure 118 Real Time Custom 456 ...
Page 457: ...Section 8 Operation 8 8 1 3 Final Memory Tables Figure 119 Final Memory Tables 457 ...
Page 458: ...Section 8 Operation 8 8 2 Run Stop Program Figure 120 Run Stop Program 458 ...
Page 460: ...Section 8 Operation Figure 122 File Edit 460 ...
Page 461: ...Section 8 Operation 8 8 4 PCCard Memory Card Display Figure 123 PCCard CF Card Display 461 ...
Page 478: ......
Page 506: ......
Page 536: ......
Page 636: ......
Page 642: ......
Page 644: ......
Page 676: ......
Page 677: ......