《通達信主副圖指標集錦》7

{趨勢飄帶}   主圖

MA(EMA(CLOSE,12),1),COLORff00ff;
MA(EMA(CLOSE,12),3),COLORff00ff;
MA(EMA(CLOSE,12),5),COLORff00ff;
MA(EMA(CLOSE,12),7),COLORwhite;
MA(EMA(CLOSE,12),9),COLORff00ff;
MA(EMA(CLOSE,12),11),COLORff00ff;
MA(EMA(CLOSE,12),13),COLORff00ff;
MA(EMA(CLOSE,60),1),COLORGREEN;
MA(EMA(CLOSE,60),3),COLORGREEN;
MA(EMA(CLOSE,60),5),COLOR89BD00;
MA(EMA(CLOSE,60),7),COLORGREEN;
MA(EMA(CLOSE,60),9),COLORGREEN;
MA(EMA(CLOSE,60),11),COLORGREEN;
MA(EMA(CLOSE,60),13),COLORGREEN;
DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5),
LOW,'●'),COLORff00ff;
DRAWTEXT(FILTER(EMA(CLOSE,12)-EMA(CLOSE,60)>0 AND HIGH/EMA(CLOSE,12)>1.15,5),
HIGH,'●'),COLORYELLOW;
買賣力度     副

VAR1:=IF(YEAR>=2003 AND MONTH>=1,0,1);
VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10*VAR1;
買賣力度: SMA(VAR2,5,1)*VAR1;
賣出區: 1500*VAR1;
VAR3:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))*VAR1;
VAR4:=(IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))/(IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1))-IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1)/IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2)))*VAR1;
VAR5:=AMOUNT/(100*VOL)*VAR1;
VAR6:=MA(VAR5,40)*VAR1;
VAR7:=100*(CLOSE-VAR6)/VAR6*VAR1;
底部追擊: IF(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.08,300,200)*VAR1;
STICKLINE(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.08,1200,200,10,0)*VAR1;
買進: IF(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.05,300,200)*VAR1;
STICKLINE(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.05,800,200,6,1)*VAR1;
VAR8:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VAR9:=SMA(VAR8,3,1);
VARA:=SMA(VAR9,3,1);
D:SMA(VARA,5,1)*20;
短線泰斗   副

YS1:=(((HIGH + LOW) + (CLOSE * 2)) / 4);
RK3:=EMA(YS1,10);
RK4:=STD(YS1,10);
RK5:=(((YS1 - RK3) * 100) / RK4);
RK6:=EMA(RK5,5);
RK7:=EMA(RK6,10);
漲:=(((EMA(RK6,10) + 100) / 2) - 5 );
跌:=EMA(漲,4);
回調可進:=IF((CROSS(漲,跌) AND (跌 < (0 - 10))),20,0);
風險:IF(CROSS(跌,80),80,100),LINETHICK1,COLOR99FF00;
量價線1:EMA(跌,4) ,COLORFFFF00;
量價線2:EMA(量價線1,4) ,COLOR00FF00;
量價線3:EMA(量價線2,4) ,COLORFFFF00;
量價線4:EMA(量價線3,4) ,COLORFF0000;
上升:IF((漲 > REF(漲,1)),漲,0),CIRCLEDOT,COLORFF0000;
下跌:IF((漲 < REF(漲,1)),漲,0),CIRCLEDOT,COLORF00F00;
轉向:IF(CROSS(跌,80),漲,0),CIRCLEDOT,COLORF00FFF;
DRAWTEXT(回調可進,20,'回調可進'),COLORCCCCFF;
DRAWTEXT(((((漲 > REF(漲,1)) AND (跌 < 10)) AND (跌 > (0 - 10))) AND (REF(漲,1) < REF(漲,2))),10,'安全區'),COLORCCFF99;
VAR11:=SUMBARS(VOL,(FINANCE(7) * 100));
VAR22:=DMA(EMA(CLOSE,12),((SUM(VOL,5) / 3) / CAPITAL));
VAR3:=(((CLOSE - VAR22) / VAR22) * 100);
VAR4:=HHV(VAR3,VAR11);
VAR5:=LLV(VAR3,VAR11);
VAR6:=(((VAR3 - VAR5) / (VAR4 - VAR5)) * 100);
K:=SMA(VAR6,3,1);
D:=SMA(K,3,1);
J:=((3 * K) - (2 * D));
MA1:=MA(J,3);
STICKLINE(((FILTER(((J > MA1) AND (J <= 3)),5) = 1) AND (跌 < 0)),漲,(漲 + 10),8,0),COLORFF00FF;
DRAWTEXT(((FILTER(((J > MA1) AND (J <= 3)),5) = 1) AND (跌 < 0)),(漲 + 13),'關注'),LINETHICK2,COLOR00FF00;
DRAWTEXT((((漲 < REF(漲,1)) AND (REF(漲,1) > REF(漲,2))) AND (漲 > 105)),(漲 - 3),'逃頂'),LINETHICK2,COLOR0000FF;

吉祥之燭    副

Var1:=REF(CLOSE,5);
Var2:=SMA(MAX(CLOSE-Var1,0),8,1)/SMA(ABS(CLOSE-Var1),8,1)*60;
火苗: MA(Var2,4), stick,color00ffff ,linethick3;
Var3:=MA(Var2,8);
Var4:=IF(Var2>Var3,火苗,0);
Var5:=IF(Var2<Var3,火苗,0);
DT:=Var4;
KT:=Var5;
RKP:IF(DT<=Var3,火苗,0),stick,linethick3,colorblue ;
QKP:IF(KT>=Var3,火苗,0),linethick2,colorwhite;
JKP:IF(DT>=Var3 ,火苗-8,0),stick,linethick4,color0033ff;
GP:=DRAWTEXT(QKP>0,40,'火滅了！'),colorwhite;

{超級排序盯莊 }   副

n:1 100 75

Var1:=3*SMA((CLOSE-LLV(LOW,n))/(HHV(HIGH,n)-LLV(LOW,n))*100,20,1)
-2*SMA(SMA((CLOSE-LLV(LOW,n))/(HHV(HIGH,n)-LLV(LOW,n))*100,20,1),15,1);
Var2:=3*SMA((OPEN-LLV(LOW,n))/(HHV(HIGH,n)-LLV(LOW,n))*100,20,1)
-2*SMA(SMA((OPEN-LLV(LOW,n))/(HHV(HIGH,n)-LLV(LOW,n))*100,20,1),15,1);
Var3:=100-Var2;
Var4:=100-Var1;
var6:=100*VOL/CAPITAL*10;
a:=IF(Var4<REF(Var3,1),var6,0);
總排序:IF(Var4<REF(Var3,1),SUM(a,34),0),COLORffcccc;
進場資金:IF(Var4<REF(Var3,1),var6,0),COLORRED;
出場資金:IF(Var4>=REF(Var3,1),var6,0),COLORblue;
百日成交:ma(AMOUNT,100)*100/100000000;
百日換手:sum(v/capital*100,100);
STICKLINE(IF(進場資金>0,1,0),0,進場資金*10,4,0),COLORRED;
STICKLINE(IF(出場資金>0,1,0),0,出場資金*10,4,0),COLORblue;
選股:ref(總排序,1)=0 and 總排序>0,colorwhite;
{天堂星踏金浪}   副

