The code here below is working ok but it shows
the number not divided. (ex. 5894)
I tried several ways to divided (ex. /60) this number and
showing the result (Interger or with decimal) but no success.
Bye
Lotondo
>>>>>>>>>>>
DEFINE OSC 4
BAUD VAR BYTE
LATDEC VAR BYTE[4]
RX VAR PORTB.1 ' RX fm 232
BAUD = 188 ' 4800,8,N,1(True,driven)
PORTB=0
LCDOut $FE, 1
LCDOut $FE, $0C
LOOP:
SerIn2 RX,BAUD,[wait("$HOLD,"),SKIP 7,STR LATDEC\4]
Pause 1000
LCDOut $FE, 1
LCDOut "RIS: ",STR LATDEC\4
GoTo LOOP
End
>>>>>>>>>>>>>>>>>>>
Bookmarks