Mercurial > public > hwos_code

comparison src/tft_outputs.asm @ 180:abc429e8b46a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
1.60 work...
author heinrichsweikamp
date Wed, 08 Oct 2014 17:57:37 +0200
parents d097e10b383b
children 669b5d00706d
comparison
equal deleted inserted replaced
179:070eb90dde99 180:abc429e8b46a
2757 WIN_TINY .0,.239-.14 2757 WIN_TINY .0,.239-.14
2758 STRCPY "OSTC3 #" ; Won't translate that... 2758 STRCPY "OSTC3 #" ; Won't translate that...
2759 rcall TFT_cat_serial 2759 rcall TFT_cat_serial
2760 2760
2761 STRCAT " v" 2761 STRCAT " v"
2762 WIN_COLOR color_greenish
2762 rcall TFT_cat_firmware 2763 rcall TFT_cat_firmware
2763 2764
2764 ifdef __DEBUG 2765 ifdef __DEBUG
2765 movlw color_grey ; Write header in blue when 2766 movlw color_grey ; Write header in blue when
2766 call TFT_set_color ; compiled in DEBUG mode... 2767 call TFT_set_color ; compiled in DEBUG mode...
2767 STRCAT_PRINT "DEBUG" 2768 STRCAT_PRINT "DEBUG"
2768 else 2769 else
2769 WIN_COLOR color_greenish
2770 STRCAT_PRINT "" 2770 STRCAT_PRINT ""
2771 WIN_INVERT 0
2771 call TFT_standard_color 2772 call TFT_standard_color
2772 2773
2773 movlw softwareversion_beta ; =1: Beta, =0: Release 2774 movlw softwareversion_beta ; =1: Beta, =0: Release
2774 decfsz WREG,F 2775 decfsz WREG,F
2775 return ; Release version -> Return 2776 return ; Release version -> Return
2788 global info_menu_firmware 2789 global info_menu_firmware
2789 extern tFirmware 2790 extern tFirmware
2790 info_menu_firmware: 2791 info_menu_firmware:
2791 lfsr FSR1,tFirmware 2792 lfsr FSR1,tFirmware
2792 call strcat_text 2793 call strcat_text
2794 rcall TFT_cat_firmware
2795 WIN_INVERT 0
2796 return
2797
2793 global TFT_cat_firmware 2798 global TFT_cat_firmware
2794 TFT_cat_firmware: 2799 TFT_cat_firmware:
2795 movlw softwareversion_x 2800 movlw softwareversion_x
2796 movwf lo 2801 movwf lo
2797 bsf leftbind 2802 bsf leftbind
2799 PUTC '.' 2804 PUTC '.'
2800 movlw softwareversion_y 2805 movlw softwareversion_y
2801 movwf lo 2806 movwf lo
2802 output_99x 2807 output_99x
2803 bcf leftbind 2808 bcf leftbind
2809 ; Check firmware date
2810 movlw firmware_expire_year-.1
2811 cpfsgt year ; > threshold?
2812 return
2813 movlw firmware_expire_month-.1
2814 cpfsgt month ; > threshold?
2815 return
2816 movlw firmware_expire_day-.1
2817 cpfsgt day ; > threshold?
2818 return
2819
2820 ; Show in "change firmware" style
2821 movlw color_yellow
2822 call TFT_set_color
2823 WIN_INVERT 1
2804 return 2824 return
2805 2825
2806 ;----------------------------------------------------------------------------- 2826 ;-----------------------------------------------------------------------------
2807 ; For the Information menu: append serial number ostc3#42. 2827 ; For the Information menu: append serial number ostc3#42.
2808 global info_menu_serial 2828 global info_menu_serial