Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/simulator.asm @ 229:85ea09d3b9d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Nofly should not be reset after dive simulation (bug BB18).
author JeanDo
date Tue, 15 Mar 2011 18:13:51 +0100
parents 2dc4a7340510
children 9406a5b0ba5e
comparison
equal deleted inserted replaced
228:6d4e29d80ff3 229:85ea09d3b9d8
435 movlb 0x01 ; Back to RAM Bank1 435 movlb 0x01 ; Back to RAM Bank1
436 ostc_debug 'T' ; Sends debug-information to screen if debugmode active 436 ostc_debug 'T' ; Sends debug-information to screen if debugmode active
437 return 437 return
438 438
439 simulator_restore_tissue_data: 439 simulator_restore_tissue_data:
440 bcf restore_deco_data ; clear restore flag 440 bcf restore_deco_data ; clear restore flag
441 ostc_debug 'S' ; Sends debug-information to screen if debugmode active 441 ostc_debug 'S' ; Sends debug-information to screen if debugmode active
442 call deco_pull_tissues_from_vault 442 call deco_pull_tissues_from_vault
443 movlb 0x01 ; Back to RAM Bank1 443 movlb 0x01 ; Back to RAM Bank1
444 ostc_debug 'T' ; Sends debug-information to screen if debugmode active 444 ostc_debug 'T' ; Sends debug-information to screen if debugmode active
445 445
446 ostc_debug 'G' ; Sends debug-information to screen if debugmode active 446 ostc_debug 'G' ; Sends debug-information to screen if debugmode active
447 call deco_calc_desaturation_time ; calculate desaturation time 447 call deco_calc_desaturation_time ; calculate desaturation time
448 movlb b'00000001' ; select ram bank 1 448 movlb b'00000001' ; select ram bank 1
449 call calculate_noflytime ; Calc NoFly time 449
450 ; Note: should not reset nofly-time here: the true value have continued to be decremented
451 ; during simulation, which is the right thing to do...
450 ostc_debug 'H' ; Sends debug-information to screen if debugmode active 452 ostc_debug 'H' ; Sends debug-information to screen if debugmode active
451 453
452 ; Calculate CNS 454 ; Calculate CNS
453 call deco_calc_CNS_fraction ; calculate CNS 455 call deco_calc_CNS_fraction ; calculate CNS
454 movlb b'00000001' ; rambank 1 selected 456 movlb b'00000001' ; rambank 1 selected
457
455 return 458 return