GJMA4主图公式 源码

{GJMA4}
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA30:MA(CLOSE,30);
MA40:MA(CLOSE,40),LINETHICK0;
MA60:MA(CLOSE,60);
A:=if(hhv(v,20)=v,h,0);
PL:=BARSLAST(A);
最大量的最高价:REF(HIGH,PL),LINETHICK;
STICKLINE(BARSLAST(A),REF(HIGH,PL),REF(HIGH,PL),4,0),POINTDOT,COLORYELLOW,LINETHICK2;
J:="KDJ.J";
A:=CROSS(J,0);
SEL1:=FILTER(REF(J,1)>75 AND J<REF(J,1),3);
B:=SEL1;
stickline(A,c,o,8,0),colormagenta;
stickline(B,open,CLOSE,6,0),COLORBLUE;
DRAWICON(A,LOW*0.99,10);
DRAWICON(B,H*1.01,11);
LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
天缘买:=(AV + NEWVOL);
{AND 天缘买>REF(天缘买,1)};
stickline(CROSS(天缘买,0),open,CLOSE,5,0),COLORYELLOW;
stickline(CROSS(天缘买,-5),open,abs(open+CLOSE)/2,5,0),COLORRED;
跳空:=HIGH<REF(LOW,1);
STICKLINE(跳空,HIGH,REF(LOW,1),12,0),COLOR44AAFF;
DRAWTEXT(跳空,REF(LOW,1),'跳\n空'),PXUP50,COLOR44AAFF;
跳空跌实体顶:=IF(CLOSE>OPEN,CLOSE,OPEN);
跳空跌机会出现:=BARSLAST(跳空)>0 AND REF(CLOSE,1)>REF(跳空跌实体顶,BARSLAST(跳空)) AND REF(CLOSE,2)>REF(跳空跌实体顶,BARSLAST(跳空));
STICKLINE(跳空跌机会出现=0,REF(跳空跌实体顶,BARSLAST(跳空)),REF(跳空跌实体顶,BARSLAST(跳空)),8,0),COLORGREEN,LINETHICK2;
AA1:=IF(MA10>REF(MA10,1),25,0);
AA2:=IF(MA20>REF(MA20,1),25,0);
AA3:=IF(MA40>REF(MA40,1),25,0);
AA4:=IF(MA60>REF(MA60,1),25,0);
BB1:AA1+AA2+AA3+AA4,LINETHICK0;
{大熊:BB1=0,LINETHICK0;
{中熊:BB1=25,LINETHICK0;
{小熊:BB1=50,LINETHICK0;
{小牛:BB1=75,LINETHICK0;
{中牛:BB1=100,LINETHICK0;