Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 8:d8b426d71282

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
1.52 rc2
author heinrichsweikamp
date Sun, 28 Feb 2010 16:19:21 +0100
parents 2b5c52ae3923
children 395230c28023
comparison
equal deleted inserted replaced
7:5c4ba624165d 8:d8b426d71282
841 tstfsz hi ; Air? (He=0%) 841 tstfsz hi ; Air? (He=0%)
842 bra PLED_active_gas_divemode4 ; No! 842 bra PLED_active_gas_divemode4 ; No!
843 843
844 ; Yes, display "Air" instead of 21/0 844 ; Yes, display "Air" instead of 21/0
845 lfsr FSR2,letter 845 lfsr FSR2,letter
846 OUTPUTTEXTH d'264' ;"Air " 846 OUTPUTTEXTH d'264' ;"Air "
847 movlw ' '
848 btfsc better_gas_available ;=1: A better gas is available and a gas change is advised in divemode
849 movlw '*'
850 movwf POSTINC2
847 call word_processor 851 call word_processor
848 return 852 return
849 853
850 PLED_active_gas_divemode4: 854 PLED_active_gas_divemode4:
851 lfsr FSR2,letter 855 lfsr FSR2,letter
854 movlw '/' 858 movlw '/'
855 movwf POSTINC2 859 movwf POSTINC2
856 movff char_I_He_ratio,lo ; copy He ratio into lo 860 movff char_I_He_ratio,lo ; copy He ratio into lo
857 output_8 861 output_8
858 movlw ' ' 862 movlw ' '
863 btfsc better_gas_available ;=1: A better gas is available and a gas change is advised in divemode
864 movlw '*'
859 movwf POSTINC2 865 movwf POSTINC2
860 bcf leftbind 866 bcf leftbind
861 call word_processor 867 call word_processor
862 return 868 return
863 869