自用指标A（控盘指数、筹码集中度、换手率、筹码增减）
 

input:N(10,1,100);
HK:=(DATE < 1091230);
CJJR:=AMOUNT/VOL/100;
PJJ:=(((((3 * HIGH) + LOW) + OPEN) + (2 * CLOSE)) / 7);
ZX:=DMA(PJJ,(VOL / ((SUM(AMOUNT,13) / CJJR) / 100)));
ZX1:=DMA(PJJ,(VOL / ((SUM(AMOUNT,34) / CJJR) / 100)));
ZX2:=DMA(PJJ,(VOL / ((SUM(AMOUNT,68) / CJJR) / 100)));
ZX0:=DMA(PJJ,(VOL / ((SUM(AMOUNT,3) / CJJR) / 100)));
K1:=(((CLOSE - ZX0) / ZX0) * 100);
K2:=(((CLOSE - ZX) / ZX) * 100);
K3:=(((CLOSE - ZX1) / ZX1) * 100);
RSV:=(((CLOSE - ZX2) / ZX2) * 100);
短期控盘指数:K2,LINETHICK0,colorFF;
中期控盘指数:K3,LINETHICK0,colorFF00FF;
长期控盘指数:RSV,LINETHICK0,colorFF00;
散户持股指数:K1,LINETHICK0,colorFFFF;
STICKLINE((K1 AND HK),0,K1,6,0),colorFFFF;
STICKLINE((K2 AND HK),0,K2,6,0),colorFF;
STICKLINE((K3 AND HK),0,K3,6,0),colorFF00FF;
STICKLINE((RSV AND HK),0,RSV,6,0),colorFF00;
EXPLAIN(1,STKNAME),colorFFFFFF;
D:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
K1:=SMA(D,3,1);
筹码集中度:=SMA(K1,3,1);
筹码穿透率:=((3 * K1) - (2 * 筹码集中度));
换手率:=(((COST(95) - COST(5)) / (COST(95) + COST(5))) * 100);
周换手率:=(ABS((WINNER(CLOSE) - WINNER(OPEN))) * 100);
月换手率:=((VOL / CAPITAL) * 100);
获利筹码:=((SUM(VOL,5) / CAPITAL) * 100);
套牢筹码:=((SUM(VOL,20) / CAPITAL) * 100);
主力:=(100 * WINNER(CLOSE));
短主力:=(100 * (1 - WINNER(CLOSE)));
控盘筹码转移率:=(COST(主力) - ((COST(主力) * 25) / 100));
建仓:=(COST(主力) - ((COST(主力) * 12) / 100));
控盘:=((REF(WINNER(建仓),5) - WINNER(REF(建仓,5))) * 10);
主力筹码:=(100 * WINNER(控盘筹码转移率));
前期主力筹码:=(100 * (WINNER(建仓) - WINNER(控盘筹码转移率)));
当前主力筹码:=(主力筹码 + 前期主力筹码);
主力建仓筹码:=REF(当前主力筹码,20);
主力控盘筹码:=当前主力筹码;
建仓筹码成本:=主力筹码;
AAA:=前期主力筹码;
BAA:=EMA(COST(控盘筹码转移率),240);
主力筹码增减:=((CLOSE / REF(CLOSE,5)) - 1);
主力筹码增减1:=((INDEXC / REF(INDEXC,5)) - 1);
筹码热度:((主力筹码增减 - 主力筹码增减1) * 10),LINETHICK0,colorFFFF00;
主力筹码增减2:=(当前主力筹码 - REF(当前主力筹码,1));
B:=(建仓筹码成本 - REF(建仓筹码成本,5));
B1:=(建仓筹码成本 - REF(建仓筹码成本,20));
浮动筹码:=(1.1 * CLOSE);
锁定筹码:=(0.9 * CLOSE);
建仓筹码转移率:=(100 * (WINNER(浮动筹码) - WINNER(锁定筹码)));
ANM:=(100 * (WINNER(浮动筹码) - WINNER(锁定筹码)));
MY:=(100 - 建仓筹码转移率);
持股区:=((REF(WINNER(控盘筹码转移率),10) - WINNER(REF(控盘筹码转移率,10))) * 100);
持币区:=LLV(LOW,240);
无量阳线:=((100 * (CLOSE - 持币区)) / 持币区);
无量阴线:=((主力 > 90) AND (MY > 50));
变盘位:=(((主力 < 90) AND (主力 > 80)) AND (MY > 40));
超卖区:=(((((换手率 < 20) AND (周换手率 > 35)) AND (月换手率 < 5)) AND (OPEN < CLOSE)) AND (无量阳线 < 45));
超跌区:=((((换手率 < 20) AND (周换手率 > 35)) AND (月换手率 < 5)) AND (OPEN > CLOSE));
超跌区1:=((主力 > 97) AND (MY < 50));
MA1:=((((MY > 95) AND (主力 < 80)) AND (K1 < 20)) AND (筹码穿透率 > 筹码集中度));
MA2:=(((短主力<95 AND 短主力>90 AND MY>80 AND MY<95) AND 筹码集中度<25) AND 筹码穿透率>筹码集中度);
HH:=((((短主力 > 95) AND (MY > 90)) AND (MY < 95)) AND (K1 < 20));
AN:=EMA(CLOSE,3);
BN:=EMA(CLOSE,1);
RPY:=(AN > BN);
W1:=REF(HHV(CLOSE,480),1);
W2:=REF(LLV(CLOSE,480),1);
W3:=((100 * (CLOSE - W2)) / (W1 - W2));
W4:=IF(FILTER(CROSS(101,W3),3),50,0);
W5:=IF(((FILTER(CROSS(W3,1),3) AND (K1 < 20)) AND RPY),50,0);
AAP:=IF(((FILTER(CROSS(W3,0),3) AND (筹码集中度 < 20)) AND RPY),50,0);
BBP:=IF(((FILTER(CROSS(W3,1),3) AND (筹码穿透率 > 筹码集中度)) AND RPY),50,0);
阳线换手:=IF((((FILTER(CROSS(W3,3),5) AND (筹码穿透率 > 筹码集中度)) AND (筹码穿透率 < 50)) AND RPY),50,0);
AAP1:=(VOL * (CLOSE > OPEN));
BBP1:=SUM(AAP1,N);
阴线换手:=((BBP1 / CAPITAL) * 100);
SVOL:=(VOL * (CLOSE < OPEN));
TJ:=SUM(SVOL,N);
TS:=((TJ / CAPITAL) * 100);
换手统计:=INTPART((SUM(VOL,0) / CAPITAL));
TJS:=((换手统计 > REF(换手统计,1)) OR (BARSSINCE(CLOSE) = 0));
VAR84:=BARSLAST(TJS);
VAR85:=((SUM(VOL,VAR84) * 100) / CAPITAL);
强弱线:0,colorFFFFFF;
VAR87:=(BARPOS = ((DATACOUNT - 1) + 1));
EXPLAIN((K1 > (0 - 30)),'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&'),colorFF0000;
EXPLAIN((K1 > (0 - 30)),'基本数值分析:'),colorFFFFFF;
EXPLAINEX((主力 AND HK),'获利筹码:',主力,2,0),color99FFFF;
EXPLAINEX((短主力 AND HK),'套牢筹码:',短主力,2,0),color99FFFF;
EXPLAINEX((ANM AND HK),'浮动筹码:',ANM,2,0),color99FFFF;
EXPLAINEX((MY AND HK),'锁定筹码:',MY,2,0),color99FFFF;
EXPLAINEX((获利筹码 AND HK),'筹码周换手率:',获利筹码,2,0),color99FFFF;
EXPLAINEX((套牢筹码 AND HK),'筹码月换手率:',套牢筹码,2,0),color99FFFF;
EXPLAINEX((阴线换手 AND HK),'10日内阳线换手:',阴线换手,2,0),color99FFFF;
EXPLAINEX((TS AND HK),'10日内阴线换手:',TS,2,0),color99FFFF;
EXPLAINEX((VAR85 AND HK),'换手统计(99.99%):',VAR85,2,0),color99FFFF;
EXPLAIN((K1 > (0 - 30)),'-------------------------'),colorFF0000;
EXPLAIN((K1 > (0 - 30)),'主力控盘分析：'),colorFFFFFF;
EXPLAIN((((K2>0 AND K3<0) AND RSV>0) OR (((K1>0 AND K2>0) AND K3>0) AND RSV>0)),'盘面分析：资金运作中'),color99FFFF;
EXPLAIN(((K1>0 AND K2>0 AND K3<-5 AND RSV<-5) OR (K1>0 AND K2<0 AND K3<0 AND RSV<0)),'盘面分析：诱多不易追涨'),color66FF00;
EXPLAIN(((((K1 < 0) AND (K2 > 0)) AND (K3 > 0)) AND (RSV < 3)),'盘面分析：诱空不易杀跌'),color99FFFF;
EXPLAIN(((((K1 < 0) AND (K2 > 0)) AND (K3 < 0)) AND (RSV < 0)),'盘面分析：洗盘2日后跟进'),color99FFFF;
EXPLAIN(((((K1 > 0) AND (K2 > 0)) AND (K3 < 0)) AND (RSV > 3)),'盘面分析：突破可少量介入'),color99FFFF;
EXPLAIN((((K2 < 0) AND (K3 > 0)) AND (RSV < 0)),'盘面分析：洗盘点，易持股。'),color99FFFF;
EXPLAIN((((((((K1 > 0) AND (K2 > 0)) AND (K3 > 0)) AND (RSV < 2)) OR (((((K1 > 5) AND (K2 > 4)) AND (K3 > (0 - 3))) AND (RSV > (0 - 15))) AND (RSV < 0))) OR (((((K1 > 3) AND (K2 > 6)) AND (K3 > (0 - 3))) AND (RSV > (0 - 20))) AND (RSV < (0 - 15)))) OR ((((K1 > 0) AND (K2 < 0)) AND (K3 < 0)) AND (RSV > 0))),'盘面分析：股价突破可跟进'),color99FFFF;
EXPLAIN(((((K1 > 0) AND (K2 > 0)) AND (K3 < 0)) AND (RSV < 0)),'盘面分析：不易大量跟进'),color99FFFF;
EXPLAIN(((((((K1 < 0) AND (K2 > 0)) AND (K3 > 0)) AND (RSV > 3)) OR ((((K1 < 0) AND (K2 < 0)) AND (K3 < 0)) AND (RSV > 0))) OR ((((K1 < 0) AND (K2 < 0)) AND (K3 < 0)) AND (RSV < 0))),'盘面分析：资金撤离中'),color66FF00;
EXPLAIN(((((K1 < 0) AND (K2 < 0)) AND (K3 > 0)) AND (RSV > 0)),'盘面分析：资金出逃中'),color66FF00;
EXPLAIN((((((K1 > 0) AND (K2 > 0)) AND (K3 > 0)) AND (RSV > 0)) AND CROSS(K3,K1)),'盘面分析：通吃浮动筹码'),color99FFFF;
EXPLAIN(((((K2 > 0) AND (K3 > 0)) AND (RSV > 0)) AND CROSS(K3,RSV)),'盘面分析：少量资金出逃中'),color66FF00;
EXPLAIN((RSV < (0 - 20)),'反弹位置,高手可短线介入'),colorFF00FF;
EXPLAIN((((K2 < 0) AND (K3 < 0)) AND (RSV < 0)),'股价分析:下跌趋势不易持股'),color66FF00;
EXPLAIN((((((K2 > 0) AND (K3 > 0)) AND (RS