Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode.asm @ 179:77ab44108c07

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
BUGFIX: Inactive gases greyed-out in Simulator results BUGFIX: "Better Gas" now works for Gas 4 and Gas 5, as well
author Heinrichsweikamp
date Sun, 06 Feb 2011 09:37:07 +0100
parents 7f3e1bf588bc
children 8aced3c7590c
comparison
equal deleted inserted replaced
178:29ff788487fc 179:77ab44108c07
929 cpfseq active_gas ; is this gas currently selected? 929 cpfseq active_gas ; is this gas currently selected?
930 bra check_gas_change4x ; No... 930 bra check_gas_change4x ; No...
931 bra check_gas_change5 ; Yes, skip depth check 931 bra check_gas_change5 ; Yes, skip depth check
932 check_gas_change4x: 932 check_gas_change4x:
933 read_int_eeprom d'31' ; read gas_change_depth 933 read_int_eeprom d'31' ; read gas_change_depth
934 movlw d'3'
934 cpfsgt EEDATA ; Change depth>3m? 935 cpfsgt EEDATA ; Change depth>3m?
935 bra check_gas_change5 ; No, Change depth not deep enough, skip! 936 bra check_gas_change5 ; No, Change depth not deep enough, skip!
936 movf xC+0,W ; load depth in m into WREG 937 movf xC+0,W ; load depth in m into WREG
937 cpfsgt EEDATA ; gas_change_depth < current depth? 938 cpfsgt EEDATA ; gas_change_depth < current depth?
938 bra check_gas_change5 ; No, check next gas 939 bra check_gas_change5 ; No, check next gas
949 cpfseq active_gas ; is this gas currently selected? 950 cpfseq active_gas ; is this gas currently selected?
950 bra check_gas_change5x ; No... 951 bra check_gas_change5x ; No...
951 bra check_gas_change6 ; Yes, skip depth check 952 bra check_gas_change6 ; Yes, skip depth check
952 check_gas_change5x: 953 check_gas_change5x:
953 read_int_eeprom d'32' ; read gas_change_depth 954 read_int_eeprom d'32' ; read gas_change_depth
955 movlw d'3'
954 cpfsgt EEDATA ; Change depth>3m? 956 cpfsgt EEDATA ; Change depth>3m?
955 bra check_gas_change6 ; No, Change depth not deep enough, skip! 957 bra check_gas_change6 ; No, Change depth not deep enough, skip!
956 movf xC+0,W ; load depth in m into WREG 958 movf xC+0,W ; load depth in m into WREG
957 cpfsgt EEDATA ; gas_change_depth < current depth? 959 cpfsgt EEDATA ; gas_change_depth < current depth?
958 bra check_gas_change6 ; No, check next gas 960 bra check_gas_change6 ; No, check next gas