
Brought to you by PCS Electronics, www.pcs-electronics.com
57
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FDI"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(Integ 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending DSP settings - LeftGain
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FDGL"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(Le 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending DSP settings - RightGain
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FDGR"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(Rig 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending settings - TEMP alarm
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FAT"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(TEM 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending settings - SWR alarm
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FAS"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(SW 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending settings - Uamp alarm
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FAU"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(Uam 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending settings - Iamp alarm
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FAC"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
MSComm1.Output = Chr$(Iam 4)
MSComm1.Output = Chr$(2) 'Finish command
'Sending Store command, commits changes
MSComm1.Output = Chr$(0) 'Start (0)
MSComm1.Output = "FW"
MSComm1.Output = Chr$(1) 'End command and start of data (1)
temp = 0
MSComm1.Output = temp
MSComm1.Output = Chr$(2) 'Finish command