以下是通达信点石成金主图指标公式

   回答朋友问题：★26日更新。因有溢出背景不正常的画面，可调参数N。★

   有无背景色在视觉上有明显的不同。TDX没有像飞狐那样画面隋K线变动，也

   没有画面最高最低函数。在【画线主图】中根据画面中指标最大最小值使其

   读图部份作色只能满足读图需要。也是在TDX中第一次试试，不能像飞狐和

   DZH2那样要求。

   >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

   〈【画线主图】+点石成金〉修改了不少原码，主要解决图不正当的压缩

   和背景色问题。自功画趋势线本身就成在图向上或向下压缩，因此5分钟、1

   分钟图少用。对它们趋势线的意义也不大。

   保留原《画线主图》说明：

   ===================================================

   《画线主图》中只有均线和画线。指标栏也有文字，就不另加说明了。

   趋势用了网上破解的方法。感谢原作者！方法思路比较正规，也就有了

   发展的余地。这里再次告诉那些爱检测的朋友，自功画趋势线一般离不

   开未来函数。画出来是供绘分晰，不是叫你买卖。检测它反而显得自已

   知识不凡足。

   公式只有50输出的通达信才能用。有的函数是通达信才有，其它版本这

   类公式很多。不要搞出力不得好的事。

   =============================================

   一，新增缺口显示，但宽度不是真实的。有些长期未补的缺口，也有向上或

   向下压缩图的现象，用系统可选择显示不显示。新增缺口显示用参数P

   选择。但系统得关掉显示，否则解决不了压缩现象。

   二，有两条〈点石成金〉画线。它们是以趋势线的高低点为基础的。高点是

   以前高1为起点。低点是以前低1和低2中较低的为起点。参数K可选择只画

   低点的一条线、或两条高低点都画、都不画。

   因TDX在换周期时一搬默认参数为0(有0参数的指标)。因此K和P为0时是

   显示缺口和画两条画线。

   三，本次是以付件方式发出。没加密。低版本就用劳动了。想用就找找我

   发的两次股软。第二次中副图公式里面部有，不用左求右求。

   想起来了！公式同名可能引不进，同时也发源码吧。

   【画线主图】+点石成金

   C/C++Code复制内容到剪贴板

   {画线主图TDXN:1,100,8K:0,2,0P:0,1,0}

   ZGD:=HHV(H,60);

   ZGD2:=CONST(ZGD);

   ZDD:=LLV(L,60);

   ZDD2:=CONST(ZDD);

   GJ:=(C+H+L+O)/4;

   明日阻力:=L+(GJ-L)+(C-L);

   明日支撑:=L+(C-GJ);

   KOH:=L>REF(H,1);

   KOL:=H<REF(L,1);

   HIF:=L>REF(H,BARSLAST(KOH)+1);

   NHIF:=L<=REF(H,BARSLAST(KOH)+1);

   LIF:=H<REF(L,BARSLAST(KOL)+1);

   NLIF:=H>=REF(L,BARSLAST(KOL)+1);

   下档线:=(((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13)))*100);

   RRRSV:=SMA(下档线,3,1);

   KKK:=SMA(RRRSV,3,1);

   DDDDD:=((3*RRRSV)-(2*KKK));

   JJ12:=(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*100);

   RSV24:=SMA(JJ12,3,1);

   K24:=SMA(RSV24,3,1);

   D24:=((3*RSV24)-(2*K24));

   压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;

   底部:=LLV(HIGH,30),COLOR00FF00;

   AA:=REF(H,N)=HHV(H,2*N+1);AA1:=REF(L,N)=LLV(L,2*N+1);

   QY:=BACKSET(AA,N+1);QY1:=BACKSET(AA1,N+1);

   CC:=FILTER(QY,N)ANDH=HHV(H,N+1);CC1:=FILTER(QY1,N)ANDL=LLV(L,N+1);

   DDD:=BARSLAST(CC);DD1:=BARSLAST(CC1);

   GDTS:=IF(CC,CURRBARSCOUNT,0);DDTS:=IF(CC1,CURRBARSCOUNT,0);

   DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

   GDCS1:=CONST(DINGBUTS);DDCS1:=CONST(DDTS1);

   GDCS13:=CONST(REF(HIGH,GDCS1-1));DDCS13:=CONST(REF(L,DDCS1-1));

   DINGBUTS1:=REF(DINGBUTS,DDD+1);DDTS2:=REF(DDTS1,DD1+1);

   GDCS2:=CONST(DINGBUTS1);DDCS2:=CONST(DDTS2);

   GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));DDCS23:=CONST(REF(L,DDTS2-1));

   XG1:=BACKSET(ISLASTBAR,GDCS1);XD1:=BACKSET(ISLASTBAR,DDCS1);

   XG2:=BACKSET(ISLASTBAR,DINGBUTS1);XD2:=BACKSET(ISLASTBAR,DDTS2);

   XDD:=IF(DDCS13<=DDCS23,XD1,XD2);

   M:=INTPART(3*N/5);

   AAA:=REF(H,M)=HHV(H,2*M+1);

   QYY:=BACKSET(AAA,M+1);

   CCC:=FILTER(QYY,M)ANDH=HHV(H,M+1);

   DDDD:=BARSLAST(CCC),NODRAW;

   GDTSS:=IF(CCC,CURRBARSCOUNT,0);

   DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);

   GDCS11:=CONST(DINGBUTSS);

   DINGBUTS11:=REF(DINGBUTSS,DDDD+1);

   GDCS22:=CONST(DINGBUTS11);

   AA11:=REF(L,M)=LLV(L,2*M+1);

   QY11:=BACKSET(AA11,M+1);

   CC11:=FILTER(QY11,M)ANDL=LLV(L,M+1);

   DD11:=BARSLAST(CC11);

   DDTSS:=IF(CC11,CURRBARSCOUNT,0);

   DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);

   DDCS11:=CONST(DDTS11);

   DDTS22:=REF(DDTS11,DD11+1);

   DDCS22:=CONST(DDTS22);

   高点压力M:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;

   低点支撑M:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1)COLORRED,LINETHICK1;

   BCG:=SUM(XG1,0);BCD:=SUM(XDD,0);

   今日阻力:REF(明日阻力,1),NODRAW;

   今日支撑:REF(明日支撑,1),NODRAW;

   压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;

   底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;

   高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORBLUE,LINETHICK1;

   低点支撑:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;

   高:=CONST(MAX(MAX(MAX(MAX(MAX(MAX(ZGD2,高点压力),低点支撑),GDCS13),GDCS23),高点压力M)

   ,低点支撑M));

   低:=CONST(MIN(MIN(MIN(MIN(MIN(MIN(ZDD2,DDCS23),DDCS13),低点支撑),高点压力),低点支撑M)

   ,高点压力M));

   DRAWBAND(高,RGB(100,100,100),低,RGB(100,100,100));

   DRAWBAND(高点压力,RGB(00,00,100),低点支撑,RGB(00,00,100));

   点石成金H:=IF(CLOSE>200,SUM(H*VOL,BCG)/SUM(VOL,BCG),SUM(AMOUNT,BCG)/

   SUM(V,BCG)/100*SUM(H,BCG)/SUM(C,BCG));

   点石成金L:=IF(CLOSE>200,SUM(L*VOL,BCD)/SUM(VOL,BCD),SUM(AMOUNT,BCD)/

   SUM(V,BCD)/100*SUM(L,BCD)/SUM(C,BCD));

   ZGSTAR:=(高点压力+低点支撑)/2;

   ZGEND:=CONST((高点压力+低点支撑)/2);

   STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);

   中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLOR555555,LINETHICK1;

   上缺口:=P=0ANDHIFANDBARSLAST(KOH)<BARSLAST(NHIF)

   ANDBARSLAST(HIF)<BARSLAST(NHIF);

   HG:=IF(上缺口,REF(H,BARSLAST(KOH)+1),DRAWNULL);

   STICKLINE(上缺口,HG,HG*1.001,10,0),COLOR888888;

   下缺口:=P=0ANDLIFANDBARSLAST(KOL)<BARSLAST(NLIF)ANDBARSLAST(LIF)

   <BARSLAST(NLIF);

   LG:=IF(下缺口,REF(L,BARSLAST(KOL)+1),DRAWNULL);

   STICKLINE(下缺口,LG,LG*0.999,10,0),COLOR888888;

   DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;

   DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1)COLORRED,LINETHICK1;

   STICKLINE(XG2,GDCS23,GDCS23,0.5,1),COLORWHITE;

   STICKLINE(XG1,GDCS13,GDCS13,0.5,1),COLORYELLOW;

   STICKLINE(XD2,DDCS23,DDCS23,0.5,1),COLORMAGENTA;

   STICKLINE(XD1,DDCS13,DDCS13,0.5,1),COLORCYAN;

   STICKLINE(ISLASTBARANDC>=今日阻力,今日阻力,今日阻力,10,1),COLOR0000FF;

   STICKLINE(ISLASTBARANDC<今日阻力,今日阻力,今日阻力,10,1),COLOR00FF00;

   STICKLINE(ISLASTBARANDC>=今日支撑,今日支撑,今日支撑,10,1),COLORFF00FF;

   STICKLINE(ISLASTBARANDC<今日支撑,今日支撑,今日支撑,10,1),COLORFF8800;

   STICKLINE(ISLASTBAR,压力位,压力位,120,0),COLORFFFFFF;

   STICKLINE(ISLASTBAR,底部位,底部位,100,0),COLOR00FF00;

   MA1:MA(CLOSE,5);

   MA2:MA(CLOSE,10);

   MA3:MA(CLOSE,20);

   MA4:MA(CLOSE,60);

   DRAWKLINE(H,O,L,C);

   点石成金1:IF(K=0ANDXG1,点石成金H,DRAWNULL),COLORGREEN,LINETHICK2;

   点石成金2:IF((K=0ORK=1)ANDXDD,点石成金L,DRAWNULL),COLORRED,LINETHICK2;

  点石成金副图指标公式

