博奕中线
 AR1:=((((2 * CLOSE) + HIGH) + LOW) / 4);
 AR2:=LLV(LOW,34);
 VARB:=HHV(HIGH,34);
 VARC:=EMA((((AR1 - AR2) / (VARB - AR2)) * 100),8);
 VARD:=EMA(VARC,5);
 升:=((VARC - VARD) > 0);
 跌:=((VARC - VARD) < 0);
 升势:STICKLINE(((VARC - VARD) > 0),VARC,VARD,3,1),COLORFF10FF;
 跌势:STICKLINE(((VARC - VARD) < 0),VARC,VARD,3,1),COLOR10FF10;
 VAR10:=REF(CLOSE,1);
 VAR11:=((SMA(MAX((CLOSE - VAR10),0),7,1) / SMA(ABS((CLOSE - VAR10)),7,1)) * 100);
 VAR12:=(FILTER(CROSS(79,VAR11),4) * 190);
 DRAWTEXT(VAR12,110,'顶1'),COLORGREEN;
 顶1:STICKLINE(VAR12,112,80,3,0),COLORFFFF00;
 VAR13:=((REF(HIGH,1) + REF(LOW,1)) / 2);
 VAR14:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));
 VAR15:=(FILTER(CROSS(VAR13,VAR14),4) * 200);
 DRAWTEXT(VAR15,120,'顶2');
 顶2:STICKLINE(VAR15,120,90,6,0),COLORFF00FF;
 VAR16:=((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)));
 VAR18:=IF((VAR16 > 90),50,100);
 VAR19:=(FILTER(CROSS(VAR18,VAR16),4) * 100);
 DRAWICON(VAR19,100,12);
 VR1:=((4 * SMA((((CLOSE - LLV(LOW,25)) / (HHV(HIGH,25) - LLV(LOW,25))) * 100),5,1)) - (3 * SMA(SMA((((CLOSE - LLV(LOW,25)) / (HHV(HIGH,25) - LLV(LOW,25))) * 100),5,1),3,1)));
 买入:=IF(CROSS(VR1,8),2,0),COLORRED;
 红柱买:STICKLINE(买入>0,0,50,2,0),COLORRED;
 20;
 50,POINTDOT ;
 100,POINTDOT;
 

======================================
博奕主力
 N=  1  500   31
 M=  1  500   31
 N1= 1  10000   1

B1:=(HHV(H,N)-C)/(HHV(H,N)-LLV(LOW,N))*100-M;
 B2:=SMA(B1,N,1)+100;
 B3:=(C-LLV(L,N))/(HHV(H,N)-LLV(L,N))*100;
 B4:=SMA(B3,3,1);
 B5:=SMA(B4,3,1)+100;
 B6:=B5-B2;
 控盘程度:(IF(B6>N1,B6-N1,0))*2.5;
 控盘度:100,COLORRED;
 STICKLINE(控盘程度,0,控盘程度,5,0),COLORYELLOW;
 STICKLINE(控盘程度 AND 控盘程度>100,100,控盘程度,5,0),COLORRED;
 

====================================
短线逃顶
 var1:=(hhv(high,9)-close)/(hhv(high,9)-llv(low,9))*100-70;
 var2:=sma(var1,9,1)+100;
 var3:=(close-llv(low,9))/(hhv(high,9)-llv(low,9))*100;
 var4:=sma(var3,3,1);
 var5:=sma(var4,3,1)+100;
 var6:=var5-var2;
 s: if(var6>100,var6-100,0);
 stickline(ref(s,1)<s,s,ref(s,1),5,0),colorred;
 stickline(ref(s,1)>s,s,ref(s,1),5,0),colorgreen;
 

==============================

心态为王
 var1:=(hhv(high,9)-llv(low,9));
 var2:=(hhv(high,9)-close);
 var3:=(close-llv(low,9));
 var4:=var2/var1*100-70 ;
 var5:=(close-llv(low,60))/(hhv(high,60)-llv(low,60))*100;
var6:=(2*c+h+l)/4;
 var7:=sma((var3/var1*100),3,1);
 var8:=llv(low,34);
 var9:=sma(var7,3,1)-sma(var4,9,1);
 var10:= if(var9>100,var9-100,0);
 vara:=hhv(high,34);
 防线:=ema((var6-var8)/(vara-var8)*100,8);
 b1:=ema(防线,5);
 见红建仓:stickline(防线-b1>0,防线,b1,8,1),colorred;
 绿出离场:stickline(防线-b1<0,防线,b1,8,1),color00ff00;
 吃香喝辣:stickline(防线>0 and 防线-b1>=0,92,100,6,0),colormagenta;
 心情舒畅:stickline(防线>0 and 防线-b1<0,92,100,6,0),colorblue;
 stickline(防线>0 and 防线-b1>=0,49,51,6,0),colormagenta;
 stickline(防线>0 and 防线-b1<0,49,51,6,0),coloryellow;
 快乐炒股:stickline(防线>0 and 防线-b1>=0,2,8,6,0),colormagenta;
 欢度余生:stickline(防线>0 and 防线-b1<0,2,8,6,0),color00ff00;
 

========================
主力分析
 M=1   100   60
 
rsvc:=(close-llv(low,75))/(hhv(high,75)-llv(low,75))*100;
 rsvo:=(open-llv(low,75))/(hhv(high,75)-llv(low,75))*100;
 a:=sma(rsvc,25,1);
 b:=sma(rsvo,25,1);
 var1:=3*a-2*sma(a,15,1);
 var2:=3*b-2*sma(b,15,1);
 var6:=80*vol/capital*10;
 stickline(var1>ref(var2,1),var1,var2,var6,1),colorred;
 stickline(var1+var2>200,var1,var2,var6,1),coloryellow;
 stickline(var1<=ref(var2,1),var1,var2,var6,1),colorgreen;
 百万:=ma(winner(c),9)*100;
捉庄:=cross(百万,2.5)*50 ;
 stickline(捉庄,0,40,8,0),colorgreen;
 drawtext( 捉庄 and count(捉庄, 10) = 1, 百万 +30, '. 探庄'),colorgreen;
 t1:="slowkd.k"(9,3,3,2);
 t2:="slowkd.d"(9,3,3,2);
 t3:="slowkd.k#week"(9,3,3,2);
 t4:="slowkd.d#week"(9,3,3,2);
 周叉:=cross(t3 ,t4 );
日叉:=cross(t1 ,t2 );
 主力建仓:=((周叉 and barslast(日叉)<3) and  t3<m and finance(33)>0.1  or (日叉) and (barslast(周叉)<3) and t3<m and finance(33)>0.1
or cross(t3 ,t4 ) and t3<m and finance(33)>0.1   or cross(t3 ,t4 ) and t3<m and finance(33)>0.1);
 var4:=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);
var5:=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);
aa:=cross(var4,var5);
 kw:="slowkd.k#week"(9,3,3,3);
 dw:="slowkd.d#week"(9,3,3,3);
 bb:= cross(kw,dw); 
 主力拉升:=bb and barslast(aa)>3 and kw<60 and finance(33)>0.05 ;
 stickline(主力建仓,0,65,6,0),colorred;
 stickline(主力拉升,0,55,10,0),coloryellow;
 drawtext( 主力建仓, 70, '.主力建仓'),coloryellow,linethick3;
 drawtext( 主力拉升, 50, '..主力拉升'),coloryellow,linethick3;