同花顺朱氏KDJ长线王副图源码

以下是同花顺朱氏KDJ长线王副图源码

RSV:=(CLOSE-LLV(LOW,40))/(HHV(HIGH,40)-LLV(LOW,40))*100;
 K:SMA(RSV,10,1);
 D:SMA(K,10,1);
 J:3*K-2*D,colorred;
 STICKLINE(j<10,0,0,88,501),colorgreen;
 STICKLINE(j>95,100,100,88,501),coloryellow;
 50,colorff00ff;
买: IF(TROUGHBARS(3,15,1)=0 AND HIGH>LOW+0.01,20,-10);
卖: IF(PEAKBARS(3,15,1)=1,80,110);
 VARC:=(ZIG(3,6)>=REF(ZIG(3,6),1)) AND (REF(ZIG(3,6),1)<=REF(ZIG(3,6),2)) AND (REF(ZIG
 (3,6),2)<=REF(ZIG(3,6),3))AND (REF(ZIG(3,6),3)<=REF(ZIG(3,6),4));
 VARD:=(ZIG(3,6)<=REF(ZIG(3,6),1)) AND (REF(ZIG(3,6),1)>=REF(ZIG(3,6),2)) AND (REF(ZIG
 (3,6),2)>=REF(ZIG(3,6),3))AND (REF(ZIG(3,6),3)>=REF(ZIG(3,6),4));
 STICKLINE((VARC=1),(j),j+50,8,0),Culor0000FF;
 DRAWTEXT((VARC=1),(j-0),'买'),Culor0000FF;
 STICKLINE((VARD=1),(j),8,8,0),Culor00FF00;
 DRAWTEXT((VARD=1),(j+5),'卖'),Culor00FF00;
 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);
 Var10:=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);
 Var11:=VarF<REF(Var10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
 DRAWTEXT(Var11 AND COUNT(Var11,30)=1,50,'大资金活动'),linethick1,COLORff00ff;
 STICKLINE(Var11 AND COUNT(Var11,30)=1,1,50,8,0),colorff00ff;
 Var12:=(HIGH+LOW+CLOSE)/3;
 Var13:=(Var12-MA(Var12,14))/(0.015*AVEDEV(Var12,14));
 Var14:=(Var12-MA(Var12,70))/(0.015*AVEDEV(Var12,70));
 Var15:=IF(Var13>=150 AND Var13<200 AND Var14>=150 AND Var14<200,10,0);
 Var16:=IF(Var13<=-150 AND Var13>-200 AND Var14<=-150 AND Var14>-200,-10,Var15);
 Var17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
 Var18:=100-ABS(Var17);
 Var19:=IF(Var18<90,Var18,100);
 Var1A:=IF(VarE>0,VarE,0);
 Var1B:=IF(Var14>=200 AND Var13>=150,15,IF(Var14<=-200 AND Var13<=-150,-15,Var16))+60;
 Var1C:=Var1A>48 AND Var1B>60 AND Var19<100;
 DRAWTEXT(Var1C AND COUNT(Var1C,30)=1,50,'大笔出货'),linethick1,COLORffcc66;
 STICKLINE(Var1C AND COUNT(Var1C,30)=1,0,50,8,0),colorffcc66;