Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/menu_reset.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 82f71a73f450
comparison
equal deleted inserted replaced
684:99b3fb0ab4c7 685:aebb6d039249
496 rcall reset_gas ; saves default value for gas #4 496 rcall reset_gas ; saves default value for gas #4
497 rcall reset_gas ; saves current value for gas #5 497 rcall reset_gas ; saves current value for gas #5
498 rcall reset_gas ; saves default value for gas #5 498 rcall reset_gas ; saves default value for gas #5
499 rcall reset_gas ; saves current value for gas #6 499 rcall reset_gas ; saves current value for gas #6
500 500
501 movlw d'95' ; address of first diluent-1 501 movlw d'94' ; address of first diluent-1
502 movwf EEADR 502 movwf EEADR
503 rcall reset_gas ; saves current value for diluent #1 503 rcall reset_gas ; saves current value for diluent #1
504 rcall reset_gas ; saves default value for diluent #1
504 rcall reset_gas ; saves current value for diluent #2 505 rcall reset_gas ; saves current value for diluent #2
506 rcall reset_gas ; saves default value for diluent #2
505 rcall reset_gas ; saves current value for diluent #3 507 rcall reset_gas ; saves current value for diluent #3
508 rcall reset_gas ; saves default value for diluent #3
506 rcall reset_gas ; saves current value for diluent #4 509 rcall reset_gas ; saves current value for diluent #4
510 rcall reset_gas ; saves default value for diluent #4
507 rcall reset_gas ; saves current value for diluent #5 511 rcall reset_gas ; saves current value for diluent #5
512 rcall reset_gas ; saves default value for diluent #5
508 513
509 movlw .1 514 movlw .1
510 movwf EEDATA 515 movwf EEDATA
511 write_int_eeprom .33 ; First Gas (1-5) 516 write_int_eeprom .33 ; First Gas (1-5)
512 write_int_eeprom .106 ; First Diluent (1-5) 517 write_int_eeprom .116 ; First Diluent (1-5)
513 return 518 return
514 519
515 ; Write WREG:lo twice, w/o any type clearing, pre-incrementing EEADR 520 ; Write WREG:lo twice, w/o any type clearing, pre-incrementing EEADR
516 reset_gas: 521 reset_gas:
517 incf EEADR,F 522 incf EEADR,F