获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
DRAWKLINE(H,O,L,C);
均线25:=MA(CLOSE,25);
均线43:=MA(CLOSE,43);
均线50:=MA(CLOSE,50),COLOR0000FF;
均线88:=MA(CLOSE,88);
N8:=STRCAT(CON2STR(YEAR,0),'年');
Y8:=STRCAT(CON2STR(MONTH,0),'月');
R8:=STRCAT(CON2STR(DAY,0),'日');
K:=BARSLAST(CURRBARSCOUNT=120);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));
筹码D:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));
KJ:=GD-筹码D;
GD4:=IF(CURRBARSCOUNT<=120/30,GD,DRAWNULL);
低:=IF(CURRBARSCOUNT<=120/30,筹码D,DRAWNULL),COLORFFFF00;
高:=IF(CURRBARSCOUNT<=120/30,GD,DRAWNULL),COLOR00FFFF;
支撑:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.191,DRAWNULL),COLOR00FFFF;
强势:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.382,DRAWNULL),COLORFF00FF;
突破:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ/2,DRAWNULL),COLOR0000FF;
警示:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.618,DRAWNULL),COLORCYAN;
压力:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.809,DRAWNULL),COLORGREEN;
建仓:=ZIG(3,6);
筹码卖:=MA(建仓,2);
STICKLINE(建仓>筹码卖 AND O>=C,C,O,-1,0),COLORRED;
STICKLINE(建仓>筹码卖 AND O>=C,L,H,0,0),COLORRED;
STICKLINE(建仓 < 筹码卖 AND O<=C,O,C,-1,1),COLORCYAN;
STICKLINE(建仓 < 筹码卖 AND O<=C,O,L,0,1),COLORCYAN;
STICKLINE(建仓 < 筹码卖 AND O<=C,C,H,0,1),COLORCYAN;
AH:=HHV(H,60);
飞龙筹码O:=LLV(L,60);
A0:=(AH-飞龙筹码O)/21;
A01:=C>REF(C,4);
NT:=BARSLASTCOUNT(A01);
筹码11:=NT=9;
筹码13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(筹码11>0,9) OR BACKSET(筹码13>0,NT))*NT;
DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),COLORYELLOW;
DRAWTEXT(NT=9,H+1.1*A0,'9'),COLORGREEN;
DRAWTEXT(NT=13,H+1.1*A0,'13'),COLORGREEN;
DRAWTEXT(NT=18,H+1.1*A0,'18'),COLORGREEN;
B1:=C
NT0:=BARSLASTCOUNT(B1);
筹码21:=NT0=9 ;
筹码23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(筹码21>0,9) OR BACKSET(筹码23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L-1*A0,VAR2STR(AY1,0)),COLORLIGREEN;
DRAWTEXT(NT0=9,H+1.1*A0,'9'),COLORYELLOW;
DRAWTEXT(NT0=13,H+1.1*A0,'13'),COLORYELLOW;
DRAWTEXT(NT0=18,H+1.1*A0,'18'),COLORYELLOW;
N11:=2,200,13;
UR00:=2,200,6;
LR0:=2,200,6;
TC01:=IF(H=HHV(H,8*UR00),H,DRAWNULL);
TC02:=CONST(BARSLAST(TC01=H))+1;
UPPER:=CONST(IF(TC02=1,H,REF(H,TC02-1)));
BC1:=IF(L=LLV(L,8*LR0),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC02 AND H=UPPER;
NOD:=(IF(TC02>BC2,TC02,BC2)-IF(TC02>BC2,BC2,TC02));
LR1:=FORCAST(C,NOD+1);
NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC02),CONST(IF(MIN(TC02,BC2)=1,LR1,REF(LR1,MIN(TC02,BC2)-1))),DRAWNULL),POINTDOT,COLORRED;
LR2:=SLOPE(C,NOD+1);
LR3:=CONST(IF(MIN(TC02,BC2)=1,LR2,REF(LR2,MIN(TC02,BC2)-1)));
FP:=NP-LR3*(NOD),POINTDOT,COLORYELLOW;
EQU:=(NP+FP)/2,POINTDOT,COLORWHITE;
AD:=Abs(NP-FP);
DBL0:=BARSLAST(BC1!=DRAWNULL)+1;
DBH:=BARSLAST(TC01!=DRAWNULL)+1;
BSP:=IF(BC2>TC02,DBL0,DBH)-1;
LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);
AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND H>LRL,H,LRL);
AT2:=HHV(AT1-LRL,MAX(BC2,TC02));
AT3:=CONST(BARSLAST(AT1-LRL=AT2));
AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));
AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));
捉妖筹码:=LRL+AT5;
捉妖筹码K1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND L
捉妖筹码K2:=HHV(LRL-捉妖筹码K1,MAX(BC2,TC02));
捉妖筹码K3:=CONST(BARSLAST(LRL-捉妖筹码K1=捉妖筹码K2));
捉妖筹码K4:=CONST(IF(捉妖筹码K3=0,H,REF(H,捉妖筹码K3)));
捉妖筹码K5:=CONST(IF(捉妖筹码K3=0,LRL-捉妖筹码K1,REF(LRL-捉妖筹码K1,捉妖筹码K3)));
捉妖筹码L:=LRL-捉妖筹码K5;
RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,捉妖筹码,CONST(REF(捉妖筹码,MIN(BC2,TC02)-11)));
RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,捉妖筹码L,CONST(REF(捉妖筹码L,MIN(BC2,TC02)-11)));
中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORBBBBBB;
上轨:IF(NP>FP,IF(捉妖筹码<=RH,捉妖筹码,DRAWNULL),IF(捉妖筹码>=RL,捉妖筹码,DRAWNULL)),COLORFF0000;
下轨:IF(NP>FP,IF(捉妖筹码L<=RH,捉妖筹码L,DRAWNULL),IF(捉妖筹码L>=RL,捉妖筹码L,DRAWNULL)),COLORFF00FF;
飞龙筹码1:=(REF(HIGH,3) = HHV(HIGH,((2 * 3) + 1)));
 

源码未完整理,下载附件里全源码....