Mercurial > public > hwos_code

comparison src/simulator.asm @ 371:fec5eec4c8b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix some display issues with display1
author heinrichsweikamp
date Wed, 19 Aug 2015 16:27:00 +0200
parents 2fe34fc0e2ae
children a5fc007634c5
comparison
equal deleted inserted replaced
370:67e631aa5b8c 371:fec5eec4c8b7
479 movf lo,W ; Swap up & lo 479 movf lo,W ; Swap up & lo
480 movff up,lo 480 movff up,lo
481 movwf up 481 movwf up
482 482
483 output_8 ; Allow up to 240' 483 output_8 ; Allow up to 240'
484 STRCAT_PRINT "' " ; 1 to 3 chars for depth. 484 STRCAT "' " ; 1 to 3 chars for depth.
485 clrf WREG
486 movff WREG,buffer+.3 ; limit to 4 chars
487 STRCAT_PRINT ""
485 488
486 movf lo,W ; Swap back up & lo 489 movf lo,W ; Swap back up & lo
487 movff up,lo 490 movff up,lo
488 movwf up 491 movwf up
489 492
512 ;----------------------------------------------------------------------------- 515 ;-----------------------------------------------------------------------------
513 ; Clear unused area belw last stop 516 ; Clear unused area belw last stop
514 ; Inputs: win_top : last used area... 517 ; Inputs: win_top : last used area...
515 deco_plan_show_clear_bottom: 518 deco_plan_show_clear_bottom:
516 movf win_top,W ; Get back from bank0 519 movf win_top,W ; Get back from bank0
517 btfsc divemode ; In dive mode ? 520 sublw .239 ; No: bottom row in planning
518 sublw .168 ; Yes: bottom row in divemode
519 btfss divemode ; In dive mode ?
520 sublw .240 ; No: bottom row in planning
521 movwf win_height 521 movwf win_height
522 522
523 WIN_LEFT .85 ; Full divemenu width 523 WIN_LEFT .85 ; Full divemenu width
524 movlw .160-.85+1 524 movlw .159-.85+1
525 movwf win_width 525 movwf win_width
526 526
527 clrf win_color1 ; Fill with black 527 clrf win_color1 ; Fill with black
528 clrf win_color2 528 clrf win_color2
529 529
530 goto TFT_box 530 goto TFT_box
531 531
532 ;----------------------------------------------------------------------------- 532 ;-----------------------------------------------------------------------------
533 ; Display the decoplan (simulator or divemode). 533 ; Display the decoplan (simulator).
534 ; Inputs: char_O_deco_table (array of stop times, in minutes) 534 ; Inputs: char_O_deco_table (array of stop times, in minutes)
535 ; decoplan_page = page number. 535 ; decoplan_page = page number.
536 ; 536 ;
537 deco_show_plan_page: 537 deco_show_plan_page:
538 bcf win_invert ; Reset invert flag 538 bcf win_invert ; Reset invert flag