{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;{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |