Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode_menu.asm @ 3:3cf8af30b36e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
v1.51 beta
author heinrichsweikamp
date Thu, 04 Feb 2010 14:56:12 +0100
parents 96a35aeda5f2
children 2b5c52ae3923
comparison
equal deleted inserted replaced
2:d11ef8dc4b2c 3:3cf8af30b36e
597 597
598 btfss FLAG_const_ppO2_mode ; are we in ppO2 mode? 598 btfss FLAG_const_ppO2_mode ; are we in ppO2 mode?
599 bra divemenu_set_gas2a ; no, choose gas 599 bra divemenu_set_gas2a ; no, choose gas
600 ; Yes, so select SP 1-3 or Sensor mode 600 ; Yes, so select SP 1-3 or Sensor mode
601 601
602 bcf is_bailout ;=1: CC mode, but bailout active!
603 call PLED_show_ppO2_clear; Clear ppO2 value
604
602 divemenu_set_gas1: 605 divemenu_set_gas1:
603 movlw d'35' ; offset in memory 606 movlw d'35' ; offset in memory
604 addwf menupos,W ; add SP number 0-2 607 addwf menupos,W ; add SP number 0-2
605 movwf EEADR 608 movwf EEADR
606 call read_eeprom ; Read SetPoint 609 call read_eeprom ; Read SetPoint
639 bsf stored_gas_changed ; set event flag 642 bsf stored_gas_changed ; set event flag
640 bsf event_occured ; set global event flag 643 bsf event_occured ; set global event flag
641 bra timeout_divemenu2 ; quit menu! 644 bra timeout_divemenu2 ; quit menu!
642 645
643 divemenu_set_gas2a: 646 divemenu_set_gas2a:
647 bsf is_bailout ;=1: CC mode, but bailout active!
644 clrf lo ; clear Setpoint, PLED_const_ppO2_value now displayes "Bail" 648 clrf lo ; clear Setpoint, PLED_const_ppO2_value now displayes "Bail"
645 movff lo,char_I_const_ppO2 649 movff lo,char_I_const_ppO2
646 650
647 bcf display_set_gas ; clear flag 651 bcf display_set_gas ; clear flag
648 movff menupos,active_gas ; copy into active gas register 652 movff menupos,active_gas ; copy into active gas register