大智慧四度解盘+缺口主图指标公式

INPUT:M(10,3,250,3);均线:(MA(CLOSE,M) * 1),Colorred,linethick2;早晨之星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND Abs(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2);

黄昏之星:=REF(CLOSE,2)/REF(OPEN,2)>1.03 AND REF(OPEN,1)>REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2);

长十字:=CLOSE=OPEN AND HIGH/LOW >1.03;

垂死十字:=CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH;

早晨十字星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2);

黄昏十字星:=REF(CLOSE,2)/REF(OPEN,2)>1.05 AND REF(OPEN,1)>REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2);

射击之星:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE>MA(CLOSE,5);

倒转锤头:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE<MA(CLOSE,5);

锤头:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE<MA(CLOSE,5);

吊颈:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5);

穿头破脚:=(REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1))

OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1));

乌云盖顶:=REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97 AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1);

曙光初现:=REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1);

身怀六甲:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)>0.04 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND

MAX(CLOSE,OPEN)<MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)>MIN(REF(CLOSE,1),REF(OPEN,1));

十字胎:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)>0.04 AND CLOSE=OPEN AND

CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1),REF(OPEN,1));

平顶:=ABS(HIGH-REF(HIGH,1))/HIGH<0.001;

平底:=(ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)-REF(LOW,2))/REF(LOW,1)<=0.001);

大阳烛:=CLOSE/OPEN>1.05 AND HIGH/LOW<CLOSE/OPEN+0.018;

三个白武士:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN

AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);

双飞乌鸦:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98;

孕育线:=REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1) AND

(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)<=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN AND

(CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<=1/100;

多方炮:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN;

出水芙蓉:=(OPEN<EMA(C,20) OR OPEN<EMA(C,40) OR OPEN<EMA(C,60)) AND (C>MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))

AND (V/MA(V,30)>1.2 AND C/REF(C,1)>1.049);

上升三部曲:=REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)<REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND

REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND

REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4);

下跌三部曲:= REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)>REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)<REF(LOW,3) AND

REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND

CLOSE<REF(CLOSE,4);

跳空缺口:=HIGH<REF(LOW,1) OR LOW>REF(HIGH,1);

三只乌鸦:=REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2) AND CLOSE<REF(CLOSE,1);

光脚阴线:=LOW=CLOSE AND HIGH<>LOW;

光头阳线:=HIGH=CLOSE AND HIGH<>LOW;

分离:=OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)-REF(OPEN,1))<0;

长下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667;

长上影:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667;

十字星:=CLOSE=OPEN AND HIGH<>LOW;

大阴烛:=OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018;

好友反攻:=(REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002)

OR (REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002);

倾盆大雨:=REF(C,1)/REF(O,1)>=1.03 AND O<REF(C,1) AND O>REF(O,1) AND C<REF(O,1);

解盘:='【解盘】'+

IFs(倾盆大雨,'倾盆大雨,见顶信号;','')+

IFs(大阴烛,'大阴烛,后市向淡,发生逆转;','')+

IFs(好友反攻,'好友反攻,底部反转;','')+

IFs(跳空缺口,'跳空缺口,注意向上还是向下跳空;','')+

IFs(光脚阴线,'光脚阴线,下跌信号;','')+

IFs(光头阳线,'光头阳线,后市看涨;','')+

IFs(三只乌鸦,'三只乌鸦,可能见顶回落;','')+

IFs(分离,'分离,注意看涨分离和看跌分离;','')+

IFs(长下影,'长下影,持续下跌后出现,有可能止跌回升;在升势末期出现,须多加留意;','')+

IFs(长上影,'长上影,表明行情上档压力沉重,升势受阻;','')+

IFs(下跌三部曲,'下跌三部曲,下跌信号;','')+

IFs(上升三部曲,'上升三部曲,上涨信号;','')+

IFs(早晨之星,'早晨之星,见底回升;','')+

IFs(黄昏之星,'黄昏之星,见顶回落;','')+

IFs(十字星,'十字星,有转向意味,注意股价位置在顶部还是底部;','')+