上 18H:WMA(SMA(HHV(HIGH,18),9/2,1),3);

下 18L:WMA(SMA(LLV(LOW,18),9/2,1),3);

通道:(上 18H+下 18L)/2;

DRAWBAND(上 18H,RGB(68,0,1),通道,RGB(68,0,1));

DRAWBAND(通道,RGB(3,43,63),下 18L,RGB(3,43,63));

WMA(SMA(HHV(HIGH,18),9/2,1),3),COLOR0080FF,DOTLINE;

WMA(SMA(LLV(LOW,18),9/2,1),3),COLOR0080FF,DOTLINE;

(上 18H+下 18L)/2,COLORFFFFFF;

三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3);

三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3),COLORWHITE;

S:=CROSS(CROSS(三日最高,C),0.6);

B:=CROSS(CROSS(C,三日最低),0.5);

DRAWICON(B,LOW*0.97,34);

DRAWICON(S,H*1.02,35);

{逃顶}

LC:=REF(CLOSE,1);

RSI5:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;

逃命:=CROSS(80,RSI5);

DRAWICON(逃命,H*1.005,15);

TJ1:=REF("CCI.CCI",1)>90 AND "CCI.CCI"<REF("CCI.CCI",1);

TJ2:=REF("KDJ.J"(9,3,3),1)>90 AND "KDJ.J"(9,3,3)<REF( "KDJ.J"(9,3,3),1);

