Mercurial > public > hwos_code

comparison src/divemode.asm @ 99:87cc1adfe4da

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
show event "bailout" in the internal logbook
author heinrichsweikamp
date Fri, 02 May 2014 14:13:35 +0200
parents 24b3fd59e61f
children 37275e0fa7f5
comparison
equal deleted inserted replaced
98:24b3fd59e61f 99:87cc1adfe4da
755 bcf switch_left 755 bcf switch_left
756 call menuview_toggle ; Menu or Simulator tasks 756 call menuview_toggle ; Menu or Simulator tasks
757 return 757 return
758 758
759 gas_switched_common: 759 gas_switched_common:
760 bcf divemode_gaschange ; Clear flag
761
760 decf menupos,W ; 1-5 -> 0-4 762 decf menupos,W ; 1-5 -> 0-4
761 btfss FLAG_ccr_mode ; Choose OC Gases 763 btfss FLAG_ccr_mode ; Choose OC Gases
762 rcall setup_gas_registers ; With WREG=Gas 0-4 764 rcall setup_gas_registers ; With WREG=Gas 0-4
763 btfsc FLAG_ccr_mode ; Choose CC Diluents 765 btfsc FLAG_ccr_mode ; Choose CC Diluents
764 rcall setup_dil_registers ; With WREG=Gas 0-4 766 rcall setup_dil_registers ; With WREG=Gas 0-4
766 decf menupos,W ; 1-5 -> 0-4 768 decf menupos,W ; 1-5 -> 0-4
767 btfsc is_bailout ; Choose OC Bailouts (OC Gases) 769 btfsc is_bailout ; Choose OC Bailouts (OC Gases)
768 rcall setup_gas_registers ; With WREG=Gas 0-4 770 rcall setup_gas_registers ; With WREG=Gas 0-4
769 771
770 call TFT_active_gas_divemode ; Display gas/Setpoint 772 call TFT_active_gas_divemode ; Display gas/Setpoint
771 bcf divemode_gaschange ; Clear flag
772 clrf WREG 773 clrf WREG
773 movff WREG,char_O_deco_status ; Restart decoplan computation 774 movff WREG,char_O_deco_status ; Restart decoplan computation
774 775
775 ; Set flags for profile recording 776 ; Set flags for profile recording
776 bsf event_occured ; Set global event byte 777 bsf event_occured ; Set global event byte