停复牌大旗

吴建新

BAR:=CALCSTOCKINDEX('999999','引用',1);
ZRRS1:=DATETODAY(DATE)-DATETODAY(REF(DATE,1))-1;
JYRS1:=REF(BAR,1)-BAR-1;
TODAY:=ISLASTBAR AND V=0;
JYRS:=IF(TODAY,JYRS1+1,JYRS1);
ZRRS:=IF(TODAY,ZRRS1+1,ZRRS1);  
FP:=JYRS>0;
FPB:=BARSLAST(FP);
最近停牌日期:=REF(DATE,FPB+1),NODRAW,COLORWHITE;  {次日停牌}
最近复牌日期:=IF(TODAY,DRAWNULL,REF(DATE,FPB)),NODRAW,COLORWHITE;
停牌自然日日数:=REF(ZRRS,FPB),NODRAW,COLOR00AAFF;  
停牌交易日数:=REF(JYRS,FPB),NODRAW,COLOR00AAFF;
最近停牌:=VARCAT(VAR2STR(REF(DATE+19000000,1),0),' 次日起停牌');
最近复牌:=VARCAT(VAR2STR(DATE+19000000,0),' 复牌');
停牌日:=VARCAT(VARCAT('停牌',VAR2STR(停牌自然日日数,0)),'天,');
交易日:=VARCAT(VARCAT('含',VAR2STR(停牌交易日数,0)),'个交易日');

复牌天数:IF(V>0,FPB+1,0),NODRAW;
DPSQ:=INDEXC>=REF(INDEXC,复牌天数);
DPXQ:=INDEXC<REF(INDEXC,复牌天数);
大盘上幅:=IF(FP AND DPSQ,(INDEXC/REF(INDEXC ,复牌天数))*100-100,0);
大盘下幅:=IF(FP AND DPXQ,(INDEXC/REF(INDEXC,复牌天数))*100-100,0);
上幅:=VARCAT(VARCAT('大盘向上幅度:',VAR2STR(大盘上幅,2)),'%');
下幅:=VARCAT(VARCAT('大盘向下幅度:',VAR2STR(大盘下幅,2)),'%');
现价涨幅:C/REF(C,复牌天数)*100-100,NODRAW;
大盘涨幅:INDEXC/REF(INDEXC,复牌天数)*100-100,NODRAW;
对比幅:现价涨幅-大盘涨幅,NODRAW,COLORLIGRAY;

STICKLINE(FP AND V>0,-5,12,1,0),COLORRED;
STICKLINE(FP AND V=0,-5,12,1,0),COLORLIBLUE;
DRAWTEXT(FP AND V>0,10,最近停牌),COLORYELLOW;
DRAWTEXT(FP AND V>0,8,最近复牌),COLORYELLOW;
DRAWTEXT(FP AND DPSQ,4,上幅),COLORYELLOW;
DRAWTEXT(FP AND DPXQ,4,下幅),COLORGREEN;
DRAWTEXT(FP AND V>0,6,VARCAT(停牌日,交易日)),COLORYELLOW;
DRAWTEXT(FP AND V=0,10,最近停牌),COLORWHITE;
DRAWTEXT(FP AND V=0,8,'尚未复牌'),COLORWHITE;
DRAWTEXT(FP AND V=0,6,VARCAT(停牌日,交易日)),COLORWHITE;

wenba

X_1:=CLOSE/REF(CLOSE,1)>1.02; X_2:=VOL>MA(VOL,5); X_3:=X_1 AND X_2; X_4:=IF(X_3,70,0); X_5:=X_4; X_6:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); X_7:=IF(CLOSE>OPEN,X_6*(HIGH-LOW),IF(CLOSE X_8:=X_7/VOL*100; X_9:=X_8>=80; X_10:=ATAN((EMA(CLOSE,5)/REF(EMA(CLOSE,5),1)-1)*100)*57.299999; X_11:=ATAN((EMA(CLOSE,10)/REF(EMA(CLOSE,10),1)-1)*100)*57.299999; X_12:=ATAN((EMA(CLOSE,20)/REF(EMA(CLOSE,20),1)-1)*100)*57.299999; X_13:=X_10>=60 AND X_11>13; X_14:=IF(CLOSE>REF(CLOSE,1),88,0); X_15:=IF(CLOSE/REF(CLOSE,1)>1.02 AND HIGH/CLOSE<1.01 AND X_14>0,91,0); X_16:=FILTER(X_15>1,5); X_17:=MA(CLOSE,90); X_18:=MA(CLOSE,288); X_19:=IF(1.1>SMA(CLOSE,2,1)/SMA(CLOSE,13,2)>1.03,SMA(HIGH,21,5)*1.05,SMA(HIGH,21,2)*1.05); X_20:=IF(1.09>SMA(CLOSE,5,1)/SMA(CLOSE,15,1)>0.3,SMA(LOW,10,1),SMA(LOW,5,1)); X_21:=IF(MA(VOL,2)>MA(VOL,3)/2>MA(VOL,5),SMA(HIGH,2,1),SMA(CLOSE,3,1)); X_22:=IF(MA(VOL,3)>MA(VOL,5)>MA(VOL,9),SMA(CLOSE,3,1),SMA(CLOSE,5,1)); X_23:=CROSS(X_21,X_19) OR CROSS(X_17,X_20) OR CROSS(X_19,X_18); X_24:=X_16 OR X_23; X_25:=CLOSE/REF(CLOSE,3)*100-100; X_26:=STICKLINE(X_25>12,0,50,2,0); X_27:=MA(CLOSE,5); X_28:=MA(CLOSE,10); X_29:=MA(VOL,10); X_30:=HHV(HIGH,5)=HHV(HIGH,0) AND BARSCOUNT(CLOSE)>=5; X_31:=CLOSE>REF(CLOSE,1)*1.02; X_32:=VOL>X_29; X_33:=OPEN>X_28 AND CLOSE>X_27; X_34:=X_30 AND X_31 AND X_32 AND X_33; X_35:=X_25 OR X_34; X_5 AND X_9 AND X_13 AND X_24 AND X_35,COLORMAGENTA,LINETHICK4;

东升123

BAR:=CALCSTOCKINDEX('999999','引用',1);
ZRRS1:=DATETODAY(DATE)-DATETODAY(REF(DATE,1))-1;
JYRS1:=REF(BAR,1)-BAR-1;
TODAY:=ISLASTBAR AND V=0;
JYRS:=IF(TODAY,JYRS1+1,JYRS1);
ZRRS:=IF(TODAY,ZRRS1+1,ZRRS1);  

海茵

学习学习学习学习学习学习再学习

k-uian

停盘 很广勇敢

曲径通幽1

谢谢分享辛苦了。。

俺来了

学习学习下

小春

谢谢楼主分享。

无我无股

向高手学习

xiajuncool

没看懂......

p1250

谢谢，看看

跌落于朝花夕拾

谢楼主分享  

ljxlxq

谢谢楼主分享

跌落于朝花夕拾

6666666666666666668

ljxlxq

谢谢楼主分享

八分贝

停复牌大旗

haihongwu

谢谢楼主分享

ljxlxq

谢谢楼主分享