牛熊分界線: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.ouce-eed.com 概念股網(wǎng)_最新股票指標公式}
上:(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 I1 DO
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 I DO
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;