Mercurial > public > mk2
comparison code_part1/OSTC_code_asm_part1/menu.asm @ 12:588a969a0cae
1.53 beta rc
author | heinrichsweikamp |
---|---|
date | Wed, 24 Mar 2010 20:26:09 +0100 |
parents | 96a35aeda5f2 |
children | 73014f788032 |
comparison
equal
deleted
inserted
replaced
11:0ce100556b57 | 12:588a969a0cae |
---|---|
387 bcf switch_right | 387 bcf switch_right |
388 | 388 |
389 more_setup_menu_loop: | 389 more_setup_menu_loop: |
390 call check_switches_menu | 390 call check_switches_menu |
391 | 391 |
392 movlw d'3' ; x-1 menu entries | 392 movlw d'4' ; x-1 menu entries |
393 cpfseq menupos | 393 cpfseq menupos |
394 bra more_setup_menu_loop2 | 394 bra more_setup_menu_loop2 |
395 movlw d'6' | 395 movlw d'6' |
396 movwf menupos | 396 movwf menupos |
397 call PLED_menu_cursor | 397 call PLED_menu_cursor |
426 dcfsnz menupos,F | 426 dcfsnz menupos,F |
427 bra toggle_datemode | 427 bra toggle_datemode |
428 dcfsnz menupos,F | 428 dcfsnz menupos,F |
429 bra toggle_debugmode | 429 bra toggle_debugmode |
430 dcfsnz menupos,F | 430 dcfsnz menupos,F |
431 bra setup_menu ; spare | 431 bra show_license |
432 dcfsnz menupos,F | 432 dcfsnz menupos,F |
433 bra setup_menu ; spare | 433 bra setup_menu ; spare |
434 dcfsnz menupos,F | 434 dcfsnz menupos,F |
435 bra setup_menu ; spare | 435 bra setup_menu ; spare |
436 movlw d'5' ; set cursor to "More again" | 436 movlw d'5' ; set cursor to "More again" |
437 movwf menupos | 437 movwf menupos |
438 bra setup_menu2 ; exit... | 438 bra setup_menu2 ; exit... |
439 | |
440 show_license: | |
441 call startup_screen1 ;1/2 | |
442 call startup_screen2 ;1/2 | |
443 movlw d'3' | |
444 movwf menupos | |
445 bcf switch_right | |
446 bra more_setup_menu2 ; return to "more menu" loop | |
439 | 447 |
440 toggle_salinity: | 448 toggle_salinity: |
441 ; Toggles between 1.00 and 1.04 | 449 ; Toggles between 1.00 and 1.04 |
442 read_int_eeprom d'26' ; Read Salinity from EEPROM | 450 read_int_eeprom d'26' ; Read Salinity from EEPROM |
443 incf EEDATA,F ; Increase value | 451 incf EEDATA,F ; Increase value |