RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:SMA(RSV,3,1),LINETHICK2,COLORWHITE;D:SMA(K,3,1),LINETHICK2,COLOR00DDDD;J:3*K-2*D,LINETHICK2,COLOR800080;DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),linethick0,COLOR0099FF;DEA :EMA(DIFF,9),linethick0,COLORD89837;MACD:2*(DIFF-DEA),COLORFF9999,linethick0;YLZC:=if(close=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(vol+0.01)/100);阻价:=if(close=INDEXC,YLZC+INDEXC-INDEXl,YLZC+(close-low));支价:=if(close=INDEXC,INDEXl+INDEXC-YLZC,low+(close-YLZC));今压:REF(阻价,1),LINETHICK0,COLORAA11BB;今撑:REF(支价,1),LINETHICK0,COLOR009900;明压:阻价,LINETHICK0;明撑:支价,LINETHICK0;rsv1:=(hhv(h,9.8)-c)/(hhv(h,9.8)-llv(l,9.8))*101;kk:=sma(rsv1,3,1);dd:=sma(kk,3,1);jj:=3*kk-2*dd;买卖:=if(jj>=100,100,if(jj<=0,0,jj));明天买:if(买卖=100,0-10,0),color00cccc;明天卖:if(买卖=0,90,100),color00ff00;KX:=250;KH:=HHV(K,KX);DH:=HHV(D,KX);JH:=HHV(J,KX);KL:=LLV(K,KX);DL:=LLV(D,KX);JL:=LLV(J,KX);HKMAX:=MAX(KH,MAX(DH,JH));LKMIN:=MIN(KL,MIN(DL,JL));KHLB:=(HKMAX+LKMIN)/2;KHLC:=HKMAX-LKMIN;MHF:=HHV(DIFF,KX);MHD:=HHV(DEA,KX);MHM:=HHV(MACD,KX);MLF:=LLV(DIFF,KX);MLD:=LLV(DEA,KX);MLM:=LLV(MACD,KX);HMAX:=MAX(MHF,MAX(MHD,MHM));LMIN:=MIN(MLF,MIN(MLD,MLM));FHLB:=(HMAX-LMIN)/100;FHLC:=HMAX-LMIN;SH:=(0-FHLB)*(KHLC/FHLC)+KHLB;DIFFA:=(DIFF-FHLB)*(KHLC/FHLC)+KHLB;DEAA:=(DEA-FHLB)*(KHLC/FHLC)+KHLB;MACDA:=(macd-FHLB)*(KHLC/FHLC)+KHLB;CDA:=MACD<ref(MACD,1) and MACD>0;CDB:=MACD>=ref(MACD,1) and MACD>0;CDC:=MACD>ref(MACD,1) and MACD<0;CDD:=MACD<=ref(MACD,1) and MACD<0;STICKLINE(CDA,SH,macda,5,0),COLOR00AAFF;{黄色段}STICKLINE(CDA,SH,macda,5.0,0),COLOR00BBFF;STICKLINE(CDA,SH,macda,4.4,0),COLOR00CCFF;STICKLINE(CDA,SH,macda,3.3,0),COLOR00DDFF;STICKLINE(CDA,SH,macda,2.2,0),COLOR00EEFF;STICKLINE(CDA,SH,macda,1.1,0),COLOR00FFFF;STICKLINE(CDB,SH,macda,5,0),COLOR0000AA; {红色段}STICKLINE(CDB,SH,macda,5.0,0),COLOR0011BB;STICKLINE(CDB,SH,macda,4.4,0),COLOr0022CC;STICKLINE(CDB,SH,macda,3.3,0),COLOR0033DD;STICKLINE(CDB,SH,macda,2.2,0),COLOR0044EE;STICKLINE(CDB,SH,macda,1.1,0),COLOR0055FF;STICKLINE(CDC,SH,macda,5,0),COLORAA00BB;{向上粉红}STICKLINE(CDC,SH,macda,5.0,0),COLORBB11BB;STICKLINE(CDC,SH,macda,4.4,0),COLORCC22BB;STICKLINE(CDC,SH,macda,3.3,0),COLORDD33BB;STICKLINE(CDC,SH,macda,2.2,0),COLOREE44BB;STICKLINE(CDC,SH,macda,1.1,0),COLORFF55BB;STICKLINE(CDD,SH,macda,5,0),COLORFF7700;STICKLINE(CDD,SH,macda,5.0,0),COLORFF8811;STICKLINE(CDD,SH,macda,4.4,0),COLORFFAA22;STICKLINE(CDD,SH,macda,3.3,0),COLORFFBB33;STICKLINE(CDD,SH,macda,2.2,0),COLORFFDD44;STICKLINE(CDD,SH,macda,1.1,0),COLORFFDD55;FILLRGN(diffa,deaa,diffa>=deaa,RGB(255,11,11));FILLRGN(diffa,deaa,diffa<deaa,RGB(10,255,10));DRAWTEXT(BARSTATUS=2,SH,' 0'),color00aaaa;Var51:=(CLOSE-LLV(LOW,32))/(HHV(HIGH,32)-LLV(LOW,32))*100;Var52:=SMA(Var51,4,1);Var53:=SMA(Var52,6,1);Var54:=VOL/CAPITAL*34;Var55:=REF(Var54,1);STICKLINE(Var53<7 AND Var52<11,-5,0,7,0),LINETHICK2 ,coloryellow ;STICKLINE(Var53>89.5 AND Var52>91,100,95,6,0) ,LINETHICK1 ,colorFFB210 ;STICKLINE(Var53>88.5 AND Var52>94.6,100,96,8,0),colorred ;MACD金叉:=CROSS(MACD,DIFF) AND MACD>=(0-0.05) AND MACD<=0.02;DRAWTEXT(MACD金叉,macda*0.82,'MACD金叉'),color00FFFF;XX:=ema(MA(LOW,3)*0.96,30);DIFF金叉:=if(CROSS(DIFF,DEA) AND XX-REF(XX,1)>0 AND MACD>=REF(MACD,1) AND DIFF<=0,1,0);DRAWTEXT(DIFF金叉=1,DIFFA*1.68,'DIFF金叉'),colorCDFFBB;低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;DRAWTEXT(低位金叉,deaa*0.99,' 低位金叉'),COLOR0099DD;DIFDEA:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(DIFDEA=2,21)=1;DRAWTEXT(二次金叉,deaa*0.99-8,' 二次金叉'),ColorFF00FF;A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);DRAWTEXT(底背离,DEAA*0.99-16,' 底背离'),Color0099FF;A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);DRAWTEXT(FILTER(顶背离,5),DEAA*1.02,'顶背离'),COLORDDAAAA; |