Var1:=(2*CLOSE+HIGH+LOW)/4;
Var2:=LLV(LOW,34);
Var3:=HHV(HIGH,34);
Var4:=LLV(LOW,13);
Var5:=HHV(HIGH,13);
Var6:=EMA((Var1-Var4)/(Var5-Var2)*100,5);
Var7:=EMA((Var1-Var2)/(Var3-Var2)*100,8);
金浪: Var6,coloryellow ,linethick2 ;
aa:ema(var6,7),colorf0f000;
海浪: Var7;
踏上金浪:if(cross(金浪,aa) and aa<=25 ,1,0),stick,colorred;
stickline(金浪<aa,金浪,aa,1,0),linethick6,color40cc00;
stickline(海浪,0,海浪,10,0),color40cc00;
stickline(海浪,0,海浪*0.9,10,0),color40bc00;
stickline(海浪,0,海浪*0.8,10,0),color40ae00;
stickline(海浪,0,海浪*0.6,10,0),color409c00;
stickline(海浪,0,海浪*0.4,10,0),color409000;
stickline(金浪>=aa,金浪,aa,6,0),coloryellow;
stickline(aa>=海浪,aa,海浪,6,0),color40cc00;
drawicon(cross(金浪,aa) and aa<=25 ,金浪,1);
{戰國箭雨}   副

Var1:=REF(CLOSE,2);
A2:SMA(MAX(CLOSE-Var1,0),7,1)/SMA(ABS(CLOSE-Var1),7,1)*100,COLOR00FF00;
車弩機: IF(A2<12,30,0);
Var2:=REF(CLOSE,1);
Var3:=SMA(MAX(CLOSE-Var2,0),7,1)/SMA(ABS(CLOSE-Var2),7,1)*100;
彎弓: IF(Var3<12,30,0);
STICKLINE(A2>80,A2+1,A2-1,4,0),COLORRED;
逢高派發區:0,COLORRED;
VAR1J:=close/(ema(ema((c+l+h)/3,3),26)*0.9)<0.95 ;
放箭:IF(VAR1J,15,0),STICK,linethick3,COLORRED;
DRAWTEXT(VAR1J ,8,'箭'),COLORF0F000;
Vare1:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);
Vare2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);
Vare3:=IF(Vare1>0.010, 0.900, 1) AND IF(Vare1>(-0.025), 1, 1.200);
Vare4:=Vare3*(Vare2-Vare1)*100;
Vare5:=SUM(Vare4, 10);
Vare6:=SMA(Vare5, 40, 1);
Vare7:=IF(CLOSE and MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);{Var38>Var39;}
Vare8:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND Vare7>0, 91, 0);
追擊:IF(Vare8>90,30,0),STICK,linethick3,COLORBLUE;
DRAWTEXT(Vare8>90,30,'追擊'),COLORYELLOW;
新改的三線開合 ,參數用原來的

C0:=(H+L+C+O)/4;
A1:=HHV(C0,N);A2:=LLV(C0,N);A3:=A1-A2;
A4:=SMA((C0-A2)/A3,3,1)*100;
B1:=HHV(C0,4*N);B2:=LLV(C0,4*N);B3:=B1-B2;
B4:=SMA((C0-B2)/B3,3,1)*100;
C1:=HHV(C0,11*N);C2:=LLV(C0,11*N);C3:=C1-C2;
C4:=SMA((C0-C2)/C3,3,1)*100;
短期相對價位:A4,COLOR66FFFF,LINETHICK2;
中期相對價位:B4,COLOR6688FF,LINETHICK2;
長期相對價位:C4,COLOR6600FF,LINETHICK2;
{天線:90,LINETHICK1,COLOREEEE33,POINTDOT;
地線:10,LINETHICK1,COLOR33EE33,POINTDOT;
中線:50,LINETHICK1,COLOREEEEEE,POINTDOT;}
短拋:IF(短期相對價位>99,55,0),LINETHICK0,COLORWHITE;
中拋:IF(中期相對價位>99,55,0),LINETHICK0,COLORYELLOW;
長拋:IF(長期相對價位>99,55,0),LINETHICK0,COLORMAGENTA;
STICKLINE(短期相對價位<4.10 ,25,0,3,0),COLORYELLOW;
STICKLINE(短期相對價位>99 ,95,100,4,0),COLORWHITE;
STICKLINE(中期相對價位>99 ,95,100,4,0),COLORYELLOW;
STICKLINE(長期相對價位>99 ,95,100,4,0),COLORMAGENTA;
STICKLINE(長期相對價位>=99 AND 中期相對價位>=99 AND 短期相對價位>=99,長期相對價位,50,1,0), COLORYELLOW;
STICKLINE(長期相對價位>=99 AND 中期相對價位>=99 AND 短期相對價位>=99,60,50,1,0),COLORRED;
STICKLINE(長期相對價位<=2 AND 中期相對價位<=2 AND 短期相對價位<=5 , 長期相對價位,50,1,0), COLORRED;
STICKLINE(長期相對價位<=2 AND 中期相對價位<=2 AND 短期相對價位<=5 , 35,50,1,0),COLORYELLOW;

{看趨勢}   副

DBIAS:=(INDEXC-MA(INDEXC,13))/MA(INDEXC,13)*100;
大盤底:IF(REF(DBIAS,1)<-5 AND DBIAS>-5,100,0),STICK,LINETHICK3,COLORYELLOW;
STICKLINE(DBIAS<-5,50,0,4,0),COLOR0099CC;
GBIAS:=(C-MA(C,13))/MA(C,13)*100;
個股底:IF(REF(GBIAS,1)<-8 AND GBIAS>-8,80,0),STICK,LINETHICK2,COLORFFFF11;
STICKLINE(GBIAS<-8,30,0,3,0),COLORFF9900;
VARA:=IF(REF(L,1)<=LLV(L,120) AND HHV(C,120)/LLV(C,120)>1.25 AND C>O AND HIGH>LOW+0.04,4,0);
探底:IF(VARA>0,-40,0),COLOR00FF00,STICK,LINETHICK3;

