Mercurial > public > hwos_code

comparison src/aa_wordprocessor.asm @ 648:aeca5717d9eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
3.17 / 10.72 release
author heinrichs weikamp
date Fri, 04 Mar 2022 08:29:36 +0100
parents 4050675965ea
children 75e90cd0c2c3
comparison
equal deleted inserted replaced
647:357341239438 648:aeca5717d9eb
430 btfsc screen_type2 ; display 2 ? 430 btfsc screen_type2 ; display 2 ?
431 bra aa_decode_3_display2 ; YES 431 bra aa_decode_3_display2 ; YES
432 btfsc screen_type3 ; display 3 ? 432 btfsc screen_type3 ; display 3 ?
433 bra aa_decode_3_display3 ; YES 433 bra aa_decode_3_display3 ; YES
434 434
435 ; Screen 1 or 0
436 btfsc less_io_cpu ; less I/O CPU?
437 bra aa_decode_3_display0and1_less_io ; YES
438
435 movff PRODH,PORTA ; move high byte to PORTA 439 movff PRODH,PORTA ; move high byte to PORTA
436 movff PRODL,PORTH ; move low byte to PORTH 440 movff PRODL,PORTH ; move low byte to PORTH
437 aa_decode_3_display0and1: 441 aa_decode_3_display0and1:
438 bcf tft_nwr ; tick 442 bcf tft_nwr ; tick
439 bsf tft_nwr ; ... 443 bsf tft_nwr ; ...
440 decfsz aa_bitlen,F ; decrement length counter, became zero? 444 decfsz aa_bitlen,F ; decrement length counter, became zero?
441 bra aa_decode_3_display0and1; NO - loop 445 bra aa_decode_3_display0and1; NO - loop
442 bra aa_decode_3_done ; YES - done 446 bra aa_decode_3_done ; YES - done
443 447
448 aa_decode_3_display0and1_less_io:
449 movff PRODH,PORTA ; move high byte to PORTA
450 bcf tft_nwr ; tick
451 bsf tft_nwr ; ...
452 movff PRODL,PORTA ; move low byte to PORTA
453 bcf tft_nwr ; tick
454 bsf tft_nwr ; ...
455 decfsz aa_bitlen,F ; decrement length counter, became zero?
456 bra aa_decode_3_display0and1_less_io; NO - loop
457 bra aa_decode_3_done ; YES - done
458
444 aa_decode_3_display2: 459 aa_decode_3_display2:
445 movff win_color5,PORTH ; move high byte to PORTH (display is big endian) 460 movff win_color5,PORTH ; move high byte to PORTH (display is big endian)
446 bcf tft_nwr ; tick 461 bcf tft_nwr ; tick
447 bsf tft_nwr ; ... 462 bsf tft_nwr ; ...
448 movff win_color4,PORTH ; move low byte to PORTH 463 movff win_color4,PORTH ; move low byte to PORTH