Code: Select all
On UpdateDisplay Do
if %sysyear% > 2000
Let,1,0
Let,2,%sysweekday%
if %v2% = 1
LCD,1,1,%systm_hm% Niedz %sysday%/%sysmonth_0%/%sysyears%
else
if %v2% = 2
LCD,1,1,%systm_hm% Pon. %sysday%/%sysmonth_0%/%sysyears%
else
if %v2% = 3
LCD,1,1,%systm_hm% Wt. %sysday%/%sysmonth_0%/%sysyears%
else
if %v2% = 4
LCD,1,1,%systm_hm% Sr. %sysday%/%sysmonth_0%/%sysyears%
else
if %v2% = 5
LCD,1,1,%systm_hm% Czw. %sysday%/%sysmonth_0%/%sysyears%
else
if %v2% = 6
LCD,1,1,%systm_hm% Pt. %sysday%/%sysmonth_0%/%sysyears%
else
if %v2% = 7
LCD,1,1,%systm_hm% Sob. %sysday%/%sysmonth_0%/%sysyears%
endif
endif
endif
endif
endif
endif
endif
Let,1,1
Endif
EndOn