A3:=REF(HHV(INDEXC,30),1);
B3:=REF(LLV(INDEXC,30),1);
大盤趨勢:100*(INDEXC-B3)/(A3-B3),COLORRED;
A4:=REF(HHV(C,30),1);
B4:=REF(LLV(C,30),1);
個股趨勢:100*(C-B4)/(A4-B4),COLORWHITE;
底線:0,COLORGREEN;
頂線:100,COLORGREEN;
A1:=LLV(H,250);
MYP:100*(C-A1)/A1,COLORFF00FF;
A2:=HHV(H,250);
MYL:100*(A2-C)/C,COLOR66FF33;
VARB:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);
VARC:=EMA(IF(C< EMA(C,250),VARB*1000,VARB*10),3);
VARD:=EMA(IF(L<=LLV(L,30),VARC/2+HHV(VARC,30),0),3)/618;
IF(VARD>100,-25,0),STICK,COLOR99FFCC,LINETHICK3;
VAR1:=AMOUNT/VOL/100;
VAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VAR3:=SUM(AMOUNT,7)/VAR1/100;
VAR4:=DMA(VAR2,VOL/VAR3);
VAR5:=(CLOSE-VAR4)/VAR4*100;
VAR6:=MA(VAR5,20)+STD(VAR5,20);
VAR7:=MA(VAR5,20)+1.732*STD(VAR5,20);
BIAS21:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
VAR8:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K1:=SMA(VAR8,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1;
VAR9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K2:=SMA(VAR9,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
STICKLINE(REF(BIAS21,1)>=5 AND CROSS(VAR6,VAR5) AND REF(J1,1)>80 AND REF(J2,1)>80,100,0,4,0),COLORBLUE;
STICKLINE(REF(BIAS21,1)>=5 AND CROSS(VAR7,VAR5) AND REF(J1,1)>80 AND REF(J2,1)>80 ,100,0,4,0),COLORBLUE;
VAR10:=REF(CLOSE,1.5);
VAR11:=SMA(MAX(CLOSE-VAR10,0),6,1)/SMA(ABS(CLOSE-VAR10),6,1)*100;
STICKLINE((REF(VAR11,1)>80) AND (VAR11<79),70,0,4,0),COLORDDDDFF;
VAR12:=REF(CLOSE,1);
VAR13:=SMA(MAX(CLOSE-VAR12,0),6,1)/SMA(ABS(CLOSE-VAR12),6,1)*100;
STICKLINE(CROSS(84,VAR13),50,0,4,0),COLORFFCC00;
海洋大底   副

CYS:=(C-CYC(13))/CYC(13)*100;
絕對底:IF(CYS<=-27,90,0),COLORWHITE,LINETHICK2;
大底:IF(CYS<=-20,60,0),COLORBLUE,LINETHICK2;
中底:IF(CYS<=-17,35,0),COLORYELLOW,LINETHICK2;
小底:IF(CYS<=-9,20,0),COLORGRAY,LINETHICK2;
快線:SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100,COLORRED;
慢線:SMA(MAX(CLOSE-REF(CLOSE,1),0),12,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),12,1)*100,COLORFFCCCC;
{波滔浪涌}  副

短線WR:MA((CLOSE-LLV(LOW,98))/(HHV(HIGH,98)-LLV(LOW,98))*120,8),colorFF0033,LINETHICK2;
中線WR:MA((CLOSE-LLV(LOW,88))/(HHV(HIGH,88)-LLV(LOW,88))*120,8),colorYELLOW,LINETHICK2;
RSV:=(CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25));
DY1:=(O+CLOSE+HIGH+LOW)/4;
DY2:=LLV(L,20);
DY3:=HHV(H,99);
DYA:=MA((DY1-DY2)/(DY3-DY2)*100,1);
DYB:=MA(DYA,5);
A1:=EMA((DY1-DY2)/(DY3-DY2)*180,20{88});
B1:=EMA(REF(A1,1),1);
B2:=MA((0.667*REF(RSV,1)+0.333*RSV),1);
弱波:=IF(A1>=B2,A1,B2),colorGREEN,pointdot,LINETHICK2;
強浪:=IF(B1-A1,B1,A1),coloryellow,pointdot,LINETHICK2;
STICKLINE(弱波>強浪,強浪,弱波+0.03,6,0),colorff22ff;
STICKLINE(弱波>強浪,強浪,弱波+0.03,6,0),colorff66ff;
STICKLINE(弱波>強浪,強浪,弱波+0.03,1,0),colorff88ff;
STICKLINE(弱波<強浪,強浪,弱波,6,0),COLOR00aa00;
STICKLINE(弱波<強浪,強浪,弱波,6,0),COLOR00cc00;
STICKLINE(弱波<強浪,強浪,弱波,1,0),COLOR00ee00;
{中線看盤}    副

v1:=hhv(high,30)=high;
創三十日新高:if(v1,1,0),colorred,stick,linethick4;
v2:=LLV(LOW,30)=LOW;
創三十日新低:if(v2,0.55,0),color00ff00,stick,linethick4;
a1:=LLV(LOW,30)=LOW;
a2:=CLOSE>=(HIGH-LOW)*2/3+LOW;
a3:=a1 AND a2 AND CLOSE>OPEN;
有反彈愿望:if(a3,0.4,0),colorblue,stick,linethick4;
a4:=CLOSE>=MA(CLOSE,60);
中線狀態:if(a4,0.15,0),colorffcc66,stick,linethick4;
var1:=MA(CLOSE,10);
var2:=MA(CLOSE,60);
var3:=CLOSE>=var1 AND var1>var2;
中線強勢:if(var3,0.35,0),colorff00ff,stick,linethick4;
y1:=MA(CLOSE,3);
y2:=MA(CLOSE,10);
y3:=MA(CLOSE,60);
y4:=y1>y2;
y5:=y2>y3;
y6:=CLOSE>=y1 AND y4 AND y5;
中線超強勢:if(y6,0.20,0),colorwhite,stick,linethick4;
{上下通道}    副

Var2:=MA(HIGH-LOW,21);
Var3:=VOL;
Var4:=Var2>REF(Var2,1) AND Var3>REF(Var3,1);
Var5:=Var2>REF(Var2,1) AND Var3<REF(Var3,1);
Var6:=Var2<REF(Var2,1) AND Var3>REF(Var3,1);
Var7:=Var2<REF(Var2,1) AND Var3<REF(Var3,1);
趨勢延續: STICKLINE(Var4>0,LOW,HIGH,5.5,1),COLORRED;
可能變盤: STICKLINE(Var5>0,LOW,HIGH,5.5,0),COLORBLUE;
多空平衡: STICKLINE(Var6>0,LOW,HIGH,5.5,1),COLORYELLOW;
趨勢預測: STICKLINE(Var7>0,LOW,HIGH,5.5,0), COLORFF00FF;
ma10:ma(c,10),colorwhite;
v1:=ma(HIGH,30)*1.15 ;
v2:=ma(HIGH,3)*1.03;
v3:=ma(LOW,3)*0.97;
v4:=ma(LOW,30)*0.85;
小通道上:ma(v2,30),colorred,linethick2;
小通道下:ma(v3,30),color00ff00,linethick2;
{三豐鐵手}  副

AS:=EMA((C/MA(C,20)-1)*666,3);
正鏡:AS,LINETHICK2,colorred;
反鏡:AS*(-1),color00ff00,LINETHICK2;
STICKLINE(正鏡>0,0,正鏡,6,0),colorred;
STICKLINE(正鏡>0,0,反鏡,6,0),color888888;
100,colorwhite,pointdot;
-100,colorwhite,pointdot;
50,colorffcc66,pointdot;
-50,colorffcc66,pointdot;
初升介入     副

V1:=(C-LLV(L,20))/(HHV(H,20)-LLV(L,20))*100;
V2:=SMA(V1,20,1);
V3:=SMA(V2,15,1);
V4:=(3*V2+2*V3)/4;
V5:= REF(V4,1);
RSA:SMA(MAX(V4-V5,0),2,1)/SMA(ABS(V4-V5),2,1)*100;
RSB:MA(RSA,10);
初升介入:IF(CROSS(RSA,RSB),50,0),STICK,LINETHICK2;
洗盤加倉:IF(CROSS(RSB,90),50,0),STICK,LINETHICK2;
DRAWTEXT(CROSS(RSA,RSB),-15,'初升介入'),COLOR00FF00;
DRAWTEXT(CROSS(RSB,90),-15,'洗盤加倉'),COLORWHITE;
-30;
㊣利多㊣拋吸        副

