 | |  |  |
控盘力度指标（通达信公式 破解源码分享 贴图）
{公式名称: 控盘力度
公式描述:
参数数量: 3
参数1: KN, 最小: 1, 最大: 200, 缺省: 18
参数2: N1, 最小: 1, 最大: 800, 缺省: 2
参数3: N2, 最小: 1, 最大: 300, 缺省: 21
公式类型: 技术指标公式-未知
画线方法: 副图
公式版本: 0
显示小数: 缺省位数
坐标线位置: 自动
额外Y轴分界: 值1: 90
公式源码:}
DRAWGBK(CLOSE>0,RGB(10,0,150),RGB(30,0,0),0,28,0);
DRAWGBK(CLOSE>0,RGB(0,20,0),RGB(10,0,0),0,28,0);
NOTEXT0:45,POINTDOT;
VAR1:=SMA(EMA(((CLOSE+LOW)/2-LLV(LOW,34))/(HHV((HIGH+CLOSE)/2,34)-LLV(LOW,34))*100,3),8,1)*1.2;
VAR2:=(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100-10;
VAR3:=SMA(VAR2,13,8);
VAR4:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VAR5:=SMA(VAR4,13,8);
VAR6:=CEILING(SMA(VAR5,21,8));
买A:IF(VAR6-VAR3<(-65) AND Func_0x761C.SubValue_0x0<10 AND VAR1<20 AND Func_0x761F.SubValue_0x4>REF(Func_0x761F.SubValue_0x4,1),26,0),COLORLIMAGENTA,LINETHICK3;
卖A:IF(VAR6-VAR3>80 AND VAR1>100,115,120),COLORF0F000,LINETHICK2;
J34:Func_0x761F.SubValue_0x5,COLORC6C600;
DRAWTEXT(CROSS(Func_0x761F.SubValue_0x4#DAY,15),(-5),173),COLORRED;
VAR7:=EMA(CLOSE,12)-EMA(CLOSE,26);
VAR8:=EMA(VAR7,9);
VAR9:=2*(VAR7-VAR8);
VAR10:=(HIGH+LOW+CLOSE)/3;
VAR11:=(VAR10-MA(VAR10,IF(PERIOD=5,14,34)))/(0.015*AVEDEV(VAR10,IF(PERIOD=5,14,34)));
VAR12:=27;
VAR13:=(CLOSE-LLV(LOW,VAR12))/(HHV(HIGH,VAR12)-LLV(LOW,VAR12))*100;
VAR14:=SMA(VAR13,6,1);
VAR15:=SMA(VAR14,3,1);
控盘力_R:Func_0x7606.SubValue_0x8#DAY,COLOR408000,LINETHICK2;
VAR16:=SMA((HHV(HIGH,KN)-CLOSE)/(HHV(HIGH,KN)-LLV(LOW,KN))*100-50,KN/2,1);
VAR17:=SMA(SMA((CLOSE-LLV(LOW,KN))/(HHV(HIGH,KN)-LLV(LOW,KN))*100,KN/3,1),5,1);
VAR18:=(VAR17-VAR16)*1;
VAR19:=IF(PERIOD=5,RSI.RSI1#WEEK(7),RSI.RSI1#DAY(7));
控盘力:VAR18,COLORGREEN,LINETHICK2;
VAR20:=IF(VAR18<0,VAR18,DRAWNULL);
NOTEXT2:IF(VAR18>REF(VAR18,1) AND VAR19>20,VAR18,DRAWNULL),COLORRED,LINETHICK2;
NOTEXT3:IF(VAR18<10 AND VAR18>=REF(VAR18,1),VAR18,DRAWNULL),COLORMAGENTA,LINETHICK5;
VAR21:=Func_0x761B.SubValue_0x2#DAY;
VAR22:=VAR18>REF(VAR18,1);
VAR23:=VAR18<REF(VAR18,1);
VAR24:=MACD.MACD<REF(MACD.MACD,1);
DRAWICON(Func_0x761C.SubValue_0x0<35 AND VAR18>REF(VAR18,1) AND REF(VAR18,1)<REF(VAR18,2),VAR18,1);
DRAWICON(CROSS(Func_0x761F.SubValue_0x1,VAR18) AND VAR18<60 AND Func_0x761F.SubValue_0x5<30,VAR18,17);
VAR25:=45;
VAR26:=SMA((CLOSE-LLV(LOW,VAR25))/(HHV(HIGH,VAR25)-LLV(LOW,VAR25))*100,6,1);
VAR27:=EMA(VAR26,3);
VAR28:=VOL<MA(VOL,5) AND CLOSE<MA(CLOSE,5)*1 AND CLOSE<HHV(CLOSE#DAY,15)*0.95 AND CLOSE<HHV(CLOSE#DAY,60)*0.85 AND LOW<MA(CLOSE,5)*0.95 AND VAR11<(-130) AND 控盘力<30 AND LOW!=CLOSE;
DRAWICON(VAR28>0,40,41);
VAR29:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
VAR30:=VAR29-VAR29*0.49;
VAR31:=VAR29+VAR29*0.22;
VAR32:=VAR29-VAR29*0.29;
回踩极底:IF(REF(CLOSE,1)>VAR32 AND LOW<=VAR32 AND CLOSE>=VAR32,80,0),COLORA2A200,LINETHICK2;
回踩铁底:IF(REF(CLOSE,1)>VAR30 AND LOW<=VAR30 AND CLOSE>=VAR30,80,0),COLORCYAN,LINETHICK2;
VAR33:=SUM(CLOSE/REF(CLOSE,1),BARSLAST(HIGH=HHV(HIGH,30)));
VAR34:=SUM(CLOSE/REF(CLOSE,1),BARSLAST(HIGH=HHV(HIGH,60)));
VAR35:=SUM(CLOSE/REF(CLOSE,1),BARSLAST(LOW=LLV(LOW,30)));
VAR36:=SUM(CLOSE/REF(CLOSE,1),BARSLAST(LOW=LLV(LOW,60)));
低点:IF(VAR35/REF(VAR35,1)<0.01 AND LOW<=HHV(CLOSE,30)*0.85 AND VAR15<15 AND 控盘力<10,58,0),COLORFF8000,LINETHICK2;
VAR37:=10;
VAR38:=5;
VAR39:=(CLOSE-OPEN)/OPEN*100;
VAR40:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
VAR41:=COUNT(VAR40<VAR37,20)>=1;
VAR42:=(MA(AMOUNT,5)/MA(VOL,5)/100-MA(AMOUNT,125)/MA(VOL,125)/100)/(MA(AMOUNT,5)/MA(VOL,5)/100);
VAR43:=MA((LLV(LOW,45)-CLOSE)/(HHV(HIGH,45)-LLV(LOW,45))*100,VAR38);
VAR44:=CROSS((-5),VAR43) AND VAR42<(-0.4);
VAR45:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*125;
VAR46:=SMA(MAX(CLOSE-REF(CLOSE,1),0),10,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),10,1)*125;
VAR47:=VAR45<80 AND VAR46<78 AND SUM(VOL/CAPITAL,10)*125>=10 AND CLOSE/LLV(CLOSE,120)<=1.2 AND (CLOSE-LLV(CLOSE,15))/LLV(CLOSE,15)>=0.12 AND CLOSE/OPEN>1.02 AND MA(CLOSE,10)>MA(CLOSE,20);
低狙击:(VAR39>6 AND VAR41 OR VAR44 OR VAR47)*100,COLORFF0080;
VAR48:=SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,6,1),3,1);
VAR49:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
VAR50:=SMA(VAR49,13,5);
VAR51:=SMA(VAR50,8,3);
VAR52:=SMA(VAR51,5,1);
VAR53:=VAR51;
VAR54:=VAR52;
VAR55:=CROSS(VAR51,VAR52) AND VAR52<20 AND VAR48<25 AND EMA(Func_0x761F.SubValue_0x5,3)<25 AND EMA(Func_0x761F.SubValue_0x8,3)<25;
DRAWTEXT(FILTER(VAR55,1)=1,12,174),LINETHICK3;
STICKLINE(FILTER(VAR55,1)=1,0,20,1,0),COLORYELLOW;
VAR56:=CROSS(VAR52,VAR51) AND VAR51>80;
STICKLINE(FILTER(VAR56,1)=1,85,100,1,0),COLORLIGREEN;
DRAWTEXT(FILTER(VAR56,1)=1,100,175),COLORLIGREEN,LINETHICK3;
VAR57:=CROSS(VAR50,VAR51) AND VAR51>80 AND VAR51>VAR52;
STICKLINE(VAR57,85,100,2,0);
VAR58:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR59:=SMA(VAR58,20,1);
VAR60:=(VAR10-MA(VAR10,34))/(0.015*AVEDEV(VAR10,34));
VAR61:=SMA(VAR60,5,1);
VAR62:=SMA(VAR61,3,1);
VAR63:=3*VAR61-2*VAR62;
VAR64:=390+REVERSE(EMA(VAR63,1));
VAR65:=(-290)+REVERSE(EMA(VAR63,1));
吸D:IF(VAR63<(-150) AND VAR59<40 AND VAR65<REF(VAR65,1) AND 控盘力<15,80,(-3)),COLOR44A2FF;
抛D:IF(VAR63>VAR64,102,110),COLORGREEN;
VAR66:=60;
VAR67:=6;
VAR68:=60;
VAR69:=(2*CLOSE+HIGH+LOW)/4;
VAR70:=EMA(EMA((VAR69-LLV(LOW,VAR66))/(HHV(HIGH,VAR68)-LLV(LOW,VAR66))*100,VAR67),VAR67/3);
VAR71:=EMA(0.667*REF(VAR70,1)+0.333*VAR70,2);
DRAWICON(CROSS(VAR70,VAR71) AND VAR70<20,21,1);
VAR72:=89;
VAR73:=13;
VAR74:=REVERSE(100-3*SMA((CLOSE-LLV(LOW,VAR72))/(HHV(HIGH,VAR72)-LLV(LOW,VAR72))*100,VAR73,1)+2*SMA(SMA((CLOSE-LLV(LOW,VAR72))/(HHV(HIGH,VAR72)-LLV(LOW,VAR72))*100,21,1),VAR73,1))+100;
VAR75:=REVERSE(100-3*SMA((OPEN-LLV(LOW,VAR72))/(HHV(HIGH,VAR72)-LLV(LOW,VAR72))*100,VAR73,1)+2*SMA(SMA((OPEN-LLV(LOW,VAR72))/(HHV(HIGH,VAR72)-LLV(LOW,VAR72))*100,21,1),VAR73,1))+100;
DRAWTEXT(CROSS(VAR70,67) AND VAR71<VAR70,58,39),COLOR9966FF,LINETHICK2;
DRAWTEXT(CROSS(VAR70,76) AND VAR71<VAR70,68,40),COLOR669900,LINETHICK2;
DRAWTEXT(CROSS(VAR71,VAR70) AND VAR71>78,110,41),COLORCYAN;
DRAWTEXT(CROSS(VAR70,VAR71) AND VAR70<25 AND VAR74<0,(-20),42),COLORCYAN;
买入脉冲:IF(CROSS(VAR70,VAR71) AND VAR70<25 AND VAR74<0 AND VAR18<10,-0,(-15)),COLORYELLOW,LINETHICK2;
卖出脉冲:IF(CROSS(VAR71,VAR70) AND VAR71>78,105,120),COLORGREEN,LINETHICK2;
VAR76:=Func_0x761F.SubValue_0x5#DAY;
VAR77:=Func_0x761F.SubValue_0x1#WEEK;
VAR78:=Func_0x761F.SubValue_0x2;
VAR79:=IF(PERIOD=1,240,IF(PERIOD=2,16,IF(PERIOD=3,8,IF(PERIOD=4,4,2))));
IF(Func_0x7606.SubValue_0x8#DAY>REF(Func_0x7606.SubValue_0x8#DAY,VAR79),控盘力_R,DRAWNULL),COLORYELLOW,LINETHICK2;
VAR80:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VAR81:=SMA(VAR80,3,1);
VAR82:=SMA(VAR81,3,1);
VAR83:=SMA(VAR82,3,1);
VAR84:=CROSS(VAR82,VAR83) AND VAR82<20;
J34入:(FILTER(VAR84,10)=1)*58,COLORACFFFF;
控盘界:15,DOTLINE,COLORFF80FF;
|
| |  | |  |
|
