相關(guān)標簽: st北亞復(fù)牌價格估計 、 st北亞何時復(fù)牌 、 st關(guān)鋁有復(fù)牌消息嗎 、 600705 復(fù)牌時間 、 賢成礦業(yè)什么時候復(fù)牌 、 st金城復(fù)牌最新消息 、 2012年重組復(fù)牌股票 、 st股票重組成功復(fù)牌價 、 st華源復(fù)牌 、

引用公式(名稱不可更改)：計算停牌
 

ts:DATETOD1970(DATE)-ref(DATETOD1970(DATE),1)-1;

主圖公式：節(jié)日與復(fù)牌

if DATATYPE=6 then begin
sq:=WEEKDAY;
上證天:=STKINDI('1A0001','計算停牌.ts',0,DATATYPE);
個股天:="計算停牌.ts";
aa2:=上證天=0;aa3:=sq<個股天-上證天;aa4:=INTPART(個股天-上證天-2);
aa5:=INTPART(個股天-上證天);aa6:=aa2 AND aa3;
aa1:=IF(aa6,aa4,aa5);bb1:=個股天>上證天;
cc1:=IF(bb1,aa1,0);
個股停牌天:=cc1;
aa:=上證天>2;
bb:=sq=1;
過節(jié)1:=aa and bb;
cc:=上證天>0;
dd:=sq>1;
過節(jié)2:=cc and dd;
過節(jié):=過節(jié)1 or 過節(jié)2;
ff:=過節(jié)>0;{來源： www.weiqiv.net.cn }
DRAWTEXT(ff , H*1.015,'節(jié)后開市'),COLORFF66FF;
DRAWNUMBER(個股停牌天>0,l*0.98,個股停牌天,0),COLORFFFFFF,ALIGN0;
DRAWTEXT(個股停牌天>0 , L*0.98,' 天'),COLORFFFFFF,ALIGN1;
DRAWTEXT(個股停牌天>0 , L*0.98,'停牌 '),COLORFFFFFF,ALIGN2;
DRAWTEXT(個股停牌天>0 , L*0.94,'今天復(fù)牌'),COLORFFFFFF,ALIGN0;
end;