Mercurial > public > hwos_code

comparison src/tft_outputs.asm @ 98:24b3fd59e61f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add event "bailout" in profile
author heinrichsweikamp
date Thu, 01 May 2014 21:16:31 +0200
parents 53a99a2dc6a1
children 87cc1adfe4da
comparison
equal deleted inserted replaced
97:53a99a2dc6a1 98:24b3fd59e61f
771 call TFT_standard_color 771 call TFT_standard_color
772 772
773 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row1 773 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row1
774 lfsr FSR2,buffer 774 lfsr FSR2,buffer
775 movlw .1 775 movlw .1
776 movwf mcp_temp+0 776 movwf tft_gaslist_temp+0
777 rcall TFT_dyn_gaslist_common 777 rcall TFT_dyn_gaslist_common
778 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row2 778 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row2
779 lfsr FSR2,buffer 779 lfsr FSR2,buffer
780 incf mcp_temp+0,F ; +1 780 incf tft_gaslist_temp+0,F ; +1
781 movf mcp_temp+0,W ; into W 781 movf tft_gaslist_temp+0,W ; into W
782 rcall TFT_dyn_gaslist_common 782 rcall TFT_dyn_gaslist_common
783 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row1 783 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row1
784 lfsr FSR2,buffer 784 lfsr FSR2,buffer
785 incf mcp_temp+0,F ; +1 785 incf tft_gaslist_temp+0,F ; +1
786 movf mcp_temp+0,W ; into W 786 movf tft_gaslist_temp+0,W ; into W
787 rcall TFT_dyn_gaslist_common 787 rcall TFT_dyn_gaslist_common
788 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row2 788 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row2
789 lfsr FSR2,buffer 789 lfsr FSR2,buffer
790 incf mcp_temp+0,F ; +1 790 incf tft_gaslist_temp+0,F ; +1
791 movf mcp_temp+0,W ; into W 791 movf tft_gaslist_temp+0,W ; into W
792 rcall TFT_dyn_gaslist_common 792 rcall TFT_dyn_gaslist_common
793 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint 793 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint
794 call TFT_standard_color 794 call TFT_standard_color
795 return 795 return
796 796
797 TFT_dyn_gaslist_common: 797 TFT_dyn_gaslist_common:
798 cpfseq active_gas ;1-5 798 cpfseq active_gas ;1-5
799 bra $+4 799 bra $+4
800 incf mcp_temp+0,F ; +1 800 incf tft_gaslist_temp+0,F ; +1
801 movff mcp_temp+0,lo 801 movff tft_gaslist_temp+0,lo
802 movff mcp_temp+0,PRODL 802 movff tft_gaslist_temp+0,PRODL
803 decf PRODL,F ;-1 to have 0-4 803 decf PRODL,F ;-1 to have 0-4
804 bsf leftbind 804 bsf leftbind
805 output_8 ; Gas number 805 output_8 ; Gas number
806 bcf leftbind 806 bcf leftbind
807 PUTC ":" 807 PUTC ":"
2967 ;============================================================================= 2967 ;=============================================================================
2968 global TFT_divemins 2968 global TFT_divemins
2969 TFT_divemins: 2969 TFT_divemins:
2970 movff divemins+0,lo 2970 movff divemins+0,lo
2971 movff divemins+1,hi 2971 movff divemins+1,hi
2972 bcf leftbind
2972 2973
2973 btfsc no_more_divesecs ; Ignore seconds? 2974 btfsc no_more_divesecs ; Ignore seconds?
2974 bra TFT_divemins2 ; Show minutes only 2975 bra TFT_divemins2 ; Show minutes only
2975 2976
2976 movlw .99 2977 movlw .99