{主圖指標源碼} PPER:(1+M1/100)*MA(CLOSE,N),LINETHICK4,COLORGREEN; LOWER:(1-M2/100)*MA(CLOSE,N),LINETHICK4,COLORRED; 黃金通道:(UPPER+LOWER)/2,POINTDOT,LINETHICK4,COLORYELLOW; DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'BB',0);DRAWKLINE(HIGH,OPEN,LOW,CLOSE); M5:=MA(CLOSE,5);M20:=MA(CLOSE,20); 顯示儀表盤:=1; 總漲幅周期:=350; 范圍高A:=REFDATE(HHV(H,120),DATE)*1.05; 范圍低A:=REFDATE(LLV(L,120),DATE)*0.95; MAA:=MA(C,5); MA24:=MA(C,24); MA72:=MA(C,72); MA200:=IF((MA(C,200)<=范圍高A AND MA(C,200)>=范圍低A) OR C>=MA(C,200),MA(C,200),DRAWNULL); 主升浪:=ISLASTBAR AND MAA>MA24 AND MA24>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200); 主浪回調:=ISLASTBAR AND MA24>MAA AND MAA>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200); 主浪深調:=ISLASTBAR AND MA24>MA72 AND MA72>MAA AND MAA>IF(MA200=DRAWNULL,0,MA200); 初升浪:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MAX(MA24,MA72) AND MAA>MA24 AND MA24>MA72; 底部反彈:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MAA>MA24; 探底階段:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MAA; 觀望:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24>MA72 AND C<MA72,MA72>MA200 AND C<MA200); 有牛:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C>=MA72,MA72<MA200 AND C>=MA200); 放棄:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C<MA72,MA72<MA200 AND C<MA200); DRAWGBK(顯示儀表盤=1 AND 主升浪=0 AND 主浪回調=0 AND 主浪深調=0 AND 初升浪=0 AND 底部反彈=0 AND 探底階段=0 AND 觀望=0 AND 有牛=0 AND 放棄=0,0,0,0,'觀望',0); DRAWGBK(顯示儀表盤=1 AND 主升浪,0,0,0,'主升浪',0); DRAWGBK(顯示儀表盤=1 AND 主浪回調,0,0,0,'主浪回調',0); DRAWGBK(顯示儀表盤=1 AND 主浪深調,0,0,0,'主浪深調',0); DRAWGBK(顯示儀表盤=1 AND 初升浪,0,0,0,'初升浪',0); DRAWGBK(顯示儀表盤=1 AND 底部反彈,0,0,0,'底部反彈',0); DRAWGBK(顯示儀表盤=1 AND 探底階段,0,0,0,'探底階段',0); DRAWGBK(顯示儀表盤=1 AND 觀望,0,0,0,'觀望',0); DRAWGBK(顯示儀表盤=1 AND 有牛,0,0,0,'有牛',0); DRAWGBK(顯示儀表盤=1 AND 放棄,0,0,0,'放棄',0); 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; 馬線:=MA(牛線,5); 買賣線:=MA(牛線,2); STICKLINE(牛線>=買賣線 AND C<O,C,O,2.8,0),COLORRED; STICKLINE(牛線>=買賣線 AND C>O,C,O,2.8,1),COLORRED; STICKLINE(牛線>=買賣線,H,MAX(C,O),0,0),COLORRED; STICKLINE(牛線>=買賣線,L,MIN(C,O),0,0),COLORRED; STICKLINE(牛線<買賣線 AND C<O,C,O,2.8,0),COLORCYAN; STICKLINE(牛線<買賣線 AND C>O,C,O,2.8,1),COLORCYAN; STICKLINE(牛線<買賣線,H,MAX(C,O),0,0),COLORCYAN; STICKLINE(牛線<買賣線,L,MIN(C,O),0,0),COLORCYAN; DRAWICON(CROSS(牛線,買賣線),L*0.99,7); DRAWICON(CROSS(買賣線,牛線),H*1.01,8); STICKLINE((C-REF(C,1))/REF(C,1)>=0.0985,O,C,3,0),COLORYELLOW; Z111:=STRCAT(HYBLOCK,'----'); Z211:=STRCAT(Z111,FGBLOCK); Z311:=STRCAT(Z211,DYBLOCK); Z411:=STRCAT(Z311,'----'); DRAWTEXT_FIX(1,0.00,0.00,0,'【主題概念】')COLORCYAN; DRAWTEXT_FIX(ISLASTBAR,0.09,0.00,0,STRCAT(Z411,GNBLOCK)),COLORCYAN; MA10:=MA(CLOSE,10); MA54:=MA(CLOSE,54); HJ_8:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5; HJ_9:=FILTER(HJ_8,10); HJ_10:=BARSLAST(HJ_9); HJ_11:=REF(HIGH,HJ_10+2); HJ_12:=REF(HIGH,HJ_10+1); HJ_13:=REF(HIGH,HJ_10); HJ_14:=MAX(HJ_11,HJ_12); HJ_15:=MAX(HJ_14,HJ_13); HJ_16:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5; HJ_17:=HJ_10<150; HJ_18:=(OPEN-HJ_15)/HJ_15*100<30; HJ_19:=(CLOSE-LLV(LOW,HJ_10))/LLV(LOW,HJ_10)*100<50; HJ_20:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30; HJ_21:=VOL/MA(VOL,5)<3.5; HJ_22:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80; HJ_25:=HJ_16 AND HJ_17 AND HJ_18 AND HJ_19 AND HJ_20 AND HJ_21 AND HJ_22; 暴利:=FILTER(HJ_25,15); PL1:=(((CLOSE-MA54)/MA54)<0.1); PL2:=(((CLOSE-MA10)/MA10)<0.3); 偏離率:=(((PL1=1) AND (PL2=1))*0.2); 平臺突破:=((((偏離率=0) AND (REF(偏離率,1)=0.2)) AND (REF((COUNT((偏離率=0.2),10)=10),1)=1))*-0.1); 妖股突破:=平臺突破=-0.1; XDF:=(暴利 OR妖股突破); VARA:=DMA(AMOUNT/VOL/100,VOL/CAPITAL); VARAA:=DYNAINFO(7)/(REF(CLOSE,1))>1.05 AND (DYNAINFO(7)/O>1.05); FLIGA:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2); 妖股:XDF AND C/REF(C,1)>1.095 AND FLIGA AND VARAA,NODRAW; DRAWTEXT(妖股,LOW*0.975,' '),COLORYELLOW; {副圖指標源碼} X_1:=DYNAINFO(4)=0; X_2:=REF(CLOSE,17)<REF(HHV(HIGH,250),18); X_3:=REF(CLOSE,18)<REF(HHV(HIGH,250),19); X_4:=REF(CLOSE,19)<REF(HHV(HIGH,250),20); X_5:=REF(CLOSE,20)<REF(HHV(HIGH,250),21); CLOSE>=REF(HHV(HIGH,250),1) AND REF(CLOSE,1)<REF(HHV(HIGH,250),2) AND REF(CLOSE,2)<REF(HHV(HIGH,250),3) AND REF(CLOSE,3)<REF(HHV(HIGH,250),4) AND REF(CLOSE,4)<REF(HHV(HIGH,250),5) AND REF(CLOSE,5)<REF(HHV(HIGH,250),6) AND REF(CLOSE,6)<REF(HHV(HIGH,250),7) AND REF(CLOSE,7)<REF(HHV(HIGH,250),8) AND REF(CLOSE,8)<REF(HHV(HIGH,250),9) AND REF(CLOSE,9)<REF(HHV(HIGH,250),10) AND REF(CLOSE,10)<REF(HHV(HIGH,250),11) AND REF(CLOSE,12)<REF(HHV(HIGH,250),13) AND REF(CLOSE,13)<REF(HHV(HIGH,250),14) AND REF(CLOSE,14)<REF(HHV(HIGH,250),15) AND REF(CLOSE,16)<REF(HHV(HIGH,250),17) AND X_2 AND X_3 AND X_4 AND X_5 AND NOT(X_1); {選股指標源碼} X_1:=DYNAINFO(4)=0; X_2:=REF(CLOSE,17)<REF(HHV(HIGH,250),18); X_3:=REF(CLOSE,18)<REF(HHV(HIGH,250),19); X_4:=REF(CLOSE,19)<REF(HHV(HIGH,250),20); X_5:=REF(CLOSE,20)<REF(HHV(HIGH,250),21); CLOSE>=REF(HHV(HIGH,250),1) AND REF(CLOSE,1)<REF(HHV(HIGH,250),2) AND REF(CLOSE,2)<REF(HHV(HIGH,250),3) AND REF(CLOSE,3)<REF(HHV(HIGH,250),4) AND REF(CLOSE,4)<REF(HHV(HIGH,250),5) AND REF(CLOSE,5)<REF(HHV(HIGH,250),6) AND REF(CLOSE,6)<REF(HHV(HIGH,250),7) AND REF(CLOSE,7)<REF(HHV(HIGH,250),8) AND REF(CLOSE,8)<REF(HHV(HIGH,250),9) AND REF(CLOSE,9)<REF(HHV(HIGH,250),10) AND REF(CLOSE,10)<REF(HHV(HIGH,250),11) AND REF(CLOSE,12)<REF(HHV(HIGH,250),13) AND REF(CLOSE,13)<REF(HHV(HIGH,250),14) AND REF(CLOSE,14)<REF(HHV(HIGH,250),15) AND REF(CLOSE,16)<REF(HHV(HIGH,250),17) AND X_2 AND X_3 AND X_4 AND X_5 AND NOT(X_1); |
|
來自: 昵稱66885806 > 《通達信指標》