Здравствуйте. Такая проблема. Шлю "6" принимаю последовательность "egifY%25" (ANSI) ????? должен ведь X(что послал)12345. Со скоростями играл. Увы(( Что может быть???? Работаю с USB-COM на FTDI. Подключая другое устройство тож на пике все ОК. Хм может пики неудачные купил?????? Да, терминал использую Supercom. В ПРОТЕУСЕ все летает).
кварц 4МГЦ
CODE
bsf STATUS,RP0 ;Выбираем банк 1
movlw d'25' ;
movwf SPBRG ;
movlw 24H
movwf TXSTA ;
bcf STATUS,RP0 ;
movlw 90H
movwf RCSTA
CLRF PORTA ;
CLRF PORTB ;
movlw 7H
MOVWF CMCON
BSF STATUS,RP0
MOVLW 1CH ;
MOVWF TRISA ;
MOVLW 06H ;
MOVWF TRISB
BCF STATUS,RP0 ;
=========================================================
sss
MOVLW 31H
MOVWF tx_data
CALL transmitw
MOVLW 32H
MOVWF tx_data
CALL transmitw
MOVLW 33H
MOVWF tx_data
CALL transmitw
MOVLW 34H
MOVWF tx_data
CALL transmitw
MOVLW 35H
MOVWF tx_data
CALL transmitw
CALL PAU_10
bcf RCSTA, CREN
movfw RCREG
movfw RCREG ;
bsf RCSTA, CREN
CALL PollRcv
MOVF rx_data,W
MOVWF tx_data
CALL transmitw
goto sss
PollRcv CLRWDT
btfss PIR1,5 ; check the RBIF bit
goto PollRcv ;
movf RCREG,w
NOP
movwf rx_data
bcf RCSTA, CREN
movfw RCREG
movfw RCREG ;
; bsf RCSTA, CREN
RETURN
transmitw
PollTXIF CLRWDT
btfss PIR1,4 ; check the TXIF bit of PIR register in bank1
goto PollTXIF ; off
movf tx_data,w ;
movwf TXREG
return
end
спасибо.
Сообщение отредактировал rezident - Mar 21 2010, 22:22
Причина редактирования: Оформление цитаты исходника