找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
查看: 304|回复: 5

黄龙天翔

[复制链接]
发表于 2023-11-18 20:33 | 显示全部楼层 |阅读模式

马上注册,享用更多功能,让你轻松玩转本论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

×

{金牛}

金牛XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORYELLOW;

金钻趋势:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;

金牛2:=EMA(金钻趋势,25)COLORCYAN,LINETHICK2;

DRAWBAND(金钻趋势,RGB(55,0,0),金牛2,RGB(0,91,0));

DRAWKLINE(H,O,L,C);

STICKLINE(金钻趋势>LOW AND 金钻趋势<HIGH,金钻趋势,MIN(MIN(OPEN,CLOSE),金钻趋势),2,0),COLORYELLOW;

STICKLINE(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,0),COLORYELLOW;

STICKLINE(金钻趋势>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;

STICKLINE(金钻趋势>HIGH,HIGH,LOW,0,0),COLORYELLOW;

VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);

回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));

XG:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;

DRAWTEXT(XG,H,'买▲入'),COLORRED;

JJ:=(HIGH+LOW+CLOSE)/3;

QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);

QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));

QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));

QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));

QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));

DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;

V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);

V5:=SMA(V2*120/FROMOPEN*5,2,1);

V10:=SMA(V5,5,1);

V20:=SMA(V10,5,1);

DY:=CURRBARSCOUNT=1 AND C<REF(C,1);

DY2:=REF(V2,1)-DY;

XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;

DRAWTEXT(XG2 AND L<金钻趋势,L,'金钻起涨'),COLORMAGENTA;

{开口擒龙}

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

VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;

VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;

VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;

VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;

VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;

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

DRAWBAND(VAR1,RGB(255,255,0),VAR6,RGB(255,0,0));

下跌:IF(VAR1=VAR6,VAR6,DRAWNULL),COLORGREEN;

TJ1:=VOL=HHV(VOL,10)AND VOL>2*REF(VOL,1)AND CLOSE>VAR1;

{倍量柱成立分析}

短趋:= (8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;

中趋:=(LLV(短趋,2)+LLV(短趋,4)+LLV(短趋,6))/3;

{STICKLINE(C>中趋,短趋,中趋,1,0),COLORYELLOW;}

TTJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>短趋;

立桩量:=FILTER(TTJ1,5);

TTJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0)));

突破:=TTJ2=1;

TTJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0)));

三天法则:=TTJ3=1;

成立:=三天法则 AND 突破;

条件成立:=FILTER(成立,3);

DRAWICON(条件成立,L*0.98,1);

DRAWTEXT(条件成立,L*0.998,'将军柱'),COLORYELLOW;{立庄成立}

{45度角上涨}

X1:=(C+L+H)/3;

BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;

EMA8:=EMA(C,8);

DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),

EMA8,'∠45升'),COLORWHITE;

{绝密买点}

A81:=EMA(C,3),COLORWHITE;

A82:=EMA(C,5),COLORYELLOW;

A83:=EMA(C,7),COLORMAGENTA;

A84:=EMA(C,12),COLORGREEN;

A85:=EMA(C,20),COLORRED;

A86:=EMA(C,50),COLORBLUE,LINETHICK2;

SS8:=CROSS(A81,A85) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 ;

SSS8:=CROSS(A81,A85) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018;

DRAWICON(SS8 ,L,23);

DRAWTEXT(SS8,L*0.99,'绝密买点'),COLORYELLOW;

Y:=(MA(C,5)-MA(C,30))/MA(C,5)*100;

YY1:=C>MA(C,5) AND OPEN<MA(C,5);{龙出海}

YY3:=C>MA(C,10) AND OPEN<MA(C,10);

YY5:=C>MA(C,30) AND OPEN<MA(C,30);

DRAWTEXT(YY1 AND YY5 AND YY3,H,'龙出大海'),COLORRED;

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

X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;

主力:EMA(X,13),COLORFF00FF,LINETHICK0;}

