Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/menu_logbook.asm @ 375:84a1762de6ab 64kByte Logbook

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
show saturation multiplier in logbook
author heinrichsweikamp
date Sun, 12 Jun 2011 16:18:22 +0200
parents 6ee9c849ad92
children ed26990716fe
comparison
equal deleted inserted replaced
374:6ee9c849ad92 375:84a1762de6ab
883 movff SSPBUF,hi 883 movff SSPBUF,hi
884 STRCPY "Avr:" 884 STRCPY "Avr:"
885 output_16dp d'3' ; Average depth 885 output_16dp d'3' ; Average depth
886 STRCAT_PRINT "m" 886 STRCAT_PRINT "m"
887 887
888 ; Show GF settings 888 incf_eeprom_address d'4' ; Skip total dive time and GF factors
889 incf_eeprom_address d'2' ; Skip total dive time 889 call I2CREAD ; Read deco modell
890 decf_eeprom_address d'2' ; back to GF factos
891
890 WIN_TOP .0 892 WIN_TOP .0
891 WIN_LEFT .75 893 WIN_LEFT .75
894
895 movff SSPBUF,lo
896 movlw d'3'
897 cpfsgt lo
898 bra logbook_show_sat
899
900 ; Show GF settings
892 call I2CREAD2 ; Read GF_lo 901 call I2CREAD2 ; Read GF_lo
893 movff SSPBUF,hi 902 movff SSPBUF,hi
894 call I2CREAD2 ; Read GF_hi 903 call I2CREAD2 ; Read GF_hi
895 movff SSPBUF,lo 904 movff SSPBUF,lo
896 STRCPY "GF:" 905 STRCPY "GF:"
897 output_8 ; GF_hi 906 output_8 ; GF_hi
898 PUTC '/' 907 PUTC '/'
899 movff lo,hi ; copy GF_lo 908 movff hi,lo ; copy GF_lo
900 output_8 ; GF_lo 909 output_8 ; GF_lo
901 call word_processor 910 call word_processor
902 911 bra logbook_deco_model ; Skip Sat
912
913 logbook_show_sat:
914 call I2CREAD2 ; Read Saturation x
915 movff SSPBUF,hi
916 call I2CREAD2 ; Read Desaturation x
917 movff SSPBUF,lo
918 STRCPY "Sat:"
919 output_8 ; Sat x
920 STRCAT "%/"
921 movff hi,lo ; copy Desat x
922 output_8 ; Desat x
923 STRCAT_PRINT "%"
924
925 logbook_deco_model:
903 ; Show deco model 926 ; Show deco model
904 WIN_TOP .25 927 WIN_TOP .25
905 call I2CREAD2 ; Read deco modell 928 call I2CREAD2 ; Read deco modell
906 movff SSPBUF,lo 929 movff SSPBUF,lo
907 lfsr FSR2,letter 930 lfsr FSR2,letter