global data port datfile
ReadSonic('COM1')
fclose(port)
