comparison code_part1/OSTC_code_asm_part1/menu_reset.asm @ 677:683e7d821678

Set CF17 (ppo2_warning_low) low level to 0.16bar
author heinrichsweikamp
date Sun, 30 Dec 2012 20:17:31 +0100
parents 0211d9b9f0ca
children c6220d340684
comparison
equal deleted inserted replaced
676:91da4d5be44a 677:683e7d821678
126 CF_DEFAULT CF_PERCENT, d'60', d'60', d'100' ; nofly_time_ratio 60% 126 CF_DEFAULT CF_PERCENT, d'60', d'60', d'100' ; nofly_time_ratio 60%
127 CF_DEFAULT CF_PERCENT, d'100', d'50', d'100' ; gradient_factor_alarm1 100% 127 CF_DEFAULT CF_PERCENT, d'100', d'50', d'100' ; gradient_factor_alarm1 100%
128 128
129 CF_DEFAULT CF_PERCENT, d'10', d'0', d'100' ; CF15 cns_display_surface 10% 129 CF_DEFAULT CF_PERCENT, d'10', d'0', d'100' ; CF15 cns_display_surface 10%
130 CF_DEFAULT CF_DECI, d'10', d'0', d'20' ; CF16 deco_distance_for_sim 1m 130 CF_DEFAULT CF_DECI, d'10', d'0', d'20' ; CF16 deco_distance_for_sim 1m
131 CF_DEFAULT CF_CENTI, d'019', d'19', d'021' ; ppo2_warning_low 0.19 bar 131 CF_DEFAULT CF_CENTI, d'019', d'16', d'021' ; ppo2_warning_low 0.19 bar
132 CF_DEFAULT CF_CENTI, d'160', d'0', d'160' ; ppo2_warning_high 1.60 bar 132 CF_DEFAULT CF_CENTI, d'160', d'0', d'160' ; ppo2_warning_high 1.60 bar
133 CF_DEFAULT CF_CENTI, d'140', d'0', d'150' ; ppo2_display_high 1.40 bar 133 CF_DEFAULT CF_CENTI, d'140', d'0', d'150' ; ppo2_display_high 1.40 bar
134 134
135 CF_DEFAULT CF_INT8, d'10', d'1', d'120' ; CF20 sampling_rate 10s 135 CF_DEFAULT CF_INT8, d'10', d'1', d'120' ; CF20 sampling_rate 10s
136 CF_DEFAULT CF_INT8, d'6', d'0', d'15' ; sampling_divisor_temp /6 136 CF_DEFAULT CF_INT8, d'6', d'0', d'15' ; sampling_divisor_temp /6
481 reset_gases: 481 reset_gases:
482 clrf EEADRH ; EEPROM BANK 0 482 clrf EEADRH ; EEPROM BANK 0
483 483
484 movlw d'3' ; address of first gas-1 484 movlw d'3' ; address of first gas-1
485 movwf EEADR 485 movwf EEADR
486 clrf hi ; He part (default for all gases: 0%) 486 clrf hi ; He part (default for all gases and diluents: 0%)
487 movlw d'21' ; O2 part (21%) 487 movlw .21
488 movwf lo ; O2 part (default for all gases and diluents: 21%)
488 rcall reset_gas ; saves current value for gas #1 489 rcall reset_gas ; saves current value for gas #1
489 movlw d'21' ; O2 part (21%)
490 rcall reset_gas ; saves default value for gas #1 490 rcall reset_gas ; saves default value for gas #1
491 movlw d'21' ; O2 part (21%)
492 rcall reset_gas ; saves current value for gas #2 491 rcall reset_gas ; saves current value for gas #2
493 movlw d'21' ; O2 part (21%)
494 rcall reset_gas ; saves default value for gas #2 492 rcall reset_gas ; saves default value for gas #2
495 movlw d'21' ; O2 part (21%)
496 rcall reset_gas ; saves current value for gas #3 493 rcall reset_gas ; saves current value for gas #3
497 movlw d'21' ; O2 part (21%)
498 rcall reset_gas ; saves default value for gas #3 494 rcall reset_gas ; saves default value for gas #3
499 movlw d'21' ; O2 part (21%)
500 rcall reset_gas ; saves current value for gas #4 495 rcall reset_gas ; saves current value for gas #4
501 movlw d'21' ; O2 part (21%)
502 rcall reset_gas ; saves default value for gas #4 496 rcall reset_gas ; saves default value for gas #4
503 movlw d'21' ; O2 part (21%)
504 rcall reset_gas ; saves current value for gas #5 497 rcall reset_gas ; saves current value for gas #5
505 movlw d'21' ; O2 part (21%)
506 rcall reset_gas ; saves default value for gas #5 498 rcall reset_gas ; saves default value for gas #5
507 movlw d'21' ; O2 part (21%)
508 rcall reset_gas ; saves current value for gas #6 499 rcall reset_gas ; saves current value for gas #6
500
501 movlw d'95' ; address of first diluent-1
502 movwf EEADR
503 rcall reset_gas ; saves current value for diluent #1
504 rcall reset_gas ; saves current value for diluent #2
505 rcall reset_gas ; saves current value for diluent #3
506 rcall reset_gas ; saves current value for diluent #4
507 rcall reset_gas ; saves current value for diluent #5
508
509 movlw .1
510 movwf EEDATA
511 write_int_eeprom .33 ; First Gas (1-5)
512 write_int_eeprom .106 ; First Diluent (1-5)
509 return 513 return
510 514
511 ; Write WREG:lo twice, w/o any type clearing, pre-incrementing EEADR 515 ; Write WREG:lo twice, w/o any type clearing, pre-incrementing EEADR
512 reset_gas: 516 reset_gas:
513 movwf lo
514 incf EEADR,F 517 incf EEADR,F
515 movff lo, EEDATA ; O2 Default value 518 movff lo, EEDATA ; O2 value
516 call write_eeprom 519 call write_eeprom
517 incf EEADR,F 520 incf EEADR,F
518 movff hi, EEDATA ; He default value 521 movff hi, EEDATA ; He value
519 call write_eeprom 522 call write_eeprom
520 return 523 return
521 524
522 reset_customfunction: 525 reset_customfunction:
523 tblrd*+ 526 tblrd*+