comparison src/eeprom_rs232.asm @ 640:8c1f1f334275

3.13 release
author heinrichsweikamp
date Thu, 29 Oct 2020 09:29:15 +0100
parents 4050675965ea
children aeca5717d9eb
comparison
equal deleted inserted replaced
639:0ff82370991d 640:8c1f1f334275
349 enable_rs232: 349 enable_rs232:
350 call request_speed_normal ; request CPU speed change to normal speed 350 call request_speed_normal ; request CPU speed change to normal speed
351 enable_rs232_1: 351 enable_rs232_1:
352 btfss speed_is_normal ; speed = normal? 352 btfss speed_is_normal ; speed = normal?
353 bra enable_rs232_1 ; NO - loop waiting for ISR to have adjusted the speed 353 bra enable_rs232_1 ; NO - loop waiting for ISR to have adjusted the speed
354 bsf TRISC,7
354 bcf PORTE,0 ; YES - switch port to comm 355 bcf PORTE,0 ; YES - switch port to comm
355 bsf PORTJ,2 ; - /Reset (required for very old OSTC sport) 356 bsf PORTJ,2 ; - /Reset (required for very old OSTC sport)
356 movlw b'00100100' ; - TX configuration: TX enabled, async, high speed 357 movlw b'00100100' ; - TX configuration: TX enabled, async, high speed
357 movwf TXSTA1 ; - ... 358 movwf TXSTA1 ; - ...
358 movlw b'10010000' ; - RX configuration: port enabled, RX enabled 359 movlw b'10010000' ; - RX configuration: port enabled, RX enabled
387 clrf RCSTA1 ; disable RX 388 clrf RCSTA1 ; disable RX
388 clrf TXSTA1 ; disable TX 389 clrf TXSTA1 ; disable TX
389 bcf PORTC,6 ; switch TX pin hard to GND 390 bcf PORTC,6 ; switch TX pin hard to GND
390 bsf PORTE,0 ; power down BT chip 391 bsf PORTE,0 ; power down BT chip
391 bcf PORTJ,2 ; /Reset (required for very old OSTC sport) 392 bcf PORTJ,2 ; /Reset (required for very old OSTC sport)
393 bcf TRISC,7
394 bcf PORTC,7 ; switch RX pin hard to GND
392 return 395 return
393 396
394 397
395 ;----------------------------------------------------------------------------- 398 ;-----------------------------------------------------------------------------
396 ; Wait for last Byte to be sent out of USB/BT Port 399 ; Wait for last Byte to be sent out of USB/BT Port