**Open the connection nComm = FOpen( "Com1",2 ) IF nComm = -1 MESSAGEBOX( "Com1 couldn't be opened for some reason." ) ENDIF **Put in username IF FWRITE(nComm, "tjohher" + CHR( 13 ) ) = 0 MESSAGEBOX( "Couldn't enter username, try again." ) ENDIF **Put in password IF FWRITE(nComm, "mypassword" + CHR( 13 ) ) = 0 MESSAGEBOX( "Couldn't enter password, try again." ) ENDIF **Hit shift + F16 to hang up IF FWRITE(nComm, CHR( 1 ) + CHR( 111 ) + CHR( 13 ) ) = 0 MESSAGEBOX( "Couldn't press Shift+F16, try again." ) ENDIF **Hit F2 to release record and refresh screen IF FWRITE(nComm, CHR( 1 ) + CHR( 65 ) + CHR( 13 ) ) = 0 MESSAGEBOX( "Couldn't press F2, try again." ) ENDIF **Close the connection IF NOT FClose( nComm ) MESSAGEBOX( "Couldn't close Com1, try again." ) ENDIF