IFs(长十字,'长十字,注意在顶部还是底部;','')+

IFs(垂死十字,'垂死十字,下跌信号;','')+

IFs(早晨十字星,'早晨十字星,上涨信号,见底回升;','')+

IFs(黄昏十字星,'黄昏十字星,下跌信号,见顶回落;','')+

IFs(射击之星,'射击之星,可能见顶回落,可靠性低;','')+

IFs(倒转锤头,'倒转锤头,可能见底回升;','')+

IFs(锤头,'锤头,可能见底回升,如有量配合,信号强烈;','')+

IFs(吊颈,'吊颈,上升行情中见顶回落,顶部出现,见顶信号;','')+

IFs(平顶,'平顶,温和的反转;','')+

IFs(穿头破脚,'穿头破脚,顶部出现,见顶回落信号;','')+

IFs(乌云盖顶,'乌云盖顶,见顶回落信号;','')+

IFs(曙光初现,'曙光初现,后市见底回升;','')+

IFs(身怀六甲,'身怀六甲,出现在底部,是见底回升信号;出现在顶部,是见顶回落信号;','')+

IFs(十字胎,'十字胎;','')+

IFs(平底,'平底,温和的反转;','')+

IFs(大阳烛,'大阳烛,看涨;','')+

IFs(三个白武士,'三个白武士,每日收盘价上移,表示可能见底回升;','')+

IFs(双飞乌鸦,'双飞乌鸦,行情将见顶回落;','')+

IFs(孕育线,'孕育线,注意股价位置;','')+

IFs(多方炮,'多方炮,在底部出现有上涨意味,在中间出现有可能是上涨中继,顶部出现是复合见顶信号;','')+

IFs(出水芙蓉,'出水芙蓉,见底回升;','');

DRAWTEXTABS(0,0,解盘);

MA5:MA(C,5),COLORF00FF0;

MA21:MA(C,21),COLORE66878;

MA30:MA(C,30),COLORYELLOW; MA55:MA(CLOSE,55),LINETHICK1,ColorGREEN;

半年线:MA(C,120),COLOR399C7F,POINTDOT;

年线:MA(C,240),COLOR000999,POINTDOT;X1:=(C+L+H)/3;

X2:=EMA(X1,6);

X3:=EMA(X2,5);

DRAWICON(crOSS(X2,X3),L*0.98,7);

DRAWICON(CROSS(X3,X2),H*1.02,8);

DRAWGBKLAst(C>0,STRIP(RGB(10,10,50),RGB(50,10,10),0));

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

VAR1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+

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

VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;

SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;

SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)

AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;

SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;

SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)

AND CLOSE>VAR2 AND CLOSE<VAR1;

SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1)

AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1)

AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);;

SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2;

XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1)

AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2);

XD2:=VAR1=VAR2 AND CLOSE>VAR1;

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

量能饱和度:=IF(SAT>1,1,SAT)*100;

IF BARSTATUS=2 AND SZ1 THEN BEGIN

DRAWTEXTABS(390,25,'调整结束短线介入'),LINETHICK2,COLORRED;

END

ELSE

IF BARSTATUS=2 AND SZ2 THEN BEGIN

DRAWTEXTABS(390,25,'上升通道走势良好'),LINETHICK2,COLORRED;

END

ELSE

IF BARSTATUS=2 AND SZ3 THEN BEGIN

DRAWTEXTABS(390,25,'股价偏离注意调整'),LINETHICK2,COLORRED;

END

ELSE

IF BARSTATUS=2 AND SZ4 THEN BEGIN

DRAWTEXTABS(390,25,'上升通道调整洗盘'),LINETHICK2,COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND SZ5 THEN BEGIN

DRAWTEXTABS(390,25,'转向特征注意离场'),LINETHICK2,COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND SZ6 THEN BEGIN

DRAWTEXTABS(390,25,'通道改变坚决离场'),LINETHICK2,COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND XD1 THEN BEGIN

DRAWTEXTABS(390,25,'下跌通道只宜观望'),LINETHICK2,COLORGREEN;

END

ELSE

IF BARSTATUS=2 AND XD2 THEN BEGIN

DRAWTEXTABS(390,25,'短期底部准备进入'),LINETHICK2,COLORYELLOW;

END;

;a:="LTFunc5@FORLT2";

s1:="LTFunc5@LT_S1";

hs:="LTFunc5@LT_HS";

ls:="LTFunc5@LT_LS";

p1:="LTFunc5@LT_P1";

upp:="LTFunc5@LT_UPP";

udd:="LTFunc5@LT_UDD";

{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};

买入:p1=1 and ref(p1,1)=0,LineThick0,Precis0,ColorRed;

d1:=ema(abs("ddx.ddx"),60);

d2:=max("ddx.ddx"/d1+7.5,7.5);

d3:=min("ddx.ddx"/d1,10);

fb:=if(s1=0,hs,ls);

tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价>'+numtostrn(upp,2)+',出现B点\n');

tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');

tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币'));

tr3:=ifs(s1=0,'向下,','向上,');

tr4:='3.能量级别:'+numtostrn(d3,1)+'级';

bs:=''+datestr(date)+'买卖点决策系统提示\n'+'1.bs点:'+tr2+','+tr0+'2.短线:'+tr3+tr1+'\n'+tr4;

drawflagtext(1,fb,bs);

STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),color5454ff;

STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),colorblack;

STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff;

STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff;

STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff;

STICKLINE(p1=1 and c<=o,o,c,7.5,1),color5454ff;

STICKLINE(p1=1 and c<=o,l,c,0.5,1),color5454ff;

STICKLINE(p1=1 and c<=o,h,o,0.5,1),color5454ff;

STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),colorffff54;

STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),colorffff54;

STICKLINE((p1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),colorffff54;

drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0;

drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2;

{指标网-股票公式网站 www.GupAng.com}

drawbmp(s1=1 and ref(s1,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0;

drawbmp(s1=0 and ref(s1,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2;闪:EMA(c+(h- l)*0.618,3),Color0099FF,LINETHICK0; 进:EMA((o+h+l)/3,4),COLORCYAN,LINETHICK0;

预测明日买点:=EMA((o+h+l)/3,4)+((h+l)/2-ref((o+h+l)/3,3))/4;

DRAWTEXTREL(800,950,'测今日低点:'+NUMTOSTRN(ref(预测明日买点,1),2 )),ColorGREEN;

预测明日卖点:=EMA(c+(h-l)*0.618,3)+(EMA(c+(h-l)*0.618,3)-进)*0.618;

DRAWTEXTREL(580,950,'测今日高点:'+NUMTOSTRN(ref(预测明日卖点,1),2 )),Colorred

;gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);

I1:=0;

flag1:=0;

while I1<BArslAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)

DO

IF REF(H,I1)<REF(L,I1+1) AND REF(L,I1+1)>HHV(H,I1+1)

THEN BEGIN FLAG1:=1;

S1:=I1;

I1:=BARSLAST(DISPSTATUS=1);

END

ELSE I1:=I1+1;

STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(s1+1)*20,0),Color808080,ALIGN1,LAYER7;

DRAWTEXT(flag1,REF(L,s1+1),NUMTOSTRN(ref(l,s1+1),2)+'-'+NUMTOSTRN(hhV(h,S1+1),2)),ALIGN2,COLORffffff,linethick2;

I:=0;

flag:=0;

while I<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)

DO

IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)<LLV(LOW,I+1)

THEN BEGIN FLAG:=1;

S:=I;

I:=BARSLAST(DISPSTATUS=1);

END

ELSE I:=I+1;

STICKLINE(FLAG,REF(h,S+1),LLV(L,S+1),20*(s+1),500),Color808080,ALIGN1,LAYER7;

DRAWTEXT(FLAG,REF(H,s+1),NUMTOSTRN(ref(h,s+1),2)+'-'+NUMTOSTRN(LLV(L,S+1),2)),

ALIGN2,COLORgreen,linethick2;