牛熊分界线:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,90),VOL),COLOR0000FF; 年线:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,250),VOL); AA:=MA((2*CLOSE+HIGH+LOW)/4,5); 通1:=AA*102/100; 通2:=AA*(200-102)/100; CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); DD:=DMA(CLOSE,CC); {www.gUPaNg.com 股票软件下载网_最新股票指标公式} 上:(1+7/100)*DD,CIRCLEDOT,COLORGREEN; 下:(1-7/100)*DD,CIRCLEDOT,COLORGREEN; 中:(上+下)/2,CIRCLEDOT,COLORGREEN; PARTLINE(上,上>=REF(上,1),RGB(255,0,255)),CIRCLEDOT; PARTLINE(中,中>=REF(中,1),RGB(255,0,255)),CIRCLEDOT; PARTLINE(下,下>=REF(下,1),RGB(255,0,255)),CIRCLEDOT; MID:=(3*CLOSE+LOW+OPEN+HIGH)/6; 牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED; 熊线:MA(牛线,6),COLORGREEN; I1:=0; flag1:=0; while I1DO IF REF(H,I1)[HHV(H,I1+1)] THEN BEGIN FLAG1:=1; S1:=I1; I1:=BARSLAST(DISPSTATUS=1); END ELSE I1:=I1+1; STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(s1+1)*20,0),Colorfff00f,ALIGN1,LAYER1; DRAWTEXT(flag1,REF(L,s1+1),NUMTOSTRN(ref(h,s1+1),2)+'-'+NUMTOSTRN(hhV(h,S1+1),2)),ALIGN2,COLOR00ffff; I:=0; flag:=0; while IDO IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)THEN BEGIN FLAG:=1; S:=I; I:=BARSLAST(DISPSTATUS=1); END ELSE I:=I+1; STICKLINE(FLAG,REF(h,S+1),LLV(LOW,S+1),20*(s+1),500),Colorff000f,ALIGN1,LAYER1; DRAWTEXT(FLAG,REF(H,s+1),NUMTOSTRN(ref(h,s+1),2)+'-'+NUMTOSTRN(LLV(LOW,S+1),2)),ALIGN2,COLOR00ffff; |