通達(dá)信資金主圖-原創(chuàng) MA5:EXPMA(CLOSE,5) LINETHICK2; MA10:EXPMA(CLOSE,14) LINETHICK2; MA20:=EXPMA(CLOSE,20)NODRAW; MA60:=EXPMA(CLOSE,60); MA90:=EXPMA(CLOSE,90)NODRAW; 角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,COLORMAGENTA,NODRAW; IF(角度>=-10,MA5,DRAWNULL),COLORRED LINETHICK2; STICKLINE(CROSS(MA5,MA10),L,L-0.05,2,0),COLORWHITE; DRAWTEXT(CROSS(MA5,MA10),L-0.13,'牛') ,COLORWHITE; STICKLINE(CROSS(MA5,MA20),L,L-0.05,2,0),COLOR00FFFF; DRAWTEXT(CROSS(MA5,MA20),L-0.13,'大牛') ,COLOR00FFFF; STICKLINE(CROSS(MA10,MA5),H,H+0.05,2,0),COLORBLUE; DRAWTEXT(CROSS(MA10,MA5),H+0.13,'走人') ,COLORGREEN; 超B:=L2_AMO(0,0)/10000.0; 大B:=L2_AMO(1,0)/10000.0; 中B:=L2_AMO(2,0)/10000.0; 小B:=L2_AMO(3,0)/10000.0; 超S:=-L2_AMO(0,1)/10000.0; 大S:=-L2_AMO(1,1)/10000.0; 中S:=-L2_AMO(2,1)/10000.0; 小S:=-L2_AMO(3,1)/10000.0; 中單:=(中B)+(中S); 小單:=(小B)+(小S); 主力凈流入:"Z02.主力凈流入#DAY" LINETHICK2,COLORYELLOW CIRCLEDOT NODRAW; 超大單:"Z02.超大單#DAY" LINETHICK2,COLORYELLOW CIRCLEDOT NODRAW; 大單:"Z02.大單#DAY" LINETHICK2,COLORYELLOW CIRCLEDOT NODRAW; V5:=SUM(主力凈流入,5) NODRAW; V10:=SUM(主力凈流入,10) NODRAW; 陽:=IF(主力凈流入>0 ,CLOSE>OPEN,0)NODRAW; 陰:=IF(主力凈流入<0 ,CLOSE<OPEN,0)NODRAW; STICKLINE(陽,CLOSE,OPEN,2,0) ,COLORRED; STICKLINE(陰,C,O,2,0),COLORGREEN; 陽1:=IF(主力凈流入<0 ,CLOSE>OPEN,0)NODRAW; 陰1:=IF(主力凈流入>0,CLOSE<OPEN,0)NODRAW; STICKLINE(陽1,CLOSE,OPEN,1.5,0) ,COLORYELLOW ; STICKLINE(陰1,C,O,1.5,0),COLORFF00FF; V20:=SUM(主力凈流入,20) NODRAW; STICKLINE((CROSS(主力凈流入,V5) AND 主力凈流入>0),L,L-0.09,3,0),COLORD9D919; DRAWTEXT((CROSS(主力凈流入,V5) AND 主力凈流入>0),L-0.13,'突破') ,COLORD9D919; 資金異動:=主力凈流入>0 AND (主力凈流入/CAPITAL)*100>=0.05,COLORYELLOW,NODRAW; DRAWTEXT(C>REF(C,1) AND 資金異動 ,L-0.15,'異動'),COLORYELLOW; 主買A:="Z02.主買A#DAY" LINETHICK2,COLORYELLOW CIRCLEDOT NODRAW; 主賣A:="Z02.主賣A#DAY" LINETHICK2,COLORYELLOW CIRCLEDOT NODRAW; 主買:=主買A*100/(主買A+主賣A),NODRAW,COLORRED; 主賣:=主賣A*100/(主買A+主賣A),NODRAW,COLORGREEN; SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)); 【量能飽和】:=IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW; 主力凈買量:=(LARGEINTRDVOL-LARGEOUTTRDVOL),COLORYELLOW,NODRAW; 大宗凈流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW; 主動買賣差:=(ACTINVOL-ACTOUTVOL),COLORMAGENTA,NODRAW; 主力資金差:=((L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1)))/10000,COLORCYAN,NODRAW; DRAWRECTREL(100,0,90+CONST(主買*300/100),40,RGB(230,65,0)); DRAWRECTREL(100,60,90+CONST(主賣*300/100),100,RGB(0,104,0)); { DRAWRECTREL(100,120,390,160,RGB(0,0,100)); DRAWRECTREL(100,120,90+CONST(【量能飽和】*300/100),160,RGB(250,104,0));} 大單動向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),NODRAW; T1:=IF (大單動向>0 AND REF(大單動向,1)<0,1,0); T2:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)<0,2,T1); T3:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)<0,3,T2); T4:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)<0,4,T3); T5:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)>0 AND REF(大單動向,5)<0,5,T4); T6:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)>0 AND REF(大單動向,5)>0 AND REF(大單動向,6)<0,6,T5); T7:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)>0 AND REF(大單動向,5)>0 AND REF(大單動向,6)>0 AND REF(大單動向,7)<0,7,T6); T8:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)>0 AND REF(大單動向,5)>0 AND REF(大單動向,6)>0 AND REF(大單動向,7)>0 AND REF(大單動向,8)<0,8,T7); T9:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)>0 AND REF(大單動向,5)>0 AND REF(大單動向,6)>0 AND REF(大單動向,7)>0 AND REF(大單動向,8)>0 AND REF(大單動向,9)<0,9,T8); T:=IF (大單動向>0 AND REF(大單動向,1)>0 AND REF(大單動向,2)>0 AND REF(大單動向,3)>0 AND REF(大單動向,4)>0 AND REF(大單動向,5)>0 AND REF(大單動向,6)>0 AND REF(大單動向,7)>0 AND REF(大單動向,8)>0 AND REF(大單動向,9)>0,10,T9); D01:=COUNT(大單動向>0,10),NODRAW; DRAWTEXT_FIX(1,0.005,0.01,0,STRCAT(STRCAT('【主買比】: ',CON2STR(主買,1)),' % ')),COLORYELLOW; DRAWTEXT_FIX(1,0.005,0.07,0,STRCAT(STRCAT('【主賣比】: ',CON2STR(主賣,1)),' % ')),COLORGREEN; DRAWTEXT_FIX(1,0.005,0.13,0,STRCAT(STRCAT('【量能飽和】: ',CON2STR(【量能飽和】,1)),' % ')),COLORYELLOW; {VOL5:=MA(凈量,5),COLORWHITE; VOL10:=MA(凈量,10),COLORYELLOW; VOL40:=MA(凈量,40),COLORFF00FF ; 量托:=VOL5>=VOL40 AND CROSS(VOL10,VOL40) AND REF(VOL10,1)<REF(VOL40,1); DRAWTEXT(量托,L-0.012,'量托'),COLORWHITE;} AA1:=BARSLAST(MA60>MA20 AND (MA20=MA10 OR MA20>MA10)); BB1:=REF(COUNT(C<MA60,AA1)=AA1,1); CC1:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3; 芙蓉出水:=BB AND CC1,COLOR00FF00; DRAWTEXT(芙蓉出水,H+0.12,'芙蓉出水'),COLORFF00FF; STICKLINE(芙蓉出水,H,L,0.5,1),COLORFF00FF; STICKLINE(芙蓉出水,O,C,3,1),LINETHICK2,COLORFF00FF; {三日低點(diǎn):CONST(REF(LOW,3))COLORLIRED; 三日高點(diǎn):CONST(REF(H,3))COLORRED;} 漲停:=BETWEEN(CLOSE/REF(CLOSE,1),1.0983,1.110); DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,9) ; DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,4); VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100; VAR6:=(VAR3+VAR4+VAR5)/3; VAR7:=EMA(VAR6,5); ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK; VAR8:=IF(VAR6<=-20,10,0); VAR9:=HHV(VAR8,10); VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0); K:=EMA(VAR7,5)*2, , COLORFF00FF; D:=EMA(K,5), , COLORWHITE; J:=K*3-D*2, ,COLORYELLOW; VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10; HS:=VOL/CAPITAL*100, , COLORGREEN; DRAWTEXT(VAR8=10 AND FILTER(VAR8=10,5),LOW*1.00,'準(zhǔn)備') COLORMAGENTA; DRAWTEXT(VARA=20,LOW*1.00,'一定要買') COLORRED; DRAWICON(VARA=20,LOW*1.00,1); VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1); DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'莊家異動'),LINETHICK1,COLORFF00FF; VAR12:=(HIGH+LOW+CLOSE)/3; VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14)); VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70)); VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0); VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15); VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; VAR18:=100-ABS(VAR17); VAR19:=IF(VAR18<90,VAR18,100); VAR1A:=IF(VARE>0,VARE,0); VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60; VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100; DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*1.00,'大動作') COLORYELLOW; VAR20:=PEAKBARS(3,15,1)<10; VAR21:=IF(VAR20=1,2,0); VAR22:=IF(VAR21=2,2,0); VAR23:=IF(VAR22>REF(VAR22,1),35,0)LINETHICK2; DRAWTEXT(VAR23=35,HIGH*1.00,'一定要逃')COLORGREEN; DRAWICON(VAR23=35,HIGH*1.00,2); 年:=YEAR,NODRAW; 月:=MONTH,NODRAW; 星期:=WEEKDAY,NODRAW; 日1:=DATETODAY(DATE); 上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT); 自然日:=日1-DATETODAY(上市日)+1; ZB1:=(自然日-REF(自然日,1))!=星期-REF(星期,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0; 本周第幾天:=BARSLAST(ZB1)+1; 本月第幾天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1; MA1:=REF(C,本周第幾天); MA2:=REF(MA1,本周第幾天); MA3:=REF(MA2,本周第幾天); MA4:=REF(MA3,本周第幾天); MA05:=REF(MA4,本周第幾天); MA6:=REF(MA05,本周第幾天); MA7:=REF(MA6,本周第幾天); MA8:=REF(MA7,本周第幾天); MA9:=REF(MA8,本周第幾天); 五周價:=(C+MA1+MA2+MA3+MA4)/5; 決策5:REFDATE(五周價,DATE),COLORFFAB00,LINETHICK1 DOTLINE ; {A:=(3*CLOSE+LOW+OPEN+HIGH)/6; D1:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6) +13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12) +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+ REF(A,20))/211; D2:=EMA(D1,2); D3:=EMA(D2,2); K1:=EMA(D3,2); DRAWTEXT(CROSS(D1,K1),L-0.05,'波段買入'),COLOR0099FF;} {軌道} CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); DD:=DMA(CLOSE,CC); 上軌:(1+7/100)*DD,DOTLINE,COLORGREEN,LINETHICK1; 下軌:(1-7/100)*DD,DOTLINE,COLORGREEN,LINETHICK1; 中軌:(上軌+下軌)/2,DOTLINE,COLORGREEN,LINETHICK1; 上軌紅:IF(上軌>=REF(上軌,1),上軌,DRAWNULL),DOTLINE,COLORRED; 中軌紅:IF(中軌>=REF(中軌,1),中軌,DRAWNULL),DOTLINE,COLORRED; 下軌紅:IF(下軌>=REF(下軌,1),下軌,DRAWNULL),DOTLINE,COLORRED; DRAWNUMBER(ISLASTBAR,上軌,上軌),COLOR00FFFF; DRAWNUMBER(ISLASTBAR,下軌,下軌),COLORFFFF00; DRAWNUMBER(ISLASTBAR,中軌,中軌),COLOR00FF00; DRAWTEXT_FIX(1,0.38,0,0,'所屬行業(yè):')COLOR0080FF; DRAWTEXT_FIX(1,0.48,0,0,HYBLOCK)COLOR0080FF; DRAWTEXT_FIX(1,0.58,0,0,'所屬地區(qū):')COLOR00FFFF; DRAWTEXT_FIX(1,0.68,0,0,DYBLOCK)COLOR00FFFF; 局部低點(diǎn)預(yù)選A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4); 局部低點(diǎn)預(yù)選B:=BACKSET(局部低點(diǎn)預(yù)選A=0 AND REF(局部低點(diǎn)預(yù)選A,1)=1,2); 局部低點(diǎn)預(yù)選C:=IF(局部低點(diǎn)預(yù)選B=1 AND REF(局部低點(diǎn)預(yù)選B,1)=0,-1,0); 局部高點(diǎn)預(yù)選A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4); 局部高點(diǎn)預(yù)選B:=BACKSET(局部高點(diǎn)預(yù)選A=0 AND REF(局部高點(diǎn)預(yù)選A,1)=1,2); 局部高點(diǎn)預(yù)選C:=IF(局部高點(diǎn)預(yù)選B=1 AND REF(局部高點(diǎn)預(yù)選B,1)=0,1,0); 缺口判斷:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0)); 距前高天:=BARSLAST(局部高點(diǎn)預(yù)選C=1); 距前低天:=BARSLAST(局部低點(diǎn)預(yù)選C=-1); 小值周期:=LOWRANGE(L); 大值周期:=TOPRANGE(H); 低保留AA:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0); 低保留AB:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判斷,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0); 低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0); 預(yù)判:=IF((距前低天<4 AND HHV(缺口判斷,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0); 判斷:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 預(yù)判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0); 高保留A:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0); 高保留B:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判斷,距前低天)=1),1,0); 高保留:=IF((高保留A=1 OR 高保留B=1 OR 判斷=1) AND H>REF(L,距前低天+1),1,0); 預(yù)判A:=IF((距前高天<4 AND HHV(缺口判斷,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0); 判斷A:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 預(yù)判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0); 低保留A:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0); 低保留B:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判斷,距前高天)=-1 OR 判斷A=-1),-1,0); 低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0); 距前高天A:=BARSLAST(高保留=1); 距前低天A:=BARSLAST(低保留=-1); 預(yù)判X:=IF((距前低天A<4 AND HHV(缺口判斷,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0); 判斷X:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 預(yù)判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0); 高保留XA:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0); 高保留XB:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判斷,距前低天A)=1),1,0); 高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判斷X=1) AND H>REF(L,距前低天A+1),1,0); 預(yù)判XA:=IF((距前高天A<4 AND HHV(缺口判斷,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0); 判斷XA:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 預(yù)判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0); 低保留XA:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0); 低保留XB:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判斷,距前高天A)=-1 OR 判斷XA=-1),-1,0); 低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0); 距前高天YA:=BARSLAST(高保留X=1); 距前低天YA:=BARSLAST(低保留X=-1); 預(yù)判YX:=IF((距前低天YA<4 AND HHV(缺口判斷,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0); 判斷YX:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 預(yù)判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0); 高保留YXA:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0); 高保留YXB:=IF(局部高點(diǎn)預(yù)選C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判斷,距前低天YA)=1),1,0); 高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判斷YX=1) AND H>REF(L,距前低天YA+1),1,0); 預(yù)判YXA:=IF((距前高天YA<4 AND HHV(缺口判斷,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0); 判斷YXA:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 預(yù)判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0); 低保留YXA:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0); 低保留YXB:=IF(局部低點(diǎn)預(yù)選C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判斷,距前高天YA)=-1 OR 判斷YXA=-1),-1,0); 低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0); AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0)); 極點(diǎn)保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD); 局部極點(diǎn):IF(極點(diǎn)保留=-1,L,IF(極點(diǎn)保留=1,H,DRAWNULL)),CIRCLEDOT,COLORYELLOW,LINETHICK5; 三分之一:=IF(CONST(MAX(BARSLAST(極點(diǎn)保留=-1),BARSLAST(極點(diǎn)保留=1)))>=CURRBARSCOUNT-1, CONST((REF(H,BARSLAST(極點(diǎn)保留=1)) - REF(L,BARSLAST(極點(diǎn)保留=-1)))*1/3+REF(L,BARSLAST(極點(diǎn)保留=-1))),DRAWNULL); 一天線:=MA(CLOSE,1),COLOR0000FF; 兩天線:=MA(CLOSE,5),COLORYELLOW; DRAWICON(CROSS(一天線,兩天線),L-0.03,34); DRAWICON(CROSS(兩天線,一天線),H+0.05,35); MAA5:=MA(CLOSE,5),COLOR0000FF; MAA10:=MA(CLOSE,10),COLORYELLOW; DRAWICON(CROSS(MAA5,MAA10),L-0.03,9); DRAWICON(CROSS(MAA10,MAA5),H+0.05,19); {箱體} DF1:=(C-REF(C,1))/REF(C,1)*100>=7; AA01:=BARSLAST(DF1); 突破箱體1:=CROSS(C,REF(C,AA01)); 陽頂:DRAWLINE(IF(DF1>REF(DF1,1),DF1,DRAWNULL),C,REF(DF1,1),REF(C,1),1)COLORCYAN LINETHICK2; 箱底1:=LLV(MIN(L,REF(L,AA01)),AA01),COLORCYAN,LINETHICK2; {DRAWTEXT(ISLASTBAR,陽頂,' 陽頂');} DRAWNUMBER(ISLASTBAR,陽頂,陽頂),COLORCYAN; |
|