This is a multi-part message in MIME format.
------=_NextPart_000_0005_01C24080.FD38B9E0
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0006_01C24080.FD38B9E0"
------=_NextPart_001_0006_01C24080.FD38B9E0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Hello , I got a problem with a connection between the PIC16F877 and the =
PC . I wrote this little program . Normally it sends continuous the =
letter 'A' to the PC . With hyperterminal i just get some strage letters =
and characters . Hyperterminal is set to 2400 8 - N - 1 . Do you see =
where my problem is ?=20
Thanks=20
------=_NextPart_001_0006_01C24080.FD38B9E0
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Hello , I got a problem with a =
connection=20
between the PIC16F877 and the PC . I wrote this little program . =
Normally it=20
sends continuous the letter 'A' to the PC =
. With hyperterminal=20
i just get some strage letters and characters . Hyperterminal is =
set to=20
2400 8 - N - 1 . Do you see where my problem is =
?
Thanks
------=_NextPart_001_0006_01C24080.FD38B9E0--
------=_NextPart_000_0005_01C24080.FD38B9E0
Content-Type: application/octet-stream;
name="pccon1.asm"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
filename="pccon1.asm"
list p=3D16f877
#include
__CONFIG _CP_OFF & _WDT_OFF & _BODEN_ON & _PWRTE_OFF & _HS_OSC & =
_WRT_ENABLE_ON & _LVP_OFF & _CPD_OFF
;**Dit is het programma dat de rs485 bus met de pc verbindt.
R1 EQU 0x20
R2 EQU 0x21
temp EQU 0x22
temp0 EQU 0x23
temp1 EQU 0x24
temp2 EQU 0x25
org 0x000
goto main
main
;******************
; Zend - en Ontvangstinstellingen
;******************
bsf STATUS,RP0
bcf STATUS,RP1 ; BANK 1
bcf TXSTA,BRGH ; B.R. in trage mode zetten
bcf TXSTA,SYNC ; Serieele poort enablen
movlw d'129'
movwf SPBRG ; SPBRG register instellen
bcf STATUS,RP0 ; BANK 0
bsf RCSTA,SPEN ; Serieele poort enablen
bsf RCSTA,CREN ; Ontvangstmode enablen
bsf STATUS,RP0 ; BANK 1
bsf TXSTA,TXEN ; Zendmode enablen
;******************
; Klem - instellingen
;******************
bsf TRISC,6 ; Zendklem
bsf TRISC,7 ; Ontvangstklem
bcf TRISC,0 ; PORTC,0 wordt een uitgang
movlw b'00000111'
movwf ADCON1 ; A - uitgangen digitaal
bcf PORTA,2 ; PORTA,2 uitgang
bsf PORTA,3 ; PORTA,3 ingang
=09
bcf STATUS,RP0 ; BANK 0
clrf PORTA
=09
bcf PORTC,0 ; Transceiver ontvangt
;******************
; Hoofdprogramma
;******************
hoofd
call Send1
call time=09
goto hoofd=09
Send1
SendAS1
nop
btfss PIR1,TXIF ; Transmit buffer leeg ?
goto SendAS1
; bsf PORTC,0 ; Transceiver zend
movlw b'01000001' =09
movwf TXREG ; Adres Sensor1 verzenden
=09
; bcf PORTC,0 ; Transceiver ontvangt
=09
return
time
=09
clrf temp
loop1 ; Tijdvertraging
decfsz temp
goto loop1
return
end
------=_NextPart_000_0005_01C24080.FD38B9E0--
--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads