通达信主图管家 筹码（主图+副图）两破解公式

见图 飞狐指标源码和谐
发送只是为了学习 请作者见谅

主图管家 筹码

CHAN管家 主图：

 

{管家婆}
input:近高(0,0,999),起动点(15,0,999),N(4,3,255);
STICKLINE((CLOSE >= OPEN),HIGH,LOW,0,0),colorFF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,8,1),colorff;
STICKLINE((CLOSE < OPEN),HIGH,LOW,0,0),colorffff00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,7.8,0),colorffff00;
Z:ZIG(3,N),coloraaaa;
F:=(Z - REF(Z,1));
ZH:=PEAK(3,N,1);
WH:=PEAKBARS(3,N,1);
ZL:=TROUGH(3,N,1);
WL:=TROUGHBARS(3,N,1);
X:(ATAN(((((Z / ZH) - 1) / WH) * 100)) * 57.3),LINETHICK0;
S:=(ATAN(((((Z / ZL) - 1) / WL) * 100)) * 57.3);
DRAWNUMBER(((WH = 0) OR (ISLASTBAR AND (WL < WH))),(Z * 1.01),REF(S,1),1),ALIGN2,color8000c0;
DRAWTEXT(((WH = 0) OR (ISLASTBAR AND (WL < WH))),(Z * 1.01),'上行： '),ALIGN2,color8000c0;
DRAWTEXT(((WH = 0) OR (ISLASTBAR AND (WL < WH))),(Z * 1.01),' 度'),color8000c0;
DRAWNUMBER(((WL = 0) OR (ISLASTBAR AND (WL > WH))),(Z * 0.99),REF(X,1),1),ALIGN2,color80c000;
DRAWTEXT(((WL = 0) OR (ISLASTBAR AND (WL > WH))),(Z * 0.99),'下行： '),ALIGN2,color80c000;
DRAWTEXT(((WL = 0) OR (ISLASTBAR AND (WL > WH))),(Z * 0.99),' 度'),color80c000;
tj:=barpos=sysparam(1);
s0:=NUMTOSTR(z[SYSPARAM(1)],2);
drawtext(c*tj ,z*1.01,' '+s0),color11ffff;

G:=(((ZIG(3,5) > REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) <= REF(ZIG(3,5),2))) AND (REF(ZIG(3,5),2)<= REF(ZIG(3,5),3)));
Xg:(((ZIG(3,5) < REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) >= REF(ZIG(3,5),2))) AND (REF(ZIG(3,5),2) >= REF(ZIG(3,5),3))),LINETHICK0;
ED:=(BARSLAST(G) + 1);EF:=(BARSLAST(Xg) + 1);
if DATATYPE>3 then
DRAWTEXT((BARPOS = SYSPARAM(2)),SYSPARAM(4),(((((' 买入到到当前周期:' + NUMTOSTR(ED,0)) + '天') + ' 卖出到当前周期:') + NUMTOSTR(EF,0)) + '天')),LINETHICK2,color00FFdd,align5;
ZG:=REF(HIGH,近高);ZD:=REF(LOW,起动点);
HHH:=HHV(ZG,1);LLL:=LLV(ZD,1);
XZ:=DYNAINFO(7);XX:=DYNAINFO(5);YY:=DYNAINFO(6);
SZ:=(XZ - LLL);ZZ:=((SZ / LLL) * 100);
GSZ:=(XX - LLL);GZZ:=((GSZ / LLL) * 100);
GGB:=(HHH - YY);VV:=((GGB / HHH) * 100);
GGA:=(XZ - HHH);VVA:=((GGA / HHH) * 100);
K:=(HHH - LLL);W:=((K / LLL) * 100);
GGB:=(YY - HHH);VVB:=((GGB / HHH) * 100);
DRAWTEXT((ISLASTBAR = 1),HHH,((((((('近高/当前最低幅度/当前幅度:(' + NUMTOSTR(VVB,2)) + '%【') + NUMTOSTR(VVA,2)) + '%【') + '') + NUMTOSTR(HHH,2)) + '￣￣￣')),ALIGN2,LINETHICK0,colorc0;
DRAWTEXT((ISLASTBAR = 1),LLL,((((((('起动点/当前高幅度' + '/当前幅度:(') + NUMTOSTR(GZZ,2)) + '%【') + NUMTOSTR(ZZ,2)) + '%【') + NUMTOSTR(LLL,2)) + '￣￣￣')),ALIGN2,LINETHICK0,colorFF00AA;
B:=((DATACOUNT - BARPOS) + 0);
if DATATYPE>3 then
DRAWTEXT(((BARSCOUNT(CLOSE) = SYSPARAM(1)) AND B),HIGH,((' 倒数:' + NUMTOSTR(B[SYSPARAM(1)],0)) + '(天) ')),ALIGN5,LINETHICK4,colorc0000;
DRAWTEXT(SYSPARAM(2)=BARPOS,c, ' 缠空间' + '【1/8=12.5%】【2/8=25%】【3/8=32.5%】【4/8=50%】【5/8=62.5%】【6/8=75%】'),LINETHICK2,colorFFaaff,align4;

{⊙创幻筹码㊣}
DRAWGBK((DATE > 900101),COLORRGB(0,150,130),COLORRGB(0,0,0),1);
STICKLINE(CLOSE,(0 - 2),(0 - 5),10,0),color10000;
L1:=EMA((WINNER(CLOSE) * 70),5);
L2:=EMA(((WINNE