Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/simulator.asm @ 290:4dbff2aa31ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Hunting for refusing to ignore disabled gas in list... + Keep gaslist in order.
author JeanDo
date Fri, 22 Apr 2011 00:13:39 +0200
parents 8514588eb6a2
children 21a0f7393468
comparison
equal deleted inserted replaced
289:6d8a2550c9ea 290:4dbff2aa31ee
241 bcf display_see_deco ; clear flag 241 bcf display_see_deco ; clear flag
242 242
243 btfsc FLAG_const_ppO2_mode ; In CCR mode ? 243 btfsc FLAG_const_ppO2_mode ; In CCR mode ?
244 bra simulator_show_decoplan4 ; YES: finished. 244 bra simulator_show_decoplan4 ; YES: finished.
245 245
246 ; Re-read gas change depth, from the unsorted list. 246 ; Make sure to pass first gas
247 movlw .33 ; First gas.
248 movwf EEADR
249 clrf EEADRH 247 clrf EEADRH
250 call read_eeprom 248 read_int_eeprom .33 ; First gas.
251 movff EEDATA,char_I_first_gas 249 movff EEDATA,char_I_first_gas
252
253 movlw .27 ; Active flags.
254 movwf EEADR
255 call read_eeprom
256 movff EEDATA,waitms_temp ; Save activity flags.
257 incf EEADR,F ; 28 == Gas#1's change depth.
258
259 lfsr FSR2,char_I_deco_gas_change
260 movlw 5
261 movwf wait_temp
262
263 simulator_show_decoplan5_4:
264 call read_eeprom
265 incf EEADR,F
266
267 rrcf waitms_temp ; Roll acticity to cary.
268 btfss STATUS,C
269 clrf EEDATA ; If not active, set depth=0
270
271 movff EEDATA,POSTINC2 ; Write that in depth array.
272 decfsz wait_temp
273 bra simulator_show_decoplan5_4
274 250
275 ; Compute gas consumption for each tank. 251 ; Compute gas consumption for each tank.
276 call deco_gas_volumes 252 call deco_gas_volumes
277 movlb 1 253 movlb 1
278 254