Mercurial > public > hwos_code

comparison src/tft_outputs.asm @ 262:e2fd372a917a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
bugfix dynamic gas list
author heinrichsweikamp
date Thu, 26 Mar 2015 11:37:37 +0100
parents e1cd6848863d
children 653a3ab08062
comparison
equal deleted inserted replaced
261:08ced9cd144b 262:e2fd372a917a
842 TFT_dyn_gaslist: ; Show the dynamic gaslist 842 TFT_dyn_gaslist: ; Show the dynamic gaslist
843 ; The mask 843 ; The mask
844 call TFT_divemask_color 844 call TFT_divemask_color
845 WIN_TINY dive_custom_dyn_mask_column,dive_custom_dyn_mask_row 845 WIN_TINY dive_custom_dyn_mask_column,dive_custom_dyn_mask_row
846 STRCPY_TEXT_PRINT tGaslist 846 STRCPY_TEXT_PRINT tGaslist
847 call TFT_standard_color 847 ; call TFT_standard_color
848 848
849 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row1 849 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row1
850 movlw .1 850 movlw .1
851 movwf temp1 851 movwf uart1_temp
852 bsf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint 852 bsf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint
853 rcall TFT_dyn_gaslist_common 853 rcall TFT_dyn_gaslist_common
854 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row2 854 WIN_SMALL dive_custom_dyn_mask_column1,dive_custom_dyn_mask_row2
855 incf temp1,F ; +1 855 incf uart1_temp,F ; +1
856 movf temp1,W ; into W 856 movf uart1_temp,W ; into W
857 rcall TFT_dyn_gaslist_common 857 rcall TFT_dyn_gaslist_common
858 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row1 858 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row1
859 incf temp1,F ; +1 859 incf uart1_temp,F ; +1
860 movf temp1,W ; into W 860 movf uart1_temp,W ; into W
861 rcall TFT_dyn_gaslist_common 861 rcall TFT_dyn_gaslist_common
862 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row2 862 WIN_SMALL dive_custom_dyn_mask_column2,dive_custom_dyn_mask_row2
863 incf temp1,F ; +1 863 incf uart1_temp,F ; +1
864 movf temp1,W ; into W 864 movf uart1_temp,W ; into W
865 rcall TFT_dyn_gaslist_common 865 rcall TFT_dyn_gaslist_common
866 call TFT_standard_color 866 call TFT_standard_color
867 return 867 return
868 868
869 TFT_dyn_gaslist_common: 869 TFT_dyn_gaslist_common:
870 cpfseq active_gas ;1-5 870 cpfseq active_gas ;1-5
871 bra $+4 871 bra TFT_dyn_gaslist_common2
872 incf temp1,F ; +1 872 incf uart1_temp,F ; +1
873 movff temp1,lo 873 TFT_dyn_gaslist_common2:
874 movff temp1,PRODL 874 movff uart1_temp,lo ; gas number 1-5
875 movff uart1_temp,PRODL
875 decf PRODL,F ;-1 to have 0-4 876 decf PRODL,F ;-1 to have 0-4
876 bsf leftbind 877 bsf leftbind
877 output_8 ; Gas number 878 output_8 ; Gas number
878 bcf leftbind 879 bcf leftbind
879 PUTC ":" 880 PUTC ":"
1359 TFT_debug_output: 1360 TFT_debug_output:
1360 return 1361 return
1361 WIN_TINY .80,.0 1362 WIN_TINY .80,.0
1362 call TFT_standard_color 1363 call TFT_standard_color
1363 lfsr FSR2,buffer 1364 lfsr FSR2,buffer
1364 movff hardware_flag,lo 1365 movff active_gas,lo
1365 output_8 1366 output_8
1366 STRCAT_PRINT "" 1367 STRCAT_PRINT ""
1367 return 1368 return
1368 1369
1369 global TFT_divetimeout ; Show timeout counter 1370 global TFT_divetimeout ; Show timeout counter