[AG261107]机构洗盘副图-通达信指标源码分享

01 先认这几个零件
这颗螺丝是倒着拧的。多数副图一有动静就跳信号,这套偏不。它先把价和量都摁平,摁到横盘、摁到地量,再等趋势线拐那一下。
拧不下来我不急,一步步拆给你看。
| 趋势线 | 地量信号 |
| 横盘共振 | 快线慢线 |
02 指标源码分享|机构洗盘副图

指标编号:AG261107
指标完整源码:
VAR01:=LLV(L,10);VAR02:=HHV(H,25);趋势线:=EMA((C-VAR01)/(VAR02-VAR01)*4,4);价:=EMA(MA((((C-REF(C,1))+(H-REF(H,1))+(L-REF(L,1)))/3)/C,5),1);价5:=MA(价,5);量:=EMA(MA((V-REF(V,1))/V,5),1);量5:=MA(量,5);角:=1>(ATAN((C/REF(C,1)-1)*100)*180/3.14115926)>-1;W:=(C/REF(C,1))>1.01;横盘:=REF(((HHV(价,3)-LLV(价,3))/LLV(价,3)),1)<=(0.00/100)ANDREF(((HHV(价5,3)-LLV(价5,3))/LLV(价5,3)),1)<=(0.00/100);量横盘:=REF(((HHV(量,3)-LLV(量,3))/LLV(量,3)),1)<=(0.00/100)ANDREF(((HHV(量5,3)-LLV(量5,3))/LLV(量5,3)),1)<=(0.00/100);量比:=((量+REF(量,1)+REF(量,2))/(量5+REF(量5,1)+REF(量5,2)))>0.5;A:=COUNT(0.00<=价<=0.02AND0.00<=价5<=0.02,CROSS(价,价5))=1ANDW,COLORYELLOW;ABB:=COUNT(0.00<=价<=0.02AND0.00<=价5<=0.02,横盘AND量比AND量横盘AND角)=1ANDW,COLORRED;高低共振:=AANDABB;地量一:=MA(V,3)/MA(V,20)<0.4;地量二:=COUNT(V/MA(V,20)<0.4,3)=3;地量三:=V/MA(V,30)<0.5ANDV/HHV(V,30)<0.2;AA:=SUMBARS(VOL,CAPITAL);地量四:=VOL<MA(VOL,AA)/3;地量信号:=(地量一OR地量二OR地量三OR地量四)=1AND(REF(地量一,1)ORREF(地量二,1)ORREF(地量三,1)ORREF(地量四,1))=0;P1:=5;P2:=4;VARAB:=LLV(LOW,P1);VARBB:=HHV(HIGH,P1);KA1:=MA((CLOSE-VARAB)/(VARBB-VARAB)*100,P2),COLORRED;DA1:=MA(0.667*REF(KA1,1)+0.333*KA1,2),COLORWHITE;快线:=KA1;慢线:=DA1;低位金叉:=CROSS(快线,慢线)AND快线<30;VAR2D:=(2*CLOSE+HIGH+LOW)/4;VAR03:=IF(YEAR>=2099ANDMONTH>2,0,1);VAR04:=LLV(LOW,5);VAR05:=HHV(HIGH,4);快线2:=EMA((VAR2D-VAR04)/(VAR05-VAR04)*100,4)*VAR03;慢线2:=EMA(0.667*REF(快线2,1)+0.333*快线2,2)*VAR03;短多:=CROSS(快线2,慢线2)AND快线2<50AND29<快线2;低位金叉2:=CROSS(快线2,慢线2)AND快线2<30;信号:=高低共振AND低位金叉AND(短多OR低位金叉2)AND趋势线>REF(趋势线,1);{短线信号立柱图}STICKLINE(信号,0,6,3,0),COLORRED;DRAWICON(信号,5,5)COLORFF00FF;DRAWTEXT(高低共振AND地量信号,2,'地量'),COLORYELLOW;DRAWTEXT(信号,4.5,'短线信号'),COLORYELLOW;VAR21:=REF(CLOSE,1);VAR22:=((SMA(MAX((CLOSE-VAR21),0),6,1)/SMA(ABS((CLOSE-VAR21)),6,1)*100));短期高位:CROSS(80,VAR22)*8,COLORWHITE,LINETHICK2,STICK;LC:=REF(CLOSE,1);RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;高位信号:=CROSS(85,RSI1)*30,COLOR00FF00,LINETHICK2;高标:IF(高位信号,6.5,0),STICK,COLORGREEN,LINETHICK4;量能A:=(CLOSE-LLV(LOW,32))/(HHV(HIGH,32)-LLV(LOW,32))*1.2*CLOSE;量1:=EMA(量能A,3);量2:=EMA(量能A,5);量3:=EMA(量能A,7);STICKLINE(量1>量2,量3,量1,3,1),COLORRED;STICKLINE(量1<量2,量3,量1,2,0),COLORCYAN;T1:=量2>量3AND量1<REF(量1,1);T2:=量2<量3AND量1>REF(量1,1);STICKLINE(T1,量1,量3,2,0),COLORYELLOW;STICKLINE(T2,量1,量3,3,1),COLORFF00FF;量能B:=SMA(量能A,13,1);分水岭:=SMA(量能B,2.5,1.5),LINETHICK2,COLORWHITE;牛线:=3*量能B-2*分水岭,LINETHICK2,COLORFF00FF;熊线:=4*分水岭-3*量能B,LINETHICK2,COLORFF6633;DIF1:=EMA(C,12)-EMA(C,26);DEA1:=EMA(DIF1,9);MACD1:=2*(DIF1-DEA1);QZQ:=BARSLAST(REF(MACD,1)<0ANDMACD>0);QM:=LLVBARS(MACD1,QZQ+20);MQDZ:=IF(QM>QZQ,REF(MACD1,QM),0);QF:=LLVBARS(DIF1,QZQ+20);DQDZ:=IF(QF>QZQ,REF(DIF1,QF),0);XG1:=MACD1<0ANDMACD1>MQDZANDDIF1<0ANDDIF1>DQDZANDC=LLV(C,QZQ+20)ANDMQDZ<0ANDDQDZ<0;XG:REF(XG1,1)=1ANDMACD1>REF(MACD1,1);VAR21A:=(REF(HIGH,1)+REF(LOW,1))/2;VAR61:=REF(CLOSE,1);VAR70A:=SMA(MAX(CLOSE-VAR61,0),6,1)/SMA(ABS(CLOSE-VAR61),6,1)*100;DRAWICON(CROSS(90,VAR70A),H*0.8,9);MTM1:=C-REF(C,1);A013:=HHV(HIGH,34);A014:=(2*CLOSE+HIGH+LOW)/4;A015:=LLV(LOW,34);A016:=EMA(((A014-A015)/(A013-A015))*100,13);A017:=EMA(0.667*REF(A016,1)+0.333*A016,2);KKMD:=A016-A017>1ANDA016<30ANDA017<30;DRAWTEXT(FILTER(KKMD,30),L*0.05,'▲短多'),COLOR00FFFF;VAR06:=REF(C,1);VAR07:=SMA(MAX(C-VAR06,0),6,1)/SMA(ABS(C-VAR06),6,1)*100;DRAWTEXT(CROSS(82,VAR07),H*0.9,'◤高位'),COLORGREEN;RSVB:=(C-LLV(L,25))/(HHV(HIGH,25)-LLV(L,25))*100;K:=SMA(RSVB,3,1);D:=SMA(K,3,1);J:=3*K-2*D;VARA6:=(2*C+H+L)/3;VARA7:=EMA(EMA(EMA(VARA6,4),4),4);VARA8:=(VARA7-REF(VARA7,1))/REF(VARA7,1)*100;VARA9:=MA(VARA8,3)+0.03;VARA10:=MA(VARA8,1);DRAWICON(CROSS(VARA9,VARA10)ANDJ>90,H*0.96,12),COLORGREEN;DRAWTEXT(CROSS(VARA9,VARA10)ANDJ>90,H*1.02,'高'),COLORCYAN;LCD:=REF(CLOSE,1);RSI:=SMA(MAX(CLOSE-LCD,0),4.1,1)/SMA(ABS(CLOSE-LCD),4.1,1)*100;低位启动:=CROSS(RSI,11)*10,COLORRED;
趋势线把价关进这段箱体(示意):箱底=零,箱顶=四。

