|
26  AR1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA (SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1); VAR3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA (SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1); 趨勢:EMA(VAR3,3)-10,COLORFF0000; A1:IF(趨勢>76,趨勢,80),COLORYELLOW; DRAWICON(CROSS(趨勢,0),0,1); 建倉:=0,COLORFFFF00; VAR4:=(趨勢-REF(趨勢,1))/REF(趨勢,1)*100; STICKLINE(趨勢<=4,0,20,5,0),COLORCC9900; DRAWTEXT(FILTER(趨勢<=4,15),30,'建倉區(qū)'),COLORWHITE; STICKLINE(趨勢>=90 AND VAR4,0,30,5,0),COLORGRAY; VAR5:=MA(趨勢,8); 27 STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.4,0 ),COLORCYAN; 現(xiàn)價: DYNAINFO(7),COLOR0077FF,POINTDOT; KC:=(2*C+H+L+O)/5; CB:EMA(KC,5),COLOR00FF00,LINETHICK2; XL:=SLOPE(CB,3)>0; IF(CB>REF(CB,1),CB,DRAWNULL),COLORRED,LINETHICK3; {實時趨勢流向} 動向流:CB,COLORFF8DAD; MA(動向流,30), COLORFF1111,LINETHICK4; MA(動向流,29) ,COLORFF2222,LINETHICK3; MA(動向流,28) ,COLORFF3333,LINETHICK2; MA(動向流,27) ,COLORFF4444; MA(動向流,26) ,COLORFF5555; MA(動向流,25) ,COLORFF6666; MA(動向流,24) ,COLORFF7777; MA(動向流,23) ,COLORFF8888; MA(動向流,22) ,COLORFF9999; MA(動向流,21) ,COLORFFAAAA; MA(動向流,20), COLORFFBBBB,LINETHICK3; MA(動向流,19) ,COLORFFCCCC; MA(動向流,18), COLORFFDDDD; MA(動向流,17), COLORFFEEEE; MA(動向流,16) ,COLORFFFFFF; MA(動向流,15) ,COLOREEEEFF; MA(動向流,14) ,COLORDDDDFF; MA(動向流,13), COLORCCCCFF; MA(動向流,12) ,COLORBBBBFF; MA(動向流,11) ,COLORAAAAFF; MA(動向流,10) ,COLOR9999FF,LINETHICK3; MA(動向流,9) ,COLOR8888FF; MA(動向流,8), COLOR7777FF; MA(動向流,7) ,COLOR6666FF; MA(動向流,6) ,COLOR5555FF; MA(動向流,5) ,COLOR4444FF; MA(動向流,4) ,COLOR3333FF; MA(動向流,3) ,COLOR2222FF; MA(動向流,2) ,COLOR1111FF,LINETHICK2; VAR1:=(SMA(HIGH,20,2) * 1.05); STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,3,0),COLOR00B5FF; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,1,0),COLOR00E4FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,OPEN,2,0),COLOR0077FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,OPEN,1,0),COLOR00FF00; 28 做空能量線: SMA((HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100,2,1),COLORGREEN,LINETHICK3; 做多能量線: SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,5,1)-8,COLORRED,LINETHICK3; 20,POINTDOT,COLORF00FF0; 50,POINTDOT,COLORGREEN; 80,POINTDOT,COLORWHITE; 29 DIF:EMA(CLOSE,7)-EMA(CLOSE,14),COLORCCFFFF; MACD:EMA(DIF,5),COLOR58FF58; DEF:2*(DIF-MACD),COLORFFFF00,LINETHICK0; STICKLINE(DEF>=0 AND DEF>=REF(DEF,1),0,DEF,6,1),COLORRED; STICKLINE(DEF>=0 AND DEF< REF(DEF,1),0,DEF,6,0),COLORRED; STICKLINE(DEF<0 AND DEF>=REF(DEF,1),0,DEF,6,1),COLORFFFF00; STICKLINE(DEF<0 AND DEF< REF(DEF,1),0,DEF,6,0),COLORFFFF00; 縮頭:=IF(DEF>0 AND REF(DEF,1)>REF(DEF,2) AND DEF< REF(DEF,1),1,0); 縮腳:=IF(DEF<0 AND REF(DEF,1)< REF(DEF,2) AND DEF>REF(DEF,1),1,0); 阻力:=IF(CROSS(C,MA(C,20)) OR CROSS(C,MA(C,60)),1,0); 支撐:=IF(CROSS(MA(C,20),C) OR CROSS(MA(C,60),C),1,0); 做多:=IF(CROSS(MACD,DIF) AND DIF>0 AND MACD>0,1,0); 放空:=IF(CROSS(DIF,MACD) AND DIF<0 AND MACD<0,1,0); 30 {N：1 50 20，N1：1 20 7，N2：1 100 79} JJ:=(CLOSE+HIGH+LOW)/3; A:=EMA(JJ,10); B:=REF(A,1); M1:EMA(CLOSE,3); M2:EMA(CLOSE,8); M3:EMA(M2,13); M4:EMA(M2,55); 持股區(qū)域:STICKLINE(A>B,A,B,2,0),COLORYELLOW; 持幣區(qū)域:STICKLINE(A<B,A,B,2,0),COLORBLUE; 31 短3:EMA(CLOSE,3),COLORFFFF00; K5:EMA(CLOSE,5) ,COLORBLUE; K8:EMA(CLOSE,8) ,COLORBLUE; K10:EMA(CLOSE,10) ,COLORBLUE; K12:EMA(CLOSE,12) ,COLORBLUE; K15:EMA(CLOSE,15) ,COLORFF00FF; 長30:EMA(CLOSE,30) ,COLORRED; K35:EMA(CLOSE,35) ,COLORYELLOW; K40:EMA(CLOSE,40) ,COLORYELLOW; K45:EMA(CLOSE,45) ,COLORYELLOW; K50:EMA(CLOSE,50) ,COLORYELLOW; K60:EMA(CLOSE,60) ,COLORGREEN; 32 VAR6J:="KDJ.J#WEEK"(9,3,3); VAR8J:="KDJ.J#MONTH"(9,3,3); DEA7:="MACD.DEA#WEEK"; DIFF7:="MACD.DIF#WEEK"; D7:=DIFF7-DEA7; DEA8:="MACD.DEA#MONTH"; DIFF8:="MACD.DIF#MONTH"; D8:=DIFF8-DEA8; 黑碼抄底:=(CROSS(VAR6J,0) AND D8>0 OR CROSS(VAR8J,0) AND D7>0); STICKLINE(黑碼抄底,0.82,0,6,0),COLORYELLOW; STICKLINE(黑碼抄底,0.82,0,4,0),COLORBLUE; 33 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,COLORGREEN{COLORRED}; 馬線:=MA(牛線,6),COLORMAGENTA{COLORYELLOW}; STICKLINE(C>牛線,2.5,4,8,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<馬線,2.5,4,8,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(牛線>=C AND C>=馬線,2.5,4,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; A:=MAX(MA(C,60),MA(C,120)); B:=MIN(MA(C,60),MA(C,120)); STICKLINE(C>=A,0.5,2,8,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<=B,0.5,2,8,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(A>=C AND C>=B,0.5,2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; {R:=0;} E:=MAX(MA(C,45),MA(C,90)); F:=MIN(MA(C,45),MA(C,90)); STICKLINE(C>E,-1.5,0,8,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<F,-1.5,0,8,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(E>=C AND C>=F,-1.5,0,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; J:=MAX(MA(C,30),MA(C,60)); K:=MIN(MA(C,30),MA(C,60)); STICKLINE(C>J,-3.5,-2,8,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<K,-3.5,-2,8,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(J>=C AND C>=K,-3.5,-2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; 34 千手:VOL/1000,VOLSTICK,COLORBLUE; A20:MA(千手,20),COLORRED,LINETHICK1; STICKLINE(千手/A20>3,千手,0,3,0),COLORBLUE; STICKLINE(千手/A20>1.5 AND 千手/A20<=3,千手,0,3,0),COLOR99CCFF; STICKLINE( 千手/A20< 0.6,千手 ,0 , 3,0 ),COLOR00CC00; 換手率:VOL/CAPITAL*100,COLOR0000FF,NODRAW; STICKLINE(CROSS(換手率,10),VOL/1000,(VOL/1000)/2,3,0),COLORFFFFFF; STICKLINE(換手率/REF(換手率,1)<=0.5,0,(VOL/1000)/2,2,0),COLORYELLOW; A:=MA(換手率,2); X:=LLV(A,20),; X1:=(A-LLV(A,20))=0; 換手最小:IF(EVERY (A>0,5) AND FILTER(X1,5),X1,0),COLORFF0099,NODRAW; 小天:=BARSLAST(換手最小); X2:=HHV(A,20); X3:=(A-X2)=0; 換手最大:IF(EVERY(REF(A,1)<X2,5) AND FILTER(X3,5),1,0),COLOR0000FF,NODRAW; 大天:=BARSLAST(換手最大),COLOR0000FF; STICKLINE(換手最小,0,千手,3,0),COLORFF0099; STICKLINE(換手最大,千手/2,千手,3,0),COLOR0000FF; 35 VOLUME:VOL,VOLSTICK; |:COUNT(CLOSE>REF(CLOSE,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2; STICKLINE(|,0,V,1,0),COLORGREEN; DRAWTEXT(|,VOL+3000,'降'),COLORGREEN; T:=DYNAINFO(8)>0; VO:VOL=LLV(VOL,100) AND T; 地量柱:T AND VO,COLORBLUE; STICKLINE(地量柱,0,V,1,0),COLORBLUE; DRAWTEXT(地量柱,VOL+3000,'地'),COLORBLUE; BLZ:=VOL>REF(V,1)*1.9; BLZ1:=VOL<REF(LLV(VOL,13),1); BLZ2:=VOL<REF(LLV(VOL,55),1); STICKLINE(BLZ,0,V,1,0),COLORYELLOW; 倍量柱:BLZ,COLORYELLOW; DRAWTEXT(倍量柱,VOL+3000,'倍'),COLORYELLOW; HJZ:=(3*C+H+L+O)/6; HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36; HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O; 黃金柱:FILTER(HJZ3,5),STICK,COLORRED,LINETHICK4; STICKLINE(黃金柱,0,V,1,0),COLORRED; DRAWTEXT(黃金柱,VOL+10000,'黃'),COLORRED; 價漲量縮:|,COLORGREEN; FLZ:=V>REF(V,1)*0.98 AND V<REF(V,1)*1.02,LINETHICK0; STICKLINE(FLZ,0,V,1,0),COLORMAGENTA; DRAWTEXT(FLZ,VOL+3000,'平'),COLORMAGENTA; 平量柱:FLZ,COLORMAGENTA; 上斜線:DRAWLINE(V<= LLV(V,20),VOL,VOL>=HHV(V,20) ,HHV(V,20),0),,COLOR00FFFF,LINETHICK1; 下斜線:DRAWLINE(V>=HHV(V,20),V,V<=LLV(V,10),HHV(V,6),0),COLORFFCCCC,LINETHICK1; DRAWLINE(V>=HHV(V,30),V,V<=LLV(V,30),HHV(V,30),1),COLORYELLOW; 歷史最高成交量:HHV(V,BARSCOUNT(V)),NODRAW; 歷史新高:=FILTERX(V=HHV(V,BARSCOUNT(V)),BARSCOUNT(V)),COLORYELLOW; DRAWTEXT(歷史新高,V,'←歷史新高'),COLORYELLOW; STICKLINE(歷史新高,0,V,2,1); DRAWLINE(歷史新高>0,歷史最高成交量,歷史最高成交量,V,1),LINETHICK1,COLORRED; 乾坤賣點:DRAWLINE(VOL<=LLV(VOL,8) ,LLV(VOL,3),VOL>=HHV(VOL,35),VOL,0), COLORFFCCCC,LINETHICK1; 乾坤買點:DRAWLINE(VOL>=HHV(VOL,35),VOL,VOL<=LLV(VOL,8) ,HHV(VOL,3),0), COLORFFCCCC,LINETHICK1; 梯量柱:=V>REF(V,1)*1.05 AND REF(V,1)>REF(V,2)*1.05 AND C>O AND REF(C>O,1); 縮倍量:=VOL<=REF(V,1)*0.55; STICKLINE(梯量柱,0,V,1,0),COLORRED; STICKLINE(縮倍量,0,V*0.75,1,0),COLOR0099FF; DRAWTEXT(梯量柱,V*1.0,'梯'),COLORYELLOW; DRAWTEXT(縮倍量,V*1.0,'縮'),COLORRED; 36  MA135:=MA(V,135); G:V-MA135,COLORSTICK; A:=IF(G>0,G,0); B:=IF(G<0,-G,0); 多:SUM(A,30)*CAPITAL/100000000,COLORYELLOW; 空:SUM(B,30)*CAPITAL/100000000,COLORBLUE; 37 {N：1 50 20，N1：1 20 7，N2：1 100 79} JJ:=(CLOSE+HIGH+LOW)/3; A:=EMA(JJ,10); B:=REF(A,1); M1:EMA(CLOSE,3); M2:EMA(CLOSE,8); M3:EMA(M2,13); M4:EMA(M2,55); 持股區(qū)域:STICKLINE(A>B,A,B,2,0),COLORYELLOW; 持幣區(qū)域:STICKLINE(A<B,A,B,2,0),COLORBLUE; 38 {先隱藏賦值，為了能將你想看到的線型的數(shù)據(jù)顯示在指標的當頭位置} MA20: MA(CLOSE,20),COLORRED,LINETHICK2; MA60: MA(CLOSE,60),COLORFF0090,LINETHICK2; UP:MA20+2*STD(CLOSE,20),LINETHICK1,COLOR404080; DW:MA20-2*STD(CLOSE,20),LINETHICK1,COLORC0C0C0; UP2:MA60+2*STD(CLOSE,60),LINETHICK1,COLOR808080; DW2:MA60-2*STD(CLOSE,60),LINETHICK1,COLOR004000; {然后畫色帶} DRAWBAND(MA60,RGB(200,150,30),UP2,RGB(200,150,30)); DRAWBAND(MA60,RGB(100,100,150),DW2,RGB(100,100,150)); DRAWBAND(MA20,RGB(0,50,150),DW,RGB(0,50,150)); DRAWBAND(MA20,RGB(155,50,50),UP,RGB(155,50,50)); {IF(UP>UP2,UP2,UP)就是當UP大于UP2時，顯示UP2,否則顯示UP} DRAWBAND(UP,RGB(0,150,50),IF(UP>UP2,UP2,UP),RGB(0,150,50)); DRAWBAND(DW,RGB(0,150,50),IF(DW<DW2,DW2,DW ),RGB(0,150,50));{因為畫色帶遮擋了原來的K線，所以要重做一次K線} STICKLINE(C>O,H,L,0,0),COLORRED; STICKLINE(C<=O,H,L,0,0),COLORCYAN; STICKLINE(C>O,C,O,3.1,1),COLORRED; STICKLINE(C<=O,C,O,3.1,0),COLORCYAN; {最后將你想要的賦值的線畫出來和變色處理} MA20,COLOR00FFFF,LINETHICK2; IF(MA(C,20)<REF(MA(C,20),1),MA(C,20),DRAWNULL),COLOR0B0000,LINETHICK2; MA60,COLORFF0090,LINETHICK2; IF(MA(C,60)<REF(MA(C,60),1),MA(C,60),DRAWNULL),COLORFFF000,LINETHICK2; 39 M:=55; N:=34; LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); DRAWTEXT(CROSS(85,RSI),75,'▼'),COLORGREEN; VAR1:=IF(YEAR>=2038 AND MONTH>=1,0,1); VAR2:=REF(LOW,1)*VAR1; VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1; VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1; VAR5:=LLV(LOW,30)*VAR1; VAR6:=HHV(VAR4,30)*VAR1; VAR7:=IF(MA(CLOSE,58),1,0)*VAR1; VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1; 吸籌A:IF(VAR8>100,100,VAR8)*VAR1,COLORRED; 吸籌B:STICKLINE(吸籌A>-150,0,吸籌A,8,0),COLORRED; 散戶線: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M)),COLORFFFF00,LINETHICK2; RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; 主力線:EMA(J,6),COLORFF00FF,LINETHICK2; 40 強弱分界線: 50,POINTDOT, LINETHICK2, COLORFFFF00; VAR2:=IF(MONTH<12,1,1); VAR3:=(2*CLOSE+HIGH+LOW)/4; VAR4:=LLV(LOW,34); VAR5:=HHV(HIGH,34); 主力:EMA((VAR3-VAR4)/(VAR5-VAR4)*100,13)*VAR2,LINETHICK4,COLORRED; 散戶:EMA(0.667*REF(主力,1)+0.333*主力,2),LINETHICK2,COLORFF9933; DRAWTEXT(CROSS(主力,散戶) AND 主力<22,20,'起動'),LINETHICK2,COLOR0099FF; DRAWICON(CROSS(主力,散戶) AND 主力<22,25,1); DRAWTEXT(CROSS(主力,30) AND 散戶<主力,40,'上揚 '),LINETHICK2,COLOR00CCFF; DRAWICON(CROSS(主力,30) AND 散戶<主力,35,1); DRAWTEXT(CROSS(主力,65) AND 散戶<主力,55,'沖頂 '),LINETHICK2,COLOR9933FF; DRAWICON(CROSS(主力,65) AND 散戶<主力,70,2); DRAWTEXT(CROSS(主力,75) AND 散戶<主力,67,'小心被套'),LINETHICK2,COLOR009900; DRAWICON(CROSS(主力,75) AND 散戶<主力,80,2); DRAWTEXT(CROSS(散戶,主力) AND 散戶>75,80,'頭部'), COLORYELLOW; DRAWICON(CROSS(散戶,主力) AND 散戶>75,85,2); 買入脈沖:IF(CROSS(主力,散戶) AND 主力<35,55,5),LINETHICK4,COLORGREEN; 賣出脈沖:IF(CROSS(散戶,主力) AND 散戶>75,75,90),LINETHICK4,COLORRED; BB1:=WINNER(CLOSE)*100; BB2:=100-BB1; BB3:=ABS(BB1-BB2); 41 M3:=MA(CLOSE,3),COLORRED; M13:=MA(CLOSE,13),COLORRED; M34:=MA(CLOSE,34),COLORRED; X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120)); STICKLINE(M3>=M13 AND M34>=REF(M34,1),8,9,1,1 ),COLORRED; STICKLINE(M3<M13 AND M34>=REF(M34,1),8,9,1,1 ),COLORYELLOW; STICKLINE(M3<M13 AND M34<REF(M34,1),8,9,1,1 ),COLORGREEN; STICKLINE(M3>=M13 AND M34<REF(M34,1),8,9,1,1 ),COLORMAGENTA; XG:=(M3>=M13 AND M34<REF(M34,1))OR (M3>=M13 AND M34>=REF(M34,1))AND REF((M3<M13 AND M34<REF(M34,1)),1); XG1:=(M3>=M13 AND M34>=REF(M34,1))AND REF((M3<M13 AND M34>=REF(M34,1)),1); 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,COLORGREEN{COLORRED}; 馬線:=MA(牛線,6),COLORMAGENTA{COLORYELLOW}; STICKLINE(C>牛線,6,7,2,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<馬線,6,7,2,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(牛線>=C AND C>=馬線,6,7,2,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; A:=MAX(MA(C,60),MA(C,120)); B:=MIN(MA(C,60),MA(C,120)); STICKLINE(C>=A,4,5,2,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<=B,4,5,2,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(A>=C AND C>=B,4,5,2,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; E:=MAX(MA(C,45),MA(C,90)); F:=MIN(MA(C,45),MA(C,90)); STICKLINE(C>E,2,3,2,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<F,2,3,2,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(E>=C AND C>=F,2,3,2,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; J:=MAX(MA(C,30),MA(C,60)); K:=MIN(MA(C,30),MA(C,60)); STICKLINE(C>J,0,1,2,0),COLORRED{COLORGREEN},LINETHICK2; STICKLINE(C<K,0,1,2,0),COLORGREEN{COLORRED},LINETHICK2; STICKLINE(J>=C AND C>=K,0,1,2,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2; {DRAWICON(XG OR XG1,10,13);} 全綠:=((J>=C AND C>=K) OR C<K) AND ((E>=C AND C>=F) OR C<F) AND ((A>=C AND C>=B) OR C<=B) AND ((牛線>=C AND C>=馬線) OR C<馬線); 全紅:=C>J AND C>E AND C>=A AND C>牛線 AND (M3>=M13 AND M34>=REF(M34,1)); RSV:=(CLOSE - LLV(LOW,18))/(HHV(HIGH,18) - LLV(LOW,18))*100; KK:=EMA(RSV,3); D:=EMA(KK,3); JJJ:=(3*KK-2*D); KDJ1:=REF(COUNT(JJJ<REF(JJJ,1),5)>=3,1) AND REF(JJJ,1)<20; KDJ2:=JJJ>REF(JJJ,1); JJ:=MAX(MA(C,30),MA(C,60)); KKK:=MIN(MA(C,30),MA(C,60)); 全綠A:=((JJ>=C AND C>=KKK) OR C<KKK) AND ((E>=C AND C>=F) OR C<F) AND ((A>=C AND C>=B) OR C<=B) AND ((牛線>=C AND C>=馬線) OR C<馬線); 全綠選股:IF(FILTER(KDJ1 AND KDJ2,3)AND 全綠A,10,-2),COLOR00FFFF,LINETHICK1; DRAWICON(全綠選股=10,-1,1); 全紅選股:IF(全紅 AND REF(全紅,1)=0,10,-2),COLORFF00FF,LINETHICK1; DRAWICON(全紅選股=10,-1,1); 42 魚1:=EMA((CLOSE+LOW+HIGH)/3, 3); VAR1:=EMA(CLOSE, 26); 釣1:=(VAR1+2*STD(CLOSE, 26)+VAR1+2*STD(CLOSE, 49))/2; VAR2:=EMA(CLOSE, 26); VAR3:=VAR2+2*STD(CLOSE, 9); VAR4:=VAR2+2*STD(CLOSE, 12); VAR5:=VAR2+2*STD(CLOSE, 17); VAR6:=VAR2+2*STD(CLOSE, 21); VAR7:=VAR2+2*STD(CLOSE, 26); VAR8:=VAR2+2*STD(CLOSE, 34); VAR9:=VAR2+2*STD(CLOSE, 50); VAR10:=ABS(EMA(CLOSE, 100)-EMA(CLOSE, 10))/EMA((CLOSE+LOW+HIGH)/3, 3)*CLOSE*2+EMA((CLOSE+LOW+HIGH)/3, 3); VAR11:=ABS(EMA(CLOSE, 100)-EMA(CLOSE, 10))/EMA((CLOSE+LOW+HIGH)/3, 3)*CLOSE+EMA((CLOSE+LOW+HIGH)/3, 3); 海底1:=EMA(EMA((CLOSE+LOW+HIGH)/3, 3), 26)*0.880; 超跌區(qū):IF(LOW<海底1 ,LOW,LOW-1 ),POINTDOT,LINETHICK7,COLORYELLOW;LOW-1,POINTDOT,LINETHICK7,COLOR000000; 超漲區(qū):IF(HIGH>釣1 ,HIGH,HIGH+1 ),POINTDOT,LINETHICK7,COLOR00FF00;HIGH+1,POINTDOT,LINETHICK7,COLOR000000; 魚:魚1,COLORWHITE,LINETHICK2; 釣:釣1,LINETHICK2, COLORRED; 餌:VAR10,LINETHICK2, COLORYELLOW; 網(wǎng):EMA(CLOSE, 10), COLORGREEN; 海底:海底1,LINETHICK5, COLORFFBB44; EMA(CLOSE, 14), COLOR00FE00; EMA(CLOSE, 21), COLOR00ED00; EMA(CLOSE, 30), COLOR00EC00; EMA(CLOSE, 49), COLOR00CA00; EMA(CLOSE, 70), COLOR00C900; EMA(CLOSE, 100), COLOR00B800; EMA(CLOSE, 150), COLOR00B700; 43 周換:SUM(V/CAPITAL*100,5),NODRAW,COLORMAGENTA; 預測:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL),NODRAW; STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,預測,0,-1,-1),COLOR00C0C0; 持幣:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN; 持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORMAGENTA; JJ:=(HIGH+LOW+CLOSE)/3; QJ9:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW); TD1:=QJ9*(MIN(OPEN,CLOSE)-LOW); XD1:=QJ9*(JJ-MIN(CLOSE,OPEN)); XD2:=QJ9*(HIGH-MAX(OPEN,CLOSE)); TD2:=QJ9*(MAX(CLOSE,OPEN)-JJ); 日凈:((TD1+XD1)-(TD2+XD2))/10000,NODRAW; 周凈:SUM(日凈,5),NODRAW; QJ0:=(HIGH+LOW+CLOSE)/3; QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE)); QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0); QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW); QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN)); QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW)); 特大:QJ4*QJ5,NODRAW;大單:QJ3*QJ5,NODRAW; 中單:QJ1*QJ5,NODRAW;小單:QJ2*QJ5,NODRAW; AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 買量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0; 賣量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN; 主力凈流入:MA(買量+賣量/2,3)*AMO/V/100000000,COLORYELLOW,LINETHICK1; 量〗:VOL,NODRAW,VOLSTICK; STICKLINE(V>=3*REF(V,1),V/3,V/3,3.9,0),COLORGREEN; STICKLINE(V>=2*REF(V,1),V/2,V/2,3.9,0),COLORYELLOW; DRAWLINE(V>=HHV(V,30),V,V<=LLV(V,10),HHV(V,6),1),COLORFFCCCC; VAR7:=(HIGH - LOW); VAR8:=ABS((OPEN - CLOSE)); VAR9:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR10:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR11:=((VAR8 / VAR7) * VOL); VAR12:=((VAR9 / VAR7) * VOL); VAR13:=((VAR10 / VAR7) * VOL); VAR14:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); VARD:=REF(CLOSE,1); DRAWTEXT(((VAR14 > 2) AND (VOL < (MA(VOL,5) / 2))),V-15000,'◆'),COLORFB2DFB; DRAWTEXT(((VAR14 > 2) AND (VOL < (MA(VOL,5) / 2))),V+59000,'地'),COLORFB2DFB; 換手率:=((VOL / CAPITAL) * 100); DRAWTEXT((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (換手率 > 1)),(V+55000),'變'),COLORFFFFCC; 量:=IF((CLOSE > 200),(VOL / 1000000),(VOL / 100)), LINETHICK0; 振幅:=(((HIGH - LOW) / LOW) * 100); DRAWTEXT(VAR12>VAR11 AND VARA>2 AND VAR12>VAR13 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA (CLOSE,30) AND HIGH>MA(CLOSE,60) AND VOL>MA(VOL,5) AND VAR12>=MA(VOL,5),V+5000,'高'),COLORGREEN; DRAWTEXT(VAR13>VAR11 AND VAR13>VAR12 AND VARA<-2 AND CLOSE<MA(CLOSE,30) AND VAR13<MA (VOL,5)/2 AND MA(VOL,5)<MA(VOL,10),V+5000,'低'), COLORYELLOW; LC1:=REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC1,0),6,1)/SMA(ABS(CLOSE-LC1),6,1)*100; 抓大牛:CROSS(RSI1,11); DRAWTEXT(抓大牛,V+55000,'抓'),COLORRED; EMA13:=EMA(C,13),COLORFF8080; DRAWTEXT(CROSS(HIGH,EMA13),V+5000,'底'),COLORYELLOW; A01:=DYNAINFO(7); A03:=BARSCOUNT(CLOSE); A04:=(SMA((CLOSE / HHV(HIGH,120)),3,1) * 100); A05:=IF((A03 > 20),A04,0); A06:=IF((LOW > A01),0,IF((HIGH < A01),1,(((A01 - LOW) + 0.009) / ((HIGH - LOW) + 0.009)))); A07:=DMA(A06,(VOL / CAPITAL)) * 60; A09:=IF((((A07 > 0) AND (A07 > REF(A07,1))) AND (A05 <= 88)),A07,0); VAR1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1); VAR2:=EMA(VAR1,8); VAR3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1); 趨勢:=EMA(VAR3,3)-10; STICKLINE((A09>0) AND 趨勢<40,0,V/6,2,0),COLORMAGENTA; 粉色機構建倉區(qū):0,LINETHICK0,COLORMAGENTA; A011:=DYNAINFO( 5); A013:=BARSCOUNT(HIGH); A014:=(SMA((HIGH / HHV(CLOSE,120)),3,1) * 100); A015:=IF((A013 > 20),A014,0); A016:=IF((HIGH < A011),0,IF((LOW > A011),1,(((A011 - HIGH) + 0.009) / ((LOW - HIGH) + 0.009)))); A017:=DMA(A016,(VOL / CAPITAL)) * 60; A019:=IF((((A017 >0) AND (A017 > REF(A017,1))) AND (A015 >= 88)),A017,0); VAR21:=3*SMA((CLOSE-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1)- 2*SMA(SMA((HIGH-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1),3,1); VAR22:=EMA(VAR21,8); VAR23:=3*SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1)- 2*SMA(SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1),3,1); 趨勢1:=EMA(VAR23,3)-10; STICKLINE((A019 > 0 AND (趨勢1<20 OR 趨勢1>REF(趨勢1,1)AND 趨勢1<50)),0,V/5,2,0),COLORGREEN; 綠色機構出倉區(qū):0,LINETHICK0,COLORGREEN; AB:DRAWLINE(V>=HHV(V,10),V,V<=LLV(V,3),HHV(V,3),1),COLORYELLOW; DRAWTEXT(CROSS(C,AB),C+5000,'B'),COLORYELLOW; {DRAWICON(CROSS(C,AB),L*0.98,7);}; 五日: MA(V,5) COLORFFFFFF LINETHICK2; 三十四日: MA(V,34) COLORFF80FF LINETHICK2; 一百四十四日: MA(V,144) COLOR00FFFF LINETHICK1; 底部區(qū)域:=MA(IF(L<=LLV(L,15),MA(C,20),0),3)/200,VOLSTICK; 入貨點:=IF(REF(底部區(qū)域,1)>0 AND REF(C,1)<=REF(O,1) AND 底部區(qū)域>0 AND C>O,1,0); DRAWICON(入貨點=1,底部區(qū)域*1.2,1),COLORBLUE; DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),V,'☆地'); 44 N:=15; M1:=5;M2:=10;M3:=20;M4:=60; SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N))*100); 能量:=SAT,VOLSTICK; DRAWTEXT(FILTER(SAT>=100,100),VOL*1.06,'爆'),COLORRED; DRAWTEXT(SAT=100 AND ISLASTBAR,VOL*1.03,'發(fā)'),COLORYELLOW; VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))); 成交:=VOL; 買盤:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))); 賣盤:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))), (0 - (VOL / 2)))); 買賣差:=(買盤 + 賣盤); STICKLINE((買賣差 < 0),0,買賣差,3,0),LINETHICK3,COLOR339933; STICKLINE((買賣差 < 0),0,買賣差,2,0),LINETHICK3,COLOR33AA33; STICKLINE((買賣差 < 0),0,買賣差,1,0),LINETHICK3,COLOR33DD33; STICKLINE((買賣差 < 0),0,買賣差,0.5,0),LINETHICK3,COLOR33FF33; 量比1:=(VOL / MA(VOL,5)); VAR10:=買盤; VAR20:=賣盤; JX1:=BARSSINCE(買盤); JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120); JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3); VAR30:=MA(VOL,JY2); 動神:=買盤; 鬼力:=VAR20; 神比:=(動神 / VAR30); 鬼比:=(鬼力 / VAR30); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); VARD:=REF(CLOSE,1); VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) / SMA(ABS((CLOSE - VARD)),6,1)) * 100); VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,動神) + 動神) / 2); VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,動神) + 動神) / 2); VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,動神) + 動神) / 2); VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,鬼力) + 鬼力) / 2); 三日上攻:=MA((((VAR40 + VAR41) + VAR42) / 3),JY2); 三日下攻:=MA(VAR50,JY2); 多頭:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,0),COLOR000088; STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,2,0),COLOR0000AA; STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,1,0),COLOR0000DD; STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,0.5,0),COLOR0000FF; 空頭:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,0),COLOR008800; STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,2,0),COLOR00AA00; STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,1,0),COLOR00DD00; STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,0.5,0),COLOR00FF00; STICKLINE((鬼力 > 0),鬼力,0,4,0),COLORFF3399; 加倉:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,3,0),COLOR880088; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,2,0),COLORAA00AA; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,1,0),COLORDD00DD; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,0.5,0),COLORFF00FF; 減倉:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,3,0),COLOR880000; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,2,0),COLORBB0000; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,1,0),COLORDD0000; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,0.5,0),COLORFF0000; 洗盤:STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,3,0),COLOR999999; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,2,0),COLORAAAAAA; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,1,0),COLORDDDDDD; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,0.6,0),COLORFFFFFF; 高賣:STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,3,0),COLOR008888; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,2,0),COLOR00AAAA; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,1,0),COLOR00DDDD; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,0.5,0),COLOR00FFFF; 相對地量:=STICKLINE(((VAR9 > 2) AND (VOL < (MA(VOL,5) / 2))),0,VOL,3,0); 白進:1,LINETHICK0,COLORWHITE; 黃警:1,NODRAW,COLOR00FFFF; 粉追:2,NODRAW,COLORFF00FF; 蘭綠賣:3,NODRAW,COLOR00FF00; MAV1:MA(V,M1),LINETHICK1,COLOR00FFFF; MAV2:=MA(V,M2),LINETHICK1,COLORFF00FF; IF(MA(V,5)>=REF(MA(V,5),1),MA(V,5),DRAWNULL),COLORRED,LINETHICK2; 45 VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW; STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0; 量:VOL,VOLSTICK,COLORMAGENTA; 換手％:VOL/CAPITAL*100,POINTDOT,COLORWHITE; HSS:=V/CAPITAL*100,NODRAW;{顯示當日換手} 十換:SUM(HSS,10),NODRAW,COLORMAGENTA;{統(tǒng)計10周期的總換手率}; 資金異動:VOL/MA(VOL,55)*100,COLORYELLOW; STICKLINE(資金異動>100 ,0,VOL*0.4,1,0),COLORYELLOW; VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 買:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW), IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)); 買%:買/VOL,COLORYELLOW,NODRAW; 成交:AMOUNT/100000000,COLORYELLOW; 預換:MAX(VOL,DYNAINFO(17)*REF(MA(VOL,5),1))/CAPITAL*100,COLORFFFF00,POINTDOT; 昨:REF(VOL,1),LINETHICK0; 獲利盤: WINNER(CLOSE)*100,COLORMAGENTA; MA5:MA(V,5),COLORWHITE,LINETHICK2; MA35:MA(V,35),COLORMAGENTA,LINETHICK2; MA135:MA(V,135),COLORGREEN,LINETHICK2; DRAWTEXT(CROSS(MA5,MA35),(V *1.05),'★'),COLORYELLOW; DRAWTEXT(CROSS(MA5,MA135),(V *1.05),'★'),COLORGREEN; 天量:IF(VOL=HHV(VOL,0),HHV(VOL,10)*0.93,DRAWNULL) ,CIRCLEDOT,COLORRED,LINETHICK2; 46 STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,1),COLOR0000FF; STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,1),COLORFF937F; VAR0:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 成交總量:VOL,POINTDOT; 主買:IF(CLOSE>OPEN,VAR0*(HIGH-LOW),IF(CLOSE<OPEN,VAR0*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT; VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))); 買盤:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))); 主買占%:=買盤/100000,COLORRED,NODRAW; 主賣:IF(CLOSE>OPEN,0-VAR0*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR0*(HIGH-LOW),0-VOL/2)),COLOR00FF00,POINTDOT; 成交量大于3日:BETWEEN(V,MA(V,3)*1.1,MA(V,3)*3),POINTDOT,COLOR6699FF; 賣盤:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2)))); 主賣占%:=-賣盤/100000,COLOR00FF00,POINTDOT,NODRAW; 震動調整:=(買盤 + 賣盤); STICKLINE((震動調整 < 1),1,震動調整,3,0),COLOR70DB93; 買賣量差%:=(買盤+賣盤)/100000,COLORFF00FF; STICKLINE((買賣量差% < 0),0,買賣量差%,3,0),COLORWHITE,LINETHICK0; VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,2,0),COLORFF0000; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,2,0),COLORFFFFFF; STICKLINE((買盤 > 0),買盤,0,2,0),COLOR0000FF; MA5:MA(V,5),COLORWHITE,LINETHICK2; MA40:MA(V,40),COLOR00FF99,LINETHICK2; MA135:MA(V,135),COLORFFFF00,LINETHICK2; DRAWTEXT(CROSS(V,MA5),(V *1.06),'★'),COLORYELLOW; 47 VAR1:=HIGH-LOW; VAR2:=ABS(OPEN-CLOSE); VAR3:=HIGH-IF(CLOSE>OPEN,CLOSE,OPEN); VAR4:=IF(CLOSE>OPEN,OPEN,CLOSE)-LOW; VAR5:=VAR2/VAR1*VOL; VAR6:=VAR3/VAR1*VOL; VAR7:=VAR4/VAR1*VOL; VAR8:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100)))); MA5: MA(VOL,5), , COLORRED; MA10: MA(VOL,10), , COLORGREEN; 多頭成交口: STICKLINE(CLOSE>MA(CLOSE,30),0,VOL,3,1), , COLORRED; 空頭成交口: STICKLINE(CLOSE<MA(CLOSE,30),0,VOL,3,1), , COLORGREEN; 向上攻擊量: STICKLINE(VAR5>=VAR6 AND VAR5>=VAR7 AND CLOSE>OPEN,0,VAR5,3,0), , COLORRED; 向下攻擊量: STICKLINE(VAR5>=VAR6 AND VAR5>=VAR7 AND CLOSE>OPEN,0,VAR5,3,0), , COLORGREEN; 上探量: STICKLINE(VAR6>VAR5 AND VAR6>VAR7,0,VAR6,3,0), , COLORCCCC66; 下探量: STICKLINE(VAR7>VAR5 AND VAR7>VAR6,0,VAR7,3,0), , COLORFF6633; 相對地量: STICKLINE(VAR8>2 AND VOL<MA(VOL,5)/2,0,VOL,1.5,0), , COLORMAGENTA; 放量: STICKLINE(VOL>MA(VOL,5)*3,0,VOL,1.5,0), , COLORWHITE; 逢高出貨: DRAWTEXT(VAR6>VAR5 AND VAR6>VAR7 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA(CLOSE,34) AND HIGH>MA(CLOSE,55) AND VOL>MA5 AND VAR6>MA(VOL,5),VOL,'逢高出貨'), , COLORRED; 48 VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))); 買盤:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))); 賣盤:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2)))); 買賣差:=(買盤 + 賣盤); STICKLINE((買賣差 < 0),0,買賣差,5,0),COLOR155500; STICKLINE((買賣差 < 0),0,買賣差,4,0),COLOR208000; STICKLINE((買賣差 < 0),0,買賣差,3,0),COLOR2BAA00; STICKLINE((買賣差 < 0),0,買賣差,2,0),COLOR35D500; STICKLINE((買賣差 < 0),0,買賣差,0.1,0),COLOR40FF00; JX1:=BARSSINCE(買盤); JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120); JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3); VAR30:=MA(VOL,JY2); 神比:=(買盤 / VAR30); 鬼比:=(賣盤 / VAR30); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); VARD:=REF(CLOSE,1); VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) / SMA(ABS((CLOSE - VARD)),6,1)) * 100); VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),VAR6,買盤) + 買盤) / 2); VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 > VAR8)),VAR7,買盤) + 買盤) / 2); VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 > VAR7)),VAR8,買盤) + 買盤) / 2); VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),VAR6,賣盤) + 賣盤) / 2); 三日上攻:=MA((((VAR40 + VAR41) + VAR42) / 3),JY2); 三日下攻:=MA(VAR50,JY2); 多頭:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,5,0),COLOR0000D5; 多頭1:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,4,0),COLOR0000FF; 多頭2:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,3,0),COLOR2B2BFF; 多頭3:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,2,0),COLOR5555FF; 多頭4:STICKLINE((CLOSE > MA(CLOSE,30)),0,VOL,0.1,0),COLOR8080FF; 空頭:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,5,0),COLOR155500; 空頭1:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,4,0),COLOR208000; 空頭2:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,3,0),COLOR2BAA00; 空頭3:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,2,0),COLOR35D500; 空頭4:STICKLINE((CLOSE < MA(CLOSE,30)),0,VOL,0.1,0),COLOR40FF00; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,4,0),COLOR00BBFF; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,3,0),COLOR00CCFF; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,2,0),COLOR00DDFF; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,1,0),COLOR00EEFF; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,0.1,0),COLOR00FFFF; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,4,0),COLORD56A00; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,3,0),COLORFF8000; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,2,0),COLORFF952B; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,1,0),COLORFFAA55; STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)),0,VAR6,0.1,0),COLORFFBF80; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,4,0),COLORFFAAFF; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,3,0),COLORFFBBFF; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,2,0),COLORFFCCFF; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,1,0),COLORFFDDFF; STICKLINE(((VAR8 > VAR6) AND (VAR8 > VAR7)),0,VAR8,0.1,0),COLORFFEEFF; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,4,0),COLORD500D5; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,3,0),COLORFF00FF; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,2,0),COLORFF2BFF; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,1,0),COLORFF55FF; STICKLINE(((VAR7 > VAR6) AND (VAR7 > VAR8)),0,VAR7,0.1,0),COLORFF80FF; STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,2,0),; STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,1.6,0),; STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,1.2,0),; STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,0.8,0),; STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,0.1,0),; STICKLINE((買盤 > 0),買盤,0,2,0),COLOR0000AA; STICKLINE((買盤 > 0),買盤,0,1.6,0),COLOR0000BB; STICKLINE((買盤 > 0),買盤,0,1.2,0),COLOR0000CC; STICKLINE((買盤 > 0),買盤,0,0.8,0),COLOR0000DD; STICKLINE((買盤 > 0),買盤,0,0.4,0),COLOR0000EE; DRAWTEXT(((DATE > 700101) AND CROSS(84,VARE)),HIGH,'賣■出'),COLORFF00FF; 上攻均量:=MA(買盤,JY1); 下攻均量:=MA(賣盤,JY1); DRAWTEXT(((((((((VAR7 > VAR6) AND (VARA > 2)) AND (VAR9 > VAR8)) AND (CLOSE > MA(CLOSE,5))) AND (CLOSE > MA(CLOSE,30))) AND (HIGH > MA(CLOSE,60))) AND (VOL > MA(VOL,5))) AND (VAR7 >= MA(VOL,5))),VOL,'出●貨'),COLORFF00FF; DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10))),VOL,'低▲進'),COLORBLUE; DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'強◆勢'),COLORBLUE; HSL:=DYNAINFO(37); DRAWTEXT((((VOL / REF((SUM(VOL,5) / 5),1)) >= 2) AND (HSL > 1)),(VOL * 1.1),'變★量'),COLORBLUE; 49 換手:=V*100/CAPITAL; 主力:=MA(換手,4); 大戶:=MA(換手,9); 中戶:=MA(換手,17); 散戶:=MA(換手,34); 均量:=(主力+大戶+中戶+散戶)/4; 主力能量:(主力-均量),NODRAW; 大戶能量:(大戶-均量),NODRAW; 中戶能量:(中戶-均量),NODRAW; 散戶能量:(散戶-均量),NODRAW; 操盤:STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),30,30+主力能量,3,0),COLORRED; 減倉:STICKLINE(主力能量>=0 AND 主力能量< REF(主力能量,1),30,30+主力能量,3,0),COLORYELLOW; 反彈:STICKLINE(主力能量<0 AND 主力能量>=REF(主力能量,1),30,30+主力能量,3,0),COLORGREEN; 尋底:STICKLINE(主力能量<0 AND 主力能量< REF(主力能量,1),30,30+主力能量,3,0),COLORBLUE; DRAWTEXT(ISLASTBAR=1,IF(主力能量>=0,30,30),'主力'),COLORRED; 操盤1:STICKLINE(大戶能量>=0 AND 大戶能量>=REF(大戶能量,1),25,25+大戶能量,3,0),COLORRED; 減倉1:STICKLINE(大戶能量>=0 AND 大戶能量< REF(大戶能量,1),25,25+大戶能量,3,0),COLORYELLOW; 反彈1:STICKLINE(大戶能量<0 AND 大戶能量>=REF(大戶能量,1),25,25+大戶能量,3,0),COLORGREEN; 尋底1:STICKLINE(大戶能量<0 AND 大戶能量< REF(大戶能量,1),25,25+大戶能量,3,0),COLORBLUE; DRAWTEXT(ISLASTBAR=1,IF(大戶能量>=0,25,25),'大戶'),COLORYELLOW; 操盤2:STICKLINE(中戶能量>=0 AND 中戶能量>=REF(中戶能量,1),20,20+中戶能量,3,0),COLORRED; 減倉2:STICKLINE(中戶能量>=0 AND 中戶能量< REF(中戶能量,1),20,20+中戶能量,3,0),COLORYELLOW; 反彈2:STICKLINE(中戶能量<0 AND 中戶能量>=REF(中戶能量,1),20,20+中戶能量,3,0),COLORGREEN; 尋底2:STICKLINE(中戶能量<0 AND 中戶能量< REF(中戶能量,1),20,20+中戶能量,3,0),COLORBLUE; DRAWTEXT(ISLASTBAR=1,IF(中戶能量>=0,20,20),'中戶'),COLORMAGENTA; 操盤3:STICKLINE(散戶能量>=0 AND 散戶能量>=REF(散戶能量,1),15,15+散戶能量,3,0),COLORRED; 減倉3:STICKLINE(散戶能量>=0 AND 散戶能量< REF(散戶能量,1),15,15+散戶能量,3,0),COLORYELLOW; 反彈3:STICKLINE(散戶能量<0 AND 散戶能量>=REF(散戶能量,1),15,15+散戶能量,3,0),COLORGREEN; 尋底3:STICKLINE(散戶能量<0 AND 散戶能量< REF(散戶能量,1),15,15+散戶能量,3,0),COLORBLUE; DRAWTEXT(ISLASTBAR=1,IF(散戶能量>=0,15,15),'散戶'),COLORWHITE; 50 虛擬VOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,AMOUNT*240/FROMOPEN,DRAWNULL),NODRAW; {STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虛擬VOL,0,-1,-1),COLORWHITE;} 加速:=IF(100*WINNER(CLOSE*0.95)>50 AND COST(85)<CLOSE AND (EMA(EMA(CLOSE,9),9)-REF(EMA(EMA(CLOSE,9),9),1))/REF(EMA(EMA(CLOSE,9),9),1)*1000>0, (EMA(EMA(CLOSE,9),9)-REF(EMA(EMA(CLOSE,9),9),1))/REF(EMA(EMA(CLOSE,9),9),1)*1000,0),COLORFF00FF,NODRAW; 成交量:AMOUNT,VOLSTICK; 換手:VOL/CAPITAL*100,NODRAW; 量能飽和:(AMOUNT/CLOSE)/HHV((AMOUNT/CLOSE),26)*100,COLORLIMAGENTA,NODRAW; VAR1:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主動買盤:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2)); STICKLINE(量能飽和=100,主動買盤,0,1.2,0),COLORMAGENTA; DRAWTEXT((AMOUNT/CLOSE)/HHV((AMOUNT/CLOSE),26)*100=100,AMOUNT*1.2,'◎'),COLORMAGENTA; DRAWTEXT((AMOUNT-主動買盤)/AMOUNT<0.10,AMOUNT*1.00,'*'),COLORRED; MA8:MA(AMOUNT,8),COLORRED, LINETHICK2; MA97:MA(AMOUNT,97),COLORFFAA66, LINETHICK3; VUME:=V,VOLSTICK; FL4:=成交量=HHV(成交量,250); FL3:=成交量=HHV(成交量,120) AND V!=HHV(V,250); FL2:=成交量=HHV(成交量,60) AND V!=HHV(V,120) AND V!=HHV(V,250); FL1:=成交量=HHV(成交量,30) AND V!=HHV(V,60) AND V!=HHV(V,120) AND V!=HHV(V,250); DRAWTEXT(FL4,1.05*成交量,'④'),COLORYELLOW; DRAWTEXT(FL3,1.00*成交量,'③'),COLORYELLOW; DRAWTEXT(FL2,0.95*成交量,'②'),COLORYELLOW; DRAWTEXT(FL1,0.90*成交量,'①'),COLORYELLOW; XG:SUM(FL1,10),NODRAW; 提示A:DRAWTEXT_FIX(C=C,0,0.1,0,'①30天最大量、②60天最大量'),COLOR0000FF; 提示B:DRAWTEXT_FIX(C=C,0,0.3,0,'③120天最大量.④250天最大量 '),COLOR0000FF; {示:DRAWTEXT_FIX(C=C,0,0.5,0,' 有票的話建議出局規(guī)避了'),COLOR0000FF;}; 51 STICKLINE(IF(CLOSE>OPEN,VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))*(HIGH-LOW),IF(CLOSE<OPEN,VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2))>0,0,IF(CLOSE>OPEN,VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))*(HIGH-LOW),IF(CLOSE<OPEN,VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))*((HIGH-OPEN)+(CLOSE-LOW)), VOL/2)),3.2,0),COLORYELLOW; STICKLINE((((((ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL)>= (((HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL)) AND (((ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL)>=(((IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL))) AND (CLOSE > OPEN)),0,((ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL), 2.7,0),COLOR0099FF; 紅:STICKLINE(V>MA(VOL,5) AND C>REF(C,1),V,MA(VOL,5),1.1,0),COLOR8872FF; 52 HS:=VOL/CAPITAL*100; TJ1:=HS<1;TJ2:=HS>1;TJ3:=HS>2;TJ4:=HS>3; TJ5:=HS>5;TJ6:=HS>8;TJ7:=HS>15;TJ8:=HS>25; 換手率:VOL/CAPITAL*100,NODRAW,COLORFFFF00; 量:VOL,VOLSTICK,COLORFFFF00; 盤＝億:FINANCE(7)/100000000,LINETHICK0,COLORWHITE; 每股收益:FINANCE(33),LINETHICK0,COLORYELLOW; 公積金:FINANCE(18),LINETHICK0,COLORWHITE; 市盈率:DYNAINFO(39),LINETHICK0,COLORWHITE; 地量0__1:0,COLORFFFFFF; 低靡1__2:0,COLORFFFF00; 溫和2__3:0,COLOR208FFF; 活躍3__5:0,COLOR00FFFF; 帶量5__8:0,COLORFF00FF; 放量8__15:0,COLOR00FF00; 巨量15__25:0,COLORFF5500; STICKLINE(TJ1,0,V*0.3,2.3,0),COLORFFFFFF; STICKLINE(TJ3,V,V*0.5,2.3,0),COLOR208FFF; STICKLINE(TJ4,V,V*0.5,2.3,0),COLOR00FFFF; STICKLINE(TJ5,V,V*0.5,2.3,0),COLORFF00FF; STICKLINE(TJ6,V,V*0.5,2.3,0),COLOR00FF00; STICKLINE(TJ7,V,V*0.5,2.3,0),COLORFF2900; STICKLINE(TJ8,V,V*0.5,2.3,0),COLORFF0000; 五:MA(VOL,5), COLORWHITE,LINETHICK1; 十:MA(VOL,10) ,COLOR00FFFF,LINETHICK1; 53 A:=AMOUNT/V/100; VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5); QQ:=EMA(((VARA/10)+EMA(A,13)),0); 行情線:=MA(A,1); 重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382; 【操盤線】:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK4; 【黃金線】:IF(重心>=【操盤線】,【操盤線】,DRAWNULL),COLORRED,LINETHICK2; 【空倉線】:IF(重心<【操盤線】,【操盤線】,DRAWNULL),COLORCYAN,LINETHICK2; DRAWTEXT(ISLASTBAR,【操盤線】,'【操盤線】'),COLORRED; {引:EMA(CLOSE,2),LINETHICK1,COLORMAGENTA; 探:MA(CLOSE,5),LINETHICK1;} 變:EMA(CLOSE,5),LINETHICK1,COLORYELLOW; 金:IF(變>REF(變,1),變,DRAWNULL),COLORRED,LINETHICK1; 空:IF(變<REF(變,1),變,DRAWNULL),COLORGREEN,LINETHICK1; DRAWTEXT(ISLASTBAR,變,'【雷達線】'),COLORRED; {頂?shù)仔盘杴 DA:=(EMA(H,1)+EMA(L,1)+EMA(H,1)+EMA(H,1))/4; DB:=EMA(REF(HHV(H,25),1),2),COLORGREEN,LINETHICK1; {DRAWTEXT(CROSS(DB,DA),DB,'←險'),COLORGREEN,LINETHICK1;} DRAWTEXT(CROSS(DA,【操盤線】),【操盤線】,'B'),COLORWHITE,LINETHICK1; {漲跌停顯示} 漲停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0); STICKLINE(漲停,O,C,1,0),COLORYELLOW; ZDF:=(C-REF(C,1))/REF(C,1)*100; STICKLINE(ZDF<-9.9,O,C,1,0),COLORBLUE; {民間操手專用經(jīng)典主圖均線指標2} VAR3:=LLV(HIGH,240); VAR4:=100*(CLOSE-VAR3)/VAR3; VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100; VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100; VAR7:=0; VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100; VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100; VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0); VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3); VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3); VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3); VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3); VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3); VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3); VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3); VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3); VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150); 買１:=VAR10; 買２:=(VAR11+VAR13+VAR15+VAR17); 賣１:=(VAR12+VAR14+VAR16+VAR18); B:IF(買１>0 OR 買２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW; S:IF(賣１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN; VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))); VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))); VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34)); F:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF; DRAWTEXT(CROSS(S,賣１),S,'←空'),COLORWHITE,LINETHICK1; DRAWTEXT(CROSS(B,買１),B,'←多'),COLORRED,LINETHICK1; {價:} {JC1:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6; 參考價1:SMA(JC1,5,1),CIRCLEDOT,COLORGREEN; IF(C>=參考價1,參考價1,DRAWNULL),CIRCLEDOT,COLOR0000FF;} PH:=TROUGHBARS(2,5,1); LL:=HHV(H,PH); TJ1:=LL=HIGH AND LL<REF(LL,1);{//=1} TS:=SUMBARS(TJ1,2); TJ:=PEAKBARS(2,5,1)=1 AND TS>=PH; DRAWICON(TJ,HIGH*1.01+0.02,2); 警告燈:IF(TJ,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORCYAN; PL:=BARSLAST(TJ); 支撐:IF(BARSLAST(TJ1), REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLOREA91B5; 壓力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORYELLOW; TJ_2:=LOW>REF(REF(LOW,TS),PL); DRAWTEXT(ISLASTBAR,壓力,'壓力'),COLORYELLOW; DRAWTEXT(ISLASTBAR,支撐,'支撐'),COLOREA91B5; {DRAWICON(COUNT(TJ_2,PL+1)=1,HIGH*1.005,2);{//向下的箭頭表示出局點} {DRAWICON(BARSLAST(TJ1),REF(LOW*0.995,BARSLAST(TJ1)),1);}; 54 CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); DD:=DMA(CLOSE,CC); 上:(1+7/100)*DD,COLORGRAY; 下:(1-7/100)*DD,COLORGRAY; 中:(上+下)/2,COLORF0F000; 危:(1+14/100)*DD,DOTLINE,COLORGRAY; 機:(1-14/100)*DD,DOTLINE,COLORGRAY; IF(上>=REF(上,1), 上,DRAWNULL),COLOR0099FF; IF(中>=REF(中,1), 中,DRAWNULL),COLOR0099FF; IF(下>=REF(下,1), 下,DRAWNULL),COLOR0099FF; DRAWNUMBER(ISLASTBAR,上,上),COLOR00FFFF; DRAWNUMBER(ISLASTBAR,下,下),COLORFFFF00; DRAWNUMBER(ISLASTBAR,中,中),COLOR00FF00; DRAWNUMBER(ISLASTBAR,危,危),COLOR0000FF; DRAWNUMBER(ISLASTBAR,機,機),COLORWHITE; 55 九轉序列A1:=C>REF(C,4); NT:=BARSLASTCOUNT(A1); TJ11:=NT=9; TJ13:=ISLASTBAR AND BETWEEN(NT,5,8); AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT; DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF; DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN; B1:=C<REF(C,4); NT0:=BARSLASTCOUNT(B1); TJ21:=NT0=9 ; TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8); AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0; DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF; DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN; 56 短3:EMA(CLOSE,3),COLORFFFF00; K5:EMA(CLOSE,5) ,COLORBLUE; K8:EMA(CLOSE,8) ,COLORBLUE; K10:EMA(CLOSE,10) ,COLORBLUE; K12:EMA(CLOSE,12) ,COLORBLUE; K15:EMA(CLOSE,15) ,COLORFF00FF; 長30:EMA(CLOSE,30) ,COLORRED; K35:EMA(CLOSE,35) ,COLORYELLOW; K40:EMA(CLOSE,40) ,COLORYELLOW; K45:EMA(CLOSE,45) ,COLORYELLOW; K50:EMA(CLOSE,50) ,COLORYELLOW; K60:EMA(CLOSE,60) ,COLORGREEN; 57 {多空資金線幅圖} VAR0:=(2*CLOSE+HIGH+LOW)/4; B:=MAX((VAR0-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,12); STICKLINE(EMA(B,3)<EMA(EMA(B,3),18),EMA(B,3),EMA(EMA(B,3),18),4,0),COLOR006030; STICKLINE(EMA(B,3)<REF(EMA(B,3),1) AND EMA(B,3)>EMA(EMA(B,3),18),EMA(B,3),EMA(EMA(B,3),18),4,0),COLOR212143; STICKLINE(EMA(B,3)>=REF(EMA(B,3),1) AND EMA(B,3)>EMA(EMA(B,3),18),EMA(B,3),EMA(EMA(B,3),18),4,0),COLOR00004F; 主力做多資金:EMA(B,3),LINETHICK2,COLORWHITE; NOTEXT1:IF(主力做多資金>=REF(主力做多資金,1),主力做多資金,DRAWNULL),COLORRED,LINETHICK2; NOTEXT2:IF(主力做多資金<REF(主力做多資金,1),主力做多資金,DRAWNULL),COLORGREEN,LINETHICK2; 個股做空資金:EMA(主力做多資金,18),COLORD9D919,LINETHICK2; 水面:10,POINTDOT,COLORF00FF0; 云間:90,POINTDOT,COLORWHITE; 塵霾:100*(HHV(HIGH,18)-CLOSE)/(HHV(HIGH,18)-LLV(LOW,18)),COLORBLUE; VAR22:=REF(LOW,1); VAR3:=SMA(ABS(LOW-VAR22),3,1)/SMA(MAX(LOW-VAR22,0),3,1)*100; VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3); VAR5:=LLV(LOW,30); VAR6:=HHV(VAR4,30); VAR7:=IF(MA(CLOSE,58),1,0); VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7; VAR9:=IF(VAR8>100,100,VAR8); 吸籌:STICKLINE(VAR9>-120,0,VAR9,3,0),COLORA54AFF; 58 VOLUME:VOL,VOLSTICK; 主力啟動線:MA(VOLUME,5),COLORRED,LINETHICK2; 主力洗盤線:MA(VOLUME,35),COLORYELLOW,LINETHICK2; 資金異動線:MA(VOLUME,135),COLORBLUE,LINETHICK2; 出擊:STICKLINE(CROSS(主力啟動線,資金異動線) OR ((主力洗盤線 > 資金異動線) AND CROSS(主力啟動線,主力洗盤線)),0,VOL,2,0),COLORYELLOW; 啟動:STICKLINE(主力啟動線>REF(主力啟動線,1) AND (CROSS(VOL,主力啟動線) AND (REF(VOL,1)<REF(資金異動線,1) OR REF(VOL,2)<REF(資金異動線,2))),0,VOL,3,0),COLORGREEN; V1:=CLOSE/REF(CLOSE,3)>=1.1; V2:=BACKSET(V1,2); V3:=REF(CLOSE,3)*1.1; V4:=CROSS(C,V3); OK:STICKLINE((V2 AND COUNT(V2,2)=1),VOL,0,5,0),COLORRED; COND:(CROSS(主力啟動線,資金異動線) OR ((主力洗盤線 > 資金異動線) AND CROSS(主力啟動線,主力洗盤線))) OR (主力啟動線>REF(主力啟動線,1) AND (CROSS(VOL,主力啟動線) AND (REF(VOL,1)<REF(資金異動線,1) OR REF(VOL,2)<REF(資金異動線,2)))) OR (V2 AND COUNT(V2,2)=1),LINETHICK0; A:=MA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),19); B:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)); D:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4); 長期線:=A+100; 短期線:=B+100; 中期線:=D+100; 見頂:=((REF(中期線,1)>85 AND REF(短期線,1)>85 AND REF(長期線,1)>65) AND CROSS(長期線,短期線)); 頂部區(qū)域:=(中期線<REF(中期線,1) AND REF(中期線,1)>80) AND (REF(短期線,1)>95 OR REF(短期線,2)>95 ) AND 長期線>60 AND 短期線<83.5 AND 短期線<中期線 AND 短期線<長期線+4; 頂部:=FILTER(頂部區(qū)域,4); STICKLINE( {見頂 OR} 頂部,VOL,VOL*1.1,20,1 ),COLORBLUE,LINETHICK2; VAR6:=REF(CLOSE,1); VAR7:=SMA(MAX(CLOSE-VAR6,0),6,1)/SMA(ABS(CLOSE-VAR6),6,1)*100; STICKLINE( CROSS(84,VAR7),VOL,VOL*1.05,20,1 ),COLOR0099FF,LINETHICK2; 均勢一:=(((((((((CLOSE + REF(CLOSE,1)) + REF(CLOSE,2)) + REF(CLOSE,3)) + REF(CLOSE,4)) + REF(CLOSE,5)) + REF(CLOSE,6)) + REF(CLOSE,7)) + REF(CLOSE,8)) / 9); 均勢二:=((((CLOSE + REF(CLOSE,1)) + REF(CLOSE,2)) + REF(CLOSE,3)) / 4); 趨勢一:=((((均勢一 - REF(均勢一,1)) / REF(均勢一,1)) * 1000) + 50); 趨勢二:=((((均勢二 - REF(均勢二,1)) / REF(均勢二,1)) * 1000) + 50); 波段高位:=(CROSS(趨勢一,趨勢二) AND (COUNT((CLOSE > REF(HIGH,1)),12) > 5)); STICKLINE(波段高位,VOL,VOL*1.08,20,1 ),COLORGREEN,LINETHICK2; 59 大機構倉位:100*(1-WINNER(CLOSE)),COLORRED,LINETHICK3; VAR211:=1/WINNER(CLOSE); VAR311:=MA(CLOSE,13); VAR4:=100-ABS((CLOSE-VAR311)/VAR311*100); VAR5:=LLV(LOW,120); VAR6:=HHV(HIGH,120); VAR7:=(VAR6-VAR5)/100; VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1); VAR9:=SMA((OPEN-VAR5)/VAR7,20,1); VARA:=3*VAR8-2*SMA(VAR8,10,1); VARB:=3*VAR9-2*SMA(VAR9,10,1); VARC:=100-VARB; 基金私募倉位: (100-VARA),COLORYELLOW,LINETHICK2; VARE1:=REF(LOW,1)*0.9; VARF1:=LOW*0.9; VAR101:=(VARF1*VOL+VARE1*(CAPITAL-VOL))/CAPITAL; VAR111:=EMA(VAR101,30); VAR121:=CLOSE-REF(CLOSE,1); VAR131:=MAX(VAR121,0); VAR141:=ABS(VAR121); VAR151:=SMA(VAR131,7,1)/SMA(VAR141,7,1)*100; VAR161:=SMA(VAR131,13,1)/SMA(VAR141,13,1)*100; VAR171:=BARSCOUNT(CLOSE); VAR181:=SMA(MAX(VAR121,0),6,1)/SMA(ABS(VAR121),6,1)*100; VAR191:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100; VAR1A1:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; VAR1B1:=SMA((SMA(VAR1A1,4,1)-50)*2,3,1); VAR1C1:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100; VAR1D:=SMA(VAR1C1,4,1); VAR1E:=SMA(VAR1D,3,1); VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100; VAR20:=VAR181<=25 AND VAR191<-95 AND VAR1F>20 AND VAR1B1<-30 AND VAR1E<30 AND VAR111-CLOSE>=-0.25 AND VAR151<22 AND VAR161<28 AND VAR171>50; VAR21:=(HIGH+LOW+CLOSE)/3; VAR22:=(VAR21-MA(VAR21,14))/(0.015*AVEDEV(VAR21,14)); VAR23:=(VAR21-MA(VAR21,70))/(0.015*AVEDEV(VAR21,70)); VAR24:=IF(VAR22>=150 AND VAR22<200 AND VAR23>=150 AND VAR23<200,10,0); VAR25:=IF(VAR22<=-150 AND VAR22>-200 AND VAR23<=-150 AND VAR23>-200,-10,VAR24); STICKLINE(VAR20,0,80,2,0),LINETHICK2,COLORBLUE; DRAWTEXT(CROSS(VAR20,0.5) AND COUNT(VAR20=1,10)=1,90,'超級主力建倉!') , COLORRED; 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,70,'大資金進場'),LINETHICK1,COLORLIMAGENTA; STICKLINE(VAR11 AND COUNT(VAR11,30)=1,1,60,5,0),COLORLIMAGENTA,LINETHICK4; V1:=(C*2+H+L)/4*10; V2:=EMA(V1,13)-EMA(V1,34); V3:=EMA(V2,5); V4:=2*(V2-V3)*5.5; V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8; V6:=EMA(3*V5-2*SMA(V5,18,1),5); V71:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10; V8:=(INDEXC*2+INDEXH+INDEXL)/4; V91:=EMA(V8,13)-EMA(V8,34); VA:=EMA(V91,3); VB:=(V91-VA)/2; V111:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1); V121:=(EMA(V111,3)-REF(EMA(V111,3),1))/REF(EMA(V111,3),1)*100; 準備現(xiàn)金: STICKLINE(EMA(V111,3)<=13,0,15,5,0),COLORLIRED; AA:=(EMA(V111,3)<=13) AND FILTER((EMA(V111,3)<=13),15); DRAWTEXT (AA,-10,'準備現(xiàn)金'),COLORLIRED; 買入股票: STICKLINE(EMA(V111,3)<=13 AND V121>13,0,50,5,0),LINETHICK3,COLORRED; BB:= (EMA(V111,3)<=13 AND V121>13) AND FILTER((EMA(V111,3)<=13 AND V121>13),10); DRAWTEXT (BB,60,'主力進'),COLORWHITE; 賣臨界: STICKLINE(EMA(V111,3)>60 AND EMA(V111,3)>REF(EMA(V111,3),1),100,95,15,1),COLORGREEN; CC:=(EMA(V111,3)>=90 AND V121) AND FILTER((EMA(V111,3)>=90 AND V121),10); DD:=(EMA(V111,3)>=120 AND V121) AND FILTER((EMA(V111,3)>=120 AND V121),10); STICKLINE(IF(VB>=0,VB,0) AND EMA(V111,3)<13,0,15,5,0),COLORLIRED; STICKLINE(IF(VB<=0,VB,0) AND EMA(V111,3)>90,0,10,10,0),COLORGREEN; STICKLINE( IF(V4>=0,V4,1) AND EMA(V111,3)<13,0,15,5,0),COLORLIRED; STICKLINE(IF(V4<=0,V4,1) AND EMA(V111,3)>90,0,10,10,0),COLORLIBLUE,LINETHICK1; DRAWTEXT (CC,20,'主力減倉'),COLORLIBLUE; V10:=PEAKBARS(3,15,1)<10; V12:=IF(V10=1,50,0); 頭部:= IF(V12=50,100,0); 賣:IF(IF(V12=50,100,0)>REF(IF(V12=50,100,0),1),40,0),COLORGREEN,LINETHICK3; DRAWTEXT(賣,50,'主力清倉 '),COLORGREEN; V92:=TROUGHBARS(3,15,1)<10; V11:=IF(V92=1,50,0); 底部:= IF(V11=50,50,0); 買:IF( 底部>REF(底部,1),40,0),COLORRED,LINETHICK4; DRAWTEXT(買,50,'主力抄底 '),COLORRED; V7:=TROUGHBARS(3,15,1)<10; V9:=IF(V7=1,50,0); AA1:=(O+H+L+C)/4; BB1:=MA(AA1,3); CC1:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4); DD1:=REF(100-(100/(1+CC)),1); A1:=HHV(AA,10); A2:=LLV(AA,30); A3:=A1-A2; A4:=EMA((AA-A2)/A3,1)*100; B1:=HHV(AA,16); B2:=LLV(AA,90); B3:=B1-B2; B4:=EMA((AA-B2)/B3,1)*100; C1:=HHV(AA,30); C2:=LLV(AA,240); C3:=C1-C2; C4:=EMA((AA-C2)/C3,1)*100; 中線趨勢:B4,COLORMAGENTA,LINETHICK2; STICKLINE(A4>90 AND B4>70,86,94,6,0),COLORYELLOW; {STICKLINE(A4<5 AND B4<30,0,15,6,0),COLORWHITE}; DRAWTEXT((A4>90 AND B4>70)=1, 85,'拉'),COLORYELLOW; D:=CROSS(ZIG(3,50/5)*1,MA(ZIG(3,50/5)*1,2))*1,COLORRED; W:=CROSS(MA(ZIG(3,50/5)*1,2),ZIG(3,50/5)*1)*1,COLORBLUE; VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5; VAR2:=LLV(LOW,34); VAR3:=HHV(HIGH,34); 多: EMA((VAR1-VAR2)/(VAR3-VAR2)*100,13),COLORRED,LINETHICK2; 空: EMA(多,3),COLORGREEN,LINETHICK1; DRAWTEXT(W=1,多*-0.1,'▼下跌確立' ),COLORGREEN; DRAWTEXT(D=1,多*-0.31,'▲上漲確立'),COLORRED; 爆發(fā)線: 80,COLORRED; 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,60,'大資金出貨'),LINETHICK1,COLORFFCC66; STICKLINE(VAR1C AND COUNT(VAR1C,30)=1,0,50,5,0),COLORFFCC66,LINETHICK3; (26--------59)完 |
|
|
