Hi All
TJ, thanks for those tests.
Opening a port for Random is an old habit that allows Input or output.
Probably dropping that will mean the same result.
What can I say "Old habits die hard"
Your comment on the buffer is one that I will definitely take on board.
Had not tried that. At the rate that I am TX/Rx the buffer may well
overflow.
The following is my receive routine. Ignore the syntax, just the logic.
If Times.mSec - .StartTime > 10 Then
If LOC(.Handle) > 4 Then
.RxStr = Input(LOC(.Handle),#.Handle)
If Left(.RxStr,1) <> ">" Then
'ErrControl.Errer = 81
ErrControl.Routine = "Adam4016"
ErrControl.Message = "Bad I/P2 "
ErrControl.ErrFile = "Step2"
ErrControl.DataStr = .RxStr
EndIf
If Left(.RxStr,1) = ">" Then
.ErrStr = "&H" + Mid(.RxStr,2,4)
.Count(.Hd) = CUInt(.ErrStr)
Cycle.Count(.Hd) = .Count(.Hd)
.StepNbr = 3
EndIf
EndIf
If Times.mSec - .StartTime > 50 Then
.StepNbr = 10
.ErrCount += 1
EndIf
EndIf
-----
Regards
Dinosaur
--
View this message in context:
http://freedos.10956.n7.nabble.com/Com1-corruption-from-PS2-mouse-tp21280p21293.html
Sent from the FreeDOS - User mailing list archive at Nabble.com.
------------------------------------------------------------------------------
Download BIRT iHub F-Type - The Free Enterprise-Grade BIRT Server
from Actuate! Instantly Supercharge Your Business Reports and Dashboards
with Interactivity, Sharing, Native Excel Exports, App Integration & more
Get technology previously reserved for billion-dollar corporations, FREE
http://pubads.g.doubleclick.net/gampad/clk?id=157005751&iu=/4140/ostg.clktrk
_______________________________________________
Freedos-user mailing list
Freedos-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/freedos-user