TJ3:=REF("RSI.RSI1",1)>70 AND "RSI.RSI1"<REF("RSI.RSI1",1);

TJ4:=COUNT(TJ1,5) AND COUNT(TJ2,5) AND COUNT(TJ3,5);

大顶:=CROSS(TJ4,0.5);

DRAWICON(大顶,H*1.005,2);

TJ5:=REF("CCI.CCI",1)<-100 AND "CCI.CCI">REF("CCI.CCI",1);

TJ6:=REF("KDJ.J"(9,3,3),1)<20 AND "KDJ.J"(9,3,3)>REF( "KDJ.J"(9,3,3),1);

TJ7:=REF("RSI.RSI1",1)<20 AND "RSI.RSI1">REF("RSI.RSI1",1);

TJ8:=COUNT(TJ5,5) AND COUNT(TJ6,5) AND COUNT(TJ7,5);

DRAWICON(大底,L*0.991,9);

中:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORFF951F,DOTLINE,LINETHICK2;

YJ:=中;

IF(YJ>REF(YJ,1),YJ,DRAWNULL),COLORRED,DOTLINE,LINETHICK2;

DRAWKLINE(H,O,L,C);

ZKP:=IF(C>REF(C,1),REF(C,1),DRAWNULL);

ZSP:=IF(C>REF(C,1),C,DRAWNULL);

DKP:=IF(C<=REF(C,1),REF(C,1),DRAWNULL);

DSP:=IF(C<=REF(C,1),C,DRAWNULL);

DRAWKLINE(H,DKP,L,DSP);

STICKLINE(C<=REF(C,1),DKP,DSP,3.05,0),COLORBLUE;

STICKLINE(C<=REF(C,1),DKP,DSP,2.2,0),COLORFF7700;

STICKLINE(C<=REF(C,1),DKP,DSP,1.5,0),COLORFF9900;

STICKLINE(C<=REF(C,1),DKP,DSP,0.5,0),COLORFFBB00;

DRAWKLINE(H,ZKP,L,ZSP);

STICKLINE(C>REF(C,1),ZKP,ZSP,3.05,0),COLOR000099;

STICKLINE(C>REF(C,1),ZKP,ZSP,2.2,0),COLOR0000CC;

STICKLINE(C>REF(C,1),ZKP,ZSP,1.5,0),COLOR0000FF;

STICKLINE(C>REF(C,1),ZKP,ZSP,0.5,0),COLORCC66FF;

STICKLINE(V/REF(V,1)>2 AND CLOSE>=OPEN,ZKP,ZSP,1,0),COLORYELLOW;

AA:=REF(MA(C,20),1)<REF(MA(C,20),2);

BB:=COUNT(AA,3)>=2;

CC:=MA(C,20)>REF(MA(C,20),1);

拐点:=CC AND BB;

DRAWTEXT(拐点,L*0.99,'★拐点'),COLORYELLOW;