MA1:=MA(CLOSE,24),COLOR00E300,LINETHICK1;

V02:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);

STICKLINE(V02>=1,O,C,2,0),COLORMAGENTA;

MA13:=MA(CLOSE,13);

A1:=MIN(O,C);

B1:=ABS(O-C);

T1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);

STICKLINE(T1,A1,A1+B1/4,2,0),COLOR007575;

STICKLINE(T1,A1+B1/4,A1+B1/2,2,0),COLORFF0000;

STICKLINE(T1,A1+B1/2,A1+B1*3/4,2,0),COLOR007575;

STICKLINE(T1,A1+B1*3/4,A1+B1,2,0),COLORFF0000;

LC:=REF(CLOSE,1);

RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);

FF:=EMA(CLOSE,3);

MA15:=EMA(CLOSE,21);

DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),'底背离'),COLORA6E500;

DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),'顶背离'),COLOR1880FF;

STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),COLOR7F017F;

STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),COLORGREEN;

T2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI);

DRAWTEXT(T2,H*1.05,'反转'),COLORWHITE;

STICKLINE(T2,O,C,2,0),COLORRED;

A23:=((C + L) + H) / 3;

A24:=EMA(A23,6);

A25:=EMA(A24,5);

A26:=CROSS(A24,A25);

DRAWICON(A26,(L/1.01),30),LINETHICK2,COLORMAGENTA;

{连阳公式}

阳涨幅:=4;

阳倍量:=1.5;

单阳:=C>O*(1+阳涨幅/100) AND VOL>REF(VOL,1)*阳倍量;

DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.98,'阳'),COLOR00FFFF;

高不破价:=REF(C,BARSLAST(单阳));

中不破价:=REF((C+L)/2,BARSLAST(单阳));

低不破价:=REF(L,BARSLAST(单阳));

单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价);

STICKLINE(单阳不破,低不破价-低不破价*0.003,低不破价,0.1,0),COLORRED;

DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价*0.98,'1'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价*0.98,'2'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价*0.98,'3'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价*0.98,'4'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价*0.98,'5'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价*0.98,'6'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价*0.98,'7'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价*0.98,'8'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价*0.98,'9'),COLORGREEN;

DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价*0.98,'10'),COLORGREEN;

MA30:=MA(C,30);

支撑价:MA(REF(LLV(C,30),1),2),DOTLINE,COLORFF00FF;

DRAWTEXT(ISLASTBAR,支撑价,'------支撑'),COLORFF00FF;

压力价:MA(REF(HHV(C,30),1),2),DOTLINE,COLORGREEN;

DRAWTEXT(ISLASTBAR,压力价,'------压力'),COLORGREEN;

短买:MA(REF(LLV(C,3),1),2),DOTLINE,COLORRED;

DRAWTEXT(ISLASTBAR,短买,'------短买'),COLORRED;

{突破盘整}

W1:=C=HHV(C,20);

W2:=BARSLAST(W1);

W3:=IF(W2>0,REF(C,W2),REF(C,W2));

W4:=CROSS(C,REF(W3,1));

突破盘整:=W4 AND COUNT(W4,5)=1;

DRAWTEXT(突破盘整>0,C*0.99,'突破盘整'),COLORWHITE;

{量能平台}

N1:=10;

TK:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;

量能平台:=IF(CURRBARSCOUNT<=N1+3,CONST(IF(TK=0,C,REF(C,TK))),DRAWNULL),COLORGRAY,LINETHICK1,NODRAW;

NOTEXT_新量能点:IF(CURRBARSCOUNT=TK+1,量能平台,DRAWNULL),CIRCLEDOT,COLOR00FFFF,LINETHICK9;

DRAWTEXT(ISLASTBAR,量能平台,' 量能平台'),COLORGRAY;

{关键位预测}

