陶博士最钟爱的“口袋支点”选股公式与主图指标源码

创作时间:

作者:

@小白创作中心

陶博士最钟爱的“口袋支点”选股公式与主图指标源码

引用

来源

https://xueqiu.com/1991816227/293950060

陶博士在投资分析中对一个特别的指标情有独钟，那就是“口袋支点”。为了更深入地了解这一策略，建议您参阅博士撰写的文章《口袋支点 20210615》，其中详细阐述了其原理和应用。

现在，提供口袋支点的公式源代码。当出现口袋支点时，这段代码将自动在日线图上绘制一个醒目的红色钻石标记，为您的决策提供直观而及时的参考。

口袋支点条件选股公式：

{需要根据你自己的RPS数据设置修改}
RPSHC50:=EXTDATA_USER(3,0)/10;{50天的}
RPSHC120:=EXTDATA_USER(1,0)/10;{120天的}
RPSHC250:=EXTDATA_USER(2,0)/10;{250天的}
RPSHC20:=EXTDATA_USER(9,0)/10;{20天的}
ATSGM1:=MA(C,10);
ATSGM2:=MA(C,50);
ATSGM3:=MA(C,120);
ATSGM4:=REF(ATSGM3,1);
ATSGM5:=MA(C,20);
ATSGM6:=REF(ATSGM5,1);
ATSGM7:=(H+L)/2;
ATSGM8:=MA(C,200);
ATSGM9:=REF(ATSGM2,1);
ATSGL250:=LLV(LOW,250);
ATSGH120:=HHV(HIGH,120);
ATSGX11:=IF(C<REF(C,1),V,0);
ATSGX12:=(L-MA(C,10))/MA(C,10)100;
ATSGX13:=(L-MA(C,50))/MA(C,50)*100;
ATSGX14:=H>REF(H,1);
ATSGX15:=C>=REF(O,1);
ATSGX16:=(C-MA(C,50))/MA(C,50);
COND1:=(C-REF(C,1))/REF(C,1)>=0.03
AND VOL>=REF(HHV(ATSGX11,10),1)
AND (ATSGX12<=1.5 OR ATSGX13<=1.5)
AND C>=O
AND ATSGM5>=ATSGM6
AND (ATSGM3>=ATSGM4 OR ATSGM2>=ATSGM9)
AND C>ATSGM5
AND ATSGX14
AND ATSGX15
AND C>ATSGM1
AND C>ATSGM2
AND C>ATSGM3
AND C>ATSGM8
AND C>ATSGM7
AND C>=ATSGL2501.2
AND H>=(ATSGH1200.85)
AND (RPSHC50>=90 OR RPSHC250>=90 OR RPSHC120>=90 OR (RPSHC20>=90 AND C>REF(C,1)1.07));
COND2:=(C-REF(C,1))/REF(C,1)>=0.095
AND (ATSGX12<=1.5 OR ATSGX13<=1.5)
AND ATSGX16<=0.6
AND ATSGM5>=ATSGM6
AND (ATSGM3>=ATSGM4 OR ATSGM2>=ATSGM9)
AND C>ATSGM5
AND ATSGX14
AND ATSGX15
AND C>ATSGM1
AND C>ATSGM2
AND C>ATSGM3
AND C>ATSGM7
AND C>=ATSGL2501.18
AND H>=(ATSGH1200.85)
AND (RPSHC50>=90 OR RPSHC250>=90 OR RPSHC120>=90 OR RPSHC20>=90);
COND3:=RPSHC50>=90 OR RPSHC250>=90 OR RPSHC120>=90;
FKD250:=H>=HHV(H,250);
FKD21:=AMO=HHV(AMO,10);
FKD22:=C/REF(C,1)>1.099;
FKD23:=AMO/MA(AMO,10)>2;
FKD24:=C/REF(C,1)>1.05 AND FKD21;
FKD25:=C/REF(C,1)>1.05 AND FKD23;
FKD26:=C/REF(C,1)>=1.05 AND FKD21 AND H/C<1.05;
FKD27:=C/REF(C,1)>=1.08 AND FKD21 AND H/C>=1.05;
FKD28:=C/REF(C,1)>=1.05 AND FKD23 AND H/C<1.05;
FKD29:=C/REF(C,1)>=1.08 AND FKD23 AND H/C>=1.05;
COND4:=FKD22 OR FKD24 OR FKD25 OR FKD26 OR FKD27 OR FKD28 OR FKD29;
FKD511:=C>MA(C,90);
FKD512:=MA(C,90)>=REF(MA(C,90),5);
FKD513:=H>=HHV(H,90);
FKD51:=FKD511 AND FKD512 AND FKD513;
FKD521:=C>MA(C,100);
FKD522:=MA(C,100)>=REF(MA(C,100),5);
FKD523:=H>=HHV(H,100);
FKD52:=FKD521 AND FKD522 AND FKD523 AND FKD512;
FKD531:=C>MA(C,120);
FKD532:=MA(C,120)>=REF(MA(C,120),2);
FKD53:=FKD531 AND FKD532;
COND5:=FKD51 OR FKD52 OR FKD53;
H120:=HHV(H,120);
T1:=HHVBARS(H,120);
L120:=LLV(L,T1+1);
FKD61:=LLV(L,40)/HHV(H,120)>0.5;
FKD6:=FKD61 OR FKD250;
COND6:=L120/H120>0.54 AND FKD6;
FKD41:=FKD250 OR LLV(L,15)>LLV(L,50);
FKD42:=LLV(L,15)=LLV(L,50) AND LLV(L,15)>LLV(L,100)
AND H/HHV(H,250)>0.88;
FKD43:=LLV(L,15)=LLV(L,50) AND LLV(L,15)>LLV(L,100)
AND H/HHV(H,250)>0.75 AND H>=HHV(H,40)
AND C/REF(C,1)>1.07;
COND7:=FKD41 OR FKD42 OR FKD43;
COND8:=REF(L,1)<=REF(MA(C,50),1)*1.24 OR REF(L,1)<=REF(MA(C,10),1)*1.03;
KDZD:COND1 OR COND2 OR (COND3 AND COND4 AND COND5 AND COND6 AND COND7 AND COND8);