AAA:=100-100*(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8));
BBB:=100-100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42));
DDD:=100-100*(HHV(HIGH,89)-CLOSE)/(HHV(HIGH,89)-LLV(LOW,89));
短:EMA(AAA,4),COLOR66DDDD;
中:EMA(BBB,4),COLOR00FF00;
長:EMA(DDD,4),COLOR6600FF;
短拋:IF(短>88,55,0),COLORWHITE,LINETHICK0;
中拋:IF(中>94,55,0),COLORYELLOW,LINETHICK0;
長拋:IF(長>98,55,0),COLORMAGENTA,LINETHICK0;
STICKLINE(短<4.10 ,25,0,3,0),COLORYELLOW;
STICKLINE(短>88 ,95,100,4,0),COLORWHITE;
STICKLINE(中>94 ,95,100,4,0),COLORYELLOW;
STICKLINE(長>98 ,95,100,4,0),COLORMAGENTA;
STICKLINE(長>=98 AND 中>=93 ,長,50,1,0), COLORYELLOW;
STICKLINE(長>=98 AND 中>=93,60,50,1,0),COLORRED;
STICKLINE(長<=2 AND 中<=2 AND 短<=5 , 長,50,1,0), COLORRED;
STICKLINE(長<=2 AND 中<=2 AND 短<=5 , 35,50,1,0),COLORYELLOW;
股價:=(CLOSE-LLV(LOW,360))/(HHV(HIGH,360)-LLV(LOW,360))*80;
AA:=EMA(股價,3); CC:=REF(EMA(股價,10),1);
STICKLINE(AA>=CC ,0,4,2,0),COLORYELLOW;
STICKLINE(AA<=CC ,0,4,2,0),COLORGRAY;
判頂
通達信.大智慧可用

VAR1:4*SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,5,1),3.2,1),
COLORYELLOW,LINETHICK1;
VAR2:8,COLORBLUE;
上升在即: IF(CROSS(VAR1,VAR2),50,0),STICK,COLOR0000CC,LINETHICK2;
專吸莊血: IF(VAR1<=8,25,0),STICK,COLORWHITE,LINETHICK2;
DRAWICON(CROSS(VAR1,VAR2),8,1);
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
建倉區: IF((VARO7<10),80,100) ,COLORBLUE;
0,LINETHICK2 ,COLORFFCC00;
DRAWICON(CROSS(100,VAR1),100,2);
DRAWICON((100-VAR1<3 AND 100-VAR1>0),100,2);
強弱分界線:55,LINESTICK,COLORBLUE;
DRAWTEXT(CROSS(VAR1,104),104,'◆'),COLORWHITE;
B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70;
B2:=SMA(B1,9,1)+100;
B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
B7:IF(B6>60,B6-60,0);
持有:STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),5,0),COLORRED;
A:0,POINTDOT,COLORRED,LINETHICK3;

（昊晨鬼變臉）
主圖

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,0),COLORRED;
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORYELLOW;
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORMAGENTA;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR008800;
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=3*K24-2*D24;
壓力位:IF(CROSS(J24,J),H,REF(H,BARSLAST(CROSS(J24,J)))),COLOR00FF33,LINETHICK1;
支撐位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORCC33CC,LINETHICK1;
支撐價:LLV(LOW,23) ,COLOR7FFF00,LINETHICK2;
阻力價:HHV(HIGH,23),COLORFF9900, LINETHICK2;
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
DRAWTEXT(REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'★M'),COLOR00FFFF;{MACD底背離}
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
DRAWTEXT(REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'◎K'),COLORFF00FF;{KDJ底背離}
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
DRAWTEXT(REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'◆R'),COLOR0000FF;{RSI底背離};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
DRAWTEXT(REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M'),COLOR00FF00;{MACD頂背離};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
DRAWTEXT(REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'◎K'),COLORFFFFCC;{KDJ頂背離}
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
DRAWTEXT(REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'◆R'),COLORFF9900;{RSI頂背離};

佚名     ( 主 )

VAR2:=(H+L+O+2*C)/5;
CHH低吸線:EMA(SLOPE(VAR2,21)*20+VAR2,55),CIRCLEDOT;
DRAWICON(REF(C,1)<CHH低吸線 AND C>CHH低吸線,0.98*L,1);
DRAWICON(REF(C,1)>CHH低吸線 AND C<CHH低吸線,1.02*H,2);
BB:=LLV(H,1);
神頂抄底逃頂線:FORCAST(FORCAST(BB,15),15), COLORYELLOW,LINETHICK2;
神頂逃頂抄底線:FORCAST(FORCAST(BB,25),25), COLORRED,LINETHICK2;
IF(SLOPE(神頂抄底逃頂線,2)>0,CHH低吸線,C),CIRCLEDOT,COLORFF00FF;
C,CIRCLEDOT,COLORBLUE;
{K線}
V2:=(C*2+H+L)/4;
VAR3:=EMA(V2,3);
VAR4:=EMA(VAR3,6);
L1:=EMA(V2,3);
L2:=EMA(VAR3,4);
L3:=EMA(VAR4,5);
VAR5:=REF(L1,1)>L1 AND L1>L2;
STICKLINE(L1>=L2,H,L,1,0),COLORRED;
STICKLINE(L1<L2,H,L,1,0),COLORGREEN;
STICKLINE(L1>=L2,C,O,4,0),COLORRED;
STICKLINE(L1<L2,C,O,4,0),COLORGREEN;
STICKLINE(VAR5,H,L,1,0),COLORYELLOW;
STICKLINE(VAR5,C,O,4,0),COLORYELLOW;
{冰楓看盤}   主

MA13: MA(CLOSE,13);
MA21: MA(CLOSE,21);
年線: MA(CLOSE,250);
底部線: EMA(COST(3.5),10);
s:=MA(VOL,5)/MA(VOL,60),colorred,,linethick2;
a:=ma(s,5),colorgreen,,linethick2;
BIAS:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
f:=ma(s,121);
RSV:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100;
K:=SMA(RSV,15,1);
D:=SMA(K,15,1);
J:=3*K-2*D;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(84,RSI) , HIGH,'→ 逃頂 '),COLORYELLOW ;
DRAWTEXT(CROSS(RSI,11) , LOW,'→ 低吸 '),COLORRED ;
MID := MA(CLOSE,26);
UPPER:= MID + 2*STD(CLOSE,26);
LOWER:= MID - 2*STD(CLOSE,26);
s1:=IF((j<11 and BIAS>-11 and cross( s,f) and (s-f)>0.010),2,0),stick,linethick3,colorgreen;
DRAWTEXT(s1=2,LOW,'→關注 '), colorgreen;
DRAWICON( FILTER(cross(s,a) and a<0.5 and j<20,13),LOW,1 );
{白金趨勢}   主

Var1:=(CLOSE*2+HIGH+LOW)/4;
Var2:=EMA(Var1,3);
Var3:=EMA(Var2,6);
L1: EMA(Var1,3);
L2: EMA(Var2,4);
L3: EMA(Var3,5);
Var4:=REF(L1,1)>L1 AND L1>L2;
Var5:=L1>L2 AND CLOSE<OPEN;
Var6:=AMOUNT/10000;
Var7:=Var6/MA(Var6,5);
Var8:=VOL/FINANCE(7);
Var9:=Var7>2 AND REF(Var7>1,1) AND REF(Var7>1,2);
VarA:=Var8>5 AND REF(Var7>1,1) OR Var8>5 AND Var7>1 OR Var8>4 AND Var7>2;
VarB:=CLOSE-REF(MA(CLOSE,21),1);
VarC:=EMA(VarB-MA(VarB,21),5);
VarD:=SMA(VarB,7,1);
VarE:=CROSS(VarB,VarD) AND VarD<-1;
drawicon(count(ema(ema(l1,5),3)>ref(ema(ema(l1,5),3),1),1)=1 and  ref(ema(ema(l1,5),3),1)<ref(ref(ema(ema(l1,5),3),1),1),low-0.1,1);
{搜牛}   主圖

