comparison code_part1/OSTC_code_asm_part1/simulator.asm @ 21:73014f788032

1.60 stable rc1
author heinrichsweikamp
date Wed, 21 Apr 2010 17:37:30 +0200
parents 96a35aeda5f2
children 2b52a4a7dce6
comparison
equal deleted inserted replaced
20:8824446f7241 21:73014f788032
256 ; movwf POSTINC2 256 ; movwf POSTINC2
257 ;call word_processor 257 ;call word_processor
258 258
259 259
260 simulator_calc_deco_loop2: 260 simulator_calc_deco_loop2:
261 call toggle_LEDr 261 btg LED_red
262 262
263 call divemode_check_decogases ; Checks for decogases and sets the gases 263 call divemode_check_decogases ; Checks for decogases and sets the gases
264 call divemode_prepare_flags_for_deco 264 call divemode_prepare_flags_for_deco
265 265
266 call deco_main_calc_hauptroutine ; calc_tissue 266 call deco_main_calc_hauptroutine ; calc_tissue
275 movff char_O_deco_status,deco_status ; 275 movff char_O_deco_status,deco_status ;
276 tstfsz deco_status ; deco_status=0 if decompression calculation done 276 tstfsz deco_status ; deco_status=0 if decompression calculation done
277 bra simulator_calc_deco2 ; Not finished 277 bra simulator_calc_deco2 ; Not finished
278 278
279 simulator_calc_deco3: 279 simulator_calc_deco3:
280 call set_LEDr 280 bsf LED_red
281 281
282 call simulator_restore_tissue_data ; Restore 32 floats "pre_tissue" from bank3 282 call simulator_restore_tissue_data ; Restore 32 floats "pre_tissue" from bank3
283 283
284 bcf simulatormode_active ; normal simulator mode 284 bcf simulatormode_active ; normal simulator mode
285 bcf standalone_simulator ; Standalone Simulator active 285 bcf standalone_simulator ; Standalone Simulator active
286 286
287 WAITMS d'250' 287 WAITMS d'250'
288 WAITMS d'250' 288 WAITMS d'250'
289 WAITMS d'250' ; Wait for Pressure Sensor to get real pressure again... 289 WAITMS d'250' ; Wait for Pressure Sensor to get real pressure again...
290 290
291 call clear_LEDr 291 bcf LED_red
292 292
293 movlw d'1' 293 movlw d'1'
294 movwf logbook_temp1 ; Bottom time>0! 294 movwf logbook_temp1 ; Bottom time>0!
295 295
296 movlw d'5' ; Pre-Set Cursor to "Show Decoplan" 296 movlw d'5' ; Pre-Set Cursor to "Show Decoplan"