源码
{控盘博弈
设计原理通过对筹码及庄家成本计算，对控盘庄股进行跟踪并决定买卖博弈。
对股价突破龙腾线定义控盘庄股，根据控盘强度对个股跟踪并决定买卖。
股价突破龙腾线股，控盘度翻红且达到控盘线股，买进。翻绿卖出。
}
var1:=amount/vol/100;
var2:=(3*high+low+open+2*close)/7;
var3:=sum(amount,40)/var1/100;
var4:=sum(amount,80)/var1/100;
cyc40:=dma(var2,vol/var3);
cyc80:=dma(var2,vol/var4);
cys40:=(close-cyc40)/cyc40*100;
cys80:=(close-cyc80)/cyc80*100;
控盘:4,coloryellow;
警戒:21,color0099ff;
河:-5,colorgreen;
湖:-15,colorccff33;
stickline(cys80>0,0,cys80,6,0),coloryellow;
stickline(cys80<=0,0,cys80,6,0),colorgreen;
stickline(cys40>0,0,cys40,6,0),colorred;
stickline(cys40<=0,0,cys40,6,0),colorff9966;
