[转载]迎春图－－压力和支撑一目了然，主图指标、附图

原文地址：迎春图－－压力和支撑一目了然，主图指标、附图作者：大鹅

{迎春图 TDX  N:1,100,4  K:0,1,1  } 
VVAR1:=IF(K=1,(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,30)+MA(CLOSE,60))/4,DRAWNULL);

DRAWBAND(MA(C,3),RGB(120,120,00),VVAR1,RGB(30,100,200));

GJ:=(C+H+L+O)/4;

明日阻力:=L+(GJ-L)+(C-L);

明日支撑:=L+(C-GJ);

明日阻力2:=L+2*(GJ-L)+(C-L);

明日支撑2:=L+(C-GJ)-(GJ-L);

今日阻力:REF(明日阻力 , 1),NODRAW;

今日支撑:REF(明日支撑 , 1),NODRAW;

今日阻力2:REF(明日阻力2 , 1),NODRAW;

今日支撑2:REF(明日支撑2 , 1),NODRAW;

STICKLINE(ISLASTBAR,今日阻力,今日阻力2,20,0),COLOR555555;

{STICKLINE(ISLASTBAR,今日阻力2,今日阻力2,10,1),COLORAAAAAA;}

DRAWTEXT(ISLASTBAR,今日阻力,'       阻'),COLOR0000FF;

STICKLINE(ISLASTBAR,今日支撑,今日支撑2,20,0),COLOR555555;

{STICKLINE(ISLASTBAR,今日支撑2,今日支撑2,10,1),COLORAAAAAA;}

DRAWTEXT(ISLASTBAR,今日支撑,'       支'),COLOR00FF00;

JRH:=HHV(C,2);

JRL:=LLV(C,2);

MA3:=MA(CLOSE,3);

YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;

AAAX:=(3*C+H+L+O)/6;

龙:IF(K=0,(8*AAAX+7*REF(AAAX,1)+6*REF(AAAX,2)+5*REF(AAAX,3)

+4*REF(AAAX,4)+3*REF(AAAX,5)+2*REF(AAAX,6)+REF(AAAX,8))/36,DRAWNULL),COLOR00FF00;

凤:=(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)

+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)

+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)

+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)

+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211; 
R1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));

R2:=(REF(R1,1) AND CLOSE=REF(CLOSE,2));

