相对筹码 （副图、贴图、源码）

指标说明：多头筹码（红色）顶天立地逃顶，空头筹码（蓝色）顶天立地抄底，
多方线金叉空方线参考买入，反之亦然。压力线、浮筹线辅助操作。
{相对筹码}

流动筹码:STICKLINE(C>1,100,0,2,1),COLOR00FFFF;
KDCM:=100*(1-WINNER(C));
空头筹码1:STICKLINE(C>1,KDCM,0,2,1),COLORFF0000;
DDCM:=100*WINNER(C);
多头筹码1:STICKLINE(C>1,DDCM,0,2,1),COLOR0000FF;

VAR2:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100;
VAR3:=SMA(VAR2,3,1);
VAR4:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
VAR5:=SMA(SMA(VAR4,2,1)+3,2,1);
VAR6:=WINNER(MA(CLOSE,5))*100;
VAR7:=HHV(HIGH,9)-LLV(LOW,9);
VAR8:=HHV(HIGH,9)-CLOSE;
VAR9:=CLOSE-LLV(LOW,9);
VARA:=VAR8/VAR7*100-70;
VARB:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VARC:=(2*CLOSE+HIGH+LOW)/4;
VARD:=SMA(VAR9/VAR7*100,3,1);
VARE:=LLV(LOW,26);
VARF:=SMA(VARD,3,1)-SMA(VARA,9,1);
VAR10:=IF(VARF>100,VARF-100,0);
VAR11:=HHV(HIGH,34);
VAR12:=EMA((VARC-VARE)/(VAR11-VARE)*100,16);
VAR13:=EMA(VAR12,4);
VAR14:=LLVBARS(MA(CLOSE,5),30);
压力线: IF(35+EMA(VAR13,80)<100,35+EMA(VAR13,80),100),COLOR00FF00;
多方线: SMA(SMA(VAR4,2,1)+3,2,1),COLORFF00FF,LINETHICK2;
浮筹线: EMA(VAR12,4),COLORFFFFFF;
空方线: SMA(VAR2,3,1),COLORFFFF00,LINETHICK2;

KKW:="KD.K#WEEK",COLORRED;
KDW:="KD.D#WEEK",COLORYELLOW;
KCD:=FILTER(CROSS(KKW,KDW),0);
SCD:=FILTER(CROSS(KDW,KKW),0);
K周金叉:IF(CROSS("KDJ.K#WEEK","KDJ.D#WEEK"),25,0),COLORFFFFFF,LINETHICK2;
DRAWTEXT(KCD,25,' KDJ周金叉'),COLORFFFFFF;
K周死叉:IF(CROSS("KDJ.D#WEEK","KDJ.K#WEEK"),25,0),COLOR00FF00,LINETHICK2;
DRAWTEXT(SCD,25,' KDJ周死叉'),COLOR00FF00;
KKM:="KDJ.K#MONTH",COLORRED;
KDM:="KDJ.D#MONTH",COLORYELLOW;
KDB:=FILTER(CROSS(KKM,KDM),0);
SDB:=FILTER(CROSS(KDM,KKM),0);
K月金叉:IF(CROSS("KDJ.K#MONTH","KDJ.D#MONTH"),30,0),COLOR00FFFF,LINETHICK2;
DRAWTEXT(KDB,30,' KDJ月金叉'),COLOR00FFFF;
K月死叉:IF(CROSS("KDJ.D#MONTH","KDJ.K#MONTH"),30,0),COLORFF6600,LINETHICK2;
DRAWTEXT(SDB,30,' KDJ月死叉'),COLORFF6600;

DIFW:="MACD.DIF#WEEK";
DEAW:="MACD.DEA#WEEK";
FCA:=FILTER(CROSS(DIFW,DEAW),0);
SCA:=FILTER(CROSS(DEAW,DIFW),0);
M周金叉:IF(CROSS("MACD.DIF#WEEK","MACD.DEA#WEEK"),-25,0),COLOR0000FF,LINETHICK2;
DRAWTEXT(FCA,-20,' MACD周金叉'),COLOR0000FF;
M周死叉:IF(CROSS("MACD.DEA#WEEK","MACD.DIF#WEEK"),-25,0),COLOR00FF00,LINETHICK2;
DRAWTEXT(SCA,-20,' MACD周死叉'),COLOR00FF00;
DIFM:="MACD.DIF#MONTH";
DEAM:="MACD.DEA#MONTH";
FCB:=FILTER(CROSS(DIFM,DEAM),0);
SCB:=FILTER(CROSS(DEAM,DIFM),0);
M月金叉:IF(CROSS("MACD.DIF#MONTH","MACD.DEA#MONTH"),-30,0),COLOR00FFFF,LINETHICK2;
DRAWTEXT(FCB,-25,' MACD月金叉'),COLOR00FFFF;
M月死叉:IF(CROSS("MACD.DEA#MONTH","MACD.DIF#MONTH"),-30,0),COLORFF6600,LINETHICK2;
DRAWTEXT(SCB,-25,' MACD月死叉'),COLORFF6600;