主图公式如下：
H1:=IFELSE(HIGH<REF(HIGH,2)&&REF(HIGH,1)<REF(HIGH,2)&&REF(HIGH,2)>=REF(HIGH,3)&&REF(HIGH,2)>=REF(HIGH,4)&&REF(HIGH,2)>=REF(HIGH,5)&&REF(HIGH,2)>=REF(HIGH,6)&&REF(HIGH,2)>=REF(HIGH,7), REF(HIGH,2),0);
L1:=IFELSE(LOW>REF(LOW,2)&&REF(LOW,1)>REF(LOW,2)&&REF(LOW,2)<=REF(LOW,3)&&REF(LOW,2)<=REF(LOW,4)&&REF(LOW,2)<=REF(LOW,5)&&REF(LOW,2)<=REF(LOW,6)&&REF(LOW,2)<=REF(LOW,7), REF(LOW,2),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IFELSE(H>H2,-3,IFELSE(L<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);
G1:=VALUEWHEN(ISLASTBAR,G);
TMP:=VALUEWHEN(K1<>0,K1);
DRAWLINE(K2=1 AND C>=O,HIGH,K2=1 AND C>=O,CLOSE,COLORCYAN);
DRAWLINE(K2=1 AND C>=O,LOW,K2=1 AND C>=O,OPEN,COLORCYAN);
DRAWLINE(K2=1 AND C<O,HIGH,K2=1 AND C<O,C,COLORCYAN);
DRAWLINE(K2=1 AND C<O,LOW,K2=1 AND C<O,O,COLORCYAN);
DRAWLINE(K2=-3 AND C>=O,HIGH,K2=-3,CLOSE,COLORRED);
DRAWLINE(K2=-3 AND C>=O,LOW,K2=-3,OPEN,COLORRED);
DRAWLINE(K2=-3 AND C<O,HIGH,K2=-3,OPEN,COLORRED);
DRAWLINE(K2=-3 AND C<O,LOW,K2=-3,CLOSE,COLORRED);
STICKLINE(K2=1 AND C<=O,OPEN,CLOSE,COLORCYAN,0);
STICKLINE(K2=1 AND C>O,OPEN,CLOSE,COLORCYAN,1);
STICKLINE(K2=-3 AND C>O,OPEN,CLOSE,COLORRED,1);
STICKLINE(K2=-3 AND C<=O,OPEN,CLOSE,COLORRED,0);
DRAWLINE(TMP=1&&REF(TMP,1)=1,G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORCYAN);
DRAWLINE(TMP=-3&&REF(TMP,1)=-3,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORRED);
DRAWSL(K2=1,G,0,1,0,COLORCYAN);
DRAWSL(K2=-3,G,0,1,0,COLORRED);
TJ1:=BARSLAST(K2=1);
TJ2:=BARSLAST(K2=-3);
DRAWTEXT(CROSS(TJ2,TJ1) , G,’卖’ );
DRAWTEXT( CROSS(TJ1,TJ2), G,’买’ );
PLAYSOUND(CROSS(TJ2,TJ1),’A’);
PLAYSOUND(CROSS(TJ1,TJ2),’B’);
2、副图指标1：
VARA:=LLV(LOW,35);
VARB:=HHV(HIGH,30);
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;
QS: VARC,COLORWHITE;
VARD:=87.5;
VARE:=(VARC-LLV(VARC,4))/(HHV(VARC,4)-LLV(VARC,4))*4*25;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR8:=LLV(LOW,30);
VARAA:=HHV(HIGH,30);
B:=EMA((VAR6-VAR8)/(VARAA-VAR8)*100,8);
B1:=EMA(B,5);
STICKLINE(B>0 AND B-B1>=0,79,80,COLORWHITE,0);
STICKLINE(B>0 AND B-B1<0,79,80,COLORCYAN,0);
STICKLINE(B>0 AND B-B1>=0,49,50,COLORRED,0);
STICKLINE(B>0 AND B-B1<0,49,50,COLORRED,0);
STICKLINE(B>0 AND B-B1>=0,19,20,COLORWHITE,0);
STICKLINE(B>0 AND B-B1<0,19,20,COLORCYAN,0);
STICKLINE(B-B1>0,B,B1,COLORRED,1);
STICKLINE(B-B1<0,B,B1,COLORWHITE,1);
V1:=(2*CLOSE+HIGH+LOW)/4;
V2:=LLV(LOW,21);
VA:=HHV(HIGH,34);
FB:=EMA((V1-V2)/(VA-V2)*100,13);
FBB:=EMA((0.667*REF(FB,1)+0.333*FB),2);
ZLX:EMA(0.382*REF(FB,2)+0.618*FB,12),COLORYELLOW;
3、副图指标2：
DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
AG1:=DIFF>DEA;
MACD多头:=IF(AG1,1,0);
DRAWICON(DIFF>DEA,6,4);
DRAWICON(DIFF<DEA,6,5);
DRAWTEXT(ISLASTBAR=1,5.7,’ –MACD’),COLOR00FFFF;
RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
K:=SMA(RSV1,3,1);
D:=SMA(K,3,1);
DRAWICON(K>D,5,4);
DRAWICON(K<D,5,5);
DRAWTEXT(ISLASTBAR=1,4.7,’ –KDJ’),COLOR00FFFF;
AG2:=K>D;
KDJ多头:=IF(AG2,2,0);
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
DRAWICON(RSI1>RSI2,3,4);
DRAWICON(RSI1<RSI2,3,5);
DRAWTEXT(ISLASTBAR=1,2.7,’ –RSI’),COLOR00FFFF;
AG3:=RSI1>RSI2;
RSI多头:=IF(AG3,3,0);
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
LWR1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);
DRAWICON(LWR1>LWR2,2,4);
DRAWICON(LWR1<LWR2,2,5);
DRAWTEXT(ISLASTBAR=1,1.7,’ –WR’),COLOR00FFFF;
AG4:=LWR1>LWR2;
LWR多头:=IF(AG4,4,0);
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON(CLOSE>BBI,4,4);
DRAWICON(CLOSE<BBI,4,5);
DRAWTEXT(ISLASTBAR=1,3.7,’ –BBI’),COLOR00FFFF;
AG5:=CLOSE>BBI;
BBI多头:=IF(AG5,5,0);
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);
DRAWICON(MMS>MMM,1,4);
DRAWICON(MMS<MMM,1,5);
DRAWTEXT(ISLASTBAR=1,0.7,’ –MTM’),COLOR00FFFF;
公众号实用收藏源码打包，每天源码文件更新点击链接下载☞：知识星球
评论(0)