Mercurial > public > hwos_code

comparison src/tft.asm @ 83:eb72c8865f47

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Test with graphic compass
author heinrichsweikamp
date Mon, 17 Mar 2014 23:48:30 +0100
parents 11d4fc797f74
children 53409476a05f
comparison
equal deleted inserted replaced
82:0653dd581c26 83:eb72c8865f47
624 global TFT_box_write 624 global TFT_box_write
625 TFT_box_write: 625 TFT_box_write:
626 movff win_leftx2,WREG ; Compute left = 2*leftx2 --> PROD 626 movff win_leftx2,WREG ; Compute left = 2*leftx2 --> PROD
627 mullw 2 627 mullw 2
628 628
629 global TFT_box_write_16bit_win_left
630 TFT_box_write_16bit_win_left: ; With column in PRODL:PRODH
629 ;---- Normal horizontal window --------------------------------------- 631 ;---- Normal horizontal window ---------------------------------------
630 ; Output 0x35 left, 632 ; Output 0x35 left,
631 ; 0x36 right == left + width - 1. 633 ; 0x36 right == left + width - 1.
632 634
633 Index_out 0x52 ; Window Vertical Start Address 635 Index_out 0x52 ; Window Vertical Start Address
736 rlcf WREG 738 rlcf WREG
737 movwf win_width+0 739 movwf win_width+0
738 movlw 0 740 movlw 0
739 rlcf WREG 741 rlcf WREG
740 movwf win_width+1 742 movwf win_width+1
741 rcall TFT_box_write 743 rcall TFT_box_write ; Setup box
742 744
745 global TFT_box_16bit_win_left
746 TFT_box_16bit_win_left:
743 rrcf win_width+1,W ; width /= 2 747 rrcf win_width+1,W ; width /= 2
744 rrcf win_width+0,W 748 rrcf win_width+0,W
745 movwf win_width 749 movwf win_width
746 750
747 ;---- Fill Window -------------------------------------------------------- 751 ;---- Fill Window --------------------------------------------------------