|
AAFG:V>=3*REF(V,1); BBFG:V>=2*REF(V,1); DRAWICON(AAFG,V/3,27); DRAWICON(BBFG,V/2,27); VOLUME:VOL,VOLSTICK; MAVOL10:=MA(VOLUME,233); MAVOL21:MA(VOLUME,21),LINETHICK1; MAVOL55:MA(VOLUME,55),LINETHICK1; MAVOL144:MA(VOLUME,144),LINETHICK1;
量線沖關:=MAVOL21>MAVOL144; STICKLINE(量線沖關,MAVOL21,MAVOL144,4,0),COLORRED; {V2H:IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1),NODRAW,COLORRED;} V2:=IF(CURRBARSCOUNT=1,VOL*250/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1); STICKLINE(V2>=1,0,VOL*0.5,1,0),COLORYELLOW; ZFF:=(H-L)/REF(C,1)*100; 陰梯:=REF(C<O,2) AND REF(C<O,1) AND C<O AND ZFF>REF(ZFF,1) AND REF(ZFF,1)>REF(ZFF,2) AND DRAWTEXT(陰梯,VOL*1.1,'■梯增'),COLORRED; 陰梯A:=REF(C<O,2) AND REF(C<O,1) AND C<O AND ZFF>REF(ZFF,1) AND REF(ZFF,1)<REF(ZFF,2) AND DRAWTEXT(陰梯A,VOL*1.1,'■梯縮'),COLORRED; 倍量:={IF((CLOSE>OPEN OR LOW>REF(HIGH,1)) AND} VOL/REF(VOL,1)>1.9, VOL,0 ; 倍縮:VOL<=REF(V,1)*0.5,NODRAW,COLORRED; {STICKLINE(倍量,0,V,1,0),COLORYELLOW;} 地地量:VOL<REF(LLV(VOL,233),1),NODRAW,COLORMAGENTA; STICKLINE(地地量,0,V,1,0),COLORMAGENTA; STICKLINE(倍縮,0,V,1,0),COLORRED; STICKLINE(V>=3*REF(V,1),V/3,V/3,3.9,0); STICKLINE(V>=2*REF(V,1),V/2,V/2,3.9,0); VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*233/FROMOPEN,DRAWNULL),NODRAW; VAR2:=1*AMOUNT; 百日天量:=HHV(VAR2,144)=VAR2; 一年天量:=HHV(VAR2,233)=VAR2; STICKLINE(百日天量,VOLUME,VOLUME*0.7,1,0),COLORGREEN; STICKLINE(一年天量,VOLUME,VOLUME*0.7,1,0),COLORFF7100; 六十日地量:=LLV(VAR2,60)=VAR2; 百日地量:=LLV(VAR2,144)=VAR2; 一年地量:=LLV(VAR2,233)=VAR2; 地量:=FILTER(LLV(AMOUNT,144)=AMOUNT,10); {STICKLINE(三十日地量,-50000,0,1,0),COLORMAGENTA;} {STICKLINE(六十日地量,-50000,0,1,0),COLORYELLOW;} STICKLINE(六十日地量,0,V,1,0),COLORFFFFFF; {STICKLINE(百日地量,-50000,0,1,0),COLORGREEN; STICKLINE(一年地量,-50000,0,1,0),COLORFF7100;} DRAWTEXT(地量,VOL*1.1,'■地量'),COLORGREEN; STICKLINE(百日地量,0,V,1,0),COLORGREEN; STICKLINE(一年地量,0,V,1,0),COLORFF7100; {說明:量柱上方.粉紅色是三十日天量,黃色是六十日天量,綠色是一百日天量,藍色是一年天量. A00:=SUM(IF((CLOSE > REF(CLOSE, 1.000)),VOL,IF((CLOSE < REF(CLOSE, 1.000)),(0 - VOL),0)),0); A01:=SUMBARS(VOL,CAPITAL); A02:=IF((CLOSE
> LLV(CLOSE,A01)), 1.000,(0 - A03:=(COUNT((IF((A02
= (0 - A04:=((CLOSE -
DMA(((( 3.000 * HIGH + LOW) + OPEN) + AMOUNT / VOL
/ SUM(AMOUNT, 13.000) /
AMOUNT / VOL / A05:=((CLOSE -
MIN(REF(CLOSE, 5.000) * A06:=((A03 AND A04) AND A05); A07:=(((((OPEN
< EMA(CLOSE, 5.000)) AND (CLOSE = HIGH)) AND (CLOSE
/ OPEN >= 0.019)) AND (VOL /
CAPITAL <= A08:=(A07 AND
(COUNT(A07, 5.000) = A09:=((((((((((((MA(CLOSE, 3.000) > REF(MA(CLOSE, 3.000), 1.000)) AND (MA(CLOSE, 5.000) > REF(MA(CLOSE, 5.000), 1.000))) AND
(MA(CLOSE, 10.000) > REF(MA(CLOSE, 10.000), 1.000)))
AND (VOL / 30.000) * 1.000))) AND REF(CLOSE, 1.000)) AND (MA(CLOSE, 5.000) > REF(MA(CLOSE, 5.000), 1.000))) AND (MA(CLOSE, 10.000) > REF(MA(CLOSE, 10.000), 1.000))) AND (MA(CLOSE, 20.000) > REF(MA(CLOSE, 20.000), 1.000))) AND (MA (VOL, 5.000)
> REF(MA(VOL, 5.000), 1.000))) AND ((MA(CLOSE,
5.000) - MA(CLOSE, 10.000)) <= A0A:=FILTER(A09, 5.000); MA20:=EMA(C,20); MA60:=EMA(C,60); DIFF:=EMA(CLOSE,7) - EMA(CLOSE,19); DEA:=EMA(DIFF,9); MACD:=2*(DIFF-DEA); CCIA1:="CCI.CCI"(14); CCIA2:="CCI.CCI#WEEK"(84); CCIA3:="CCI.CCI#WEEK"(14); TJ1F:=CROSS(DIFF,DEA) AND DIFF>0 AND MA60>=REF(MA60,1) AND MA20>=REF(MA20,1) AND CCIA1>100 AND VOL/REF(MA(VOL,5),1)>2.5; TJ2F:=CROSS(CCIA2,100) OR CCIA2>100; 選股:TJ1F AND TJ2F AND CCIA3>=REF(CCIA3,1); 強:(A06 OR A07) AND A0A OR 選股; DRAWTEXT(強,VOL*1.28,'強'),COLORWHITE; {STICKLINE(強,0,VOL,2,0),COLORFF00FF;} {MAVOL1:=MA(VOLUME,5); MAVOL2:=MA(VOLUME,35); MAVOL3:=MA(VOLUME,135); IF(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),VOLUME*5,0),COLORYELLOW,LINETHICK2;}; SSF:=DRAWLINE(HIGH>=HHV(HIGH,30),HIGH,LOW<=LLV(LOW,10),HHV(HIGH,6),1); ABF:=DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1); ZLCM:=EMA(WINNER(CLOSE)*70,3); SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3); ZZLKP:=ZLCM/(ZLCM+SHCM)*100; ZZLJJ:=EMA(ZZLKP,89); ZLF:=ZZLJJ>REF(ZZLJJ,1); {QR:=(中多>中空);} XGH:=CROSS(C,SSF) OR REF(CROSS(C,SSF),1) AND SSF>ABF AND ZLF AND ABF>1 AND SSF>1; DRAWTEXT((XGH>=1),VOL*1.18,'突破'),COLORYELLOW; 突破:=XGH>=1; {DRAWICON((突破+強+籌峰奪飆)>1,VOL*1.48,13);}; W:=VOL＿AMO; EPSL:=0.0001; ZZ:=(C+H+L)/3; TJ0:=ZZ>MAX(C,O) OR ZZ<MIN(C,O); CT:=錘頭處理; TJ1:=H=L AND C>REF(C,1); TJ2:=H=L AND C<REF(C,1); {畫陰陽量柱} V0L:=IF(W=1,V,AMOUNT),STICK,COLOREEFFEE; {STICKLINE(C>OPEN,0,V0L,1.3,1),COLOR1133FA; STICKLINE(C<OPEN,0,V0L,1.3,1),COLORCYAN;} {以下7句組合屬核心發明公式，聲明知識產權和版權。} ZL:=2*(H-L)+ABS(C-O)+3*EPSL; EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0)){僅處理日線一字漲跌停K線}; JGL_DTC:=(IF(TJ0 AND CT=1,4/3*(C-(H+L)/2)+ABS(C-O),C-OPEN)+EE)/ZL; 主動買:=V0L*(1+JGL_DTC)/2,COLOR1133AA,NODRAW; 主動賣:=V0L*(1-JGL_DTC)/2,COLORCYAN,NODRAW; {STICKLINE(1,0,ABS(主動買),2.2,1),COLOR1133DE;} 買賣差:=主動買-主動賣,COLOR13AADD,NODRAW; {曲線} SGM:=SUM(IF(BARSCOUNT(C),買賣差,0),3); 短:SMA(SGM,13,1)*2.5,COLORRED,LINETHICK2; {短M:SMA(短,5,2),COLOR13FE33,LINETHICK1;} 長:SUM(SGM,55)/20,LINETHICK2; {長M:EMA(長,8),COLORFFAA55,LINETHICK1;} 長FF:SUM(SGM,89)/20,LINETHICK2; {STICKLINE(換手2<-50000,0,換手2,0.5,0),COLORMAGENTA; STICKLINE(換手2<-170000,0,換手2,0.5,0),COLORGREEN;}; {組合沖關A:=(短>MA(V, 144) OR 長FF>MA(V, 144)) AND MA(V, 21)>MA(V, 55); 組合沖關:=短>長 AND 短>長FF AND MA(V, 21)>MA(V, 55)AND MA(V, 34)>MA(V, 144) OR 組合沖關A;} 組合沖關:=短>長 AND 短>長FF; VOLUMEF:VOL,VOLSTICK; STICKLINE(組合沖關,短,長,4,0),COLORYELLOW; MAVOL21A:MA(VOLUME,21),LINETHICK1; MAVOL55A:MA(VOLUME,55),LINETHICK1; MAVOL144A:MA(VOLUME,144),LINETHICK1; 短A:SMA(SGM,13,1)*2.5,COLORRED,LINETHICK2; {短M:SMA(短,5,2),COLOR13FE33,LINETHICK1;} 長A:SUM(SGM,55)/20,LINETHICK2; {長M:EMA(長,8),COLORFFAA55,LINETHICK1;} 長FFA:SUM(SGM,89)/20,LINETHICK2; {STICKLINE(短>MAVOL144,短,MAVOL144,4,0),COLORMAGENTA;} DRAWICON(AAFG,V/3,27); DRAWICON(BBFG,V/2,27); |
|
|