关键位:REFDATE((MA(C,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,DATE),DOTLINE,COLOR999999,LINETHICK1;

DRAWTEXT(ISLASTBAR,关键位,STRCAT('【关键位: ',STRCAT(CON2STR(关键位,2),' 元】'))),COLOR00FFFF;

{海底捞月主图公式}

VARC:=HIGH>LOW*1.0505;

HDLY1:=OPEN/HHV(CLOSE,30)<0.78 AND OPEN=LLV(OPEN,30);

HDLY2:=CLOSE>REF(CLOSE,1)*1.005;

HDLY:=HDLY1 AND HDLY2 AND COUNT(VARC,5)>1;

DRAWICON(HDLY,LOW*0.95,30);

DRAWTEXT(HDLY,LOW*0.98,'海底'),COLORYELLOW;

DRAWKLINE(H,O,L,C);

{短线滚动交易}

DRAWTEXT_FIX(1,0,0.06,0,'【莸利比例】'),COLORWHITE;

DRAWNUMBER_FIX(1,0.3,0.06,0,CONST(WINNER(C )*100)),COLORYELLOW;

SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);

DRAWTEXT_FIX(1,0,0.11,0,'【量能饱和度】')COLORWHITE;

DRAWNUMBER_FIX(1,0.3,0.11,0,CONST(SAT)),COLORYELLOW;

DIF0:=EMA(DCLOSE,12)-EMA(DCLOSE,26);

DEA0:=EMA(DIF0,9);

A0AA:=(DIF0-DEA0)*2*60;

启动:=CROSS(A0AA-REF(A0AA,1),15),COLORRED,LINETHICK2;

DRAWTEXT(启动,L*0.99,'金牛启动'),COLORYELLOW,LINETHICK2;

{补充}

VR1:=1;

VR2:=((((2*CLOSE)+HIGH)+LOW) / 4);

VR4:=LLV(LOW,5);

VR5:=HHV(HIGH,4);

C1:=(EMA((((VR2-VR4)/(VR5-VR4))*100),4)*VR1);

C2:=(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VR1);

BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;

BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;

BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

AA:=IF(BIAS1<=-6,1,0) OR IF (BIAS2<=-10,1,0) OR IF(BIAS3<=-16,1,0);

BB:=AA OR REF(AA,1) OR REF(AA,2);

CC:=CROSS(C1,C2) OR CLOSE>OPEN;

GU:=BB AND CC;

抄底:=GU AND (C<金钻趋势 OR O<金钻趋势);

DRAWTEXT(抄底 AND L<金钻趋势,O,'抄底'),COLORMAGENTA;

{铁底出现}

指标条件1:="DMI.PDI"(12,6);

指标条件2:="DMI.MDI"(12,6);

指标条件3:=指标条件1>65 AND 指标条件1>REF(指标条件1,1);

指标条件4:=LLV(指标条件1,0);

指标条件5:=BARSLAST(指标条件4=指标条件1);

指标条件6:=(0-REF(指标条件2,4))/(指标条件4-REF(指标条件2,指标条件5))>2;

指标条件7:=指标条件1>REF(指标条件1,1);

指标条件8:=VOL>2*MA(VOL,30);

指标条件9:="DMI.ADX"(12,6);

指标条件A:="DMI.ADXR"(12,6);

指标条件B:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04;

指标条件C:=MA(CLOSE,30)>REF(MA(CLOSE,30),1);

指标条件D:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5)));

指标条件F:=TROUGHBARS(3,15,1)<4;

指标条件10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2);

指标条件11:=IF(指标条件F=1,50,0);

指标条件12:=CROSS(指标条件2,指标条件1) AND CROSS(指标条件A,指标条件9);

指标条件13:=CROSS(指标条件2,指标条件1) AND CROSS(指标条件9,指标条件A);

指标条件14:=指标条件B AND 指标条件C AND 指标条件D AND 指标条件10 AND 指标条件6 AND 指标条件7 AND 指标条件8*50;

指标条件15:=BARSLAST(CROSS(指标条件2,指标条件1)=1);

指标条件16:=BARSLAST(CROSS(指标条件1,指标条件2)=1);

