通达信底部吸筹源码

JNR1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200;
 JNR2:=EMA((CLOSE-(LLV(LOW,5)))/((HHV(HIGH,5))-(LLV(LOW,5)))*100,4)*2;
 JNR3:=EMA(0.618*REF(JNR2,1)+0.382*JNR2,2);
 JNR4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
 JNR5:=POW(MA(LOW,5),2)+MA(LOW,5);
 JNR6:=POW(MA(HIGH,5),2)+MA(HIGH,5);
 JNR7:=(JNR4-LLV(JNR5,64))/(HHV(JNR6,64)-LLV(JNR5,64))*150+65-10;
 JNR8:=SMA((SMA(JNR7,3,1)*1.5-100),3,1);
 JNR9:=3*(SMA(JNR7,3,1)*1.5-100)-2*JNR8;
 JNR10:=(HIGH+LOW+CLOSE*2)/4;
 JNR11:=(JNR10-(EMA(JNR10,13)))*100/(STD(JNR10,13));
 JNR12:=EMA((EMA(JNR11,5)),13)+200-100;
 JNR13:=(SMA(JNR1,3,1))+JNR2+(SMA(JNR7,3,1)*1.5-100)+JNR12;
 JNR14:=(SMA((SMA(JNR1,3,1)),3,1))+JNR3+JNR8+(EMA(JNR12,10));
 JNR15:=(3*(SMA(JNR1,3,1))-2*(SMA((SMA(JNR1,3,1)),3,1)))+(3*JNR12-2*(EMA(JNR12,10)))+
 JNR9+(3*JNR12-2*(EMA(JNR12,10)));
 JNR16:=(HIGH+LOW+CLOSE)/3;
 JNR17:=(JNR16-MA(JNR16,34))/(0.015*AVEDEV(JNR16,34));
 JNR18:=(HIGH+LOW+CLOSE+JNR16)/4;
 JNR19:=(JNR18-(EMA(JNR18,24)))/(STD(JNR18,24))*100;
 JNR20:=(JNR16-MA(JNR16,24))/(0.015*AVEDEV(JNR16,24));
 JNR21:=(((EMA(JNR19,5))+JNR20+JNR17)/3+165)/4;
 JNR22:=(JNR13+JNR14+JNR15*30)/32/5-15;
 JN买卖: EMA(((JNR21+JNR22)/2/1.1),1);
 JN阻力:=MA(JN买卖,3),COLORWHITE,LINETHICK2;
 IF(JN买卖< JN阻力,JN买卖,DRAWNULL),COLORGREEN,LINETHICK2;
 IF(JN买卖>=JN阻力,JN买卖,DRAWNULL),COLORRED,LINETHICK2;

 DRAWICON(CROSS(JN买卖,JN阻力) AND ((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250)>REF(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250),1),JN阻力,1);

底部吸筹指标:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, COLOR00FF00;
 STICKLINE(CROSS(底部吸筹指标,-24),88,0,1,0), COLORWHITE;