Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode_menu.asm @ 361:88660a400338 64kByte Logbook

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated 64K logbook to changeset 360.
author JeanDo
date Wed, 08 Jun 2011 01:37:14 +0200
parents 544a96faa9f3 b5b030c1ae7e
children 47b1135cbff3
comparison
equal deleted inserted replaced
357:562f1bc79f3c 361:88660a400338
568 movff EEDATA, char_I_N2_ratio ; = N2! 568 movff EEDATA, char_I_N2_ratio ; = N2!
569 bsf manual_gas_changed ; set event flag 569 bsf manual_gas_changed ; set event flag
570 bsf event_occured ; set global event flag 570 bsf event_occured ; set global event flag
571 bsf is_bailout ;=1: CC mode, but bailout active! 571 bsf is_bailout ;=1: CC mode, but bailout active!
572 clrf lo ; clear Setpoint, PLED_const_ppO2_value now displayes "Bail" 572 clrf lo ; clear Setpoint, PLED_const_ppO2_value now displayes "Bail"
573 movff lo,char_I_const_ppO2 573 movff lo,char_I_const_ppO2
574 movlw 6
575 movff WREG,char_I_current_gas ; Current gas is Gas6 (manual setting).
574 bra timeout_divemenu2 ; quit underwater menu! 576 bra timeout_divemenu2 ; quit underwater menu!
575 577
576 divemenu_set_gas: 578 divemenu_set_gas:
577 btfsc FLAG_const_ppO2_mode ; in ppO2 mode? 579 btfsc FLAG_const_ppO2_mode ; in ppO2 mode?
578 bra divemenu_set_setpoint ; Yes, display SetPoint list 580 bra divemenu_set_setpoint ; Yes, display SetPoint list
635 divemenu_set_gas2a: 637 divemenu_set_gas2a:
636 movlw d'6' 638 movlw d'6'
637 cpfseq menupos ; At the "Gas 6.." position? 639 cpfseq menupos ; At the "Gas 6.." position?
638 bra divemenu_set_gas2b ; No, select Gas1-5 (Stored in Menupos) 640 bra divemenu_set_gas2b ; No, select Gas1-5 (Stored in Menupos)
639 bra divemode_set_xgas ; Configure the extra gas 641 bra divemode_set_xgas ; Configure the extra gas
642
640 divemenu_set_gas2b: 643 divemenu_set_gas2b:
641 bsf is_bailout ;=1: CC mode, but bailout active! 644 bsf is_bailout ;=1: CC mode, but bailout active!
642 clrf lo ; clear Setpoint, PLED_const_ppO2_value now displayes "Bail" 645 clrf lo ; clear Setpoint, PLED_const_ppO2_value now displayes "Bail"
643 movff lo,char_I_const_ppO2 646 movff lo,char_I_const_ppO2
644 647
665 subfwb wait_temp,W ; minus He 668 subfwb wait_temp,W ; minus He
666 subfwb EEDATA,F ; minus O2 669 subfwb EEDATA,F ; minus O2
667 movff EEDATA, char_I_N2_ratio ; = N2! 670 movff EEDATA, char_I_N2_ratio ; = N2!
668 bsf stored_gas_changed ; set event flag 671 bsf stored_gas_changed ; set event flag
669 bsf event_occured ; set global event flag 672 bsf event_occured ; set global event flag
673
674 movff menupos,char_I_current_gas ; Inform deco code too.
670 bra timeout_divemenu2 ; quit menu! 675 bra timeout_divemenu2 ; quit menu!
671 676
672 timeout_divemenu: 677 timeout_divemenu:
673 btfss menubit ; is the Dive mode menu displayed? 678 btfss menubit ; is the Dive mode menu displayed?
674 return ; No 679 return ; No