指标条件17:=HHV(指标条件1,指标条件16);

指标条件18:=BARSLAST(指标条件1=指标条件17);

阴阳:=EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORWHITE;

STICKLINE(FILTER(指标条件F=1,5) AND 阴阳<-10,O,C,1,0),COLORRED;

STICKLINE(FILTER(指标条件F=1,5),C,O,1,0),COLORRED;

指标条件19:=指标条件3 OR 指标条件12 OR 指标条件13*100;

指标条件1A:=指标条件13*100;

DRAWICON(FILTER(指标条件F=1,3),L,1);

DRAWTEXT(FILTER(指标条件F=1,3),L,'铁底出现'),COLORYELLOW;

发表于 2023-11-18 22:42 | 显示全部楼层
感谢班长请问如何使用,是主图还是附图
回复

使用道具 举报

发表于 2023-11-20 06:51 | 显示全部楼层
平衡线:EMA(C,8);

高X价格:=FINDHIGH(H,高X-1,1,1),NODRAW;
低X价格:=FINDHIGH(L,低X-1,1,1),NODRAW;
次低X价格:=FINDHIGH(L,次低X-1,1,1),NODRAW;

XC1:=CONST(高X价格/SQRT(SQRT(高X价格/低X价格)));
XC2:=CONST(高X价格/SQRT(高X价格/低X价格));
XC3:=CONST(高X价格/(SQRT(高X价格/低X价格)+SQRT(SQRT(高X价格/低X价格))-1));
W1:=5;
STICKLINE(CURRBARSCOUNT=高X ,H,XC3,0,-1),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=高X+W1,XC1,VARCAT('C1: ',CON2STR(XC1,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=高X+W1,XC2,VARCAT('C2: ',CON2STR(XC2,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=高X+W1,XC3,VARCAT('C3: ',CON2STR(XC3,2))),COLORYELLOW;
NOTEXT支1:IF(CURRBARSCOUNT<=高X AND CURRBARSCOUNT>=次低X,XC1,DRAWNULL)DOTLINE,COLORCYAN;
NOTEXT支2:IF(CURRBARSCOUNT<=高X AND CURRBARSCOUNT>=次低X,XC2,DRAWNULL)DOTLINE,COLORCYAN;
NOTEXT支3:IF(CURRBARSCOUNT<=高X AND CURRBARSCOUNT>=次低X,XC3,DRAWNULL)DOTLINE,COLORCYAN;
NOTEXT八RAWLINE(CURRBARSCOUNT=低X,L,CURRBARSCOUNT=高X,H,0),DOTLINE,COLORMAGENTA,LINETHICK2;
NOTEXT支撑1:XC1,NODRAW,COLORMAGENTA;
NOTEXT支撑2:XC2,NODRAW,COLORMAGENTA;
NOTEXT支撑3:XC3,NODRAW,COLORMAGENTA;
XD1:=CONST(次低X价格*SQRT(SQRT(高X价格/低X价格)));
XD2:=CONST(次低X价格*SQRT(高X价格/低X价格));
XD3:=CONST(低X价格*((高X价格/低X价格)+(高X价格/次低X价格)-1));
XD4:=CONST(低X价格*(2*(高X价格/低X价格)-1));
XD5:=CONST(次低X价格*((高X价格/低X价格)+(高X价格/次低X价格)-1));
XD6:=CONST((低X价格*((高X价格/低X价格)*2-1))-(SQRT(高X价格*低X价格)-(高X价格/(SQRT(SQRT(高X价格/低X价格))+SQRT(高X价格/低X价格)-1))));{D1}
XD7:=CONST((低X价格*((高X价格/低X价格)*2-1))+(SQRT(高X价格*SQRT(高X价格*低X价格))-SQRT(高X价格*低X价格)));{D3}

D1:XD6,NODRAW,COLORCYAN;
D2:XD4,NODRAW,COLORCYAN;
D3:XD7,NODRAW,COLORCYAN;

W:=3;
STICKLINE(CURRBARSCOUNT=次低X ,L,XD7,0,-1),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=次低X+W,XD4,VARCAT('D2: ',CON2STR(XD4,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=次低X+W,XD6,VARCAT('D1: ',CON2STR(XD6,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=次低X+W,XD7,VARCAT('D3: ',CON2STR(XD7,2))),COLORYELLOW;




NOTEXT四:IF(CURRBARSCOUNT<=次低X,XD4,DRAWNULL)DOTLINE,COLORMAGENTA;
NOTEXT五:IF(CURRBARSCOUNT<=次低X,XD6,DRAWNULL)DOTLINE,COLORMAGENTA;
NOTEXT六:IF(CURRBARSCOUNT<=次低X,XD7,DRAWNULL)DOTLINE,COLORMAGENTA;

NOTEXT九RAWLINE(CURRBARSCOUNT=次低X,L,ISLASTBAR,XD7,0),DOTLINE,COLORMAGENTA,LINETHICK1;
NOTEXT十RAWLINE(CURRBARSCOUNT=高X,H,CURRBARSCOUNT=次低X,L,0),DOTLINE,COLORMAGENTA,LINETHICK2;


{MACD}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD1:=(DIF-DEA)*2;
{上一MACD周期从金叉到死叉股价形成的实体最高价画线}
T1:=CONST(SUMBARS(CROSS(DIF,DEA),2));
T2:=BARSLAST(CROSS(DEA,DIF));
HH:=FINDHIGH(MAX(C,O),T2,T1-T2,1);
JZX:=CONST(FINDHIGHBARS(MAX(C,O),T2,T1-T2,1));



{上一MACD周期从死叉到金叉股价形成的实体最低价画线}
P1:=CONST(SUMBARS(CROSS(DEA,DIF),2));
P2:=BARSLAST(CROSS(DIF,DEA));
LL:=FINDLOW(MIN(C,O),P2,P1-P2,1);
PJZX:=CONST(FINDLOWBARS(MAX(C,O),P2,P1-P2,1));

{300日内60日前实体最高}
T:=CONST(FINDHIGHBARS(H,60,300,1));
HHH:=CONST(FINDHIGH(H,60,300,1));

DRAWTEXT(CURRBARSCOUNT=T+1,H,VARCAT('压力:',VAR2STR(HHH,2))),DRAWABOVE,COLORYELLOW;




{拐点定位,最新笔}
DDYXA:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
DDYXB:=BACKSET(DDYXA=0 AND REF(DDYXA,1)=1,2);
DDYXC:=IF(DDYXB=1 AND REF(DDYXB,1)=0,-1,0);
GDYXA:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
GDYXB:=BACKSET(GDYXA=0 AND REF(GDYXA,1)=1,2);
GDYXC:=IF(GDYXB=1 AND REF(GDYXB,1)=0,1,0);
QKPD:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
JXGT:=BARSLAST(GDYXC=1);
JXDT:=BARSLAST(DDYXC=-1);
XZZQ:=LOWRANGE(L);
DZZQ:=TOPRANGE(H);
DBLAA:=IF(DDYXC=-1 AND REF(JXGT,1)>REF(JXDT,1) AND LLV(L,JXGT+1)<REF(LLV(L,JXGT+1),1),-1,0);
DBLAB:=IF(DDYXC=-1 AND REF(JXGT,1)<=REF(JXDT,1) AND (JXGT>=4 OR LLV(QKPD,JXGT)=-1 OR LLV(L,JXDT+2)<REF(LLV(L,JXDT+1),1)),-1,0);
DBLS:=IF((DBLAA=-1 OR DBLAB=-1) AND L<REF(H,JXGT+1),-1,0);
YP:=IF((JXDT<4 AND HHV(QKPD,JXDT)!=1) OR REF(DBLS,JXDT)=0,1,0);
PD:=IF(GDYXC=1 AND REF(JXDT,1)<=REF(JXGT,1) AND YP=1 AND DZZQ>REF(XZZQ,JXDT+1) AND DZZQ>REF(XZZQ,JXDT) AND DZZQ>REF(DZZQ,JXGT),1,0);
GBLA:=IF(GDYXC=1 AND REF(JXDT,1)>REF(JXGT,1) AND HHV(H,JXDT+1)>REF(HHV(H,JXDT+1),1),1,0);
GBLB:=IF(GDYXC=1 AND REF(JXDT,1)<=REF(JXGT,1) AND REF(DBLS,JXDT)=-1 AND (JXDT>=4 OR HHV(QKPD,JXDT)=1),1,0);
GBL:=IF((GBLA=1 OR GBLB=1 OR PD=1) AND H>REF(L,JXDT+1),1,0);
YPA:=IF((JXGT<4 AND HHV(QKPD,JXGT)!=1) OR REF(GBL,JXGT)=0,1,0);
PDA:=IF(DDYXC=-1 AND REF(JXGT,1)<=REF(JXDT,1) AND YPA=1 AND XZZQ>REF(DZZQ,JXGT+1) AND XZZQ>REF(DZZQ,JXGT) AND XZZQ>REF(XZZQ,JXDT),-1,0);
DBLA:=IF(DDYXC=-1 AND REF(JXGT,1)>REF(JXDT,1) AND LLV(L,JXGT+1)<REF(LLV(L,JXGT+1),1),-1,0);
DBLB:=IF(DDYXC=-1 AND REF(JXGT,1)<=REF(JXDT,1) AND (JXGT>=4 OR LLV(QKPD,JXGT)=-1 OR PDA=-1),-1,0);
DBL:=IF((DBLA=-1 OR DBLB=-1) AND L<REF(H,JXGT+1),-1,0);
JXGTA:=BARSLAST(GBL=1);
JXDTA:=BARSLAST(DBL=-1);
YPX:=IF((JXDTA<4 AND HHV(QKPD,JXDTA)!=1) OR REF(DBL,JXDTA)=0,1,0);
PDX:=IF(GDYXC=1 AND REF(JXDTA,1)<=REF(JXGTA,1) AND YPX=1 AND DZZQ>REF(XZZQ,JXDTA+1) AND DZZQ>REF(XZZQ,JXDTA) AND DZZQ>REF(DZZQ,JXGTA),1,0);
GBLXA:=IF(GDYXC=1 AND REF(JXDTA,1)>REF(JXGTA,1) AND HHV(H,JXDTA+1)>REF(HHV(H,JXDTA+1),1),1,0);
GBLXB:=IF(GDYXC=1 AND REF(JXDTA,1)<=REF(JXGTA,1) AND REF(DBL,JXDTA)=-1 AND (JXDTA>=4 OR HHV(QKPD,JXDTA)=1),1,0);
GBLX:=IF((GBLXA=1 OR GBLXB=1 OR PDX=1) AND H>REF(L,JXDTA+1),1,0);
YPXA:=IF((JXGTA<4 AND HHV(QKPD,JXGTA)!=1) OR REF(GBLXA,JXGTA)=0,1,0);
PDXA:=IF(DDYXC=-1 AND REF(JXGTA,1)<=REF(JXDTA,1) AND YPXA=1 AND XZZQ>REF(DZZQ,JXGTA+1) AND XZZQ>REF(DZZQ,JXGTA) AND XZZQ>REF(XZZQ,JXDTA),-1,0);
DBLXA:=IF(DDYXC=-1 AND REF(JXGTA,1)>REF(JXDTA,1) AND LLV(L,JXGTA+1)<REF(LLV(L,JXGTA+1),1),-1,0);
DBLXB:=IF(DDYXC=-1 AND REF(JXGTA,1)<=REF(JXDTA,1) AND (JXGTA>=4 OR LLV(QKPD,JXGTA)=-1 OR PDXA=-1),-1,0);
DBLX:=IF((DBLXA=-1 OR DBLXB=-1) AND L<REF(H,JXGTA+1),-1,0);
JXGTYA:=BARSLAST(GBLX=1);
JXDTYA:=BARSLAST(DBLX=-1);
YPYX:=IF((JXDTYA<4 AND HHV(QKPD,JXDTYA)!=1) OR REF(DBLX,JXDTYA)=0,1,0);
PDYX:=IF(GDYXC=1 AND REF(JXDTYA,1)<=REF(JXGTYA,1) AND YPYX=1 AND DZZQ>REF(XZZQ,JXDTYA+1) AND DZZQ>REF(XZZQ,JXDTYA) AND DZZQ>REF(DZZQ,JXGTYA),1,0);
GBLYXA:=IF(GDYXC=1 AND REF(JXDTYA,1)>REF(JXGTYA,1) AND HHV(H,JXDTYA+1)>REF(HHV(H,JXDTYA+1),1),1,0);
GBLYXB:=IF(GDYXC=1 AND REF(JXDTYA,1)<=REF(JXGTYA,1) AND REF(DBLX,JXDTYA)=-1 AND (JXDTYA>=4 OR HHV(QKPD,JXDTYA)=1),1,0);
GBLYX:=IF((GBLYXA=1 OR GBLYXB=1 OR PDYX=1) AND H>REF(L,JXDTYA+1),1,0);
YPYXA:=IF((JXGTYA<4 AND HHV(QKPD,JXGTYA)!=1) OR REF(GBLYXA,JXGTYA)=0,1,0);
PDYXA:=IF(DDYXC=-1 AND REF(JXGTYA,1)<=REF(JXDTYA,1) AND YPYXA=1 AND XZZQ>REF(DZZQ,JXGTYA+1) AND XZZQ>REF(DZZQ,JXGTYA) AND XZZQ>REF(XZZQ,JXDTYA),-1,0);
DBLYXA:=IF(DDYXC=-1 AND REF(JXGTYA,1)>REF(JXDTYA,1) AND LLV(L,JXGTYA+1)<REF(LLV(L,JXGTYA+1),1),-1,0);
DBLYXB:=IF(DDYXC=-1 AND REF(JXGTYA,1)<=REF(JXDTYA,1) AND (JXGTYA>=4 OR LLV(QKPD,JXGTYA)=-1 OR PDYXA=-1),-1,0);
DBLYX:=IF((DBLYXA=-1 OR DBLYXB=-1) AND L<REF(H,JXGTYA+1),-1,0);
AAAD:=IF(GBLYX=1 AND DBLYX=-1 AND H>REF(H,REF(JXGTYA,1)+2),1,IF(GBLYX=1 AND DBLYX=-1 AND L<REF(L,REF(JXDTYA,1)+2),-1,0));
JDBL:=IF(AAAD=0,GBLYX+DBLYX,AAAD);
JBZD:=IF(JDBL=-1,L,IF(JDBL=1,H,DRAWNULL)),CIRCLEDOT,COLORYELLOW;
DRAWLINE(JDBL=-1,JBZD,JDBL=1,JBZD,0),DOTLINE,COLOR888888;
DRAWLINE(JDBL=1,JBZD,JDBL=-1,JBZD,0),DOTLINE,COLOR888888;


{高低点K线数}
KXS:=CURRBARSCOUNT,NODRAW;
DRAWNUMBER(JDBL=1,H*1.035,KXS),COLORLIGREEN;
DRAWNUMBER(JDBL=-1,L*0.985,KXS),COLORLIRED;


DRAWTEXT_FIX(ISLASTBAR,0.3,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.4,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,GNBLOCK),COLORYELLOW;
回复

使用道具 举报

发表于 2023-11-20 08:39 | 显示全部楼层
好好学习 天天向上
回复

使用道具 举报

发表于 2024-4-8 15:00 | 显示全部楼层
感谢您的分享,好好学习,天天上涨!2024/4/8
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-5-2 18:53 , Processed in 0.085589 second(s), Total 10, Slave 9 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表