老师 这个指标是K线主图还副图上的 如果是主图的画能不能把笑脸和哭脸去掉 只保留文字 谢谢
M1:=36;
M:=13;
N:=100;
M2:=5;
SHORT:=21;
LONG:=44;
MID:=11;
SJTJ:=DATE<331231;
MAH:=(H*18+REF(H,1 ) *17+REF(H,2 ) *16+REF(H,3 ) *15+REF(H,4 ) *14+REF(H,5 ) *13+REF(H,6 ) *12+REF(H,7 ) *11+REF(H,8 ) *10+REF(H,9 ) *9+REF(H,10 ) *8+REF(H,11 ) *7+REF(H,12 ) *6+REF(H,13 ) *5+REF(H,14 ) *4+REF(H,15 ) *3+REF(H,16 ) *2+REF(H,17 ) *1)/171;
MAL:=(L*18+REF(L,1 ) *17+REF(L,2 ) *16+REF(L,3 ) *15+REF(L,4 ) *14+REF(L,5 ) *13+REF(L,6 ) *12+REF(L,7 ) *11+REF(L,8 ) *10+REF(L,9 ) *9+REF(L,10 ) *8+REF(L,11 ) *7+REF(L,12 ) *6+REF(L,13 ) *5+REF(L,14 ) *4+REF(L,15 ) *3+REF(L,16 ) *2+REF(L,17 ) *1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:= SJTJ AND ( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60 ) );
KK:= SJTJ AND ( MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60 ) );
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1 ) );
KK2:=BARSLAST(CROSS(DK1,KK1 ) );
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(HS,REFX1(HHV(H,0 ),10000 ),REFX1(LLV(L,0 ),10000 ),6,0 ),COLOR001050;
STICKLINE(LS,REFX1(HHV(H,0 ),10000 ),REFX1(LLV(L,0 ),10000 ),6,0 ),COLORBLACK;
STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0 ),COLORRED;
STICKLINE(W2>0 AND HS,OPEN,H,0.0,0 ),COLORRED;
STICKLINE(W2>0 AND HS,C,L,0.0,0 ),COLORRED;
STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1 ),COLORRED;
STICKLINE(W2<=0 AND HS,O,L,0.0,0 ),COLORRED;
STICKLINE(W2<=0 AND HS,C,H,0.0,0 ),COLORRED;
STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0 ),COLORGREEN;
STICKLINE(W2>0 AND LS,OPEN,H,0.0,0 ),COLORGREEN;
STICKLINE(W2>0 AND LS,C,L,0.0,0 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,C,H,0.0,0 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,O,L,0.0,0 ),COLORGREEN;
DRAWTEXT(HS=1 AND REF(LS,1 ),LOW*0.985,' ),COLORYELLOW;
DRAWTEXT(LS=1 AND REF(HS,1 ),H*1.009,ཉ' ),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND LS,MAH,MAH,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND HS,MAL,MAL,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND LS,MAH,MAH,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND HS,MAL,MAL,2),COLORYELLOW;
最新价:IF(SJTJ, C,NULL ),LINETHICK1,COLORYELLOW;
趋势线:=(MAH+MAL)/2 ,COLORGREEN,LINETHICK2;
趋势线上升:IF(HS,趋势线,NULL ),LINETHICK2,COLORRED;
趋势线下降:IF(LS,趋势线,NULL ),LINETHICK2,COLORGREEN;
DRAWICON(HS,趋势线*0.995,1);
DRAWICON(LS,趋势线*1.005,2);
DRAWNUMBER1(ISLASTBAR ,C,C,2),COLORWHITE;
AAA:=REFX1(HHV(H,50 ),1000);
PL5:=HHV(H,45);
AZ:=BARSCOUNT(CLOSE);
AH:=HHV(HIGH,200);
AL:=LLV(LOW,200);
B0:=(AH-AL)/40;
BL1:=HIGH+B0;
BL2:=LOW-B0;
STICKLINE((AZ+0)/34=FLOOR((AZ+0)/34 ),BL2,BL2-2*B0,3,0 ),COLORFFFFFF;
DRAWTEXT((AZ+0)/34=FLOOR((AZ+0)/34 ),BL2-2.2*B0,'时间窗' ),COLORFFFFFF;
Y:=(HIGH+LOW)/2;
AO:=MA(Y,5 )-MA(Y,21);
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
劫:IF(TDU3<TUD3,REF(HHV(HIGH,2 ),TDU3 ),REF(LLV(LOW,2 ),TUD3)),LINETHICK2,COLORYELLOW;
WL1:=REVERSE((HHV(HIGH,10 )-CLOSE)/(HHV(HIGH,10 )-LLV(LOW,10)))+1;
TY:=C;
AA1:=REF(TY,10)=HHV(TY,2*10+1);
BB1:=FILTER(AA1,10);
C1:=BACKSET(BB1,10+1);
HD:=FILTER(C1,10);
AA2:=REF(TY,10)=LLV(TY,2*10+1);
BB2:=FILTER(AA2,10);
CC2:=BACKSET(BB2,10+1);
LD:=FILTER(CC2,10);
前期高位:REF(C,BARSLAST(HD)),COLORBLUE,COLORMAGENTA;
STICKLINE(C,前期高位,前期高位,8,0 ),COLORMAGENTA;
前期低位:REF(L,BARSLAST(LD)),COLORFF00FF,LINETHICK1,COLORGREEN;
{非常棒}
EMA13:=EMA(C,13 ),COLORWHITE;
EMA21:=EMA(C,21 ),COLORYELLOW;
EMA34:=EMA(C,34 ),COLORFF00FF;
EMA60:=MA(C,60 ),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=1970 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4 ) *100,4 ) *VAR3;
庄家:=EMA(0.667*REF(散户,1 ) +0.333*散户,2 ) *VAR3;
DRAWTEXT(CROSS(散户,庄家 ) AND 散户<30,L-0.05,'←买' ),COLORRED;
DRAWTEXT(CROSS(庄家,散户 ) AND 散户>70,H+0.05,'←抛' ),COLORGREEN;
DRAWICON(CROSS(散户,庄家 ) AND 散户<30,L-0.05,1);
DRAWICON(CROSS(庄家,散户 ) AND 散户>70,H+0.05,2);
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5 ),5)/EMA(EMA(ABS(VAR9 ),5 ),5);
VARC:=EMA(EMA(VAR9,20 ),20)/EMA(EMA(ABS(VAR9 ),20 ),20);
卖出:=IF(VARA>0 AND CROSS(VARC,VARA ),90,100);
DRAWICON(卖出<0,H+0.05,2);
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21 ) *20+CLOSE,42);
底1:IF(CROSS(买线,卖线 ),L-0.02,NULL ),CIRCLEDOT,LINETHICK3,COLORMAGENTA;
DRAWTEXT(CROSS(买线,卖线 ) AND V/REF(V,1 ) >=2.0,L*0.98,'起爆' ) ,COLORMAGENTA;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
顶:IF(CROSS(80,RSI ) *30,H+0.02,NULL ),CIRCLEDOT,LINETHICK5,COLORYELLOW;
VC:=((CLOSE-MA(CLOSE,6 ) )/MA(CLOSE,6 ) *100+(CLOSE-MA(CLOSE,24 ) )/MA(CLOSE,24 ) *100+(CLOSE-MA (CLOSE,32 ) )/MA(CLOSE,32 ) *100)/3;
顶1:IF(VC>20 AND FILTER(VC< REF(VC,1 ),5 ),H+0.02,NULL ),POINTDOT,LINETHICK7,COLORGREEN;
A0:=(L+H+C*2)/4;
A1B:EMA(A0,14 ),COLORBLUE,LINETHICK2;
A2B:=EMA(A0,25 ),COLORBLUE,LINETHICK2;
A1X:=(A1B-REF(A1B,1 ) )/REF(A1B,1 ) *100,NODRAW;
A2X:=(A2B-REF(A2B,1 ) )/REF(A2B,1 ) *100,NODRAW;
看多:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0 ) )),NULL ),COLORMAGENTA,LINETHICK4;
逃顶:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X ) )),NULL ),COLORCYAN,LINETHICK4;
买入持股:IF(A1X>=0,A1B,NULL ),COLORRED,LINETHICK3;
卖出空仓:IF(A1X<0 AND A2X<0,A1B,NULL ),COLORGREEN,LINETHICK3;
STICKLINE(CROSS(A1X,0 ),H,L,0,0),COLOR9933FF;
STICKLINE(CROSS(A1X,0 ),C,O,2,0),COLOR0000CC;
STICKLINE(CROSS(A1X,0 ),C,O,1,0),COLOR0033FF;
STICKLINE(CROSS(0,A1X ),L,H,0,0),COLOR66CC33;
DIFF :=EMA(CLOSE,7) - EMA(CLOSE,13);
DEA := EMA(DIFF,3);
A1:=BARSLAST(REF(CROSS(DIFF,DEA ),1 ) );
B1:=REF(C,A1+1 ) >C AND REF(DIFF,A1+1 ) <DIFF AND CROSS(DIFF,DEA);
RSV:=(CLOSE-LLV(LOW,18 ) )/(HHV(HIGH,18 )-LLV(LOW,18))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D ),1 ) );
B2:=REF(C,A2+1 ) >C AND REF(K,A2+1 ) <K AND CROSS(K,D);
{KDJ底背离}
RSI1:=SMA(MAX(CLOSE-LC,0 ),7,1)/SMA(ABS(CLOSE-LC ),7,1 ) *100;
RSI2:=SMA(MAX(CLOSE-LC,0 ),14,1)/SMA(ABS(CLOSE-LC ),14,1 ) *100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2 ),1 ) );
B3:=REF(C,A3+1 ) >C AND REF(RSI1,A3+1 ) <RSI1 AND CROSS(RSI1,RSI2);
TYB:=(HIGH + LOW + 2*CLOSE)/4;
CCI4:=(TYB-MA(TYB,28 ) )/(0.015*AVEDEV(TYB,28 ) );
B4:=BARSLAST(NOT(MA(C,5 ) <MA(C,10 ) <=5 ) AND CCI4>REF(CCI4,1 ) AND CROSS(CCI4,-100 ) );
底背离:=((B1 AND B2 ) OR (B2 AND B3 ) OR (B1 AND B3 ) OR ( B4 AND CCI4<-90 ) ) AND D<20 ;
DRAWICON(底背离,(LOW * 0.98 ),1);
DRAWTEXT(底背离,(LOW * 0.97 ),'金底背离' ),COLORYELLOW;
XL1:=(MA(LOW,2 ) * 0.96);
XL2:=(MA(LOW,26 ) * 0.85);
XL3:=(((REF(XL1,1 ) < XL2 ) AND (REF(XL1,1 ) < XL1)) AND (REF(XL1,1 ) < REF(XL1,2)));
DRAWICON(XL3,L*0.99,1);
DRAWTEXT(XL3,L*0.99,'短进' ),COLORYELLOW;
建仓:=CROSS(RSI,11 ),COLORRED;
DRAWICON(建仓,H*1.01,1);
DRAWTEXT(建仓,H*1.02,'建仓' ),COLORRED;
参考:
M1:=36;
M:=13;
N:=100;
M2:=5;
SHORT:=21;
LONG:=44;
MID:=11;
SJTJ:=DATE<331231;
MAH:=(H*18+REF(H,1 ) *17+REF(H,2 ) *16+REF(H,3 ) *15+REF(H,4 ) *14+REF(H,5 ) *13+REF(H,6 ) *12+REF(H,7 ) *11+REF(H,8 ) *10+REF(H,9 ) *9+REF(H,10 ) *8+REF(H,11 ) *7+REF(H,12 ) *6+REF(H,13 ) *5+REF(H,14 ) *4+REF(H,15 ) *3+REF(H,16 ) *2+REF(H,17 ) *1)/171;
MAL:=(L*18+REF(L,1 ) *17+REF(L,2 ) *16+REF(L,3 ) *15+REF(L,4 ) *14+REF(L,5 ) *13+REF(L,6 ) *12+REF(L,7 ) *11+REF(L,8 ) *10+REF(L,9 ) *9+REF(L,10 ) *8+REF(L,11 ) *7+REF(L,12 ) *6+REF(L,13 ) *5+REF(L,14 ) *4+REF(L,15 ) *3+REF(L,16 ) *2+REF(L,17 ) *1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:= SJTJ AND ( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60 ) );
KK:= SJTJ AND ( MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60 ) );
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1 ) );
KK2:=BARSLAST(CROSS(DK1,KK1 ) );
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(HS,REFX1(HHV(H,0 ),10000 ),REFX1(LLV(L,0 ),10000 ),6,0 ),COLOR001050;
STICKLINE(LS,REFX1(HHV(H,0 ),10000 ),REFX1(LLV(L,0 ),10000 ),6,0 ),COLORBLACK;
STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0 ),COLORRED;
STICKLINE(W2>0 AND HS,OPEN,H,0.0,0 ),COLORRED;
STICKLINE(W2>0 AND HS,C,L,0.0,0 ),COLORRED;
STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1 ),COLORRED;
STICKLINE(W2<=0 AND HS,O,L,0.0,0 ),COLORRED;
STICKLINE(W2<=0 AND HS,C,H,0.0,0 ),COLORRED;
STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0 ),COLORGREEN;
STICKLINE(W2>0 AND LS,OPEN,H,0.0,0 ),COLORGREEN;
STICKLINE(W2>0 AND LS,C,L,0.0,0 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,C,H,0.0,0 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,O,L,0.0,0 ),COLORGREEN;
DRAWTEXT(HS=1 AND REF(LS,1 ),LOW*0.985,' ' ),COLORYELLOW;
DRAWTEXT(LS=1 AND REF(HS,1 ),H*1.009,' ' ),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND LS,MAH,MAH,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND HS,MAL,MAL,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND LS,MAH,MAH,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND HS,MAL,MAL,2),COLORYELLOW;
最新价:IF(SJTJ, C,NULL ),LINETHICK1,COLORYELLOW;
趋势线:=(MAH+MAL)/2 ,COLORGREEN,LINETHICK2;
趋势线上升:IF(HS,趋势线,NULL ),LINETHICK2,COLORRED;
趋势线下降:IF(LS,趋势线,NULL ),LINETHICK2,COLORGREEN;
//DRAWICON(HS,趋势线*0.995,1);
//DRAWICON(LS,趋势线*1.005,2);
DRAWNUMBER1(ISLASTBAR ,C,C,2),COLORWHITE;
AAA:=REFX1(HHV(H,50 ),1000);
PL5:=HHV(H,45);
AZ:=BARSCOUNT(CLOSE);
AH:=HHV(HIGH,200);
AL:=LLV(LOW,200);
B0:=(AH-AL)/40;
BL1:=HIGH+B0;
BL2:=LOW-B0;
STICKLINE((AZ+0)/34=FLOOR((AZ+0)/34 ),BL2,BL2-2*B0,3,0 ),COLORFFFFFF;
DRAWTEXT((AZ+0)/34=FLOOR((AZ+0)/34 ),BL2-2.2*B0,'时间窗' ),COLORFFFFFF;
Y:=(HIGH+LOW)/2;
AO:=MA(Y,5 )-MA(Y,21);
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
劫:IF(TDU3<TUD3,REF(HHV(HIGH,2 ),TDU3 ),REF(LLV(LOW,2 ),TUD3)),LINETHICK2,COLORYELLOW;
WL1:=REVERSE((HHV(HIGH,10 )-CLOSE)/(HHV(HIGH,10 )-LLV(LOW,10)))+1;
TY:=C;
AA1:=REF(TY,10)=HHV(TY,2*10+1);
BB1:=FILTER(AA1,10);
C1:=BACKSET(BB1,10+1);
HD:=FILTER(C1,10);
AA2:=REF(TY,10)=LLV(TY,2*10+1);
BB2:=FILTER(AA2,10);
CC2:=BACKSET(BB2,10+1);
LD:=FILTER(CC2,10);
前期高位:REF(C,BARSLAST(HD)),COLORBLUE,COLORMAGENTA;
STICKLINE(C,前期高位,前期高位,8,0 ),COLORMAGENTA;
前期低位:REF(L,BARSLAST(LD)),COLORFF00FF,LINETHICK1,COLORGREEN;
{非常棒}
EMA13:=EMA(C,13 ),COLORWHITE;
EMA21:=EMA(C,21 ),COLORYELLOW;
EMA34:=EMA(C,34 ),COLORFF00FF;
EMA60:=MA(C,60 ),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=1970 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4 ) *100,4 ) *VAR3;
庄家:=EMA(0.667*REF(散户,1 ) +0.333*散户,2 ) *VAR3;
DRAWTEXT(CROSS(散户,庄家 ) AND 散户<30,L-0.05,'←买' ),COLORRED;
DRAWTEXT(CROSS(庄家,散户 ) AND 散户>70,H+0.05,'←抛' ),COLORGREEN;
//DRAWICON(CROSS(散户,庄家 ) AND 散户<30,L-0.05,1);
//DRAWICON(CROSS(庄家,散户 ) AND 散户>70,H+0.05,2);
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5 ),5)/EMA(EMA(ABS(VAR9 ),5 ),5);
VARC:=EMA(EMA(VAR9,20 ),20)/EMA(EMA(ABS(VAR9 ),20 ),20);
卖出:=IF(VARA>0 AND CROSS(VARC,VARA ),90,100);
//DRAWICON(卖出<0,H+0.05,2);
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21 ) *20+CLOSE,42);
底1:IF(CROSS(买线,卖线 ),L-0.02,NULL ),CIRCLEDOT,LINETHICK3,COLORMAGENTA;
DRAWTEXT(CROSS(买线,卖线 ) AND V/REF(V,1 ) >=2.0,L*0.98,'起爆' ) ,COLORMAGENTA;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
顶:IF(CROSS(80,RSI ) *30,H+0.02,NULL ),CIRCLEDOT,LINETHICK5,COLORYELLOW;
VC:=((CLOSE-MA(CLOSE,6 ) )/MA(CLOSE,6 ) *100+(CLOSE-MA(CLOSE,24 ) )/MA(CLOSE,24 ) *100+(CLOSE-MA (CLOSE,32 ) )/MA(CLOSE,32 ) *100)/3;
顶1:IF(VC>20 AND FILTER(VC< REF(VC,1 ),5 ),H+0.02,NULL ),POINTDOT,LINETHICK7,COLORGREEN;
A0:=(L+H+C*2)/4;
A1B:EMA(A0,14 ),COLORBLUE,LINETHICK2;
A2B:=EMA(A0,25 ),COLORBLUE,LINETHICK2;
A1X:=(A1B-REF(A1B,1 ) )/REF(A1B,1 ) *100,NODRAW;
A2X:=(A2B-REF(A2B,1 ) )/REF(A2B,1 ) *100,NODRAW;
看多:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0 ) )),NULL ),COLORMAGENTA,LINETHICK4;
逃顶:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X ) )),NULL ),COLORCYAN,LINETHICK4;
买入持股:IF(A1X>=0,A1B,NULL ),COLORRED,LINETHICK3;
卖出空仓:IF(A1X<0 AND A2X<0,A1B,NULL ),COLORGREEN,LINETHICK3;
STICKLINE(CROSS(A1X,0 ),H,L,0,0),COLOR9933FF;
STICKLINE(CROSS(A1X,0 ),C,O,2,0),COLOR0000CC;
STICKLINE(CROSS(A1X,0 ),C,O,1,0),COLOR0033FF;
STICKLINE(CROSS(0,A1X ),L,H,0,0),COLOR66CC33;
DIFF :=EMA(CLOSE,7) - EMA(CLOSE,13);
DEA := EMA(DIFF,3);
A1:=BARSLAST(REF(CROSS(DIFF,DEA ),1 ) );
B1:=REF(C,A1+1 ) >C AND REF(DIFF,A1+1 ) <DIFF AND CROSS(DIFF,DEA);
RSV:=(CLOSE-LLV(LOW,18 ) )/(HHV(HIGH,18 )-LLV(LOW,18))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D ),1 ) );
B2:=REF(C,A2+1 ) >C AND REF(K,A2+1 ) <K AND CROSS(K,D);
{KDJ底背离}
RSI1:=SMA(MAX(CLOSE-LC,0 ),7,1)/SMA(ABS(CLOSE-LC ),7,1 ) *100;
RSI2:=SMA(MAX(CLOSE-LC,0 ),14,1)/SMA(ABS(CLOSE-LC ),14,1 ) *100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2 ),1 ) );
B3:=REF(C,A3+1 ) >C AND REF(RSI1,A3+1 ) <RSI1 AND CROSS(RSI1,RSI2);
TYB:=(HIGH + LOW + 2*CLOSE)/4;
CCI4:=(TYB-MA(TYB,28 ) )/(0.015*AVEDEV(TYB,28 ) );
B4:=BARSLAST(NOT(MA(C,5 ) <MA(C,10 ) <=5 ) AND CCI4>REF(CCI4,1 ) AND CROSS(CCI4,-100 ) );
底背离:=((B1 AND B2 ) OR (B2 AND B3 ) OR (B1 AND B3 ) OR ( B4 AND CCI4<-90 ) ) AND D<20 ;
DRAWICON(底背离,(LOW * 0.98 ),1);
DRAWTEXT(底背离,(LOW * 0.97 ),'金底背离' ),COLORYELLOW;
XL1:=(MA(LOW,2 ) * 0.96);
XL2:=(MA(LOW,26 ) * 0.85);
XL3:=(((REF(XL1,1 ) < XL2 ) AND (REF(XL1,1 ) < XL1)) AND (REF(XL1,1 ) < REF(XL1,2)));
DRAWICON(XL3,L*0.99,1);
DRAWTEXT(XL3,L*0.99,'短进' ),COLORYELLOW;
建仓:=CROSS(RSI,11 ),COLORRED;
//DRAWICON(建仓,H*1.01,1);
DRAWTEXT(建仓,H*1.02,'建仓' ),COLORRED;
好嘞 麻烦老师了
我的想法是只保留符合条件的文字 其余的全部不要
参考:
M1:=36;
M:=13;
N:=100;
M2:=5;
SHORT:=21;
LONG:=44;
MID:=11;
SJTJ:=DATE<331231;
MAH:=(H*18+REF(H,1 ) *17+REF(H,2 ) *16+REF(H,3 ) *15+REF(H,4 ) *14+REF(H,5 ) *13+REF(H,6 ) *12+REF(H,7 ) *11+REF(H,8 ) *10+REF(H,9 ) *9+REF(H,10 ) *8+REF(H,11 ) *7+REF(H,12 ) *6+REF(H,13 ) *5+REF(H,14 ) *4+REF(H,15 ) *3+REF(H,16 ) *2+REF(H,17 ) *1)/171;
MAL:=(L*18+REF(L,1 ) *17+REF(L,2 ) *16+REF(L,3 ) *15+REF(L,4 ) *14+REF(L,5 ) *13+REF(L,6 ) *12+REF(L,7 ) *11+REF(L,8 ) *10+REF(L,9 ) *9+REF(L,10 ) *8+REF(L,11 ) *7+REF(L,12 ) *6+REF(L,13 ) *5+REF(L,14 ) *4+REF(L,15 ) *3+REF(L,16 ) *2+REF(L,17 ) *1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:= SJTJ AND ( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60 ) );
KK:= SJTJ AND ( MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60 ) );
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1 ) );
KK2:=BARSLAST(CROSS(DK1,KK1 ) );
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
/*STICKLINE(HS,REFX1(HHV(H,0 ),10000 ),REFX1(LLV(L,0 ),10000 ),6,0 ),COLOR001050;
STICKLINE(LS,REFX1(HHV(H,0 ),10000 ),REFX1(LLV(L,0 ),10000 ),6,0 ),COLORBLACK;
STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0 ),COLORRED;
STICKLINE(W2>0 AND HS,OPEN,H,0.0,0 ),COLORRED;
STICKLINE(W2>0 AND HS,C,L,0.0,0 ),COLORRED;
STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1 ),COLORRED;
STICKLINE(W2<=0 AND HS,O,L,0.0,0 ),COLORRED;
STICKLINE(W2<=0 AND HS,C,H,0.0,0 ),COLORRED;
STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0 ),COLORGREEN;
STICKLINE(W2>0 AND LS,OPEN,H,0.0,0 ),COLORGREEN;
STICKLINE(W2>0 AND LS,C,L,0.0,0 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,C,H,0.0,0 ),COLORGREEN;
STICKLINE(W2<=0 AND LS,O,L,0.0,0 ),COLORGREEN;
*/
DRAWTEXT(HS=1 AND REF(LS,1 ),LOW*0.985,' ' ),COLORYELLOW;
DRAWTEXT(LS=1 AND REF(HS,1 ),H*1.009,' ' ),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND LS,MAH,MAH,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND HS,MAL,MAL,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND LS,MAH,MAH,2),COLORYELLOW;
DRAWNUMBER1(ISLASTBAR AND HS,MAL,MAL,2),COLORYELLOW;
最新价:=IF(SJTJ, C,NULL ),LINETHICK1,COLORYELLOW;
趋势线:=(MAH+MAL)/2 ,COLORGREEN,LINETHICK2;
趋势线上升:=IF(HS,趋势线,NULL ),LINETHICK2,COLORRED;
趋势线下降:=IF(LS,趋势线,NULL ),LINETHICK2,COLORGREEN;
//DRAWICON(HS,趋势线*0.995,1);
//DRAWICON(LS,趋势线*1.005,2);
DRAWNUMBER1(ISLASTBAR ,C,C,2),COLORWHITE;
AAA:=REFX1(HHV(H,50 ),1000);
PL5:=HHV(H,45);
AZ:=BARSCOUNT(CLOSE);
AH:=HHV(HIGH,200);
AL:=LLV(LOW,200);
B0:=(AH-AL)/40;
BL1:=HIGH+B0;
BL2:=LOW-B0;
//STICKLINE((AZ+0)/34=FLOOR((AZ+0)/34 ),BL2,BL2-2*B0,3,0 ),COLORFFFFFF;
DRAWTEXT((AZ+0)/34=FLOOR((AZ+0)/34 ),BL2-2.2*B0,'时间窗' ),COLORFFFFFF;
Y:=(HIGH+LOW)/2;
AO:=MA(Y,5 )-MA(Y,21);
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
劫:=IF(TDU3<TUD3,REF(HHV(HIGH,2 ),TDU3 ),REF(LLV(LOW,2 ),TUD3)),LINETHICK2,COLORYELLOW;
WL1:=REVERSE((HHV(HIGH,10 )-CLOSE)/(HHV(HIGH,10 )-LLV(LOW,10)))+1;
TY:=C;
AA1:=REF(TY,10)=HHV(TY,2*10+1);
BB1:=FILTER(AA1,10);
C1:=BACKSET(BB1,10+1);
HD:=FILTER(C1,10);
AA2:=REF(TY,10)=LLV(TY,2*10+1);
BB2:=FILTER(AA2,10);
CC2:=BACKSET(BB2,10+1);
LD:=FILTER(CC2,10);
前期高位:=REF(C,BARSLAST(HD)),COLORBLUE,COLORMAGENTA;
//STICKLINE(C,前期高位,前期高位,8,0 ),COLORMAGENTA;
前期低位:=REF(L,BARSLAST(LD)),COLORFF00FF,LINETHICK1,COLORGREEN;
{非常棒}
EMA13:=EMA(C,13 ),COLORWHITE;
EMA21:=EMA(C,21 ),COLORYELLOW;
EMA34:=EMA(C,34 ),COLORFF00FF;
EMA60:=MA(C,60 ),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=1970 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4 ) *100,4 ) *VAR3;
庄家:=EMA(0.667*REF(散户,1 ) +0.333*散户,2 ) *VAR3;
DRAWTEXT(CROSS(散户,庄家 ) AND 散户<30,L-0.05,'←买' ),COLORRED;
DRAWTEXT(CROSS(庄家,散户 ) AND 散户>70,H+0.05,'←抛' ),COLORGREEN;
//DRAWICON(CROSS(散户,庄家 ) AND 散户<30,L-0.05,1);
//DRAWICON(CROSS(庄家,散户 ) AND 散户>70,H+0.05,2);
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5 ),5)/EMA(EMA(ABS(VAR9 ),5 ),5);
VARC:=EMA(EMA(VAR9,20 ),20)/EMA(EMA(ABS(VAR9 ),20 ),20);
卖出:=IF(VARA>0 AND CROSS(VARC,VARA ),90,100);
//DRAWICON(卖出<0,H+0.05,2);
买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21 ) *20+CLOSE,42);
底1:IF(CROSS(买线,卖线 ),L-0.02,NULL ),CIRCLEDOT,LINETHICK3,COLORMAGENTA;
DRAWTEXT(CROSS(买线,卖线 ) AND V/REF(V,1 ) >=2.0,L*0.98,'起爆' ) ,COLORMAGENTA;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
顶:IF(CROSS(80,RSI ) *30,H+0.02,NULL ),CIRCLEDOT,LINETHICK5,COLORYELLOW;
VC:=((CLOSE-MA(CLOSE,6 ) )/MA(CLOSE,6 ) *100+(CLOSE-MA(CLOSE,24 ) )/MA(CLOSE,24 ) *100+(CLOSE-MA (CLOSE,32 ) )/MA(CLOSE,32 ) *100)/3;
顶1:=IF(VC>20 AND FILTER(VC< REF(VC,1 ),5 ),H+0.02,NULL ),POINTDOT,LINETHICK7,COLORGREEN;
A0:=(L+H+C*2)/4;
A1B:=EMA(A0,14 ),COLORBLUE,LINETHICK2;
A2B:=EMA(A0,25 ),COLORBLUE,LINETHICK2;
A1X:=(A1B-REF(A1B,1 ) )/REF(A1B,1 ) *100,NODRAW;
A2X:=(A2B-REF(A2B,1 ) )/REF(A2B,1 ) *100,NODRAW;
看多:=IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0 ) )),NULL ),COLORMAGENTA,LINETHICK4;
逃顶:=IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X ) )),NULL ),COLORCYAN,LINETHICK4;
买入持股:=IF(A1X>=0,A1B,NULL ),COLORRED,LINETHICK3;
卖出空仓:=IF(A1X<0 AND A2X<0,A1B,NULL ),COLORGREEN,LINETHICK3;
/*STICKLINE(CROSS(A1X,0 ),H,L,0,0),COLOR9933FF;
STICKLINE(CROSS(A1X,0 ),C,O,2,0),COLOR0000CC;
STICKLINE(CROSS(A1X,0 ),C,O,1,0),COLOR0033FF;
STICKLINE(CROSS(0,A1X ),L,H,0,0),COLOR66CC33;
*/
DIFF :=EMA(CLOSE,7) - EMA(CLOSE,13);
DEA := EMA(DIFF,3);
A1:=BARSLAST(REF(CROSS(DIFF,DEA ),1 ) );
B1:=REF(C,A1+1 ) >C AND REF(DIFF,A1+1 ) <DIFF AND CROSS(DIFF,DEA);
RSV:=(CLOSE-LLV(LOW,18 ) )/(HHV(HIGH,18 )-LLV(LOW,18))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D ),1 ) );
B2:=REF(C,A2+1 ) >C AND REF(K,A2+1 ) <K AND CROSS(K,D);
{KDJ底背离}
RSI1:=SMA(MAX(CLOSE-LC,0 ),7,1)/SMA(ABS(CLOSE-LC ),7,1 ) *100;
RSI2:=SMA(MAX(CLOSE-LC,0 ),14,1)/SMA(ABS(CLOSE-LC ),14,1 ) *100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2 ),1 ) );
B3:=REF(C,A3+1 ) >C AND REF(RSI1,A3+1 ) <RSI1 AND CROSS(RSI1,RSI2);
TYB:=(HIGH + LOW + 2*CLOSE)/4;
CCI4:=(TYB-MA(TYB,28 ) )/(0.015*AVEDEV(TYB,28 ) );
B4:=BARSLAST(NOT(MA(C,5 ) <MA(C,10 ) <=5 ) AND CCI4>REF(CCI4,1 ) AND CROSS(CCI4,-100 ) );
底背离:=((B1 AND B2 ) OR (B2 AND B3 ) OR (B1 AND B3 ) OR ( B4 AND CCI4<-90 ) ) AND D<20 ;
DRAWICON(底背离,(LOW * 0.98 ),1);
DRAWTEXT(底背离,(LOW * 0.97 ),'金底背离' ),COLORYELLOW;
XL1:=(MA(LOW,2 ) * 0.96);
XL2:=(MA(LOW,26 ) * 0.85);
XL3:=(((REF(XL1,1 ) < XL2 ) AND (REF(XL1,1 ) < XL1)) AND (REF(XL1,1 ) < REF(XL1,2)));
DRAWICON(XL3,L*0.99,1);
DRAWTEXT(XL3,L*0.99,'短进' ),COLORYELLOW;
建仓:=CROSS(RSI,11 ),COLORRED;
//DRAWICON(建仓,H*1.01,1);
DRAWTEXT(建仓,H*1.02,'建仓' ),COLORRED;

新的问题可以重新发帖提问,便于论坛帖子管理和回复
