- 源碼分享： 股指換月，持續三天提醒。
Vars
Numeric aa;
Numeric bb;
Numeric cc;
Numeric dd;
Numeric ee;
Numeric ff;
Begin
aa=(day-1)%7;
bb=Weekday;
cc=IIF(aa==bb,1,0);
dd=7*cc+(1-cc)*((7+aa-bb)%7);
ee=IIF(day<=dd,1,0);
ff=ee+(1-ee)*(IntPart((day-dd-1)/7)+2);
if(date!=date[1] and (Weekday()==3 || Weekday()==4 || Weekday()==5) and ff==3) PlotString("info", "換月", High*1.005);
End
|
打印本文
關閉窗口