R3:=(REF(R2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R5:=(REF(R4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R7:=(REF(R6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R9:=(REF(R8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

RB:=(REF(RA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

RD:=(CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R10:=(REF(RF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R12:=(REF(R11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R14:=(REF(R13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R16:=(REF(R15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2));

R18:=(REF(R17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE 0.1),COLORFFFFFF,NODRAW;

早春:=ISLASTBAR AND (((((VAR4  无痕))

OR ((VAR4  无痕))) OR ((VAR4 > 无痕)

AND (VAR111 > 无痕)))),COLOR00FF00,NODRAW;

初夏:=ISLASTBAR AND ((((((VAR4 > 天下有雪) AND (VAR4 > VAR111))

AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1))) OR ((((VAR4 > VAR222)

AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1))))),

COLOR0000FF,NODRAW;

深秋:=ISLASTBAR AND (((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))

AND (VAR111 > REF(VAR111,1)))),COLOR00FFFF,NODRAW;

SAAA:=(3*C+H+L+O)/6;

SVAR1:=(8*SAAA+7*REF(SAAA,1)+6*REF(SAAA,2)

+5*REF(SAAA,3)+4*REF(SAAA,4)+3*REF(SAAA,5)+2*REF(SAAA,6)+REF(SAAA,8))/36;

SVAR2:=(HHV(SVAR1,5)+HHV(SVAR1,10)+HHV(SVAR1,20))/3;

SVAR3:=(LLV(SVAR1,5)+LLV(SVAR1,10)+LLV(SVAR1,20))/3;

SVAR4:=(HHV(SVAR2,5)+HHV(SVAR2,10)+HHV(SVAR2,20))/3;

SVAR5:=(LLV(SVAR3,5)+LLV(SVAR3,10)+LLV(SVAR3,20))/3;

SVAR6:=(LLV(SVAR1,2)+LLV(SVAR1,4)+LLV(SVAR1,6))/3; 
ZGD:=HHV(REF((C*2-REF(C,3)),3),30)*0.99,COLOR008888;

ZDD:=LLV(REF((C*2-REF(C,3)),3),30)*1.05,COLOR008888;

ZGD2:=IF(K=0,CONST(ZGD),DRAWNULL);

ZDD2:=IF(K=0,CONST(ZDD),DRAWNULL);

AA:=REF(H,N)=HHV(H,2*N+1);  AA1:=REF(L,N)=LLV(L,2*N+1);

QY:=BACKSET(AA,N+1);  QY1:=BACKSET(AA1,N+1);

CC:=FILTER(QY,N) AND H=HHV(H,N+1);  CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);

DDD:=BARSLAST(CC);  DD1:=BARSLAST(CC1);

GDTS:=IF(CC,CURRBARSCOUNT,0);  DDTS:=IF(CC1,CURRBARSCOUNT,0);

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);  DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

GDCS1:=CONST(DINGBUTS);  DDCS1:=CONST(DDTS1);

GDCS13:=CONST(REF(HIGH,GDCS1-1));  DDCS13:=CONST(REF(L,DDCS1-1));

DINGBUTS1:=REF(DINGBUTS,DDD+1);  DDTS2:=REF(DDTS1,DD1+1);

GDCS2:=CONST(DINGBUTS1);  DDCS2:=CONST(DDTS2);

GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));  DDCS23:=CONST(REF(L,DDTS2-1));

XG1:=BACKSET(ISLASTBAR,GDCS1);  XD1:=BACKSET(ISLASTBAR,DDCS1);

XG2:=BACKSET(ISLASTBAR,DINGBUTS1);  XD2:=BACKSET(ISLASTBAR,DDTS2);

XDD:=IF(DDCS13ZGD2*1.02 OR (REF(H,(GDCS1-1))+DX1*GDCS1)ZGD2*1.02 OR (REF(H,(GDCS11-1))+DX2*DDCS11)ZGD2*1.02,0,1);

LX2:=(REF(L,DDCS11-1)-REF(L,DDCS22-1))/(DDCS22-DDCS11);

LLLX1:=IF((REF(L,(DDCS11-1))+LX2*DDCS11)ZGD2*1.02,0,1);

高压力:DRAWLINE(K=0 AND  CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,DDX1),COLORYELLOW,LINETHICK1;

低支撑:DRAWLINE(K=0 AND  CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,LLX1),COLORYELLOW,LINETHICK1;

DRAWLINE(K=0 AND  CURRBARSCOUNT=GDCS22 ,H,CURRBARSCOUNT=GDCS11,H,DDDX1),COLORWHITE,LINETHICK1;

DRAWLINE(K=0 AND  CURRBARSCOUNT=DDCS22 ,L,CURRBARSCOUNT=DDCS11,L,LLLX1),COLORWHITE,LINETHICK1;

等待:=IF(K=0 AND MA3>凤,凤,MA3);

IF(K=0 AND 龙> REF(龙,1),龙,DRAWNULL),COLORMAGENTA,LINETHICK2;

IF(K=0 AND 等待>REF(等待,1),等待,DRAWNULL),LINETHICK2,COLOR00FFFF;

IF(K=0 AND 凤>REF(凤,1),凤,DRAWNULL),LINETHICK2,COLOR0000FF;

IF(K=0 AND 凤REF(H,1);

KOL:=HREF(H,BARSLAST(KOH)+1);

NHIF:=L=REF(L,BARSLAST(KOL)+1);

下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);

RRRSV:=SMA(下档线,3,1);

KKK:=SMA(RRRSV,3,1);

DDDDD:=((3 * RRRSV) - (2 * KKK));

JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);

RSV24:=SMA(JJ12,3,1);

K24:=SMA(RSV24,3,1);

D24:=((3 * RSV24) - (2 * K24));

压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;

底部:=LLV(HIGH,30),COLOR00FF00;

压力位:=IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;

底部位:=IF(ISLASTBAR,底部,DRAWNULL),NODRAW;

STICKLINE(ISLASTBAR ,压力位,压力位,120,0),COLORFFFFFF;

STICKLINE(ISLASTBAR ,底部位,底部位,100,0),COLOR00FF00;

STICKLINE(ISLASTBAR AND (红持股 OR REF(红持股,1)=1),今离场价,今离场价,30,1),COLOR0000FF;

STICKLINE(ISLASTBAR AND (阴观望 OR REF(阴观望,1)=1),今进场价,今进场价,30,1),COLOR00FF00;

{卖出------------------------}

VAR55:=EMA(EMA(EMA(CLOSE,8),13),62);

VAR56:=((REF(HIGH,1) + REF(LOW,1)) / 2);

VAR57:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));

VAR58:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),7,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),7,1)) * 100);

卖出1:=FILTER(CROSS(79,VAR58),4);

MA21:=REF(CLOSE,1);

ZX:=((SMA(MAX((CLOSE - MA21),0),6,1) / SMA(ABS((CLOSE - MA21)),6,1)) * 100);

卖出2:=CROSS(84,ZX),COLORFF00FF;

卖出3:=CROSS(90,RSI);

卖出:=卖出1 OR 卖出2 OR 卖出3;

DRAWICON(卖出,(HIGH * 1.002),15);

{买入------------------------} 
QQ2:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;

QQ3:=SMA(QQ2, 9, 1);

QQ4:=SMA(QQ3, 3, 1);

长趋势:=3*QQ3-2*QQ4,COLORWHITE,LINETHICK3;

趋势线:=EMA(QQ3, 3),COLORRED,LINETHICK3;

金叉:= CROSS(长趋势,趋势线);

AAAA1:=AMOUNT/V;

BBB1:=L1.2;

DDD1:=L0,0,-20),LINETHICK2,COLORGREEN;

DIFF:=( EMA(CLOSE,12) - EMA(CLOSE,26))*100;

DEA:=EMA(DIFF,9);

MACD:= 2*(DIFF-DEA);

抄底:=IF(快到底=2099 AND MONTH>2,0,1);

AVAR4:=LLV(LOW,5);

AVAR5:=HHV(HIGH,4);

散户:= EMA((AVAR2-AVAR4)/(AVAR5-AVAR4)*100,4)*AVAR3;

庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2)*AVAR3;

试买:=(((CROSS(散户,庄家) AND 散户0) OR 抄底;

AA05:=MA(C,5),COLOR0099CC;

五日乖离率:=(C-AA05)/AA05*100;

BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;

速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);

加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;

AA10:=MA(C,10);

AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;

AA30:=MA(C,30);

三拾日乖离率:=(C-AA30)/AA30*100;

加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND

AA05>REF(AA05,1)  AND 三拾日乖离率>REF(三拾日乖离率,1) AND

AA10>REF(AA10,1)

AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1)  ,10) ;

MV3:=EMA(V,3);

MV3角度:=ATAN((MV3/REF(MV3,1)-1)*100)*180/3.1416;

MA3角度:=ATAN((MA3/REF(MA3,1)-1)*100)*180/3.1416;

MV5:=EMA(V,5);

MA5:=EMA(C,5);

MV5角度:=ATAN((MV5/REF(MV5,1)-1)*100)*180/3.1416;

MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;

MV10:=EMA(V,10);

MA10:=EMA(C,10);

MV10角度:=ATAN((MV10/REF(MV10,1)-1)*100)*180/3.1416;

MA10角度:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;

强弱度:=(MV3角度+MA3角度+MV5角度+MA5角度+MV10角度+MA10角度)/6,COLORFFFFFF;

QBD:=CROSS(强弱度,50) AND COUNT(强弱度>50,7)=K13,COLORRED;

启爆福缘:=启爆点 AND 福缘;

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);

DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);

AK:=EMA((DMP-DMM)*1,3)*100+50,COLORFFFFFF;

AD:=EMA((MA(DMP,3)-MA(DMM,3))*1,3)*100+50,COLORFFFFFF;

DRAWICON(CROSS(AK,AD) AND 启爆点 AND 福缘,L*0.99 ,9);

DRAWICON(加仓,L*0.99,23);

DRAWICON(老鼠仓 OR 金叉,(LOW - (LOW * 0.01)),1);

DRAWTEXT(秋离场,HHV(H,3),'→→→→'),COLORFF99FF;

DRAWTEXT(短买春,LLV(L,3),'←←←←'),COLOR00FF00;

{严冬:}STICKLINE((VAR4 > 0.1),HIGH,LOW,0,0),COLORFFFFFF;

{早春:}STICKLINE(((((VAR4  无痕))

OR ((VAR4  无痕))) OR ((VAR4 > 无痕)

AND (VAR111 > 无痕))),HIGH,LOW,0,0),COLOR00FF00;

{初夏:}STICKLINE((((((VAR4 > 天下有雪) AND (VAR4 > VAR111))

AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1))) OR ((((VAR4 > VAR222)

AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1)))),

HIGH,LOW,0,0),COLOR0000FF;

{深秋:}STICKLINE(((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))

AND (VAR111 > REF(VAR111,1))),HIGH,LOW,0,0),COLOR00FFFF;

STICKLINE(((VAR4 > 0.1) AND (CLOSE  0.1) AND (CLOSE >= OPEN)),OPEN,CLOSE,2.8,1),COLORCCCCCC;

STICKLINE(((VAR4 > 0.1) AND (CLOSE >= OPEN)),OPEN,OPEN+(CLOSE-OPEN)/3,2.8,0),COLORFFFFFF;

STICKLINE((((((VAR4  无痕)) AND (CLOSE  无痕)) AND (CLOSE  无痕) AND (VAR111 > 无痕)) AND (CLOSE  无痕)) AND (CLOSE > OPEN))

OR (((VAR4  无痕)) AND (CLOSE > OPEN)))

OR (((VAR4 > 无痕) AND (VAR111 > 无痕)) AND (CLOSE >= OPEN)))

,OPEN,CLOSE,2.8,1),COLOR00FF00;

STICKLINE(((((((VAR4 > 天下有雪) AND (VAR4 > VAR111)) AND (VAR4 > VAR5))

AND (VAR222 > REF(VAR222,1))) AND (CLOSE  VAR222)

AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,2)))

AND (CLOSE  天下有雪) AND (VAR4 > VAR111)) AND (VAR4 > VAR5))

AND (VAR222 > REF(VAR222,1))) AND (CLOSE > OPEN)) OR (((((VAR4 > VAR222)

AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1)))

AND (CLOSE >= OPEN))),OPEN,CLOSE,2.8,1),COLOR0000FF;

STICKLINE((((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))

AND (VAR111 > REF(VAR111,1))) AND (CLOSE  VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))

AND (VAR111 > REF(VAR111,1))) AND (CLOSE >= OPEN)),OPEN,CLOSE,2.8,1)

,COLOR00FFFF;

分享 分享到新浪Qing

0

顶