Mercurial > public > hwos_code

comparison src/simulator.asm @ 432:929feb0da4f5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hunting a bug in the logbook (Day 2)
author heinrichsweikamp
date Wed, 22 Jun 2016 12:36:15 +0200
parents a5fc007634c5
children 1eeafeeb9287
comparison
equal deleted inserted replaced
431:9500b2d3e32b 432:929feb0da4f5
496 movlw .19 496 movlw .19
497 movwf win_height 497 movwf win_height
498 movlw .118 498 movlw .118
499 movwf win_leftx2 ; column left (0-159) 499 movwf win_leftx2 ; column left (0-159)
500 movlw .16 500 movlw .16
501 movwf win_width ; column max width. 501 movwf win_width+0 ; column max width.
502 clrf win_width+1
502 503
503 ; Draw used area (up = minutes): 504 ; Draw used area (up = minutes):
504 movlw .16 ; Limit length (16min) 505 movlw .16 ; Limit length (16min)
505 cpfslt up 506 cpfslt up
506 movwf up 507 movwf up
520 sublw .239 ; No: bottom row in planning 521 sublw .239 ; No: bottom row in planning
521 movwf win_height 522 movwf win_height
522 523
523 WIN_LEFT .85 ; Full divemenu width 524 WIN_LEFT .85 ; Full divemenu width
524 movlw .159-.85+1 525 movlw .159-.85+1
525 movwf win_width 526 movwf win_width+0
527 clrf win_width+1
526 528
527 clrf win_color1 ; Fill with black 529 clrf win_color1 ; Fill with black
528 clrf win_color2 530 clrf win_color2
529 531
530 goto TFT_box 532 goto TFT_box ; and return
531 533
532 ;----------------------------------------------------------------------------- 534 ;-----------------------------------------------------------------------------
533 ; Display the decoplan (simulator). 535 ; Display the decoplan (simulator).
534 ; Inputs: char_O_deco_table (array of stop times, in minutes) 536 ; Inputs: char_O_deco_table (array of stop times, in minutes)
535 ; decoplan_page = page number. 537 ; decoplan_page = page number.