Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode.asm @ 685:aebb6d039249

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use 4byte in EEPROM for diluents (Same as OC gases) Show active gas indicator below first gas in surfacemode
author heinrichsweikamp
date Sat, 26 Jan 2013 14:11:07 +0100
parents 6e456a6398e0
children 8ffbd5cb4b42
comparison
equal deleted inserted replaced
684:99b3fb0ab4c7 685:aebb6d039249
1457 movf EEDATA,W 1457 movf EEDATA,W
1458 call write_external_eeprom 1458 call write_external_eeprom
1459 1459
1460 movlw .33 ; Start gas 1460 movlw .33 ; Start gas
1461 btfsc FLAG_const_ppO2_mode ; In CCR mode? 1461 btfsc FLAG_const_ppO2_mode ; In CCR mode?
1462 movlw .106 ; Yes, use start Diluent instead 1462 movlw .116 ; Yes, use start Diluent instead
1463 movwf EEADR 1463 movwf EEADR
1464 call read_eeprom 1464 call read_eeprom
1465 movf EEDATA,W 1465 movf EEDATA,W
1466 call write_external_eeprom 1466 call write_external_eeprom
1467 1467
2108 movlw d'100' ; 100% 2108 movlw d'100' ; 100%
2109 subfwb wait_temp,W ; minus He 2109 subfwb wait_temp,W ; minus He
2110 bsf STATUS,C ; Borrow bit 2110 bsf STATUS,C ; Borrow bit
2111 subfwb lo,W ; minus O2 2111 subfwb lo,W ; minus O2
2112 movff WREG, char_I_N2_ratio ; = N2! 2112 movff WREG, char_I_N2_ratio ; = N2!
2113 read_int_eeprom d'106' ; Read First Diluent (1-5) 2113 read_int_eeprom d'116' ; Read First Diluent (1-5)
2114 movff EEDATA,active_diluent 2114 movff EEDATA,active_diluent
2115 return 2115 return