相關(guān)標(biāo)簽:

?

引用公式：計(jì)算停牌
ts:DATETOD1970(DATE)-REF(DATETOD1970(DATE),1)-1;
主圖公式：節(jié)日與復(fù)牌
if DATATYPE=6 then begin
sq:=WEEKDAY;
上證天:=STKINDI('1A0001','計(jì)算停牌.ts',0,DATATYPE);
個(gè)股天:="計(jì)算停牌.ts";
aa2:=上證天=0;aa3:=sq<個(gè)股天-上證天;aa4:=INTPART(個(gè)股天-上證天-2);
aa5:=INTPART(個(gè)股天-上證天);aa6:=aa2 AND aa3;
aa1:=IF(aa6,aa4,aa5);bb1:=個(gè)股天>上證天;
cc1:=IF(bb1,aa1,0);
個(gè)股停牌天:=cc1;
aa:=上證天>2;
bb:=sq=1;
過(guò)節(jié)1:=aa and bb;
cc:=上證天>0;
dd:=sq>1;
過(guò)節(jié)2:=cc and dd;
過(guò)節(jié):=過(guò)節(jié)1 or 過(guò)節(jié)2;
ff:=過(guò)節(jié)>0;
DRAWTEXT(ff , H*1.015,'節(jié)后開(kāi)市'),COLORFF66FF;
DRAWNUMBER(個(gè)股停牌天>0,l*0.98,個(gè)股停牌天,0),COLORFFFFFF,ALIGN0;
DRAWTEXT(個(gè)股停牌天>0 , L*0.98,' 天'),COLORFFFFFF,ALIGN1;
DRAWTEXT(個(gè)股停牌天>0 , L*0.98,'停牌 '),COLORFFFFFF,ALIGN2;
DRAWTEXT(個(gè)股停牌天>0 , L*0.94,'今天復(fù)牌'),COLORFFFFFF,ALIGN0;
end;
{程序化交易 m.kzuj.com.cn }

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?