发一个飞狐改遍的大智慧节日显示指标源码,欢度春节玩 节日显示
节:=1110203;{大智慧指标赋值后显示混乱,只能在此赋值玩吧,INPUT: T(1110203,900000,2222222);} 年:=INTPART(节/10000)+1900 ; 月:=INTPART(节/100)-(年-1900)*100; 日:=节-INTPART(节/100)*100; 当前:=DATE; 当前年:=INTPART(当前/10000)+1900 ; 当前月:=INTPART(当前/100)-(当前年-1900)*100; 当前日:=当前-INTPART(当前/100)*100; 日差:=DATETOD1970(节)-DATETOD1970(当前); {以下显示坐标根据自己的显示器自行调整} DRAWTEXTABS(10,20,'当前是'+numtostrn(当前年,0)+'年'+numtostrn(当前月,0)+'月' +numtostrn(当前日,0)+'日 '+'距下个节日'+numtostrn(年,0)+'年'+numtostrn(月,0)+'月' +numtostrn(日,0)+'日'+' 还有' +numtostrn(日差,0)+'天'),colorred;
|