var1:=(high+low+open+close)/4;
分水嶺:ma(3*var1-2*sma(var1,2,1),12),colorwhite;
上漲:if(var1>分水嶺,var1,分水嶺),colorred;
支撐:reverse(上漲)+2*分水嶺,colorred;
var2:=if(var1<分水嶺,var1,分水嶺);
var3:=2*ema(llv(var1,7),10)-var1;
ma5:ma(close,5);
ma10:ma(close,10);
ma20:ma(close,20);
ma30:ma(close,30);
阻力極限:3*var3-2*sma(var3,10,1),colorgreen;
阻力:reverse(var2)+2*分水嶺,colorBLUE;
drawtext(filter(cross(75,sma(max(close-ref(close,1),0),8,1)/sma(abs(close-ref(close,1)),8,1)*100),10),high,'賣'),coloryellow;
drawtext(filter(cross(-5,ma((llv(low,45)-close)/(hhv(high,45)-llv(low,45))*100,5)),5),low,'買'),colorred;
{蛟龍}       主圖

MA5: MA(CLOSE,5),COLORRED , ;
MA10: MA(CLOSE,10),COLOR00FF00;
Var1:=MA(CLOSE,21);
MA20: MA(CLOSE,20),COLORYELLOW , ;
MA30: MA(CLOSE,30),COLORF00FF0 , ;
Var2:=MA(CLOSE,124);
Var3:=MA(CLOSE,240);
Var4:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
Var5:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Var6:=SMA(Var5,13,8);
Var7:=85;
Var8:=20;
Var9:=SMA(Var6,13,8);
VarA:=SMA(Var4,21,8);
VarB:=45;
VarC:=DRAWICON(CROSS((CLOSE+OPEN+LOW+HIGH)/4,MA20) AND (CLOSE+OPEN+LOW+HIGH)/4>MA20,(CLOSE+OPEN+LOW+HIGH)/4,1);
VarD:=REF(CLOSE,1);
VarE:=SMA(MAX(CLOSE-VarD,0),12,1)/SMA(ABS(CLOSE-VarD),12,1)*100;
VarF:=MA(VarE,4);
Var10:=IF(CROSS(VarF,REF(VarF,2)) AND VarF<32,80,IF(CROSS(REF(VarF,2),VarF) AND VarF>62,20,50));
M: DRAWTEXT(Var10>52,LOW,'買'),COLORwhite ;
Z: DRAWTEXT(Var10<50,HIGH*1.008,'賺'),COLORF00FF0 , ;
DRAWTEXT(LONGCROSS(MA(CLOSE,10),MA(CLOSE,124),3),MA(CLOSE,124),'強'),COLORRED , ;
Var11:=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);
蛟龍出水: DRAWTEXT(CROSS(Var11,66),OPEN,'蛟龍'),COLOR00FF00 , ;
蛟龍沉淵: DRAWTEXT(CROSS(84,Var11),HIGH,'沉淵'),COLORyellow ,;
A1:=((CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200)-105;
A2:=SMA(A1,5,1);
A3:=65;
DRAWTEXT(CROSS(A2,A3),LOW,'=賣'),COLORRED；
{天羅地網}          主

SUM( MA(CLOSE,10),9)/10.110,colorwhite,circledot;
SUM( MA(CLOSE,10),9)/11.114,color0099ff,circledot;
SUM( MA(CLOSE,10),9)/7.883,colorwhite,circledot;
SUM( MA(CLOSE,10),9)/7.007,color0099ff,circledot;
Var1:=LLV(LOW,144);
1*Var1,colorred;
1.191*Var1,POINTDOT,linethick2,coloryellow;
1.382*Var1,POINTDOT,linethick2;
1.618*Var1,POINTDOT,linethick2,colorred;
1.809*Var1,colorred;
e1:DRAWLINE(c=LLV(c,60),LOW,c=LLV(c,30) and c>llv(c,45),LLV(LOW,3),1),linethick2,color0099ff;
va11:=HIGH>=HHV(HIGH,60);
v1:=(ref(va11,1)>0 and va11<1);
va12:=LOW<=LLV(LOW,60);
v2:=ref(va12,1)>0 and va12<1;
e2:DRAWLINE(v2,LOW,v1,LLV(LOW,6),1),colorred,linethick2;
{小天RSI }     主

nn:1 111 20 n:1 111 6

STICKLINE(C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=O,C,O,4,0),COLOR7070ff;
STICKLINE(C>=O,C,O,2,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0,0),COLORYELLOW;
STICKLINE(C<=O,C,O,7,0),COLORFF2020;
STICKLINE(C<=O,C,O,4,0),COLORFF6600;
STICKLINE(C<=O,C,O,2,0),COLORF0F000;
STICKLINE(C<=O,H,L,0,0),COLORF0F000;
Var1:=REF(CLOSE,1);
MA5:MA(CLOSE,5);
MA20: MA(CLOSE,NN),COLORWHITE;
Var3:=SMA(MAX(CLOSE-Var1,0),N,1)/SMA(ABS(CLOSE-Var1),N,1)*100;
Var4:=SMA(MAX(CLOSE-Var1,0),12,1)/SMA(ABS(CLOSE-Var1),12,1)*100;
Var5:=SMA(MAX(CLOSE-Var1,0),24,1)/SMA(ABS(CLOSE-Var1),24,1)*100;
Var6:=IF(CROSS(Var3,Var5),LOW,REF(LOW,BARSLAST(CROSS(Var3,Var5))));
Var7:=IF(CROSS(Var5,Var3),HIGH,REF(HIGH,BARSLAST(CROSS(Var5,Var3))));
Var8:=IF(CLOSE>=MA(CLOSE,NN),80,50);
Var9:=IF(CLOSE>=MA(CLOSE,NN),50,20);
VarA:=IF(Var3<Var8 AND REF(Var3,1)>=Var8,HHV(REF(HIGH,1),BARSLAST(Var3>=Var8 AND REF(Var3,1)<Var8)-1),REF(HHV(REF(HIGH,1),BARSLAST(Var3>=Var8 AND REF(Var3,1)<Var8)-1),BARSLAST(Var3<Var8 AND REF(Var3,1))));
VarB:=IF(HIGH>VarA,LOW,REF(LOW,BARSLAST(HIGH>VarA)));
VarC:=IF(HIGH>VarA,Var3,REF(Var3,BARSLAST(HIGH>VarA)));
VarD:=IF(HIGH>VarB AND Var3<VarC AND Var3<Var5,HIGH,REF(HIGH,BARSLAST(HIGH>VarB AND Var3<VarC AND Var3<Var5)));
VarE:=IF(Var3>Var9 AND REF(Var3,1)<=Var9,LLV(REF(LOW,1),BARSLAST(Var3<=Var9 AND REF(Var3,1)>Var9)-1),REF(LLV(REF(LOW,1),BARSLAST(Var3<=Var9 AND REF(Var3,1)>Var9)-1),BARSLAST(Var3>Var9 AND REF(Var3,1))));
VarF:=IF(LOW<VarE,HIGH,REF(HIGH,BARSLAST(LOW<VarE)));
Var10:=IF(LOW<VarE,Var3,REF(Var3,BARSLAST(LOW<VarE)));
Var11:=IF(LOW<VarF AND Var3>Var10 AND Var3>Var5,LOW,REF(LOW,BARSLAST(LOW<VarF AND Var3>Var10 AND Var3>Var5)));
cb:=amount/v/100;
cd:=cb>h or cb<l;
{STICKLINE(cd<1,cb-0.002,cb+0.002,8,1),COLORYELLOW;}
多防線: Var11,COLORFF00FF,pointdot, LINETHICK2;
空防線: VarD,COLORBLUE,pointdot, LINETHICK2;
{八陣圖 }          主

var11:=(2*c+o+h+l)/5;
var12:=vol;
m1:=sum(var11*var12,1)/sum(var12,1);
m5:=sum(var11*var12,5)/sum(var12,5);
m13:=sum(var11*var12,13)/sum(var12,13);
m8:=sum(var11*var12,8)/sum(var12,8);
m21:=sum(var11*var12,21)/sum(var12,21);
Y:=m1;
u1:=m5,colorred;
STICKLINE(C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=O,C,O,4,0),COLOR7070ff{B0B0FF};
STICKLINE(C>=O,C,O,2,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0,0),COLORYELLOW;
STICKLINE(C<=O,C,O,7,0),COLORFF2020;
STICKLINE(C<=O,C,O,4,0),COLORFF6600;
STICKLINE(C<=O,C,O,2,0),{COLORCYAN;}colorffcc66;
STICKLINE(C<=O,H,L,0,0),{COLORCYAN}colorffcc66;
主力:m8,COLORYELLOW,linethick1;
u3:=m13,colorEE33CC;
XX1:=u1>主力 AND 主力>u3;
c5:=IF(XX1>0,llv(u1, 5),hhv(主力,5)),linethick2,COLOR00ff00;
c8:=IF(XX1>0,llv(主力, 8),hhv(主力,5)),linethick2,coloryellow;
c13:=IF(XX1>0,llv(u3, 13),hhv(主力,5)),colorff00ff,linethick2;
散戶:llv(主力, 8),color00ff00,linethick1;
雷達:DYNAINFO(7),colorffcc66,POINTDOT;
風向標:ma(close,30),colorwhite,linethick2;
DRAWTEXT(散戶=ref(散戶,1),散戶,' ┬ '),colorwhite;
DRAWTEXT(ref(散戶,1)<ref(散戶,2) and 散戶=ref(散戶,1),散戶,'│'),coloryellow;
Var326:=IF(CLOSE>REF(CLOSE, 1),88,0);
Var327:=IF(CLOSE/REF(CLOSE, 1)>1.050  AND HIGH/CLOSE<1.010 AND Var326>0, 91, 0);
STICKLINE(Var327>90,L*0.99,L*0.95,4,0),COLORYELLOW;
DRAWTEXT(Var327>90,LOW*0.95,'追漲'),COLORYELLOW;
{不虧均線-急進型}        主

m9:ma(c,9);
m6:Ema(c,60),COLORRED,LINETHICK0;
ma23:ema(c,23),COLORyellow;
m43:=Ema(c,43),COLORRED;
m47:ma(c,47),colorgreen;
m48:Ema(m47,3),colorgreen;
m49:ema(m48,3),COLORff00ff;
m50:Ema(m49,3),COLORff00ff;
MA60:eMA(CLOSE,60),COLORred,LINETHICK2;
{stickline(c<=o,C,o,8,0),COLORffcc66;
stickline(c<=o,H,L,0.1,0),COLORffcc66;
stickline(c>=o,C,o,8,1),COLORRED;
stickline(c>=o,H,c,0.1,0),COLORRED;
stickline(c>=o,L,o,0.1,0),COLORRED;}
HZ1:=EMA(CLOSE,13);
HZ2:=MA(C,21);
stickline(c>o AND HZ1>HZ2,C,o,3,0),COLORYELLOW;
Y:=(H+L)/2;
AO:=MA(Y,5)-MA(Y,34 );
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(H,2),TDU3),REF(LLV(L,2),TUD3)),COLORYELLOW;
JDU0:=REF(C,1)<=REF(UDGLINE,1) AND C>UDGLINE AND TDU0<TUD0;
JUD0:=REF(C,1)>=REF(UDGLINE,1) AND C<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
DRAWTEXT(JDU2,m9*0.978,'空轉多'),COLORyellow;
DRAWTEXT(cross(m6,m9),m9*0.98,'空轉多'),COLORwhite;
市場潛能

