本人不会编程,下面三个常用指标,均从网上下载的,共享。
N1:=6;N2:=18;N3:=54;N4:=162;
L2:=MA(C,3);
L3:=MA(C,60);
L4:=MA(C,120);
L5:=MA(C,40);
VAR1:=SUM(WINNER(CLOSE)*100,13)/10-(SUM(WINNER(CLOSE)*100,1)/20+10);
线在量上必大涨: IF(CROSS(L2,L3) AND CLOSE<L4,-60,0);
VAR2:=CLOSE/L5*100<78;
VAR3:=CLOSE/L3*100<74;
VAR4:=HIGH>(LOW*1.051);
VAR5:=VAR4 AND COUNT(VAR4,5)>1;
VAR6:=CLOSE/HHV(HIGH,BARSCOUNT(CLOSE>0))*100;
VAR7:=EMA(EMA(CLOSE,13),13);
控盘:= (VAR7-REF(VAR7,1))/REF(VAR7,1)*5000;
A1:=CROSS(控盘,0);
控盘1:IF(A1,100,0),COLORBLUE,LINETHICK1;
DRAWTEXT(控盘1>0,-20,'☆控盘☆'),COLORBLUE;
DIFF:(EMA(CLOSE,5) - EMA(CLOSE,20))*600,COLORRED,LINETHICK1;
DEA:EMA(DIFF,10), COLORCYAN,LINETHICK1;
IF(DIFF<=DEA,DIFF,DRAWNULL)COLORCYAN,LINETHICK1;
IF(DEA<=DIFF AND DEA>0,DEA,DRAWNULL)COLORRED,LINETHICK1;
DDIFF:=(EMA(CLOSE,5) - EMA(CLOSE,20));
DDEA:=EMA(DDIFF,10);
MACD:=1200*(DDIFF-DDEA);
MACD1:=2*(DDIFF-DDEA)*600,COLORRED,LINETHICK1;
MACD2:=MA(MACD1,3);
MACDL:=HHV(MACD2,13);
STICKLINE(MACDL<MACD1,MACD1,MACD2,3,0),COLORBLUE;{翻转前的绿柱}
多空生命:=(MA(CLOSE,100)+MA(CLOSE,100)+MA(CLOSE,100)+MA(CLOSE,1000))/4;
日线:=MA(CLOSE,5);
VAR03:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR04:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR05:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR06:=(VAR03+VAR04+VAR05)/3;
VAR07:=EMA(VAR06,5);
指标:EMA(EMA(VAR03,5),5)*3, COLORSTICK;
VAR08:=IF(VAR06<=-20,10,0);
VAR09:=HHV(VAR08,10);
STICKLINE(VAR08=10,100,10,1.0,0),COLOR000000;{周日线接近底部黑柱}
VARA:=IF(VAR09 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
DRAWTEXT(VAR08=10 AND FILTER(VAR08=10,5),100{15},'接近底部'),LINETHICK2,COLORRED;
STICKLINE(VAR08=10 AND FILTER(VAR08=10,5),-1.6{20},100{-10},1.0,0),COLORFF00FF;
DRAWTEXT(VARA=20 AND VAR08=10,100,'☆底部区域☆'),LINETHICK2,COLORBLUE;
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)
+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR010:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)
+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR011:=VARF<REF(VAR010,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR011 AND COUNT(VAR011,30)=1,-30,'★大资金建仓★'),LINETHICK1,COLORFF00FF;
STICKLINE(VAR011 AND COUNT(VAR011,30)=1,1,100,5,1),LINETHICK2,COLORRED;
{紫}
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.6,0 ),COLOR990099;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.3,0 ),COLORAE00AE;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.0,0 ),COLORBE00BE;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.6,0 ),COLORCE00CE;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.3,0 ),COLORDE00DE;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.0,0 ),COLOREE00EE;
{红}
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.6,0 ),COLOR3535FF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.3,0 ),COLOR5555FF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.0,0 ),COLOR8585FF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.6,0 ),COLOR9B9BFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.3,0 ),COLORACACFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.0,0 ),COLORBBBBFF;
{蓝}
STICKLINE(MACD>=REF(MACD,1)AND MACD<0,0,MACD,2.6,0 ),COLORFFAA00;
STICKLINE(MACD>=REF(MACD,1)AND MACD<0,0,MACD,2.3,0 ),COLORFFBB11;
STICKLINE(MACD>=REF(MACD,1)AND MACD<0,0,MACD,2.0,0 ),COLORFFCC22;
STICKLINE(MACD>=REF(MACD,1)AND MACD<0,0,MACD,1.6,0 ),COLORFFDD33;
STICKLINE(MACD>=REF(MACD,1)AND MACD<0,0,MACD,1.3,0 ),COLORFFEE44;
STICKLINE(MACD>=REF(MACD,1)AND MACD<0,0,MACD,1.0,0 ),COLORFFFF55;
{绿}
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,2.6,0 ),COLOR003300;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,2.3,0 ),COLOR006600;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,2.0,0 ),COLOR009900;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,1.6,0 ),COLOR00B000;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,1.3,0 ),COLOR00CE00;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,1.0,0 ),COLOR00E300;
{画图标}
DRAWICON(CROSS(DIFF,DEA)AND(DIFF>=0),DIFF,33);
{CR上60手机}
DRAWICON(CROSS(CR,60),60,20);
{RSI上20苹果}
DRAWICON(CROSS(RSI,15),40,26);
{KD上15笑脸}
DRAWICON(CROSS(KD,20),20,24);
{CCI上-200钻石}
DRAWICON( CROSS(CCI,-200) AND CCI>=REF(CCI,1),0,25);
{顶底}
DRAWTEXT(MACD>=0 AND CR>=150 AND KD>=80 AND RSI>=80 ,80,'【卖】'),COLORBLUE;
DRAWTEXT(MACD<=0 AND CR<=80 AND RSI<=20 AND KD<=20,5,'【买】'),COLOR000000;
{起爆点}
DIF1:=EMA(DCLOSE,2)-EMA(DCLOSE,3);
DEA1:=EMA(DIF1,4);
AAA1:=(DIF1-DEA1)*2*60;
起爆点:=AAA1-REF(AAA1,1);
DRAWICON(CROSS(起爆点,4),60,9);
{起跌点}
起跌点:=REF(AAA1,1)-AAA1;
DRAWICON(CROSS(起跌点, 4),60,15);
--------------------------------------------------------------
5,COLOR009900,POINTDOT,LINETHICK1;
50,COLORBLUE,LINETHICK1;
100,COLORRED,POINTDOT,LINETHICK1;
{进入异动区}{当出现进入异动区提示时需观察买入,最好是第二次KDJ三线相交时介入}
VAR7:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR8:=EMA(VAR7,30);
VAR9:=EMA(VAR8,30);
VAR10:=3*VAR8-2*VAR9;
势:=EMA(VAR10,5);
DRAWTEXT(CROSS(10,势),69,'【逢低买入】'),COLORBLUE;
DRAWTEXT(CROSS(10,势),58,'异'),COLORFF00FF;
DRAWTEXT(CROSS(10,势),43,'动'),COLOR00C0FF;
DRAWTEXT(CROSS(10,势),31,'区'),COLORFFFF6F;
DRAWTEXT(CROSS(10,势),19,'域'), COLORB47DFF;
{长线持股}{含未来函数:DRAWLINE当天出现信号可择机介入,明日买、卖需观察}
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
SHORT:=7; LONG:=19;
RMA:=EMA(CLOSE,SHORT);
NMA:=EMA(CLOSE,LONG);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV
(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV
(H,BARSLAST(CROSS(RMA,NMA))+1),HHV
(H,BARSLAST(CROSS(RMA,NMA))+1),0);
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV
(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV
(L,BARSLAST(CROSS(NMA,RMA))+1),LLV
(L,BARSLAST(CROSS(NMA,RMA))+1),0);
买进:=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND
CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(买进,0,45,4.3,0),COLOR0000AA;
STICKLINE(买进,0,45,3.3,0),COLOR0011BB;
STICKLINE(买进,0,45,2.2,0),COLOR0022CC;
STICKLINE(买进,0,45,1.1,0),COLOR0033DD;
DRAWTEXT(买进,40,'【买】'),COLORFF00FF,LINETHICK1;
{共振}
RV:=(CLOSE-LLV(LOW,33))/(HHV(HIGH,33)-LLV(LOW,33))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
VAR44:=SMA(RV,3,1);
VAR55:=SMA(VAR44,3,1);
KK:=EMA(SMA(RG,3,1),2),COLORCYAN;
JJ:=SMA(KK,3,1),COLOR00FFFF;
共振点:=(CROSS(VAR44,VAR55) AND CROSS(KK,JJ));
STICKLINE(共振点>0,0,35,4.0,0),COLORAA00BB;
STICKLINE(共振点>0,0,35,3.3,0),COLORBB11BB;
STICKLINE(共振点>0,0,35,2.2,0),COLORCC22BB;
STICKLINE(共振点>0,0,35,1.1,0),COLORDD33FF;
DRAWTEXT(共振点>0,25,'★共振★'),COLOR009900;
{涨}
VAR1:=EMA(CLOSE,3);
VAR2:=EMA(CLOSE,21);
VAR3:=BARSLAST(CROSS(VAR2,VAR1))>15;
VAR4:=VOL>MA(VOL,5)*2 AND VOL<MA(VOL,5)*5;
VAR5:=CROSS(VAR1,VAR2) AND VAR4 AND VAR3;
STICKLINE(VAR5,0,100,5.0,0),COLOR3535FF;
STICKLINE(VAR5,0,100,4.0,0),COLOR8585FF;
STICKLINE(VAR5,0,100,3.0,0),COLORACACFF;
STICKLINE(VAR5,0,100,2.0,0),COLORCECEFF;
DRAWTEXT(VAR5,23,'★起暴★'),COLORFF00FF;
{顶底}
DRAWTEXT(MACD>=0 AND CR>=100 AND KD>=80 AND RSI>=80 ,80,'【卖】'),COLORBLUE;
DRAWTEXT(MACD<=0 AND CR<=100 AND RSI<=20 AND KD<=20,5,'【买】'),COLOR000000;
{KDJ没有未来函}
RSV:=(CLOSE-LLV(LOW,33))/(HHV(HIGH,33)-LLV(LOW,33))*100;
K:SMA(RSV,3,1),COLOR009900,LINETHICK1;
D:SMA(K,3,1),COLORBLUE,LINETHICK1;
J:3*K-2*D,COLOR000000,LINETHICK1;
IF(J<REF(J,1),J,DRAWNULL),COLORBLUE,LINETHICK1;
IF(J>=K AND K>=D ,J,DRAWNULL),COLORRED,LINETHICK1;
IF(D>=K AND K>=J ,D,DRAWNULL),COLORCYAN,LINETHICK1;
IF(K<=D AND J<=K ,K,DRAWNULL),COLORCYAN,LINETHICK1;
IF(J<=K AND K<=D ,J,DRAWNULL),COLORCYAN,LINETHICK1;
IF(D<=K AND K<=J ,D,DRAWNULL),COLORRED,LINETHICK1;
IF(K>=D AND J>=K ,K,DRAWNULL),COLORRED,LINETHICK1;
DRAWTEXT(J>=D AND K>=30 AND D>=30,90,'▲'),COLORRED;
DRAWTEXT(J<=D AND K<=80 AND J<=50,86,'▼'),COLORCYAN;
DRAWTEXT(K>=50 AND D>=50 AND J>=50,90,'△'),COLORRED,LINETHICK3;
DRAWTEXT(K<=50 AND D<=50 AND J<=50,85,'▽'),COLORCYAN,LINETHICK3;
DRAWTEXT(J>=90,100,'★'),COLORBLUE;
DRAWTEXT(J<=0,10,'★'),COLOR000000;
{短买}
你:=MA(CLOSE,1);
老:=(LOW+HIGH+CLOSE)/3;
老板:= MA(老,5);
买卖:=LLV(老板,10);
短买:IF(LLV((你<买卖),5,),15,0),COLORBLUE, LINETHICK2;
{当大牛\中牛\短牛同一天出现时,果断买入}{含未来函数:DRAWLINE暴跌途中慎用!!}
VAR20:=C-REF(C,1);
VAR21:=100*EMA(EMA(VAR20,6),6)/EMA(EMA(ABS(VAR20),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP1:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF;
DOWN1:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00;
BT:=(LLV(VAR21,2)=LLV(VAR21,7) AND COUNT(VAR21<0,2) AND CROSS(VAR21,MA(VAR21,2))) AND
REF(DOWN1,1)<REF(DOWN1,2) AND UP1>REF(DOWN1,1);
0,COLORFF00FF;
DRAWTEXT(BT,55,'【了】'),COLOR009900;
TJ1:=REF(DOWN1,1)<REF(DOWN1,2) AND UP1>REF(DOWN1,1) AND C<HHV(H,21)*1;
DRAWTEXT(TJ1,70,'【涨】'),COLORBLUE;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN1,1)<REF(DOWN1,2) AND UP1>REF(DOWN1,1) AND C<HRY33;
DRAWTEXT(TJ2,85,'【起】'),COLORRED;
{CR上60手机}
DRAWICON(CROSS(CR,60),60,20);
{RSI上20苹果}
DRAWICON(CROSS(RSI,15),60,16);
{KD上15笑脸}
DRAWICON(CROSS(KD,15),60,5);
{CCI上-200钻石}
DRAWICON( CROSS(CCI,-200) AND CCI>=REF(CCI,1),50,25);
----------------------------------------------------------------------------------------------
N:=3;
N1:=5;N2:=10;N3:=20;N4:=1;M1:=7;M2:=2;
LC :=REF(C,N4);
RSI1:SMA(MAX(C-LC,0),N1,1)/SMA(ABS(C-LC),N1,1)*100,COLOR000000,LINETHICK1;
RSI2:SMA(MAX(C-LC,0),N2,1)/SMA(ABS(C-LC),N2,1)*100,COLORBLUE,LINETHICK1;
RSI3:SMA(MAX(C-LC,0),N3,1)/SMA(ABS(C-LC),N3,1)*100,COLOR009900,LINETHICK1;
IF(RSI1<=RSI2 AND RSI2<=RSI3,RSI1,DRAWNULL),COLORCYAN,LINETHICK1;
IF(RSI2<=RSI3 AND RSI2>=RSI1,RSI2,DRAWNULL),COLORCYAN,LINETHICK1;
IF(RSI3>=RSI2 AND RSI2>=RSI1,RSI3,DRAWNULL)COLORCYAN,LINETHICK1;
IF(RSI1>=RSI2 AND RSI2>=RSI3,RSI1,DRAWNULL),COLORRED,LINETHICK1;
IF(RSI2>=RSI3 AND RSI2<=RSI1,RSI2,DRAWNULL),COLORRED,LINETHICK1;
IF(RSI3<=RSI2 AND RSI2<=RSI1,RSI3,DRAWNULL)COLORRED,LINETHICK1;
DRAWTEXT(RSI1>=RSI2 AND RSI2>=RSI3 AND RSI3>=30,90,'△'),COLORRED;
DRAWTEXT(RSI1<=RSI2 AND RSI2<=RSI3 AND RSI3<=80,85,'▽'),COLORCYAN;
DRAWTEXT(RSI1>=80,80,'★'),COLORBLUE;
DRAWTEXT(RSI1<=15,20,'★'),COLOR000000;
DRAWTEXT(RSI1>=50 AND RSI2>=50 AND RSI3>=50,90,'▲'),COLORRED,LINETHICK3;
DRAWTEXT(RSI1<=50 AND RSI2<=50 AND RSI3<=50,85,'▼'),COLORCYAN,LINETHICK3;
TY:=RSI1;{通用曲线值的引入}
AA:=REF(TY,N)=HHV(TY,2*N+1);
BB:=BACKSET(AA,N+1);
CC:=FILTER(BB,N) AND TY=HHV(TY,N+1);
AA2:=REF(TY,N)=LLV(TY,2*N+1);
BB2:=BACKSET(AA2,N+1);
CC2:=FILTER(BB2,N) AND TY=LLV(TY,N+1);
GG:=ISLASTBAR AND REF(CC,BARSLAST(CC));
HH:=BACKSET(GG,BARSLAST(CC)+1);
II:=HH>REF(HH,1);
JJ:=REF(BARSLAST(CC),1);
KK:=BACKSET(II,JJ+2);
LL:=KK>REF(KK,1);
DRAWLINE(LL,TY,II,TY,1),COLORRED,LINETHICK2;
CS:=(REF(TY,BARSLAST(II))-REF(TY,BARSLAST(LL)))/(BARSLAST(LL)-BARSLAST(II));
阻力线:=REF(TY,BARSLAST(II))+BARSLAST(II)*CS;
阻力值:阻力线,LINETHICK2;
DRAWICON(CROSS(TY,阻力线),阻力线*0.50,33);
GG2:=ISLASTBAR AND REF(CC2,BARSLAST(CC2));
HH2:=BACKSET(GG2,BARSLAST(CC2)+1);
II2:=HH2>REF(HH2,1);
JJ2:=REF(BARSLAST(CC2),1);
KK2:=BACKSET(II2,JJ2+2);
LL2:=KK2>REF(KK2,1);
DRAWLINE(LL2,TY,II2,TY,1),COLORBLUE,LINETHICK2;
20,COLOR009900,POINTDOT,LINETHICK1;
50,COLORBLUE,LINETHICK1;
80,COLORRED,POINTDOT,LINETHICK1;
{顶底}
DRAWTEXT(MACD>=0 AND CR>=100 AND KD>=80 AND RSI>=80 ,80,'【卖】'),COLORBLUE;
DRAWTEXT(MACD<=0 AND CR<=100 AND RSI<=20 AND KD<=20,5,'【买】'),COLOR000000;
{CR上60手机}
DRAWICON(CROSS(CR,60),60,20);
{RSI上20苹果}
DRAWICON(CROSS(RSI,15),60,16);
{KD上15笑脸}
DRAWICON(CROSS(KD,15),60,5);
{CCI上-200钻石}
DRAWICON( CROSS(CCI,-200) AND CCI>=REF(CCI,1),0,25);
{起爆点}
DIF1:=EMA(DCLOSE,2)-EMA(DCLOSE,3);
DEA1:=EMA(DIF1,4);
AAA1:=(DIF1-DEA1)*2*60;
起爆点:=AAA1-REF(AAA1,1);
DRAWICON(CROSS(起爆点,4),60,9);
{起跌点}
起跌点:=REF(AAA1,1)-AAA1;
DRAWICON(CROSS(起跌点, 4),60,15);