先把 趋势线 挂绳上,回头拆它就顺了。
03 一层一层拧下来
先看最上面那层。它算的是把当前价塞进一个区间里。
趋势线:=EMA((C-VAR01)/(VAR02-VAR01)*4,4);
VAR01 是前十根的最低,VAR02 是前廿五根的最高。
一减一除,等于把这段箱体的上下沿拉成一把尺,价落在箱底就是零,顶格就是四。两头再套一层四日平滑。
这玩意儿不猜方向,只告诉你现在价在这段箱子里偏上还是偏下。
箱子的宽度是关键。VAR01 我拿十日、VAR02 拿廿五日。
短了比如五对五,箱体窄得可怜,随便一根针就把线顶满,天天拐。拖太长六十对六十,线糊成一条直棍,拐头早凉透了才动。
十对廿五是拧了好几回才对上卡口:低点窗口短一点贴着近期,高点窗口长一点兜住整段,拐头那点顿挫才留得住。
地量那四把尺子
真正费工的是地量。它不信单一口径,一口气铺了四条腿,凑够任意一条再加一条横盘条件,才算换手真缩干净。
地量一:=MA(V,3)/MA(V,20)<0.4;
头一把最直白,三日均量比廿日均量,低于零点四算缩。问题也直白:遇上长期缩量阴跌,这条几乎天天响,噪音压不住。
第二把换个角度,看连续三日都在低量才认。第三把更狠,当日量比三十日均、又比三十日峰都低一大截才算。三把合起来还嫌不够稳,它留了个彩蛋。
AA:=SUMBARS(VOL,CAPITAL);
地量四:=VOL<MA(VOL,AA)/3;
这行砍不得。CAPITAL 是流通盘,SUMBARS 往回找:凑够把全部流通盘换手一遍要多少根 K 线。
窗口不是写死的,是这票自己算出来的。盘子活的窗口短,盘子沉的窗口长。第四条拿当日量去比这个自适应均量的三分之一。
同样叫缩量,慢票快票用的是两把不同的尺。
快线慢线对上卡口
量这边摁住了,再看价这边两条线怎么咬。
KA1:=MA((CLOSE-VARAB)/(VARBB-VARAB)*100,P2);
DA1:=MA(0.667*REF(KA1,1)+0.333*KA1,2);
KA1 是快线,把价在五日高低区间里折成零到一百。
DA1 是慢线,本质是快线加个六三七三的权再平滑两日,天生比快线慢半拍。快线从下往上拱过慢线、还压在低位区,那一下叫低位金叉。
权重 0.667 对 0.333 有讲究。全押当天,慢线跟快线重合成一根,金叉永远不响。
全押昨天,又太钝,等它抬头黄花菜都凉了。三分之二偏昨天、三分之一偏今天,慢线既贴得住趋势又留一点提前量,卡口才对得上。
末尾一步把横盘、地量、金叉三摞条件叠一块,缺一个都不亮灯。它宁可多等,也不肯只凭一条线就叫。
收尾
这套东西脾气就是磨。回去把 P1 从五调到八,看那把自适应尺子把地量四的窗口拽长多少,形态糊不糊。
