编写日、周、月。年K线涨幅

编写要求：

解答：

?网友求助：

要求在任何周期图形上数值都不会改变
时间要求日线就是开盘时的涨幅，收盘就是当日涨幅，（现在很多公式到分钟图上数值会改变变成提取最新一条K线涨幅）
周线是周一到周五（不累计上周时间也就是不是统计5天）
月线是统计1-31号涨幅，实际上就是我们按F8不断出现的涨幅。
根据十字军旗公式改编（只要参数）
tk:=barslast(date<>ref(date,1));
日涨跌:(c/ref(c,tk+1)-1)*100,linethick0,coloryellow;

zk:=FLOOR((DAYS1970-3)/7);
zt:=barslast(ref(zk,1)<>zk);
周涨跌:(c/ref(c,zt+1)-1)*100,linethick0,colorwhite;

yt:=barslast(month<>ref(month,1));
月涨跌:(c/ref(c,yt+1)-1)*100,linethick0,coloryellow;

nt:=barslast(year<>ref(year,1));
年涨跌:(c/ref(c,nt+1)-1)*100,linethick0,colorwhite;