MID:=(HIGH+LOW+CLOSE)/3;
市場潛能:(SUM(MAX(0,HIGH-REF(MID,1)),26)/SUM(MAX(0,REF(MID,1)-L),26)*100),COLORRED;
MA1:EMA(市場潛能,8),COLOR00FF00,POINTDOT;
MA2:EMA(市場潛能,13),COLORWHITE;
MA3:EMA(市場潛能,55),COLORFF00FF,LINETHICK2;
STICKLINE(市場潛能>=MA2,市場潛能,MA2,2,0),COLORWHITE;
STICKLINE(市場潛能<MA2,MA2,市場潛能,2,0),COLOR00FF00;
STICKLINE(市場潛能>=MA1,市場潛能,MA1,2,0),COLORRED;
STICKLINE(市場潛能<MA1,MA1,市場潛能,2,0),COLOR00FF00;
40,COLORYELLOW;
資金監控

VAR1:=SMA(AMOUNT,10,1)/1000000;
VAR2:=REF(VAR1,1);
VAR3:=MA(REF(CLOSE,1),5);
最高:VAR1*HIGH/VAR3*1/10,POINTDOT,COLOR009900,COLORGRAY;
最低:VAR1*LOW/VAR3*1/10,POINTDOT,COLOR009900,COLORYELLOW;
開盤:VAR1*OPEN/VAR3*1/10,POINTDOT,COLOR009900,COLORMAGENTA;
收盤:VAR1*CLOSE/VAR3*1/10,COLOR009900,COLORGREEN,POINTDOT;
生命線:EMA(收盤,13),COLORWHITE;             
昨收盤:=REF(收盤,1),POINTDOT,COLOR009900,LINETHICK0;
漲跌:=(收盤-REF(收盤,1))/REF(收盤,1)*100,POINTDOT,COLOR009900,LINETHICK0;
STICKLINE(收盤>開盤,收盤,開盤,3,0),COLORRED;
STICKLINE(收盤>開盤,最高,MAX(收盤,開盤),0,1),COLORRED;
STICKLINE(收盤>開盤,MIN(收盤,開盤),最低,0,1),COLORRED;
STICKLINE(收盤<開盤,收盤,開盤,2,0),COLORGREEN;
STICKLINE(收盤<開盤,最高,MAX(收盤,開盤),0,1),COLORGREEN;
STICKLINE(收盤<開盤,MIN(收盤,開盤),最低,0,1),COLORGREEN;
神龍飛天

