{資金博弈 }

jgV:=(BIGORDER(1,3)-BIGORDER(2,3))*vol/CAPITAL;

dhV:=(BIGORDER(1,2)-BIGORDER(2,2)-BIGORDER(1,3)+BIGORDER(2,3))*vol/CAPITAL;

zhV:=(BIGORDER(1,1)-BIGORDER(2,1)-BIGORDER(1,2)+BIGORDER(2,2))*vol/CAPITAL;

shV:=(BIGORDER(2,1)-BIGORDER(1,1))*vol/CAPITAL;

A1:=MIN((COUNT(ORDER(2),0)),60);

超級資金:EMA(jgV,A1)*A1,COLORMAGENTA;

大戶資金:EMA(dhV,A1)*A1,color3399FF ;

中戶資金:EMA(zhV,A1)*A1,colorcyan;

散戶資金:EMA(shV,A1)*A1,colorgreen;

0,color333333;

{超級資金 }

A1:=MIN((COUNT(ORDER(2),0)),60);

超戶:(BIGORDER(1,3)-BIGORDER(2,3))*vol/CAPITAL,COLOR3D ;

累計:EMA(超戶,A1)*A1,COLORMAGENTA;

均值:EMA(累計,10),colorwhite;

{大戶資金 }

A1:=MIN((COUNT(ORDER(2),0)),60);

大戶:(BIGORDER(1,2)-BIGORDER(2,2)-BIGORDER(1,3)+BIGORDER(2,3))*vol/CAPITAL,COLOR3D ;

累計:EMA(大戶,A1)*A1,color3399FF;

均值:EMA(累計,10),colorwhite;

{中戶資金 }

A1:=MIN((COUNT(ORDER(2),0)),60);

中戶:(BIGORDER(1,1)-BIGORDER(2,1)-BIGORDER(1,2)+BIGORDER(2,2))*vol/CAPITAL,COLOR3D ;

累計:EMA(中戶,A1)*A1,colorcyan;

均值:EMA(累計,10),colorwhite;

{散戶資金 }

A1:=MIN((COUNT(ORDER(2),0)),60);

散戶:(BIGORDER(2,1)-BIGORDER(1,1))*vol/capital,COLOR3D ;

累計:EMA(散戶,A1)*A1,colorgreen;

均值:EMA(累計,10),colorwhite;

{大單比率 }

input:P1(5,0,100),P2(30,0,100);

A1:=MIN((COUNT(ORDER(2),0)),60);

大單比率:(BIGORDER(1,2) - BIGORDER(2,2))*vol/CAPITAL,color3d;

均值1:EMA(大單比率,P1),coloryellow;

均值2:EMA(大單比率,P2),colormagenta;

{籌碼聚散}

聚散程度:10*(ORDER(2)-ORDER(1))/CAPITAL, COLOR3D;

聚散方向:ema( 聚散程度,10),linethick2 ;

{資金流變}

input:n1(5,0,100);

a:=((BIGORDER(1,2) - BIGORDER(2,2)) *AMOUNT/100000000) ;

STICKLINE(a>0,0,a,6,0 ),COLORred;

STICKLINE(a<0,0,a,6,0 ),COLORgreen;

當日資金淨流:a,precis4,linethick0;

資金累淨流:SUM(a,n1),precis4,coloryellow;

{成本均線}

input:p1(5,0,100), p2(13,0,100),p3(34,0,100);

cb1:ema(AMOUNT,P1)/EMA(VOL,P1)/100;

cb2:ema(amount,P2)/ema(vol,P2)/100;

cb3:ema(amount,P3)/ema(vol,P3)/100;

∞:DMA(C,V/CAPITAL);

{按部就班}

現價:C;

頂部: cost(95) ,colorffff33;

賣出: cost(75) ,colorgreen;

買入: cost(30) ,colorred;

底部: cost(5) ,coloryellow;

{龍騰四海}

input:n(8,0,100);

座標線:0;20;50;80;100;

100-100*(HHV(HIGH,5*N)-CLOSE)/(HHV(HIGH,5*N)-LLV(LOW,5*N)),colorwhite;

海面:20,COLORGREEN;

海天分界線:50,COLORYELLOW;

天際:80,COLORRED;

{趨勢頂底}

