If Open Com ("com9:9665,n,8,1,cs100,ds0,bin" For Binary As #1) <> 0 Then 'cs100 senses DB9.Pin8
  Print "Unable to open serial port"  'ds<>0 Reports if Pin 6 Not RDY
  End
Else
  Print #1 "U"  ' Send AutoBaud char @ 9665 Baud 
End If