口袋支点技术指标：

1、CTRL+F打开公式管理器，新建技术指标公式，画线方法：主图叠加
2、或者直接加到你已有的均线指标里面去，大部分陶粉用的应该是MA3均线指标

{需要根据你自己的RPS数据设置修改}
RPSHC50:=EXTDATA_USER(3,0)/10;{50天的}
RPSHC120:=EXTDATA_USER(1,0)/10;{120天的}
RPSHC250:=EXTDATA_USER(2,0)/10;{250天的}
RPSHC20:=EXTDATA_USER(9,0)/10;{20天的}
ATSGM1:=MA(C,10);
ATSGM2:=MA(C,50);
ATSGM3:=MA(C,120);
ATSGM4:=REF(ATSGM3,1);
ATSGM5:=MA(C,20);
ATSGM6:=REF(ATSGM5,1);
ATSGM7:=(H+L)/2;
ATSGM8:=MA(C,200);
ATSGM9:=REF(ATSGM2,1);
ATSGL250:=LLV(LOW,250);
ATSGH120:=HHV(HIGH,120);
ATSGX11:=IF(C<REF(C,1),V,0);
ATSGX12:=(L-MA(C,10))/MA(C,10)100;
ATSGX13:=(L-MA(C,50))/MA(C,50)*100;
ATSGX14:=H>REF(H,1);
ATSGX15:=C>=REF(O,1);
ATSGX16:=(C-MA(C,50))/MA(C,50);
COND1:=(C-REF(C,1))/REF(C,1)>=0.03
AND VOL>=REF(HHV(ATSGX11,10),1)
AND (ATSGX12<=1.5 OR ATSGX13<=1.5)
AND C>=O
AND ATSGM5>=ATSGM6
AND (ATSGM3>=ATSGM4 OR ATSGM2>=ATSGM9)
AND C>ATSGM5
AND ATSGX14
AND ATSGX15
AND C>ATSGM1
AND C>ATSGM2
AND C>ATSGM3
AND C>ATSGM8
AND C>ATSGM7
AND C>=ATSGL2501.2
AND H>=(ATSGH1200.85)
AND (RPSHC50>=90 OR RPSHC250>=90 OR RPSHC120>=90 OR (RPSHC20>=90 AND C>REF(C,1)1.07));
COND2:=(C-REF(C,1))/REF(C,1)>=0.095
AND (ATSGX12<=1.5 OR ATSGX13<=1.5)
AND ATSGX16<=0.6
AND ATSGM5>=ATSGM6
AND (ATSGM3>=ATSGM4 OR ATSGM2>=ATSGM9)
AND C>ATSGM5
AND ATSGX14
AND ATSGX15
AND C>ATSGM1
AND C>ATSGM2
AND C>ATSGM3
AND C>ATSGM7
AND C>=ATSGL2501.18
AND H>=(ATSGH1200.85)
AND (RPSHC50>=90 OR RPSHC250>=90 OR RPSHC120>=90 OR RPSHC20>=90);
COND3:=RPSHC50>=90 OR RPSHC250>=90 OR RPSHC120>=90;
FKD250:=H>=HHV(H,250);
FKD21:=AMO=HHV(AMO,10);
FKD22:=C/REF(C,1)>1.099;
FKD23:=AMO/MA(AMO,10)>2;
FKD24:=C/REF(C,1)>1.05 AND FKD21;
FKD25:=C/REF(C,1)>1.05 AND FKD23;
FKD26:=C/REF(C,1)>=1.05 AND FKD21 AND H/C<1.05;
FKD27:=C/REF(C,1)>=1.08 AND FKD21 AND H/C>=1.05;
FKD28:=C/REF(C,1)>=1.05 AND FKD23 AND H/C<1.05;
FKD29:=C/REF(C,1)>=1.08 AND FKD23 AND H/C>=1.05;
COND4:=FKD22 OR FKD24 OR FKD25 OR FKD26 OR FKD27 OR FKD28 OR FKD29;
FKD511:=C>MA(C,90);
FKD512:=MA(C,90)>=REF(MA(C,90),5);
FKD513:=H>=HHV(H,90);
FKD51:=FKD511 AND FKD512 AND FKD513;
FKD521:=C>MA(C,100);
FKD522:=MA(C,100)>=REF(MA(C,100),5);
FKD523:=H>=HHV(H,100);
FKD52:=FKD521 AND FKD522 AND FKD523 AND FKD512;
FKD531:=C>MA(C,120);
FKD532:=MA(C,120)>=REF(MA(C,120),2);
FKD53:=FKD531 AND FKD532;
COND5:=FKD51 OR FKD52 OR FKD53;
H120:=HHV(H,120);
T1:=HHVBARS(H,120);
L120:=LLV(L,T1+1);
FKD61:=LLV(L,40)/HHV(H,120)>0.5;
FKD6:=FKD61 OR FKD250;
COND6:=L120/H120>0.54 AND FKD6;
FKD41:=FKD250 OR LLV(L,15)>LLV(L,50);
FKD42:=LLV(L,15)=LLV(L,50) AND LLV(L,15)>LLV(L,100)
AND H/HHV(H,250)>0.88;
FKD43:=LLV(L,15)=LLV(L,50) AND LLV(L,15)>LLV(L,100)
AND H/HHV(H,250)>0.75 AND H>=HHV(H,40)
AND C/REF(C,1)>1.07;
COND7:=FKD41 OR FKD42 OR FKD43;
COND8:=REF(L,1)<=REF(MA(C,50),1)*1.24 OR REF(L,1)<=REF(MA(C,10),1)1.03;
KDZD:=COND1 OR COND2 OR (COND3 AND COND4 AND COND5 AND COND6 AND COND7 AND COND8);
DRAWICON(FILTERX(KDZD,BARSCOUNT(C))!=0,L0.94,25);