与你共享街

标题: 财神来敲门主图指标 源码 通达信 数字版 [打印本页]

作者: Money    时间: 2020-4-8 15:58
标题: 财神来敲门主图指标 源码 通达信 数字版
本帖最后由 Money 于 2020-4-8 16:08 编辑

  引用红色三线老师的帖子,参照我的最新版135战法模式,重新更改了标注方法。
  左侧交易精髓:财神来敲门主图~
  抓妖原则:1、首看指数及股价的高低位置;2、看题材热点,先抓率先起涨龙头;3、看竞价量比、盘中成交量、日换手率。4、龙虎榜席位提示。买卖果断!
  K线站稳黄、绿色线(长期筹码线),并在黄金坑右侧边沿出现财神来敲门,重视杀手潜伏指标对次新股回调买点的低位提示!
  买进原则:妖股要买在黄金坑右侧坑沿。牛市中箱型盘整震荡期间信号较多,属于庄家洗筹。这样的票放入自选股跟踪。
  投资股票原则:1、耐得住寂寞,2、该出手时必出手,3、买错要果断斩仓才能赚大钱。每年只抓10只大妖股!
(, 下载次数: 24)
  1.   {跃上海平面}
  2.   N:=10;
  3.   K2:=1;
  4.   TA:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
  5.   ATR:=EMA(TA,5);
  6.   VAR81:=REF(CLOSE,N)-REF(ATR,1);
  7.   仙界线:=HHV(VAR81,5),COLORYELLOW;
  8.   {资金流入带主图;相当于5日均线。}
  9.   初始流入:=FINANCE(21)/100000000,COLORCYAN,NODRAW;
  10.   逐步流入:=FINANCE(23)/100000000,COLORRED,NODRAW;
  11.   加快流入:=FINANCE(30)/100000000,COLORRED,NODRAW;
  12.   准备上攻:=FINANCE(19)/100000000,COLORGREEN,NODRAW;
  13.   MACC1:=EMA(C,2),COLOR0000FF,LINETHICK1;
  14.   MACC2:=REF(MACC1,1),COLORFFFFFF;
  15.   MACC3:=EMA(EMA(C,7),6),COLOR00FFFF,LINETHICK1;
  16.   XGL:DRAWBAND(MACC1,RGB(255,160,0),MACC2,RGB(10,200,0));
  17.   {盖住双横杠}
  18.   F:=C/O;
  19.   STICKLINE(F>=1,C,O,2.8,1),COLORRED;
  20.   STICKLINE(F>=1,C,H,0.00001,0),COLORRED;
  21.   STICKLINE(F>=1,L,O,0.00001,0),COLORRED;
  22.   STICKLINE(F<1,C,O,2.8,0),COLORCYAN;
  23.   STICKLINE(F<1,O,H,0.00001,0),COLORCYAN;
  24.   STICKLINE(F<1,L,C,0.00001,0),COLORCYAN;
  25.   {3、重要的主图K线上的红色买点柱}
  26.   XA_1J:=EMA(EMA(CLOSE,23),23);
  27.   XA_2J:=(XA_1J-REF(XA_1J,1))/REF(XA_1J,1)*1000;
  28.   XA_3J:=DYNAINFO(11);
  29.   XA_4J:=(EMA(CLOSE,10)-EMA(CLOSE,60))*10;
  30.   XA_5J:=EMA(XA_4J,5);
  31.   XA_6J:=(CLOSE-XA_3J)/XA_3J<(-0.03);
  32.   XA_7J:=(CLOSE-XA_3J)/XA_3J<(-0.03);
  33.   XA_8J:=LAST(XA_3J>=REF(XA_3J,1),5,1) AND (CLOSE-XA_3J)/XA_3J<0.005;
  34.   XA_9J:=(CLOSE-XA_3J)/XA_3J>0.005;
  35.   XA_10J:=XA_2J<REF(XA_2J,1) AND XA_2J>0.5;
  36.   XA_11J:=XA_2J>0;
  37.   XA_12J:=XA_2J>REF(XA_2J,1) AND XA_2J<(-0.2);
  38.   XA_13J:=XA_2J>REF(XA_2J,1) AND XA_2J<0;
  39.   XA_14J:=CROSS(XA_4J,XA_5J) AND XA_4J<(-0.3);
  40.   XA_15J:=FILTER(XA_6J AND XA_12J AND XA_14J,15);
  41.   买点柱:=FILTER(XA_7J AND XA_12J AND XA_14J,15);
  42.   DRAWTEXT(买点柱,H*1.01,'1'),COLORRED;
  43.   {5日变色线}
  44.   越过成仙M240:=MA(C,240),COLORGRAY,LINETHICK1;
  45.   M144:=MA(C,144),COLORWHITE,LINETHICK1;
  46.   M88:=MA(C,88),COLORLIGRAY,LINETHICK1;
  47.   越过有道M120:=MA(C,110),COLORMAGENTA,LINETHICK3;
  48.   越过强势M60:=MA(C,60),COLORLIGRAY,LINETHICK3;
  49.   M30:=MA(C,27),COLORGREEN,LINETHICK2;
  50.   M20:=MA(C,17),COLORMAGENTA,LINETHICK2;
  51.   M10:=MA(C,10),COLORWHITE,LINETHICK1;
  52.   M5:=MA(C,3),COLORRED,LINETHICK3;
  53.   {2、短期下插线}
  54.   AN1:=MA(C,3);
  55.   AN2:=MA(C,21);
  56.   AN3:=(AN1+AN2)/2;
  57.   {6、短下插操作线无未来}
  58.   BR:=MA(CLOSE,13)+MA(CLOSE,13)-REF(MA(CLOSE,13),1);
  59.   分水岭R:=IF(MA(CLOSE,17)<BR,BR,MA(CLOSE,17)),COLORFF00FF,NODRAW;
  60.   YR:=分水岭R-(EMA(C,3)-分水岭R),DOTLINE,LINETHICK1;
  61.   OUTF:=CROSS(M5,YR);
  62.   {4、黄色块及坑后上涨}
  63.   NQ:=20;
  64.   M1P:=30;
  65.   P1P:=80;
  66.   P2P:=100;
  67.   VAR1P:=(C+H+O+L)/4;
  68.   买入P:=XMA(VAR1P,M1P)*(1-P2P/1000),COLORYELLOW,LINETHICK2;
  69.   STICKLINE(买入P>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
  70.   STICKLINE(买入P>HIGH,HIGH,LOW,0,0),COLORYELLOW;
  71.   STICKLINE(CCI<=100 AND L<=买入P,(L + H + O) / 3.18,O,3,0),COLORYELLOW;
  72.   反弹P:=MA(EMA(EMA(HIGH,5),5),5)*0.95,LINETHICK1;
  73.   XG1P:=CROSS(买入P,反弹P);
  74.   DRAWTEXT(XG1P,L*0.98,'1'),COLORWHITE;
  75.   {13、飓风眼启爆}
  76.   AHC1:=CLOSE*VOL;
  77.   AHC2:=EMA((EXPMA(AHC1,2)/EXPMA(VOL,2)+EXPMA(AHC1,5)/EXPMA(VOL,5)+EXPMA
  78.   (AHC1,10)/EXPMA(VOL,10)+EXPMA(AHC1,20)/EXPMA(VOL,20))/4,10),COLORYELLOW;
  79.   风向R:=1.06*AHC2,LINETHICK2,COLORWHITE;
  80.   吹:=1.13*AHC2,LINETHICK2,COLORWHITE;
  81.   ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
  82.   飓风:=CROSS(C,风向R) AND ZT;
  83.   DRAWTEXT(飓风,H*1.01,'1'),COLORBLUE;
  84.   {7、黑夜之眼}
  85.   MMM:=1;
  86.   SVOL:=INTPART(SUM(V,0)/CAPITAL);
  87.   TJ0:=SVOL>REF(SVOL,1) OR BARSSINCE(CLOSE)=0;
  88.   SF1:=BARSLAST(TJ0)+1;
  89.   TJJ2:=SF1<REF(SF1,1);
  90.   S2:=IF(TJJ2,REF(SF1,1)+1,SF1);
  91.   S3:=SUM(TJJ2,0);
  92.   ZK1:="KD.K#WEEK"(9,3,3);
  93.   ZD2:="KD.D#WEEK"(9,3,3);
  94.   ZF1:="MACD.DIF#WEEK"(5,34,5);
  95.   ZA2:="MACD.DEA#WEEK"(5,34,5);
  96.   换手:=V/CAPITAL*100,LINETHICK0;
  97.   JCD:=CROSS(ZK1,ZD2) AND REF(ZD2,1)<60;
  98.   波段低点:=EXIST(JCD,MMM),COLORYELLOW,NODRAW;
  99.   DRAWTEXT(波段低点,L*0.98,'1'),COLORGREEN;
  100.   {2、A3及A15D}
  101.   A:=EMA((EMA(C,29)+EMA(C,31)+EMA(C,33))/3,3);
  102.   A1:=EMA((EMA(C,1)+EMA(C,3)+EMA(C,5))/3,3),COLOR1010FF;
  103.   A2:=EMA((EMA(C,3)+EMA(C,5)+EMA( C,7))/3,3),COLOR1020FF;
  104.   A3:=IF(K2!=2,EMA((EMA(C,5)+EMA(C,6)+EMA( C,7))/3,3),DRAWNULL),COLORCYAN,LINETHICK3;
  105.   A4:=IF(K2!=2, EMA((EMA(C,7)+EMA(C,9)+EMA( C,11))/3,3),DRAWNULL),COLOR1040FF;
  106.   A5:=IF(K2!=2, EMA((EMA(C,9)+EMA(C,11)+EMA( C,13))/3,3),DRAWNULL)COLOR1050FF;
  107.   A6:=IF(K2!=2, EMA((EMA(C,11)+EMA(C,13)+EMA( C,15))/3,3),DRAWNULL)COLOR1060FF;
  108.   A7:=IF(K2!=2, EMA((EMA(C,13)+EMA(C,15)+EMA( C,17))/3,3),DRAWNULL)COLOR1070FF;
  109.   A8:=IF(K2!=2, EMA((EMA(C,15)+EMA(C,17)+EMA( C,19))/3,3),DRAWNULL)COLOR1080FF;
  110.   A9:=IF(K2!=2, EMA((EMA(C,17)+EMA(C,19)+EMA( C,21))/3,3),DRAWNULL),COLORLIMAGENTA;
  111.   A10D:=IF(K2!=2, EMA((EMA(C,19)+EMA(C,21)+EMA( C,23))/3,3),DRAWNULL),COLORLIMAGENTA;
  112.   A11D:=IF(K2!=2, EMA((EMA(C,21)+EMA(C,23)+EMA( C,25))/3,3),DRAWNULL),COLORWHITE,LINETHICK2;
  113.   A15D:IF(K2!=2, A-(A1-A*0.977),DRAWNULL),COLORBLUE,LINETHICK3;
  114.   {11、变色下插线}
  115.   B55:=ATAN((A15D/REF(A15D,1)-1)*100)*180/3.1416;
  116.   IF(55>30 AND A15D>REF(A15D,1), A15D,DRAWNULL),COLORCYAN,LINETHICK3;
  117.   B100:=ATAN((M5/REF(M5,1)-1)*100)*180/3.1416;
  118.   IF(B55<0 AND A15D<REF(A15D,1), A15D,DRAWNULL),COLORRED,LINETHICK3;
  119.   {12、黄色起飞跑道}
  120.   OUT1:=CROSS(M5,A15D);
  121.   DRAWICON(OUT1,L*0.96,13);{红球}
  122.   {三轨主图}
  123.   MC:=100;
  124.   NN:=0.4;
  125.   MIDZ:MA(CLOSE,MC),COLORWHITE,LINETHICK3;
  126.   {4、大叉出现在坑边!}
  127.   BCC:=MA(CLOSE,34)+MA(CLOSE,34)-REF(MA(CLOSE,34),1);
  128.   分水岭C:=IF(MA(CLOSE,161)<BCC,BCC,MA(CLOSE,161)),LINETHICK1,POINTDOT;
  129.   下插线C:分水岭C-(EMA(C,3)-分水岭C),LINETHICK3,COLORYELLOW;
  130.   XGC:IF(下插线C>AN3,下插线C,DRAWNULL),COLORBROWN,LINETHICK3;
  131.   {越过有道120上穿MIDZ,红色三线}
  132.   OUT11:=CROSS(M5,A15D);
  133.   DRAWTEXT(OUT11,L*0.98,'3'),COLORYELLOW;
  134.   {★坑边信赖}
  135.   QFO3:=100-3*SMA((CLOSE-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42))*100,5,1)
  136.   +2*SMA(SMA((CLOSE-LLV(LOW,42))/(HHV(HIGH,42)-LLV(LOW,42))*100,20,1),8,1);
  137.   QFO4:=100-3*SMA((OPEN-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,8,1)
  138.   +2*SMA(SMA((OPEN-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1),5,1);
  139.   QFO5:=QFO3<REF(QFO4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
  140.   XG2C:=IF(QFO5 AND COUNT(QFO5,30)=1,20,0),STICK,LINETHICK2,COLORRED;
  141.   {STICKLINE(XG2C,L*1.02,L*1.27,0.00001,0),COLORCYAN;}
  142.   DRAWTEXT(C>REF(C,1) AND REF(RSI,1)>0 AND XG2C,L*0.98,'3'),COLORBLUE;
  143.   {▲主图有金坑吸筹,无金坑放弃。}
  144.   LCF:=REF(CLOSE,1);
  145.   RSI5:=((SMA(MAX((CLOSE - LCF),0),5,1) / SMA(ABS((CLOSE - LCF)),5,1)) * 100);
  146.   TR1F:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
  147.   HD:=(HIGH - REF(HIGH,1));
  148.   LD:=(REF(LOW,1) - LOW);
  149.   DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
  150.   DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
  151.   PDI:=((DMP * 100) / TR1F);
  152.   MDI:=((DMM * 100) / TR1F);
  153.   ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
  154.   AV:=(RSI5 + ADX);
  155.   DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
  156.   WR10:=((100 * (HHV(HIGH,60) - CLOSE)) / (HHV(HIGH,60) - LLV(LOW,60)));
  157.   NEWVOL:=(RSI5 - WR10);
  158.   金坑买入:=(AV + NEWVOL);
  159.   买入选股:=IF(CROSS(金坑买入,0),1,0),STICK,COLORRED;
  160.   VAR1Z:=SMA(买入选股,8,1);
  161.   VAR2Z:=SMA(VAR1Z,8,1),COLOR0000FF;
  162.   VAR3Z:=SMA(VAR2Z,10,1),COLOR00FFFF;
  163.   金坑吸筹:=IF(CROSS(VAR2Z,VAR3Z) AND (VAR2Z<40),5,0* 10000),COLOR0000FF,LINETHICK1;
  164.   DRAWTEXT(金坑吸筹>0,L*0.98,'1'),COLORYELLOW;
  165.   {做多资金上穿空方趋势线出洋红球13,为趋势走强信号,★下有金坑才拉升}
  166.   A50A:=33,COLORBLUE,LINETHICK1;
  167.   VAR0:=(2*CLOSE+HIGH+LOW)/4;
  168.   BCA:=MA((VAR0-LLV(LOW,17))/(HHV(HIGH,17)-LLV(LOW,17))*100,2);
  169.   做多资金:=EMA(BCA,3),LINETHICK1,COLORYELLOW;
  170.   做空资金:=EMA(做多资金,18),COLORGRAY,LINETHICK1;
  171.   VAR4C:=(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10))*100;
  172.   空方趋势线:=SMA(VAR4C,3,1)+0.17,COLORLIGREEN,LINETHICK3;
  173.   OUT66:=CROSS(做多资金,A50A);
  174.   DRAWTEXT(OUT66,L*0.98,'2'),COLORYELLOW;
  175.   {XGL上穿下插线C,★大叉出现}
  176.   OUTL:=CROSS(M5,下插线C);
  177.   DRAWTEXT(OUTL,H*1.01,'2'),COLORRED;
  178.   {4、潜伏。飓风眼}
  179.   M5F:=MA(C,4);
  180.   M10F:=MA(C,8),COLORRED,LINETHICK2;
  181.   M20F:=MA(C,20);
  182.   M60F:=MA(C,60),COLORBLUE,LINETHICK2;
  183.   D3:=MIN(MIN(M5F,M10F),M20F)>M60F;
  184.   LLM:=LLV("MACD.MACD"*100,200);
  185.   HHM:=HHV("MACD.MACD"*100,200);
  186.   TJA:=C>REF(C,1)*1.05;
  187.   T:=BARSLAST(C>REF(C,1)*1.095 AND C=H);
  188.   T2L:=BARSLAST(C<REF(C,1)*1.095 AND C>REF(C,1)*1.08);
  189.   T3L:=BARSLAST(C<REF(C,1)*1.08 AND C>REF(C,1)*1.07);
  190.   T4L:=BARSLAST(C<REF(C,1)*1.07 AND C>REF(C,1)*1.06);
  191.   T5L:=BARSLAST(C<REF(C,1)*1.06 AND C>REF(C,1)*1.05);
  192.   AAF1:=REF(T,1)>100 AND REF(T2L,1)>100 AND REF(T3L,1)>100 AND REF(T4L,1)>100 AND REF(T5L,1)>80 AND TJA;
  193.   XGT:=BARSLAST(AAF1 AND HHM<60 AND LLM>-55);
  194.   D6:=BARSSINCEN(MIN(MIN(M5F,M10F),M20F)>M60F,XGT+1);
  195.   XGX:=CROSS((XGT=0 AND D3) OR D6=0,0.5);
  196.   TJJ:=COUNT(XGX,30)=2 AND XGX;
  197.   SR1:=REF(HIGH,10)=HHV(HIGH,2*10+1);
  198.   SR2:=FILTER(SR1,10);
  199.   SR3:=REF(SR2,10+1);
  200.   HDF:=REF(SR3,10);
  201.   前高:=REF(H,BARSLAST(HDF));
  202.   倍量:=VOL/REF(VOL,1)>=1.9;
  203.   突破前高:=CROSS(C,前高);
  204.   YG:= 倍量 AND 突破前高;
  205.   低2:=IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL);
  206.   SJ:=BARSLAST(YG);
  207.   DIF:=MACD.DIF;
  208.   H300:=HHVBARS(DIF,300);
  209.   AL:=BOLL.UB;
  210.   TQ:=BARSLAST(CROSS(AL>=REF(AL,1),0.5));
  211.   E25:=EXPMA(C,25);
  212.   ZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),TQ+1);
  213.   ZFF:=(HHV(H,TQ+1)-LLV(L,TQ+1))/LLV(L,TQ+1)*100;
  214.   TJQ:=EVERY(MAX(C,O)/AL<1.02 ,TQ+1);
  215.   XL:=(ATAN((E25/REF(E25,TQ)-1)*100)*180/3.1415926);
  216.   TJ1Q:=CROSS(DIF>=REF(DIF,H300),0.5) AND ZFF<17 AND ZF AND TJQ;
  217.   躁动:=TJ1Q AND XL>75;
  218.   A1F:=REF(C,1);
  219.   AYFF:=REF(C,10);
  220.   A31F:=(AYFF-A1F)/A1F*100;
  221.   AA1F:=(A31F-REF(A31F,1));
  222.   选股1:=CROSS(AAF1,9.8);
  223.   A11F:=REF(V,1);
  224.   VAR8:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))))>2;
  225.   A13F:=VAR8/A11F;
  226.   AA3F:=(A13F-REF(A13F,1));
  227.   选股2:=CROSS(AA3F,500);
  228.   潜伏2:=选股1 AND 选股2;
  229.   GX:=潜伏2 OR 躁动 OR CURRBARSCOUNT=CONST(SJ)+2 OR TJJ OR (CCI<=100 AND L<=低2);
  230.   准备:=FILTER(GX=1,3);
  231.   A2A:=BARSCOUNT(C);
  232.   AH:=HHV(H,200);
  233.   A1L:=LLV(L,200);
  234.   A0:=(AH-A1L)/190;
  235.   B1F:=L-A0;
  236.   DRAWTEXT(准备,L*0.98, '2'),COLORWHITE;
  237.   DRAWTEXT(飓风,L*0.98,'2'),COLORBLUE;
  238.   {财神来敲门;有函数;不影响使用}
  239.   金童子:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4)
  240.   ,0.2*FORCAST(V,12),2.1*FORCAST(V,12));
  241.   财神:=FILTER(金童子,10);{58}
  242.   DRAWTEXT(财神,H*1.01,'3 财神'),COLORMAGENTA;
  243.   DRAWICON(财神,L*1.05,9);
  244.   {乔治公爵的老枪准星之;杀手潜伏。}
  245.   火弹:=MA(C,3),COLORRED,LINETHICK3;
  246.   弹夹:=MA(LOW,13)*1.2,COLORMAGENTA;
  247.   来福线:=MA(LOW,17)*1.1,COLORYELLOW;
  248.   撞针:=MA(HIGH,13)*0.9,COLORWHITE;
  249.   扳机:=MA(HIGH,89)*0.8,COLORBROWN;
  250.   准星:=CROSS(火弹,撞针);
  251.   DRAWTEXT(准星,7,'3'),COLORWHITE;
  252.   {-金坑迎财神.★坑后上涨 ★买点柱 与K线黄金坑配合使用。}
  253.   A1J:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,10))/EMA(CLOSE,10));
  254.   A2J:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1J);
  255.   金坑:=EMA(A2J,5)*1;
  256.   金坑2:=EMA(A2J,200)*1.118;
  257.   探路:=(C-REF(C,1))/REF(C,1)*100>8;
  258.   金库:=CROSS(C,金坑) AND 探路;
  259.   RRFJ:=金库,STICK;
  260.   DRAWTEXT(RRFJ,L*0.98,'3'),COLORYELLOW;
  261.   {逃}
  262.   LCC:=REF(CLOSE,1);
  263.   RSIC:=SMA(MAX(CLOSE-LCC,0),6,1)/SMA(ABS(CLOSE-LCC),6,1)*100;
  264.   DRAWTEXT(CROSS(84,RSIC) , HIGH*1.1,'逃'),COLORYELLOW;
  265.   DRAWTEXT_FIX(1,0.01,0.01,0,'绿 1黑暗之眼;2红色三线;'),COLORGREEN;
  266.   DRAWTEXT_FIX(1,0.01,0.06,0,'蓝 1飓风;2飓风眼;3坑边信赖;'),COLORBLUE;
  267.   DRAWTEXT_FIX(1,0.01,0.11,0,'白 1坑后上涨;2潜伏;3杀手潜伏;'),COLORWHITE;
  268.   DRAWTEXT_FIX(1,0.2,0.01,0,'黄 1有金坑吸筹;2下有金坑才拉升;3金坑迎财神;'),COLORYELLOW;
  269.   DRAWTEXT_FIX(1,0.2,0.06,0,'红 1买点柱;2大叉出现;3财神来敲门;'),COLORRED;
复制代码






欢迎光临 与你共享街 (https://www.ynjie.com/) Powered by Discuz! X3.5