VAR1:=(EMA(AMOUNT,5)/EMA(VOL,5)/100-EMA(AMOUNT,125)/EMA(VOL,125)/100)/(EMA(AMOUNT,5)/EMA(VOL,5)/100)<-0.4;
VAR2:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR3:=SMA(VAR2,3,1);
VAR4:=SMA(VAR3,3,1);
VAR5:=(-100)*(HHV(HIGH,52)-CLOSE)/(HHV(HIGH,52)-LLV(LOW,52));
VAR6:=COUNT(VAR1,5)>=1 AND (VAR5<-99.9 OR VAR4<15 AND VAR3<12);
VAR7:=VOL/FINANCE(7);
VAR8:=100*WINNER(CLOSE);
VAR9:=MA(VAR8,3);
VARA:=MA(VAR7,34);
VARB:=VAR9<VARA*100 AND VAR8<VAR7;
VARC:=SUM(IF(CLOSE>REF(CLOSE,1),1,0),0);
VARD:=SUMBARS(VOL,CAPITAL);
VARE:=IF(CLOSE>LLV(CLOSE,VARD),1,-1)*IF(VARC>LLV(VARC,VARD),1,-1);
VARF:=COUNT(IF(VARE=-1,1,0)=1,8)>2;
VAR10:=(CLOSE-DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100)))/DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100))*100<-18;
VAR11:=(CLOSE-MIN(REF(CLOSE,5)*0.865,REF(CLOSE,21)*0.772))/CLOSE<0.01;
VAR12:=VARF AND VAR10 AND VAR11;
VAR13:=VOL/CAPITAL>=0.02 AND VOL/CAPITAL<=0.2 AND OPEN=1.105;
VAR14:=VAR13 AND COUNT(VAR13,5)=1;
VAR15:=VAR12 OR VAR13;
VAR16:=REF(CLOSE,1);
VAR17:=SMA(MAX(CLOSE-VAR16,0),7,1)/SMA(ABS(CLOSE-VAR16),7,1)*100;
VAR18:=SMA(MAX(CLOSE-VAR16,0),13,1)/SMA(ABS(CLOSE-VAR16),13,1)*100;
VAR19:=VAR17<20 AND VAR18<25;
VAR1A:=VAR19;
VAR1B:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),0-VOL,0)),0);
VAR1C:=IF(CLOSE>LLV(CLOSE,VARD),1,-1);
VAR1D:=IF(VAR1B>LLV(VAR1B,VARD),1,-1);
VAR1E:=VAR1C*VAR1D;
VAR1F:=IF(VAR1E=-1,1,0);
VAR20:=VAR1F AND CLOSE=LLV(CLOSE,120) AND VAR8<VAR7;
VAR21:=IF(FILTER(VAR6 AND VARB AND VAR15 AND VAR1A AND VAR20>0,4),70,0);
VAR22:=IF(VARB AND VAR1A AND VAR20>0,50,0);
持倉區: STICKLINE(CLOSE>EMA(CLOSE,20),80,85,8,1),COLORRED;
空倉區: STICKLINE(CLOSE<EMA(CLOSE,20),80,85,8,1),COLORGREEN;
VAR23:=HHV(HIGH,9)-LLV(LOW,9);
VAR24:=HHV(HIGH,9)-CLOSE;
VAR25:=CLOSE-LLV(LOW,9);
VAR26:=VAR24/VAR23*100-70;
VAR27:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR28:=(2*CLOSE+HIGH+LOW)/4;
VAR29:=SMA(VAR25/VAR23*100,3,1);
VAR2A:=LLV(LOW,34);
VAR2B:=SMA(VAR29,3,1)-SMA(VAR26,9,1);
VAR2C:=IF(VAR2B>100,VAR2B-100,0);
VAR2D:=HHV(HIGH,34);
VAR2E:=EMA((VAR28-VAR2A)/(VAR2D-VAR2A)*100,13);
VAR2F:=EMA(0.667*REF(VAR2E,1)+0.333*VAR2E,2);
神龍飛天: VAR2F;
STICKLINE(VAR2E-VAR2F>0,VAR2E,VAR2F,8,0),COLORRED;
STICKLINE(VAR2E-VAR2F<0,VAR2E,VAR2F,8,0),COLORGREEN;
潛龍能量: (VAR2E-VAR2F)*5;
STICKLINE(潛龍能量>=0,0,潛龍能量*1,2,0);
STICKLINE(潛龍能量>=0,0,潛龍能量*0.8,2,0);
STICKLINE(潛龍能量>=0,0,潛龍能量*0.6,2,0);
STICKLINE(潛龍能量>=0,0,潛龍能量*0.4,2,0);
STICKLINE(潛龍能量>=0,0,潛龍能量*0.2,2,0);
STICKLINE(潛龍能量<0,0,潛龍能量*1,2,0),COLORFFFF00;
STICKLINE(潛龍能量<0,0,潛龍能量*0.8,2,0),COLORFFFF00;
STICKLINE(潛龍能量<0,0,潛龍能量*0.6,2,0),COLORFFFF00;
STICKLINE(潛龍能量<0,0,潛龍能量*0.4,2,0),COLORFFFF00;
STICKLINE(潛龍能量<0,0,潛龍能量*0.2,2,0),COLORFFFF00;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,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>-150,0,VAR9,3,0), , COLORFF00FF;
底部吸籌指標: (CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, , COLOR00FF00;
STICKLINE(CROSS(底部吸籌指標,-24),100,0,6,0), , COLORFFFFFF;
先知: (CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100, , COLORFF00FF;
可能放量拉升: IF(CROSS(底部吸籌指標,-24),1,0), , COLORFFFFFF;
RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:=SMA(RSV9,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1;
短線獲利:STICKLINE(REF(J1,1)<0 AND J1>0,60,0,2,0),COLOR0000FF;
VARK1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;VARK2:=REVERSE(VARK1);
VARK3:=SMA(VARK1,3,1);波段王:=SMA(VARK3,3,1), , COLORRED,LINETHICK2;
波段鬼:=SMA(波段王,2.5,1),COLORYELLOW,LINETHICK2;
趨勢線: 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), ,COLORFF6666,LINETHICK2;
DK1:=K1-REF(K1,1),COLORSTICK;
出手就贏:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0), STICK,COLORYELLOW;
DRAWICON(出手就贏>0,50 ,1);
買點準備:IF(趨勢線<=10,0,10), COLORFF9933,LINETHICK3;
STICKLINE( CROSS(趨勢線,10),0,73,6,0), COLOR3366FF,;
DRAWTEXT(IF(CROSS(趨勢線,10),100,0),68,'抄底'),COLORWHITE ;
DRAWTEXT(IF(CROSS(10,趨勢線),1,0), 10,'$備錢'),COLOR33FFCC,;
DRAWTEXT(REF(J1,1)<0 AND J1>0,50,'短買'),,,,COLORRED ,;
DRAWTEXT(CROSS(底部吸籌指標,-24),80,'抄底'),COLORWHITE ,;

自用主圖

VAR1:=(LOW+HIGH+CLOSE+O)/4;
操作:MA(VAR1,5),COLOR00FFFF,LINETHICK2;
拉升:HHV(操作,13),COLORFF00FF;
買賣:LLV(操作,13),COLOR00FFFF;
壓力:HHV(操作,60),COLORFF6600;
支撐:LLV(LOW,60)*1.02,COLOR00FF00,LINETHICK2;
頂部:HHV(HIGH,60)*0.98,COLORFFFF00,LINETHICK2;
漲:IF(MA(VAR1,5)>REF(MA(VAR1,5),1),MA(VAR1,5),DRAWNULL),COLORRED,LINETHICK2;
平:IF(MA(VAR1,5)=REF(MA(VAR1,5),1),MA(VAR1,5),DRAWNULL),COLOR00FFFF,LINETHICK3;
跌:IF(MA(VAR1,5)<REF(MA(VAR1,5),1),MA(VAR1,5),DRAWNULL),COLORGREEN,LINETHICK2;
DRAWTEXT(C-O>=0 AND O/L>1.05 AND L<=LLV(L,30),L,'★<--極品絕底'), LINETHICK1;
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1))+1)>C AND REF("MACD.DIF",BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1))+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'★M'),COLOR00FFFF;{MACD底背離}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1))+1)>C AND REF("KDJ.K",BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1))+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'◎K'),COLORFF00FF;{KDJ底背離}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1))+1)>C AND REF("RSI.RSI1",BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1))+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'◆R'),COLOR0000FF;{RSI底背離};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1))+1)<C AND REF("MACD.DIF",BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1))+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M'),COLOR00FF00;{MACD頂背離};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1))+1)<C AND REF("KDJ.K",BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1))+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'◎K'),COLORFFFFCC;{KDJ頂背離}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1))+1)<C AND REF("RSI.RSI1",BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1))+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'◆R'),COLORFF9900;{RSI頂背離};
昊晨出擊