80,COLOR996699;

20,COLORGREEN;

10,COLORCC6633,LINETHICK2;

90,COLOR9966FF,LINETHICK2;

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,COLOR9900FF;

短期線:B+100,COLOR888888;

中期線:D+100,COLORYELLOW,LINETHICK2;

見頂:=((REF(中期線,1)>85 AND REF(短期線,1)>85 AND REF(長期線,1)>65) AND CROSS(長期線,短期線));

頂部區域:(中期線80) AND (REF(短期線,1)>95 OR REF(短期線,2)>95 ) AND 長期線>60 AND 短期線<83.5

AND 短期線<中期線 AND 短期線<長期線+4,COLORGREEN;

頂部:=FILTER(頂部區域,4);

STICKLINE( {見頂 OR} 頂部,99,103,20,1 ),COLORRED,LINETHICK2;

底部區域:(長期線<12 AND 中期線<8 AND (短期線<7.2 OR REF(短期線,1)<5) AND (中期線>REF(中期線,1) OR 短期線>REF(短期線,1)))

OR (長期線<8 AND 中期線<7 AND 短期線<15 AND 短期線>REF(短期線,1)) OR (長期線<10 AND 中期線<7 AND 短期線<1) ,COLORGREEN;

STICKLINE( 底部區域,-4,0,22,0 ),COLORGREEN;

低位金叉:50*(長期線<15 AND REF(長期線,1)<15 AND 中期線<18 AND 短期線>REF(短期線,1) AND CROSS(短期線,長期線) AND 短期線>中期線

AND (REF(短期線,1)<5 OR REF(短期線,2)<5 ) AND (中期線>=長期線 OR REF( 短期線,1)<1 )),COLORRED;

STICKLINE( 低位金叉,0,5,11,0 ),COLORRED;

{冰火兩重天}

input:p1(16,0,100);

能量:=SQRT(VOL)*(((C-(H+L)/2))/((H+L)/2));

平滑能量:=EMA(能量,P1);

能量慣性:EMA(平滑能量,P1) ;

STICKLINE(能量慣性>=0,(能量慣性-能量慣性*0.05),(能量慣性-能量慣性*0.15),3,0), COLOR0000CC;

STICKLINE(能量慣性>=0,(能量慣性-能量慣性*0.2),(能量慣性-能量慣性*0.35),3,0), COLOR0066FF;

STICKLINE(能量慣性>=0,(能量慣性-能量慣性*0.4),(能量慣性-能量慣性*0.55),3,0),COLOR0099FF;

STICKLINE(能量慣性>=0,(能量慣性-能量慣性*0.6),(能量慣性-能量慣性*0.75),3,0), COLOR00CCFF;

STICKLINE(能量慣性>=0,(能量慣性-能量慣性*0.8),(能量慣性-能量慣性*0.95),3,0), COLOR00FFFF;

STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.05),(能量慣性-能量慣性*0.15),3,0), COLORFF3300;

STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.2),(能量慣性-能量慣性*0.35),3,0), COLORFF6600;

STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.4),(能量慣性-能量慣性*0.55),3,0), COLORFF9900;

STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.6),(能量慣性-能量慣性*0.75),3,0), COLORFFCC00;

STICKLINE(能量慣性<0,(能量慣性-能量慣性*0.8),(能量慣性-能量慣性*0.95),3,0), COLORFFFF00;

{波段無敵}

P1:=0;

P2:= IF (CLOSE>MA(CLOSE,5),P1+10,P1-10);

P3:= IF (CLOSE>MA(CLOSE,10),P2+10,P2-10);

P4:= IF (CLOSE>MA(CLOSE,10),P3+10,P3-10);

P5:= IF (MA(CLOSE,5)>MA(CLOSE,10),P4+10,P4-10);

P6:= IF (MA(CLOSE,10)>MA(CLOSE,20),P5+10,P5-10);

BD:P6;

STICKLINE(BD>=-50,-50,BD,3,0),COLORGREEN;

STICKLINE(BD>=-30,-30,BD,3,0),COLORFFFF00;

STICKLINE(BD>=0,0,BD,3,0),COLORYELLOW;

STICKLINE(BD<=50 AND BD>=30,30,BD,3,0),COLORRED;