{資金博弈 }
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;
當(dāng)日資金凈流: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);



{按部就班}
現(xiàn)價:C;
頂部: cost(95) ,colorffff33;
賣出: cost(75) ,colorgreen;
買入: cost(30) ,colorred;
底部: cost(5) ,coloryellow;


{龍騰四海}
input:n(8,0,100);
坐標(biāo)線: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;

{趨勢頂?shù)讅
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(長期線,短期線));
頂部區(qū)域:(中期線<REF(中期線,1) AND REF(中期線,1)>80) AND (REF(短期線,1)>95 OR REF(短期線,2)>95 ) AND 長期線>60 AND 短期線<83.5
AND 短期線<中期線 AND 短期線<長期線+4,COLORGREEN;
頂部:=FILTER(頂部區(qū)域,4);
STICKLINE( {見頂 OR} 頂部,99,103,20,1 ),COLORRED,LINETHICK2;
底部區(qū)域:(長期線<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( 底部區(qū)域,-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;

{買賣頻譜}
買線:EMA(C,3);
賣線:EMA(SLOPE(C,21)*20+C,55);
買賣差:=買線-賣線;
STICKLINE(買賣差>=0,(買線-買賣差*0.05),(買線-買賣差*0.15),5,0) ,COLOR00FFFF;
STICKLINE(買賣差>=0,(買線-買賣差*0.2),(買線-買賣差*0.35),5,0) ,COLOR00CCFF;
STICKLINE(買賣差>=0,(買線-買賣差*0.4),(買線-買賣差*0.55),5,0) ,COLOR0099FF;
STICKLINE(買賣差>=0,(買線-買賣差*0.6),(買線-買賣差*0.75),5,0) ,COLOR0066FF;
STICKLINE(買賣差>=0,(買線-買賣差*0.8),(買線-買賣差*0.95),5,0) ,COLOR0000CC;
STICKLINE(買賣差<0,(賣線+買賣差*0.05),(賣線+買賣差*0.15),5,0) ,COLOR006600;
STICKLINE(買賣差<0,(賣線+買賣差*0.2),(賣線+買賣差*0.35),5,0) ,COLOR009900;
STICKLINE(買賣差<0,(賣線+買賣差*0.4),(賣線+買賣差*0.55),5,0) ,COLOR00CC00;
STICKLINE(買賣差<0,(賣線+買賣差*0.6),(賣線+買賣差*0.75),5,0) ,COLOR00FF00;
STICKLINE(買賣差<0,(賣線+買賣差*0.8),(賣線+買賣差*0.95),5,0) ,COLOR66FF00;

{主力進(jìn)出}
MAV:=(C*2+H+L)/4;
SK:= EMA(MAV,13) - EMA(MAV,34);
SD := EMA(SK,5);
中軸:0;
空方主力 : (-2*(SK-SD))*3.8,COLORGREEN;
多方主力 : (2*(SK-SD))*3.8,COLORRED;

{多空博弈}
VAR1:=(HHV(HIGH,21)-C)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
VAR2:=(C-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR3:=SMA(VAR2,13,8);
高位:90;
低位:0;
多方: SMA(VAR3,13,8),COLORRED;
空方: SMA(VAR1,21,8),COLORGREEN;
中軸:45;

{籌碼分析}
HSL:=EMA(VOL/CAPITAL,3);
ZDL:=HHV(HSL,240);
ZXL:=LLV(HSL,240);
XS:=MA(C,33);
鎖定籌碼:EMA((HSL-ZXL)/ZXL*XS,13);
浮動籌碼:EMA((ZDL-HSL)/HSL*XS,13);
力量對比:鎖定籌碼-浮動籌碼 ,COLORSTICK;