--------------------------拦路虎
{HI开口笑之拦路虎}
J:=C;
A1:=REF(J,0);
价:(A1),COLORDDDDFF,LINETHICK0;
A:=(3C+H+L+O)/6;{AA主升段}
兄:(8A+7REF(A,1)+6REF(A,2)+5REF(A,3)+4REF(A,4)+3REF(A,5)+2REF(A,6)+REF(A,8))/36,
COLORFFFFFF,LINETHICK2;
弟:(LLV(兄,2)+LLV(兄,4)+LLV(兄,6))/3,COLORFFFFFF,LINETHICK2;
VAR2:=(HHV(兄,5)+HHV(兄,10)+HHV(兄,20))/3;
VAR3:=(LLV(兄,5)+LLV(兄,10)+LLV(兄,20))/3;
拦路虎:(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3,POINTDOT,LINETHICK3;
大地:(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3,DRAWNULL,LINETHICK2;
IF(拦路虎>REF(拦路虎,1),拦路虎,DRAWNULL),COLOR000000,LINETHICK0;
IF(拦路虎
IF(拦路虎=REF(拦路虎,1),拦路虎,DRAWNULL),COLOR000000,LINETHICK0;
IF(兄>REF(兄,1),兄,DRAWNULL),COLORFFFFFF,LINETHICK2;
IF(兄
IF(大地>REF(大地,1),大地,DRAWNULL),COLOR2222FF,LINETHICK2;
IF(大地
DRAWTEXT_FIX(ISLASTBAR,0.005,0.10,0,CODE),
COLORF0F0FF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.10,0,STKNAME),
COLORFFFFFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.006,0.20,0,''张口就进封口就出''),COLORFFFFFF,LINETHICK5;
DRAWTEXT_FIX(ISLASTBAR,0.006,0.30,0,''兰线挡头持股天天愁''),COLORFFFFFF,LINETHICK5;
-----------------------------------------
{NB中专线上大专线，N=6}
{KH中专线上大专线，N=613}
中专线:MA(CLOSE,M);
价:=C,LINETHICK0;
A1:=REF(价,N)=HHV(价,210+1);
B1:=FILTER(A1,5);
C1:=BACKSET(B1,5+1);
HD:=FILTER(C1,5);
A2:=REF(价,10)=LLV(价,25+1);
B2:=FILTER(A2,5);
C2:=BACKSET(B2,5+1);
LD:=FILTER(C2,5);
AA:=REF(C,BARSLAST(HD));
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)
T2:=BARSLAST(HD)>BARSLAST(LD)ANDNOT(LD);
地:=IF(T1,AA,AA);
大专线:HHV(地,1),LINETHICK1,COLOR000FEE;
--------------------------------------------------
{布林带25}
六零中轴:MA(CLOSE,N),COLOR00CFFF,LINETHICK2;
收获线:六零中轴+1.3STD(CLOSE,N),COLORFFFFFF;
支撑线:六零中轴-1.5STD(CLOSE,N);
IF(六零中轴
DRAWTEXT_FIX(ISLASTBAR,0.005,0.10,0,CODE),COLOR55DDFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.10,0,STKNAME),COLOR00CCFF,LINETHICK3;
-------{赢在龙头的布林带BOLL}---------------------
MID:=MA(C,N);
VART1:=POW((C-MID),2);
VART2:=MA(VART1,N);
VART3:=SQRT(VART2);
UPPER:=MID+2VART3;
LOWER:=MID-2VART3;
BOLL13:MA(C,10),COLOR22CCFF;
BOLL20:REF(MID,1),COLORFF22FF;
UB:REF(UPPER,1),COLORFFFFFF;
LB:REF(LOWER,1),COLORFFBB00;
-----------------{资金进出解剖}-------------------------------
短线:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)20,LINETHICK0,COLORYELLOW;
中线:=(CLOSE-MA(CLOSE,4))/MA(CLOSE,4)20,LINETHICK0,COLORWHITE;
红柱:SMA(短线,3,1),LINETHICK0,COLOR0000FF;
蓝柱:SMA(中线,3,1),COLORSTICK,COLORFFFF00;
{红柱}
STICKLINE(红柱0,0,红柱,2,0),COLOR0000AA;
STICKLINE(红柱0,0,红柱,2,0),COLOR0000BB;
STICKLINE(红柱0,0,红柱,2,0),COLOR0000CC;
STICKLINE(红柱0,0,红柱,2,0),COLOR0000DD;
STICKLINE(红柱0,0,红柱,2,0),COLOR0000EE;
STICKLINE(红柱0,0,红柱,2,0),COLOR0000FF;
STICKLINE(红柱0,0,红柱,2,0),COLORRED;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLOR0000AA;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLOR0000BB;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLOR0000CC;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLOR0000DD;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLOR0000EE;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLOR0000FF;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,2,0),COLORRED;
STICKLINE(蓝柱0,0,蓝柱,3,0),COLOR0000FF;
STICKLINE(蓝柱0,0,蓝柱,3,0),COLOR0033FF;
STICKLINE(蓝柱0,0,蓝柱,2,0),COLOR0055FF;
STICKLINE(蓝柱0,0,蓝柱,2,0),COLOR0077FF;
STICKLINE(蓝柱0,0,蓝柱,2,0),COLOR0099FF;
STICKLINE(蓝柱0,0,蓝柱,2,0),COLOR00BBFF;
STICKLINE(蓝柱0,0,蓝柱,2,0),COLOR00DDFF;
STICKLINE(蓝柱0,0,蓝柱,1,0),COLOR00FFFF;
{蓝柱}
STICKLINE(红柱>REF(红柱,0)AND红柱<0,0,红柱,3,0),COLORFF0000;
STICKLINE(红柱>REF(红柱,0)AND红柱<0,0,红柱,2,0),COLORFF3300;
STICKLINE(红柱>REF(红柱,0)AND红柱<0,0,红柱,2,0),COLORFF5500;
STICKLINE(红柱>REF(红柱,0)AND红柱<0,0,红柱,2,0),COLORFF7700;
STICKLINE(红柱>REF(红柱,0)AND红柱<0,0,红柱,2,0),COLORFF9900;
STICKLINE(红柱>REF(红柱,1)AND红柱<0,0,红柱,2,0),COLORFFBB00;
STICKLINE(红柱>REF(红柱,1)AND红柱<0,0,红柱,2,0),COLORFFDD00;
STICKLINE(红柱>REF(红柱,1)AND红柱<0,0,红柱,1,0),COLORFFFF00;
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(红柱
STICKLINE(蓝柱>REF(蓝柱,1)AND蓝柱<0,0,蓝柱,3,0),COLOR998800;
STICKLINE(蓝柱>REF(蓝柱,1)AND蓝柱<0,0,蓝柱,3,0),COLORBBAA90;
STICKLINE(蓝柱>REF(蓝柱,1)AND蓝柱<0,0,蓝柱,2,0),COLORDDCC99;
STICKLINE(蓝柱>REF(蓝柱,1)AND蓝柱<0,0,蓝柱,1,0),COLORFFEEBB;
{资金进出解剖使用说明：红柱大单资金进入，黄柱部分资金流出，蓝柱出逃，白柱资金打压，上下引线显示资金异动。};
------------------------
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''持有喇叭花砍掉马尾巴''),COLORFF88FF,LINETHICK3;
-----------------------------------------------
DRAWTEXT_FIX(ISLASTBAR,0.005,0.25,0,''一壶清茶-蓝色柱''),COLORFFCC99,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.35,0,''突破阴棒-淡青柱''),COLORFFFF99,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.45,0,''平步青云-淡绿柱''),COLORLIGREEN,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,''直捣老巢-深灰柱''),COLORFFFFCC,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.15,0,''锅顶突破-黄色柱''),COLOR00DDFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.25,0,''蚂蚁上树-绿色柱''),COLORGREEN,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.35,0,''含苞待放-粉红柱''),COLORLIMAGENTA,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.45,0,''幸福一家-深黄柱''),COLOR00CCFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLORFFFFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''船上坐稳跌下船就跑''),COLOR00CCFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.30,0,''张口就进封口就出''),COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.40,0,''不操作黄线下的股票''),COLORFF55FF,LINETHICK2;
--
好汉船:SMA(价,N,2.3),COLORFFFFFF,LINETHICK1;
黄河:SMA(CLOSE,N1,1),COLOR00CCFF,LINETHICK2;
IF(好汉船
IF(黄河
--------------------------------------------
VAR11:=IF(YEAR>=2018ANDMONTH>=1,0,1);
J:=CVAR11;
JJ:=REF(J,0);
价:(JJ),LINETHICK0;
白线:SMA(价,10,1.3),COLORFFFFFF;
黄线:SMA(价,30,2.5),COLOR00FFFF;
红线:SMA(价,60,3),COLOR0055FF;
IF(白线
IF(黄线
IF(红线
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLORFFFFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''船上坐稳跌下船就跑''),COLOR00CCFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.30,0,''乌云在上或减或跑''),COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''张口就进封口就出''),COLORFFFFFF,LINETHICK3;
-----------------
VAR1:=EMA(JJ,N);VAR2:=EMA(JJ,N1);
VAR3:=EMA(JJ,N2);VAR4:=EMA(JJ,N3);
H1A:=(VAR1+VAR2+VAR3+VAR4)/4;
AA1:MA(H1A,5),COLORYELLOW,LINETHICK2;
MA(H1A,6),COLOR3300FF;
MA(H1A,7),COLOR3322FF;
MA(H1A,8),COLOR3344FF;
MA(H1A,9),COLOR3366FF;
MA(H1A,10),COLOR3388FF;
MA(H1A,11),COLOR33AAFF;
MA(H1A,12),COLOR00CCFF,POINTDOT,LINETHICK2;
MA(H1A,15),COLOR33BBFF;
MA(H1A,16),COLOR3399FF;
MA(H1A,17),COLOR3377FF;
MA(H1A,18),COLOR3355FF;
MA(H1A,19),COLOR3333FF;
MA(H1A,20),COLOR3311FF;
MA(H1A,21),COLOR3311FF;
AA2:MA(H1A,22),COLORFFFFFF,LINETHICK2;
IF(AA2
------------------------------------
M8:=MA(C,8);
E10:=EXPMA(C,10);
E13:=EXPMA(C,13);
M21:=MA(C,21),COLOR00CCFF;
M233:=MA(C,233),COLORRED;
ZZT:=C/REF(C,1)>1.095ANDC=H;
ZA:=BARSLASTCOUNT(ZZT);
ZT:=BARSLAST(CROSS(ZA=3,0.5));
ZLL:=REF(L,(ZT+2));
ZTJ:=C
ZAA:=COUNT(ZTJ,ZT+1)=1ANDZTJ;
ZTA:=BARSLAST(ZAA);
ZLT:=BARSLAST(L=LLV(L,ZTA+1));
ZTJ1:=CROSS(C,E10);
ZXG:=COUNT(ZTJ1,ZLT+1)=1ANDZTJ1ANDTOTALBARSCOUNT>200;
STICKLINE(ZXG,0,7,2,0),COLORGRAY;
HA:=M8/M21100;
HTJ:=BARSLASTCOUNT(RANGE(HA,99.9,100.3));
HHB:=MAX(C,O)/MIN(C,O)100-100;
HTJ1:=BARSLASTCOUNT(HHB<2);
HZF:=(HHV(H,5)-LLV(L,5))/LLV(L,5)100;
HDZF:=(H-L)/REF(C,1)100;
HTJ2:=COUNT(MIN(C,O)/L>1.03,5)=0;
HTJ3:=COUNT(H
HTJ4:=C>M233;
HXG:=HTJ>4ANDHTJ1>4ANDHZF<10ANDHTJ2ANDHTJ3ANDHTJ4;
STICKLINE(CROSS(HXG,0.5),0,5,2,0),COLORFFFFFF;
ZF:=(C-REF(C,1))/REF(C,1)100;
TJ:=EVERY(RANGE(ZF,-2.22,2.55),15);
TJ1:=C>OANDC/REF(C,1)>1.03;
TJ2:=COUNT(E13>=REF(E13,1),15);
JD:=(ATAN((E13/REF(E13,15)-1)100)180/3.1415926);
A:=IF(MIN(C,O)>E13,MAX(C,O)/E13100-100,IF(MAX(C,O)
B:=MAX(C,O)/MIN(C,O)100-100;
LL:=LLV(A,15);
HH:=HHV(A,15);
HB:=COUNT(BB>3,15)<2;
XG:=REF(TJ,1)ANDTJ1ANDTJ2>13ANDJD>72ANDREF(LL,1)<1.37ANDREF(HH,1)<11.15;
STICKLINE(XG,0,6,2,0),COLORGREEN;
WT:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1));
C1:=REF(C,WT+1);
C2:=REF(C1,WT+1);
C3:=REF(C2,WT+1);
C4:=REF(C3,WT+1);
C5:=REF(C4,WT+1);
C6:=REF(C5,WT+1);
C7:=REF(C6,WT+1);
C8:=REF(C7,WT+1);
C9:=REF(C8,WT+1);
WM10:=(C+C1+C2+C3+C4+C5+C6+C7+C8+C9)/10;
E20:=EXPMA(C,20);
E120:=EXPMA(C,120);
E250:=EXPMA(C,250);
WA:=MACD.DIF;
WB:=MACD.DEA;
WT1:=BARSLAST(CROSS(WA,WB));
WST:=BARSLAST(CROSS(WB,WA));
WZF:=(HHV(H,110)-LLV(L,110))/LLV(L,110)100;
WTJ:=EVERY(V>REF(V,1),2);
WHH:=MAX(MAX(E20,E120),E250);
WLL:=MIN(MIN(E20,E120),E250);
WNH:=WHH/WLL100-100;
WTJ1:=EVERY(WNH<40,25);
WZZF:=(C-REF(C,10))/REF(C,10)100;
WTJA:=C>WM10;
WXG:=WT1=0ANDWA
STICKLINE(WXG,0,8,2,0),COLORWHITE;
M5:=MA(C,5);
M10:=MA(C,10);
M15:=MA(C,15);
FTJ:=M5>REF(M5,1)ANDM10>REF(M10,1)ANDM15>=REF(M15,10);
FT:=BARSLAST(CROSS(FTJ,0.5));
FTT:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1));
FHH:=MAX(MAX(M5,M10),M15);
FLL:=MIN(MIN(M5,M10),M15);
FNH:=FHH/FLL100-100;
FZZF:=(C-REF(C,FTT+1))/REF(C,FTT+1)100;
FZZF1:=REF(FZZF,FTT+1);
FTJ2:=CROSS(FZZF>20,0.5)ORCROSS(FZZF1>20,0.5);
FJD:=(ATAN((M5/REF(M5,1)-1)100)180/3.1415926);
FTJA:=FZZF1>0ANDFZZF1>0;
FDT:=M10/M15100-100>1ANDH/MAX(C,O)<1.03;
FBL:=MIN(C,O)/M5;
FBL5:=M5/M10100-100;
FXG:=FTJ2ANDC=HHV(C,5)ANDBETWEEN(FT,0,5)ANDFTJAANDFNH<12ANDFDTANDFBL<1.045ANDFBL5<7.2ANDFJD<77.5;
STICKLINE(CROSS(FXG,0.5),0,8,1.5,0),COLORRED;
DTJ:=O>REF(H,1)ANDCREF(V,1);
DTT:=BARSLAST(REF(ZA>1,1)ANDDTJ);
DXG:=COUNT(CROSS(C,REF(H,DTT)),DTT+1)=1ANDCROSS(C,REF(H,DTT));
STICKLINE(DXG,0,9,1.3,0),COLORBLUE;
QT:=BARSLAST(C>REF(C,1)1.095ANDC=H);
QTJ:=(C-REF(C,QT+1))/REF(C,QT+1)100;
QTJ1:=EVERY(C
QTJ2:=COUNT(REF(C,1)/C>1.09,QT)>0ANDREF(C,1)/C>1.09;
QA:=QTJ>-1ANDQTJ1ANDQTJ2;
QTA:=BARSLAST(QA);
QHH:=REF(H,QTA);
QTJ3:=EVERY(MAX(C,O)
QTJ4:=MIN(C,O)QHHANDCOUNT(MIN(C,O)QHH,QTA)=1;
QTJ5:=REF(QTJ3,1)ANDQTA<69ANDIF(C1.007,C>O)ANDIF(CO);
QXG:=QTJ4ANDQTJ5;
STICKLINE(QXG=1,0,10,1.5,0),COLORLICYAN;
DIF:=MACD.DIF;
H300:=HHVBARS(DIF,300);
IA:=BOLL.UB;
IT:=BARSLAST(CROSS(IA>=REF(IA,1),0.5));
E25:=EXPMA(C,25);
IZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),IT+1);
IZFF:=(HHV(H,IT+1)-LLV(L,IT+1))/LLV(L,IT+1)100;
ITJ:=EVERY(MAX(C,O)/IA<1.02,IT+1);
IXL:=(ATAN((E25/REF(E25,IT)-1)100)180/3.1415926);
ITJ1:=CROSS(DIF>=REF(DIF,H300),0.5)ANDIZFF<17ANDIZFANDITJ;
ITJ2:=MIN(C,O)/E25>1.04;
IXG:=ITJ1ANDIXL>75;
STICKLINE(IXG,0,8,2,0)COLORLIGREEN;
LT8:=LLVBARS(L,60);
LTT8:=BARSLAST(CURRBARSCOUNT=CONST(LT8)+1);
HT8:=FINDHIGHBARS(H,LT8+1,60,1);
A8:=DRAWLINE(CURRBARSCOUNT=CONST(HT8)+1,H,ISLASTBAR,REF(H,HT8),0);
TT8:=BARSLAST(CURRBARSCOUNT=CONST(HT8)+1);
AA8:=CROSS(C,CONST(A8));
TJ8:=COUNT(AA8,TT8+1)=1ANDAA8;
TJ18:=COUNT(V
BL8:=TJ18/(TT8+1)100;
XG8:=TJ8ANDTT8>40ANDBL8>70;
XGT8:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(XG8))+1);
ZH8:=REF(H,TT8);
YL8:=REF(L,LTT8);
XC8:=REF(C,XGT8);
YZ8:=(XC8-YL8)/YL8100;
ZBL8:=YZ8/REF(LTT8,XGT8);
XGA8:=XG8ANDZBL8<2.95;
STICKLINE(XGA8,0,10,1.5,0),COLOR00CCFF;
SNH:=E120/E250100-100;
STA:=EVERY(SNH<3ANDE120>E250,20);
STB:=CROSS(E20,MAX(E120,E250));
STC:=MIN(C,O)/E20<1.08;
SXG:=STBANDSTAANDSTC;
STICKLINE(SXG,0,8,2,0),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,''周线走好-白色柱''),COLORWHITE,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.15,0,''周线翻红-红色柱''),COLORRED,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.25,0,''一壶清茶-蓝色柱''),COLORFFBB99,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.35,0,''突破阴棒-淡青柱''),COLORFFFF99,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.45,0,''平步青云-淡绿柱''),COLORLIGREEN,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,''直捣老巢-深灰柱''),COLORFFFFCC,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.15,0,''锅顶突破-黄色柱''),COLOR00DDFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.25,0,''蚂蚁上树-绿色柱''),COLORGREEN,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.35,0,''含苞待放-粉红柱''),COLORLIMAGENTA,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.45,0,''幸福一家-深黄柱''),COLOR00CCFF,LINETHICK3;
----------------------------------------------
{NB阳天地阴DMI分析家n=21}ok
TR:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N,1);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DM1:=SMA(IF(HD>0ANDHD>LD,HD,0),N,1);
DM2:=SMA(IF(LD>0ANDLD>HD,LD,0),N,1);
阳:DM1100/TR,COLOR000FFF;
阴:DM2100/TR,COLORFFBB66;
天:SMA(ABS(阴-阳)/(阴+阳)100,14,1),COLORFFFFFF;
地:(天+REF(天,6))/2,COLORFFBBAA;
----------------------------
{NB阳天地阴DMI阳趋势N=13龙头的}
TR:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N,1);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DM1:=SMA(IF(HD>0ANDHD>LD,HD,0),N,1);
DM2:=SMA(IF(LD>0ANDLD>HD,LD,0),N,1);
阳:DM1100/TR,COLOR000FFF;
阴:DM2100/TR,COLORFFBB66;
天:SMA(ABS(阴-阳)/(阴+阳)100,14,1),COLORFFffFF;
地:(天+REF(天,5))/2,COLOR00CCFF;
换手率:100V/CAPITAL,NULLLINE,COLORFFFFFF;
{NB阳天地阴-DMI中投的}
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF
(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),13);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),13);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),13);
阳:DMP100/MTR,COLOR0055FF;
阴:DMM100/MTR,COLORFFBB88;
天:EXPMEMA(ABS(阴-阳)/(阴+阳)100,6),COLORFFFFFF;
地:EXPMEMA(天,6),COLOR00CCFF;
{另一种DMI。多为阳空为阴趋势线为天}
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
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);
多头线:DMP100/MTR,COLORRED,LINETHICK1;
空头线:DMM100/MTR,COLORGREEN,LINETHICK1;
趋势线:EXPMEMA(ABS(空头线-多头线)/(空头线+多头线)100,6),COLORYELLOW,LINETHICK1;
强弱分界:30,COLORWHITE,DOTLINE,LINETHICK1;
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),P,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.03)AND((HIGH)/(CLOSE)<1.03)AND((多头线-空头线)>10)AND多头线>25AND(趋势线>REF(趋势线,1))AND(VAR3AA>0),91,0);
XG:=(FILTER((VAR4AA>90),P1)),COLORYELLOW;
STICKLINE(XG,30,0,2,0),COLOR000099;
STICKLINE(XG,30,0,1.1,0),COLOR0000BB;
STICKLINE(XG,30,0,1,0),COLOR0000DD;
STICKLINE(XG,30,0,0.9,0),COLOR0000FF;
-----------------------------------------
{HHH湖礁1360}
Var11:=IF(YEAR>=2017ANDMONTH>=1,0,1);
J:=CVar11;
JJ:=REF(J,0);
价:(JJ),LINETHICK0;
十三哥:EMA(CLOSE,13)Var11,COLORFFFBFF;
寿线:EMA(价,M),COLOR00BBFF;
买线:=EMA(价,4);
卖线:=EMA(SLOPE(价,13)10+C,35);
买卖线:=EMA(SLOPE(价,N)10+C,35);
DRAWICON(CROSS(买线,卖线),LOW0.98,4);
DRAWICON(CROSS(买卖线,买线),HIGH1.02,2);
STICKLINE(买线>=卖线,LOW,HIGH,0,0),COLORRED;
STICKLINE(买线>=卖线,CLOSE,OPEN,3,2),COLORRED;
STICKLINE(买线<卖线,LOW,HIGH,0,0),COLORCYAN;
STICKLINE(买线<卖线,CLOSE,OPEN,3,2),COLORCYAN;
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,2.5,0),COLORCYAN;
涨停:=IF(REF(C,1)1.1-C<0.2,1,0);
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLOR00CCFF;
----------------------------------------
大龙居委邮葙
dl84857357@163.com密码；84857357
------------------------------------------------
{凤凰线N=1}
xopen:=(ref(o,1)+ref(c,1))/2;
xclose:=c;xhigh:=max(h,xopen);
xlow:=min(l,xopen);
volality:=ma(xhigh-xlow,8);
阳线:ma(c,5)+volality/2,COLOR000FFF;
阴线:ma(c,5)-volality/2,COLORFFBB66;
bu:=cross(c,阴线);
sel:=cross(阳线,c);
var1:=barslast(bu);
var2:=barslast(sel);
DRAWICON(ref(var1,1)>var2andvar1=0,xlow-0.3,4);
DRAWICON(ref(var2,1)>var1andvar2=0,xhigh+0.3,5),COLORFFFFBB;
买:ref(bu,1)andsel=0,NULLLINE,LINETHICK0;
STICKLINE(xclose>xopenandvar1
STICKLINE(xclose>xopenandvar1
STICKLINE(xclose>xopenandvar1
STICKLINE(xclose<=xopenandvar1
STICKLINE(xclose<=xopenandvar1
STICKLINE(xclose<=xopenandvar1
STICKLINE(xclose<=xopenandvar1>var2,xclose,xopen,5,0),colorgreen;
STICKLINE(xclose<=xopenandvar1>var2,xopen,xhigh,0.5,0),colorgreen;
STICKLINE(xclose<=xopenandvar1>var2,xclose,xlow,0.5,0),colorgreen;
STICKLINE(xclose>xopenandvar1>var2,xclose,xopen,5,0),colorblue;
STICKLINE(xclose>xopenandvar1>var2,xclose,xhigh,0.5,0),colorblue;
STICKLINE(xclose>xopenandvar1>var2,xopen,xlow,0.5,0),colorblue;
---------------------------------------------------------------
STICKLINE(XCLOSE>XOPENANDVAR1
STICKLINE(XCLOSE>XOPENANDVAR1
STICKLINE(XCLOSE>XOPENANDVAR1
STICKLINE(XCLOSE<=XOPENANDVAR1
STICKLINE(XCLOSE<=XOPENANDVAR1
STICKLINE(XCLOSE<=XOPENANDVAR1
STICKLINE(XCLOSE<=XOPENANDVAR1>VAR2,XCLOSE,XOPEN,3,0),COLORGREEN;
STICKLINE(XCLOSE<=XOPENANDVAR1>VAR2,XOPEN,XHIGH,0.5,0),COLORGREEN;
STICKLINE(XCLOSE<=XOPENANDVAR1>VAR2,XCLOSE,XLOW,0.5,0),COLORGREEN;
STICKLINE(XCLOSE>XOPENANDVAR1>VAR2,XCLOSE,XOPEN,3,0),COLOR00FFBB;
STICKLINE(XCLOSE>XOPENANDVAR1>VAR2,XCLOSE,XHIGH,0.5,0),COLOR00FFBB;
STICKLINE(XCLOSE>XOPENANDVAR1>VAR2,XOPEN,XLOW,0.5,0),COLOR00FFBB;
----------------十三线战法网-----------------------------
VAR11:=IF(YEAR>=2018ANDMONTH>=1,0,1);
J:=CVAR11;
价:(J),LINETHICK0;
十三伯:MA(C,13),COLORFFFFFF;
六十黄:MA(价,60),COLOR00FFFF;
百二兰:MA(价,120),COLOR0055FF;
二百红:MA(价,200),COLOR0055FF;
--------------------
{石三骑牛}
石三:MA(CLOSE,M);
黄牛线:MA(CLOSE,M1),LINETHICK2,COLOR00CCFF;
IF(黄牛线
{SMA不过黄河非好汉N=13，N1=60}
VAR11:=IF(YEAR>=2017ANDMONTH>=1,0,1);
J:=CVAR11;
JJ:=REF(J,0);
价:(JJ),LINETHICK0;
好汉船:SMA(价,N,2.3),COLORFFFFFF,LINETHICK1;
黄河:SMA(CLOSE,N1,1),COLOR00CCFF,LINETHICK2;
IF(好汉船
IF(黄河
A1:=REF(C,10)=HHV(C,210+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(C,10)=LLV(C,210+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
T1:=BARSLAST(HD)
乌云压顶:IF(T1,A,A),COLORFBFF66,POINTDOT;
STICKLINE(T1,A,A,9,0),COLORFBFF66,LINETHICK1;
HM:=ZIG(3,13);
DRAWTEXT((REF(HM,2)
STICKLINE((REF(HM,2)
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLOR00CFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.20,0,''船上坐稳跌下船就跑''),COLORCCFFBB,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.30,0,''乌云在上或减或跑''),COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.40,0,''不操作黄线下的股票''),COLOR00FFFF,LINETHICK2;
{该模型为示范模型,仅用于说明算法语法,用户需根据自己交易经验修改后
再实际应用。NN=9}
RSV:=(CLOSE-LLV(LOW,NN))/(HHV(HIGH,NN)-LLV(LOW,NN))100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3K-2D;
平空开多:=CROSS(J,0);
平多开空:=CROSS(100,J);
BUYSHORT_BUY(平空开多,LOW);
SELL_SELLSHORT(平多开空,HIGH);
AUTOFILTER;
-------------------------
RSV:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18N))100;
K:SMA(RSV,3,1),COLORFF55FF;
D:SMA(K,3,1);
J:3K-2D,COLORFFFFFF;
{BOLL寿星为黄}
寿星为黄:MA(CLOSE,N),COLOR00CFFF,LINETHICK2;
上留下减:寿星为黄+1.3STD(CLOSE,N),COLORFFFFFF;
支撑线:寿星为黄-1.5STD(CLOSE,N);
IF(寿星为黄
DRAWTEXT_FIX(ISLASTBAR,0.005,0.10,0,CODE),
COLOR55DDFF,LINETHICK3;{股代码}
DRAWTEXT_FIX(ISLASTBAR,0.10,0.10,0,STKNAME),
COLOR00CCFF,LINETHICK3;{股名}
-------------OK-----------------------------
1,将乖离率BIAS的第一个参数6调成34,第二个参数6不变;
2,绿线为趋势线,当趋势线向下时,停止买入;(或当趋势线走平时不考虑买入)
3,当趋势线向上时,且白线与绿线黄金交叉时是买入信号,
4,当白线与绿线死叉时是最后买出信号;见图:
-------------------
{30分K图T+0P1=7216688}
MA1:MA(CLOSE,P1),PRECIS2;
MA2:MA(CLOSE,P2),PRECIS2,COLORFFFF66,LINETHICK2;;
MA3:MA(CLOSE,P3),PRECIS2,COLOR00FFFF;
MA4:MA(CLOSE,P4),PRECIS2,COLOR0022FF,LINETHICK2;
DRAWTEXTABS(15,15,''在黄红线上行时，''),COLOR00FFFF,LINETHICK3;
DRAWTEXTABS(15,40,''白兰黄红多排时''),COLOR00AAFF,LINETHICK3;
DRAWTEXTABS(2,65,''30分时；白上兰进持白下兰全出''),COLORFF66FF,LINETHICK3;
DRAWTEXTABS(10,90,''日线：白上兰进持白下兰减仓''),COLOR00FFFF,LINETHICK3;
DRAWTEXTABS(10,115,''白下黄红必清仓''),COLOR00FFFF,LINETHICK3;
-------------------------------------
{均线粘合选牛股}
VAR11:=IF(YEAR>=2018ANDMONTH>=1,0,1);
J:=CVAR11;
JJ:=REF(J,0);
价:(JJ),LINETHICK0;
EMA8:=EMA(C,8);
EMA13:EMA(C,13),COLORFFCCCC;
EMA21:EMA(C,21),COLORFFFFFF;
EMA34:EMA(C,34),COLORYELLOW;
EMA55:EMA(C,55),COLORFFCC66;
EMA89:EMA(C,89),COLORBLUE;
F1:=EMA13-EMA21<130/1000ANDEMA13-EMA34<230/1000ANDEMA13-EMA55<330/1000;
F2:=EMA21-EMA13<130/1000ANDEMA21-EMA34<230/1000ANDEMA21-EMA55<330/1000;
F3:=EMA34-EMA13<130/1000ANDEMA34-EMA21<230/1000ANDEMA34-EMA55<330/1000;
F4:=EMA55-EMA13<130/1000ANDEMA55-EMA21<230/1000ANDEMA55-EMA34<330/1000;
F5:=EMA13-EMA21<100/1000ANDEMA13-EMA34<200/1000;
FF1:=F1ANDF2ANDF3ANDF4ANDCROSS(EMA13,EMA21);
FF2:=F1ANDF2ANDF3ANDF4ANDCROSS(EMA(C,13),EMA13);
FF3:=F5ANDC>EMA89ANDCROSS(EMA13,EMA21);
G1:=EMA21-EMA34<220/1000ANDEMA21-EMA34<320/1000ANDEMA21-EMA89<420/1000;
G2:=EMA34-EMA13<220/1000ANDEMA34-EMA21<320/1000ANDEMA34-EMA89<420/1000;
G3:=EMA55-EMA21<220/1000ANDEMA55-EMA34<320/1000ANDEMA55-EMA89<420/1000;
G4:=EMA89-EMA21<220/1000ANDEMA89-EMA34<320/1000ANDEMA89-EMA55<420/1000;
GG1:=G1ANDG2ANDG3ANDG4ANDCROSS(EMA89,EMA13)VAR11;
GG2:=G1ANDG2ANDG3ANDG4ANDCROSS(EMA13,EMA21)VAR11;
DRAWICON(FF1ORFF2ORFF3ORGG1ORGG2,L-0.5,1)VAR11;
-----------------------------
{MACDN:=0.2;}
白箭:SUMBARS(CROSS(0,"MACD.DEA"),1)-SUMBARS(CROSS("MACD.DEA",0),1)>60
ANDBARSLAST("MACD.DEA"<0)>0ANDCROSS("MACD.DIF","MACD.DEA")
AND"MACD.DEA"<0.1;
红箭:SUMBARS(CROSS(0,"MACD.DEA"),2)-SUMBARS(CROSS("MACD.DEA",0),1)>60
ANDBARSLAST("MACD.DEA"<0)>0ANDCROSS("MACD.DIF","MACD.DEA")
AND"MACD.DEA"<0.2,COLOR0022FF;
DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)2,COLORSTICK;
{该模型为示范模型,仅用于说明算法语法,用户需根据自己交易经验
修改后再实际应用}
DIFF:=EMA(CLOSE,5)-EMA(CLOSE,20);
DEA:=EMA(DIFF,5);
MACD:=2(DIFF-DEA);
平空开多:=CROSS(MACD,0);
平多开空:=CROSS(0,MACD);
BUYSHORT_BUY(平空开多,LOW);
SELL_SELLSHORT(平多开空,HIGH);
AUTOFILTER;
------------------------
----------------
{KH中专上大专，N=6M=13中投公式}
中专线:MA(CLOSE,M),LINETHICK1;
价:=C,LINETHICK0;
A1:=REF(价,N)=HHV(价,210+1);
B1:=FILTER(A1,5);
C1:=BACKSET(B1,5+1);
HD:=FILTER(C1,5);
A2:=REF(价,10)=LLV(价,25+1);
B2:=FILTER(A2,5);
C2:=BACKSET(B2,5+1);
LD:=FILTER(C2,5);
AA:=REF(C,BARSLAST(HD));
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)
T2:=BARSLAST(HD)>BARSLAST(LD)ANDNOT(LD);
地:=IF(T1,AA,AA);
大专线:HHV(地,1),LINETHICK2,COLOR28DD88;
--------------------------------
{KK十三买卖}
VAR11:=IF(YEAR>=2018ANDMONTH>=1,0,1);
J:=CVAR11;
JJ:=REF(J,0);
价:(JJ),LINETHICK0;
十三白:MA(C,N),COLORFFFFFF;
六十黄:MA(价,N1),COLOR00FFFF;
一百二红:MA(价,N2),COLOR0055FF;
二百线:MA(C,N3),COLORFFCFFF;
NA:=5;
GET:=ZIG(3,NA),COLORYELLOW;
EN1:=ZIG(3,5)>REF(ZIG(3,5),1)ANDREF(ZIG(3,5),1)<=REF(ZIG(3,5),2)ANDREF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
EX1:=ZIG(3,5)=REF(ZIG(3,5),2)ANDREF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
PL10:=ZIG(3,10);
EN2:=ZIG(3,10)>REF(ZIG(3,10),1)ANDREF(ZIG(3,10),1)<=REF(ZIG(3,10),2)ANDREF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
EX2:=ZIG(3,10)=REF(ZIG(3,10),2)ANDREF(ZIG(3,10),2)>=REF(ZIG(3,10),3);
PL20:=ZIG(3,20);
EN3:=ZIG(3,20)>REF(ZIG(3,20),1)ANDREF(ZIG(3,20),1)<=REF(ZIG(3,20),2)ANDREF(ZIG(3,20),2)<=REF(ZIG(3,20),3);
EX3:=ZIG(3,20)=REF(ZIG(3,20),2)ANDREF(ZIG(3,20),2)>=REF(ZIG(3,20),3);
VV0:=BARSLAST(PL10
VV1:=BARSLAST(PL10>REF(PL10,1));
VV2:=BARSLAST(PL20
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,VV0),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,VV0),0);
DTJZ5:=IF(PL10
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,VV2),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,VV2),0);
DRAWTEXT(EN2ANDZTJZ5=1,L0.969,''↑''),COLOR2222FF,LINETHICK3;
DRAWTEXT(EN3ANDZTJZ5=1,L0.959,''↑''),COLORFF88FF,LINETHICK3;
DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2,H+0.3,''↓''),COLORFFFFFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.10,0,CODE),COLORF0F0FF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.10,0,STKNAME),COLORFFFFFF,LINETHICK3;
Z1:=STRCAT(DYBLOCK,'''');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,'''');
DRAWTEXT_FIX(ISLASTBAR,0.09,1,0,STRCAT(Z3,GNBLOCK)),COLOR00DDFF,LINETHICK5;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.850,0,CODE),,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.850,0,STKNAME),LINETHICK3;
-----------
DRAWTEXT_FIX(ISLASTBAR,0.02,0.10,0,''文字代码函数在此''),COLOR00CCFF,LINETHICK2;
以下是正确的股代码名称地域概念板块OK的在KK十三买卖
Z1:=STRCAT(DYBLOCK,'''');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,'''');
DRAWTEXT_FIX(ISLASTBAR,0.09,1,0,STRCAT(Z3,GNBLOCK)),COLOR00DDFF,LINETHICK5;
-----DRAWTEXT_FIX(ISLASTBAR,0.02,0.10,0,''文字代码函数在此''),COLOR00CCFF,LINETHICK2;-------------
{MACD}
DRAWTEXT_FIX(ISLASTBAR,0.02,0.005,0,''金进死出坚决执行''),COLORFFFFFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.20,0,''讯号出现次日必办''),COLOR00CCFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.40,0,''高位双叉注意背离''),COLORFFEEBB,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.60,0,''不抱幻想切勿拖拉''),COLORCC33FF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.002,0,''金进死出坚决执行''),COLORFFFFFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.32,0.002,0,''讯号出现次日必办''),COLOR00CCFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.60,0,''高位双叉注意背离''),COLORFFEEBB,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.32,0.60,0,''不抱幻想切勿拖拉''),COLORCC33FF,LINETHICK3;
-----------------OK-------------------
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''白线之上为神仙，之下变穹人''),COLORFFFFFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.20,0,''兰线之上有希望，之下赴黄泉''),COLOR66FF66,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.30,0,''白线平走放心持有''),COLOREE55FF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.40,0,''白线竖起小心下地''),COLOR00CCFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.50,0,''下破白线立即收旗''),COLORFFFF00,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.82,0.985,0,''用15分时T+0''),
COLOR00FFFF,LINETHICK5;
------------------------
DRAWTEXT_FIX(ISLASTBAR,0,0,0,CODE),COLORFF55FF,LINETHICK2;代码
DRAWTEXT_FIX(ISLASTBAR,0,0.5,0.0,STKNAME),COLORFF55FF,LINETHICK2;名称
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLOR00CFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.20,0,''船上坐稳跌下船就跑''),COLORCCFFBB,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.30,0,''乌云在上或减或跑''),COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.40,0,''不操作黄线下的股票''),COLOR00FFFF,LINETHICK2;
以上是代码板块
-------------------------------
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))100;
K:SMA(RSV,M1,1);
D:SMA(K,M2,1);
J:3K-2D;
DRAWTEXT_FIX(ISLASTBAR,0.05,0.02,0,''持有喇叭花砍掉马尾巴''),COLORFF88FF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.35,0.02,0,''喜看峰峰高峰峰低不妙''),COLORFFFFCC,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLORFFFFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''船上坐稳跌下船就跑''),
COLOR00CCFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.30,0,''乌云在上或减或跑''),
COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.40,0,''不操作黄线下的股票''),
COLORFF55FF,LINETHICK2;
-----------------------------------------------
{HI开口笑彩线}
J:=C;
A1:=REF(J,0);
价:(A1),COLORDDDDFF,LINETHICK0;
A:=(3C+H+L+O)/6;{AA主升段}
兄:(8A+7REF(A,1)+6REF(A,2)+5REF(A,3)+4REF(A,4)+3REF(A,5)+2REF(A,6)+REF(A,8))/36,
COLORFFFFFF,LINETHICK2;
弟:(LLV(兄,2)+LLV(兄,4)+LLV(兄,6))/3,COLORFFFFFF,LINETHICK2;
VAR2:=(HHV(兄,5)+HHV(兄,10)+HHV(兄,20))/3;
VAR3:=(LLV(兄,5)+LLV(兄,10)+LLV(兄,20))/3;
VAR4:(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
大地:(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3,DRAWNULL,LINETHICK2;
IF(VAR4>REF(VAR4,1),VAR4,DRAWNULL),COLORFFFFFF,LINETHICK2;{彩线}
IF(VAR4
IF(VAR4=REF(VAR4,1),VAR4,DRAWNULL),COLOR000000,LINETHICK0,POINTDOT;
IF(兄>REF(兄,1),兄,DRAWNULL),COLORFFFFFF,LINETHICK2;
IF(兄
IF(大地>REF(大地,1),大地,DRAWNULL),COLOR2222FF,LINETHICK2;
IF(大地
Z1:=STRCAT(DYBLOCK,'''');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,'''');
DRAWTEXT_FIX(ISLASTBAR,0.09,1,0,STRCAT
(Z3,GNBLOCK)),COLOR00DDFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,STKNAME),COLORFFFFFF,LINETHICK2;
------------------------------------------------------
{MACD}
DRAWTEXT_FIX(ISLASTBAR,0.02,0.10,0,''金进死出坚决执行''),COLORFFFFFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.20,0,''讯号出现次日必办''),COLOR00CCFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.30,0,''高位双叉注意背离''),COLORFFEEBB,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.40,0,''不抱幻想切勿拖拉''),COLORCC33FF,LINETHICK3;
---------------------------------
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLORFFFFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''船上坐稳跌下船就跑''),COLOR00CCFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.30,0,''张口就进封口就出''),COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.40,0,''不操作黄线下的股票''),COLORFF55FF,LINETHICK2;
--下面是画彩色线----------
好汉船:SMA(价,N,2.3),COLORFFFFFF,LINETHICK1;
黄河:SMA(CLOSE,N1,1),COLOR00CCFF,LINETHICK2;
IF(好汉船
IF(黄河
--------------------------------------------
VAR11:=IF(YEAR>=2018ANDMONTH>=1,0,1);
J:=CVAR11;
JJ:=REF(J,0);
价:(JJ),LINETHICK0;
白线:SMA(价,10,1.3),COLORFFFFFF;
黄线:SMA(价,30,2.5),COLOR00FFFF;
红线:SMA(价,60,3),COLOR0055FF;
IF(白线
IF(黄线
IF(红线
DRAWTEXT_FIX(ISLASTBAR,0.0.8,0.10,0,''上船过黄河，不过黄河非好汉''),COLORFFFFFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.20,0,''船上坐稳跌下船就跑''),COLOR00CCFF,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.30,0,''乌云在上或减或跑''),COLORCCFF22,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.1,0.40,0,''张口就进封口就出''),COLORFFFFFF,LINETHICK3;
-----------------
VAR1:=EMA(JJ,N);VAR2:=EMA(JJ,N1);
VAR3:=EMA(JJ,N2);VAR4:=EMA(JJ,N3);
H1A:=(VAR1+VAR2+VAR3+VAR4)/4;
AA1:MA(H1A,5),COLORYELLOW,LINETHICK2;
MA(H1A,6),COLOR3300FF;
MA(H1A,7),COLOR3322FF;
MA(H1A,8),COLOR3344FF;
MA(H1A,9),COLOR3366FF;
MA(H1A,10),COLOR3388FF;
MA(H1A,11),COLOR33AAFF;
MA(H1A,12),COLOR00CCFF,POINTDOT,LINETHICK2;
MA(H1A,15),COLOR33BBFF;
MA(H1A,16),COLOR3399FF;
MA(H1A,17),COLOR3377FF;
MA(H1A,18),COLOR3355FF;
MA(H1A,19),COLOR3333FF;
MA(H1A,20),COLOR3311FF;
MA(H1A,21),COLOR3311FF;
AA2:MA(H1A,22),COLORFFFFFF,LINETHICK2;
IF(AA2
------------------------------------
M8:=MA(C,8);
E10:=EXPMA(C,10);
E13:=EXPMA(C,13);
M21:=MA(C,21),COLOR00CCFF;
M233:=MA(C,233),COLORRED;
ZZT:=C/REF(C,1)>1.095ANDC=H;
ZA:=BARSLASTCOUNT(ZZT);
ZT:=BARSLAST(CROSS(ZA=3,0.5));
ZLL:=REF(L,(ZT+2));
ZTJ:=C
ZAA:=COUNT(ZTJ,ZT+1)=1ANDZTJ;
ZTA:=BARSLAST(ZAA);
ZLT:=BARSLAST(L=LLV(L,ZTA+1));
ZTJ1:=CROSS(C,E10);
ZXG:=COUNT(ZTJ1,ZLT+1)=1ANDZTJ1ANDTOTALBARSCOUNT>200;
STICKLINE(ZXG,0,7,2,0),COLORGRAY;
HA:=M8/M21100;
HTJ:=BARSLASTCOUNT(RANGE(HA,99.9,100.3));
HHB:=MAX(C,O)/MIN(C,O)100-100;
HTJ1:=BARSLASTCOUNT(HHB<2);
HZF:=(HHV(H,5)-LLV(L,5))/LLV(L,5)100;
HDZF:=(H-L)/REF(C,1)100;
HTJ2:=COUNT(MIN(C,O)/L>1.03,5)=0;
HTJ3:=COUNT(H
HTJ4:=C>M233;
HXG:=HTJ>4ANDHTJ1>4ANDHZF<10ANDHTJ2ANDHTJ3ANDHTJ4;
STICKLINE(CROSS(HXG,0.5),0,5,2,0),COLORFFFFFF;
ZF:=(C-REF(C,1))/REF(C,1)100;
TJ:=EVERY(RANGE(ZF,-2.22,2.55),15);
TJ1:=C>OANDC/REF(C,1)>1.03;
TJ2:=COUNT(E13>=REF(E13,1),15);
JD:=(ATAN((E13/REF(E13,15)-1)100)180/3.1415926);
A:=IF(MIN(C,O)>E13,MAX(C,O)/E13100-100,IF(MAX(C,O)
B:=MAX(C,O)/MIN(C,O)100-100;
LL:=LLV(A,15);
HH:=HHV(A,15);
HB:=COUNT(BB>3,15)<2;
XG:=REF(TJ,1)ANDTJ1ANDTJ2>13ANDJD>72ANDREF(LL,1)<1.37ANDREF(HH,1)<11.15;
STICKLINE(XG,0,6,2,0),COLORGREEN;
WT:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1));
C1:=REF(C,WT+1);
C2:=REF(C1,WT+1);
C3:=REF(C2,WT+1);
C4:=REF(C3,WT+1);
C5:=REF(C4,WT+1);
C6:=REF(C5,WT+1);
C7:=REF(C6,WT+1);
C8:=REF(C7,WT+1);
C9:=REF(C8,WT+1);
WM10:=(C+C1+C2+C3+C4+C5+C6+C7+C8+C9)/10;
E20:=EXPMA(C,20);
E120:=EXPMA(C,120);
E250:=EXPMA(C,250);
WA:=MACD.DIF;
WB:=MACD.DEA;
WT1:=BARSLAST(CROSS(WA,WB));
WST:=BARSLAST(CROSS(WB,WA));
WZF:=(HHV(H,110)-LLV(L,110))/LLV(L,110)100;
WTJ:=EVERY(V>REF(V,1),2);
WHH:=MAX(MAX(E20,E120),E250);
WLL:=MIN(MIN(E20,E120),E250);
WNH:=WHH/WLL100-100;
WTJ1:=EVERY(WNH<40,25);
WZZF:=(C-REF(C,10))/REF(C,10)100;
WTJA:=C>WM10;
WXG:=WT1=0ANDWA
STICKLINE(WXG,0,8,2,0),COLORWHITE;
M5:=MA(C,5);
M10:=MA(C,10);
M15:=MA(C,15);
FTJ:=M5>REF(M5,1)ANDM10>REF(M10,1)ANDM15>=REF(M15,10);
FT:=BARSLAST(CROSS(FTJ,0.5));
FTT:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1));
FHH:=MAX(MAX(M5,M10),M15);
FLL:=MIN(MIN(M5,M10),M15);
FNH:=FHH/FLL100-100;
FZZF:=(C-REF(C,FTT+1))/REF(C,FTT+1)100;
FZZF1:=REF(FZZF,FTT+1);
FTJ2:=CROSS(FZZF>20,0.5)ORCROSS(FZZF1>20,0.5);
FJD:=(ATAN((M5/REF(M5,1)-1)100)180/3.1415926);
FTJA:=FZZF1>0ANDFZZF1>0;
FDT:=M10/M15100-100>1ANDH/MAX(C,O)<1.03;
FBL:=MIN(C,O)/M5;
FBL5:=M5/M10100-100;
FXG:=FTJ2ANDC=HHV(C,5)ANDBETWEEN(FT,0,5)ANDFTJAANDFNH<12ANDFDTANDFBL<1.045ANDFBL5<7.2ANDFJD<77.5;
STICKLINE(CROSS(FXG,0.5),0,8,1.5,0),COLORRED;
DTJ:=O>REF(H,1)ANDCREF(V,1);
DTT:=BARSLAST(REF(ZA>1,1)ANDDTJ);
DXG:=COUNT(CROSS(C,REF(H,DTT)),DTT+1)=1ANDCROSS(C,REF(H,DTT));
STICKLINE(DXG,0,9,1.3,0),COLORBLUE;
QT:=BARSLAST(C>REF(C,1)1.095ANDC=H);
QTJ:=(C-REF(C,QT+1))/REF(C,QT+1)100;
QTJ1:=EVERY(C
QTJ2:=COUNT(REF(C,1)/C>1.09,QT)>0ANDREF(C,1)/C>1.09;
QA:=QTJ>-1ANDQTJ1ANDQTJ2;
QTA:=BARSLAST(QA);
QHH:=REF(H,QTA);
QTJ3:=EVERY(MAX(C,O)
QTJ4:=MIN(C,O)QHHANDCOUNT(MIN(C,O)QHH,QTA)=1;
QTJ5:=REF(QTJ3,1)ANDQTA<69ANDIF(C1.007,C>O)ANDIF(CO);
QXG:=QTJ4ANDQTJ5;
STICKLINE(QXG=1,0,10,1.5,0),COLORLICYAN;
DIF:=MACD.DIF;
H300:=HHVBARS(DIF,300);
IA:=BOLL.UB;
IT:=BARSLAST(CROSS(IA>=REF(IA,1),0.5));
E25:=EXPMA(C,25);
IZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),IT+1);
IZFF:=(HHV(H,IT+1)-LLV(L,IT+1))/LLV(L,IT+1)100;
ITJ:=EVERY(MAX(C,O)/IA<1.02,IT+1);
IXL:=(ATAN((E25/REF(E25,IT)-1)100)180/3.1415926);
ITJ1:=CROSS(DIF>=REF(DIF,H300),0.5)ANDIZFF<17ANDIZFANDITJ;
ITJ2:=MIN(C,O)/E25>1.04;
IXG:=ITJ1ANDIXL>75;
STICKLINE(IXG,0,8,2,0)COLORLIGREEN;
LT8:=LLVBARS(L,60);
LTT8:=BARSLAST(CURRBARSCOUNT=CONST(LT8)+1);
HT8:=FINDHIGHBARS(H,LT8+1,60,1);
A8:=DRAWLINE(CURRBARSCOUNT=CONST(HT8)+1,H,ISLASTBAR,REF(H,HT8),0);
TT8:=BARSLAST(CURRBARSCOUNT=CONST(HT8)+1);
AA8:=CROSS(C,CONST(A8));
TJ8:=COUNT(AA8,TT8+1)=1ANDAA8;
TJ18:=COUNT(V
BL8:=TJ18/(TT8+1)100;
XG8:=TJ8ANDTT8>40ANDBL8>70;
XGT8:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(XG8))+1);
ZH8:=REF(H,TT8);
YL8:=REF(L,LTT8);
XC8:=REF(C,XGT8);
YZ8:=(XC8-YL8)/YL8100;
ZBL8:=YZ8/REF(LTT8,XGT8);
XGA8:=XG8ANDZBL8<2.95;
STICKLINE(XGA8,0,10,1.5,0),COLOR00CCFF;
SNH:=E120/E250100-100;
STA:=EVERY(SNH<3ANDE120>E250,20);
STB:=CROSS(E20,MAX(E120,E250));
STC:=MIN(C,O)/E20<1.08;
SXG:=STBANDSTAANDSTC;
STICKLINE(SXG,0,8,2,0),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,''周线走好-白色柱''),COLORWHITE,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.15,0,''周线翻红-红色柱''),COLORRED,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.25,0,''一壶清茶-蓝色柱''),COLORFFBB99,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.35,0,''突破阴棒-淡青柱''),COLORFFFF99,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.45,0,''平步青云-淡绿柱''),COLORLIGREEN,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,''直捣老巢-深灰柱''),COLORFFFFCC,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.15,0,''锅顶突破-黄色柱''),COLOR00DDFF,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.25,0,''蚂蚁上树-绿色柱''),COLORGREEN,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.35,0,''含苞待放-粉红柱''),COLORLIMAGENTA,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.45,0,''幸福一家-深黄柱''),COLOR00CCFF,LINETHICK3; |
|
