; ********************************************
; gibt die Start Meldung auf de
m Terminal aus
termStartMsg
movlw
startMsg ;d'8448'-d'8448'
movwf
strAddr
call
printlnString
call
printStatus
movlw
okMsg
movwf
strAddr
call
printlnString
return
; ********************************************
; schreibt Byte in W auf RS232
termSend
movwf
TXREG
TransWt bsf
STATUS, RP0
WtHere btfss
TXSTA, TRMT
goto
WtHere
bcf
STATUS, RP0
return
reciveData
movlw
d'13'
subwf Zeichen, 0
movwf
w_temp
tstf w_temp
btfss
STATUS, Z
goto
dontExec
call
executeCommand
goto
bufferFull
dontExec
movf
Zeichen,0
call
termSend
movlw
d'18' + cmdBuffer
subwf FSR , 0
movwf
w_temp
tstf w_temp
btfss
STATUS, Z
goto
bufferNFull
clrw
movwf
INDF
goto
bufferFull
bufferNFull
movf
Zeichen, 0
movwf
INDF
incf FSR, 1
bufferFull
clrf
DatenSindDa
return
|