SHORT:1   500  12
LONG: 1   500  26
M:    1   500   9

DIF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),COLORRED;
DEA  : EMA(DIF,M),COLORYELLOW;
MACD : 2*(DIF-DEA),LINETHICK0;
{STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR00AAFF;}
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3,0 ),COLOR00CCFF;
{STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR00EEFF; }
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.1,0 ),COLOR00FFFF;
{STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4 ,0 ),COLOR0000AA;}
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.3,0 ),COLOR0022CC;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.1 ,0 ),COLOR0055FF;
{STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORAA00BB; }
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3.3,0 ),COLORCC22BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1 ,0 ),COLORFF55BB;
{STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORFFAA00;}
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3.3,0 ),COLORFFCC22;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.1 ,0 ),COLORFFFF55;
昊晨出擊:MACD<0 AND REF(MACD,2)>REF(MACD,1) AND REF(MACD,1)<MACD;

前導公式

1:QDB
前導乖離
NN1:=IF(LFM.N<1,1,LFM.N);
M1:=IF(NN1>30,30,NN1);
MM1:=IF(LFM.M>60,60,LFM.M);
M2:=IF(MM1>M1,MM1,(M1+1));
TMP1:=(2*SUM(CLOSE,M1)+SUM(CLOSE,(M2-M1))-SUM(CLOSE,M2))/M1;
TMP2:=(2*SUM(CLOSE,M2)+SUM(CLOSE,(M2-M1))-SUM(CLOSE,(2*M2-M1)))/M2;
TMP3:=TMP1-TMP2;
QDB:0;
STICKLINE(0,0,0,0.5,0);
STICKLINE((REF(TMP3,1)<TMP3),0,(TMP3),0.5,0);
STICKLINE((REF(TMP3,1)>=TMP3),0,(TMP3),0.5,0);
M3:LFM.N,POINTDOT,COLORWHITE;
M4:LFM.M,POINTDOT,COLORWHITE;

2:LFM
前導線
M1:=6;
N1:=3;
LFM:CLOSE;
ADVLFM:LFM;
M:M1;
N:N1;

3:LCD
前導選股跌
NN1:=IF(LFM.N<1,1,LFM.N);
M1:=IF(NN1>30,30,NN1);
MM1:=IF(LFM.M>60,60,LFM.M);
M2:=IF(MM1>M1,MM1,(M1+1));
LFMTMP:=2*REF(CLOSE,M1)-REF(CLOSE,M2);
QDBTMP1:=(2*SUM(CLOSE,M1)+SUM(CLOSE,(M2-M1))-SUM(CLOSE,M2))/M1;
QDBTMP2:=(2*SUM(CLOSE,M2)+SUM(CLOSE,(M2-M1))-SUM(CLOSE,(2*M2-M1)))/M2;
QDBTMP:=QDBTMP1-QDBTMP2;
TMP1:=(LFMTMP>HIGH);
TMP2:=((LFMTMP>=LOW)AND(LFMTMP<=HIGH));
TMP3:=BARSLAST(TMP2);
TMP4:=REF(TMP3,1);
TMP5:=(LFMTMP>REF(LFMTMP,(TMP4+1)));
TMP6:=((2*REF(CLOSE,1)-REF(CLOSE,(M2-M1+1)))>(2*CLOSE-REF(CLOSE,(M2-M1))));
TMP7:=((QDBTMP<REF(QDBTMP,1))AND(REF(QDBTMP,1)<REF(QDBTMP,2)));
TMP8:=((2*REF(CLOSE,1)-REF(CLOSE,(M2-M1+1)))>=(2*CLOSE-REF(CLOSE,(M2-M1))));
前導選股:((TMP1)AND(TMP8))OR((TMP2)AND(TMP5)AND(TMP6)AND(TMP7));

4:LYD
前導選股異動跌
NN1:=IF(LFM.N<1,1,LFM.N);
M1:=IF(NN1>30,30,NN1);
MM1:=IF(LFM.M>60,60,LFM.M);
M2:=IF(MM1>M1,MM1,(M1+1));
LFMTMP:=2*REF(CLOSE,M1)-REF(CLOSE,M2);
TMP1:=(LFMTMP<LOW);
TMP2:=CLOSE<OPEN;
TMP3:=((2*REF(CLOSE,1)-REF(CLOSE,(M2-M1+1)))>(2*CLOSE-REF(CLOSE,(M2-M1))));
TMP4:=REF(CLOSE,1)>REF(OPEN,1);
前導選股:(TMP1)AND(TMP2)AND(TMP3)AND(TMP4);

5:LYZ
前導選股異動漲
NN1:=IF(LFM.N<1,1,LFM.N);
M1:=IF(NN1>30,30,NN1);
MM1:=IF(LFM.M>60,60,LFM.M);
M2:=IF(MM1>M1,MM1,(M1+1));
LFMTMP:=2*REF(CLOSE,M1)-REF(CLOSE,M2);
TMP1:=(LFMTMP>HIGH);
TMP2:=CLOSE>OPEN;
TMP3:=((2*REF(CLOSE,1)-REF(CLOSE,(M2-M1+1)))<(2*CLOSE-REF(CLOSE,(M2-M1))));
TMP4:=REF(CLOSE,1)<REF(OPEN,1);
前導選股:(TMP1)AND(TMP2)AND(TMP3)AND(TMP4);

6:LCZ
前導選股漲
NN1:=IF(LFM.N<1,1,LFM.N);
M1:=IF(NN1>30,30,NN1);
MM1:=IF(LFM.M>60,60,LFM.M);
M2:=IF(MM1>M1,MM1,(M1+1));
LFMTMP:=2*REF(CLOSE,M1)-REF(CLOSE,M2);
QDBTMP1:=(2*SUM(CLOSE,M1)+SUM(CLOSE,(M2-M1))-SUM(CLOSE,M2))/M1;
QDBTMP2:=(2*SUM(CLOSE,M2)+SUM(CLOSE,(M2-M1))-SUM(CLOSE,(2*M2-M1)))/M2;
QDBTMP:=QDBTMP1-QDBTMP2;
TMP1:=(LFMTMP<LOW);
TMP2:=((LFMTMP>=LOW)AND(LFMTMP<=HIGH));
TMP3:=BARSLAST(TMP2);
TMP4:=REF(TMP3,1);
TMP5:=(LFMTMP<REF(LFMTMP,(TMP4+1)));
TMP6:=((2*REF(CLOSE,1)-REF(CLOSE,(M2-M1+1)))<(2*CLOSE-REF(CLOSE,(M2-M1))));
TMP7:=((QDBTMP>REF(QDBTMP,1))AND(REF(QDBTMP,1)<REF(QDBTMP,2)));
TMP8:=((2*REF(CLOSE,1)-REF(CLOSE,(M2-M1+1)))<=(2*CLOSE-REF(CLOSE,(M2-M1))));
前導選股:((TMP1)AND(TMP8))OR((TMP2)AND(TMP5)AND(TMP6)AND(TMP7));