通达信指标公式源码★黄金三角主图★自用
- 格式:doc
- 大小:706.00 KB
- 文档页数:2
通达信时间黄金分割主图指标公式源码编程思路破译源码编程思路破译高点赋值:15低点赋值:10时间赋值:1价格赋值:1前期高点赋值:收盘价/120日内最高价的最高值近期高点赋值:收盘价/21日内最高价的最高值PURC赋值:最高价在0日前的高点*10天内第1个最高价的最后一日取值设为常数PLZ赋值:上次PURC=最高价距今天数的最后一日取值设为常数+1顶X赋值:如果PLZ=1,返回最高价,否则返回PLZ-1日前的最高价的最后一日取值设为常数QQT赋值:最低价在0日前的低点*10天内第1个最低价的最后一日取值设为常数PLL赋值:上次QQT=最低价距今天数的最后一日取值设为常数+1 低X赋值:如果PLL=1,返回最低价,否则返回PLL-1日前的最低价的最后一日取值设为常数AAZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*0.809(进行)四舍五入,否则返回无效数ABZ赋值:对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*0.5(进行)四舍五入ACZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*0.618(进行)四舍五入,否则返回无效数ADZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*0.382(进行)四舍五入,否则返回无效数AEZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*0.236(进行)四舍五入,否则返回无效数AFZ赋值:对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1(进行)四舍五入AGZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1.809(进行)四舍五入,否则返回无效数AHZ赋值:对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1.5(进行)四舍五入AIZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1.618(进行)四舍五入,否则返回无效数AJZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1.382(进行)四舍五入,否则返回无效数AKZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1.236(进行)四舍五入,否则返回无效数ALZ赋值:对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2(进行)四舍五入AMZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2.236(进行)四舍五入,否则返回无效数ANZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2.382(进行)四舍五入,否则返回无效数AOZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2.5(进行)四舍五入,否则返回无效数APZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2.618(进行)四舍五入,否则返回无效数AQZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2.809(进行)四舍五入,否则返回无效数ARZ赋值:如果时间=1,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*3(进行)四舍五入,否则返回无效数ASZ赋值:对如果PLZ>PLL,返回PLZ,否则返回PLL(进行)四舍五入当满足条件到最后交易的周期=AAZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=ABZ时,在顶X和低X位置之间画当满足条件到最后交易的周期=ACZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=ADZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AEZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AFZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AGZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AHZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AIZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AJZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AKZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=ALZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AMZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=ANZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AOZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=APZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=AQZ时,在顶X和低X位置之间画当满足条件到最后交易的周期=ARZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色当满足条件到最后交易的周期=ASZ时,在顶X和低X位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色QAZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1/8(进行)四舍五入,否则返回无效数QBZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2/8(进行)四舍五入,否则返回无效数QCZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*3/8(进行)四舍五入,否则返回无效数QDZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*4/3(进行)四舍五入,否则返回无效数QEZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*5/8(进行)四舍五入,否则返回无效数QGZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*6/8(进行)四舍五入,否则返回无效数QHZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*7/8(进行)四舍五入,否则返回无效数QIZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*9/8(进行)四舍五入,否则返回无效数QJZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*1/3(进行)四舍五入,否则返回无效数QKZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*2/3(进行)四舍五入,否则返回无效数QMZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*10/8(进行)四舍五入,否则返回无效数QNZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*11/8(进行)四舍五入,否则返回无效数QOZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*5/3(进行)四舍五入,否则返回无效数QPZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*13/8(进行)四舍五入,否则返回无效数QQZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*14/8(进行)四舍五入,否则返回无效数QRZ赋值:如果时间=2,返回对如果PLZ>PLL,返回PLZ,否则返回PLL-PLZ-PLL的绝对值*15/8(进行)四舍五入,否则返回无效数输出BCVB:当满足条件到最后交易的周期=AAZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=ABZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=ACZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=ADZ时,在顶X*0.98位置书写文字画洋红色输出DGDGV:当满足条件到最后交易的周期=AEZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AFZ时,在顶X*0.98位置书写文字画洋红色输出VFBVBV:当满足条件到最后交易的周期=AGZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AHZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AIZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AJZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AKZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=ALZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AMZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=ANZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AOZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=APZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=AQZ时,在顶X*0.98位置书写文字画洋红色当满足条件到最后交易的周期=ARZ时,在顶X*0.98位置书写文字画洋红色程序源码高点:=15;低点:=10;时间:=1;价格:=1;前期高点:=C/HHV(H,120);近期高点:=C/HHV(H,21);PURC:=CONST(FINDHIGH(H,0,高点*10,1));PLZ:=CONST(BARSLAST(PURC=H))+1;顶X:=CONST(IF(PLZ=1,H,REF(H,PLZ-1)));QQT:=CONST(FINDLOW(L,0,低点*10,1));PLL:=CONST(BARSLAST(QQT=L))+1;低X:=CONST(IF(PLL=1,L,REF(L,PLL-1)));AAZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.809),DRAWNULL);ABZ:=ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.5);ACZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.618),DRAWNULL);ADZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.382),DRAWNULL);AEZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.236),DRAWNULL);AFZ:=ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1);AGZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.809),DRAWNULL);AHZ:=ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.5);AIZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.618),DRAWNULL);AJZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.382),DRAWNULL);AKZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.236),DRAWNULL);ALZ:=ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2);AMZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.236),DRAWNULL);ANZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.382),DRAWNULL);AOZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.5),DRAWNULL);APZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.618),DRAWNULL);AQZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.809),DRAWNULL);ARZ:=IF(时间=1,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*3),DRAWNULL);ASZ:=ROUND(IF(PLZ>PLL,PLZ,PLL));{时间黄金分割处画竖线指标}X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ABZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ACZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ADZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AEZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AFZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AGZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AHZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AIZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AJZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AKZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ALZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AMZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ANZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AOZ,顶X,低X,0,0),COLORMAGENTA;X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=AQZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ARZ,顶X,低X,0,0),COLORMAGENTA;STICKLINE(CURRBARSCOUNT=ASZ,顶X,低X,0,0),COLORMAGENTA;QAZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1/8),DRAWNULL);QBZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2/8),DRAWNULL);QCZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*3/8),DRAWNULL);QDZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*4/3),DRAWNULL);QEZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*5/8),DRAWNULL);QGZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*6/8),DRAWNULL);QHZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*7/8),DRAWNULL);QIZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*9/8),DRAWNULL);QJZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1/3),DRAWNULL);QKZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2/3),DRAWNULL);QMZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*10/8),DRAWNULL);QNZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*11/8),DRAWNULL);QOZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*5/3),DRAWNULL);QPZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*13/8),DRAWNULL);QQZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*14/8),DRAWNULL);QRZ:=IF(时间=2,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*15/8),DRAWNULL);{标注时间黄金分割位}BCVB:DRAWTEXT(CURRBARSCOUNT=AAZ,顶X*0.98,'0.809')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=ABZ,顶X*0.98,'0.500')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=ACZ,顶X*0.98,'0.618')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=ADZ,顶X*0.98,'0.382')COLORMAGENTA;DGDGV:DRAWTEXT(CURRBARSCOUNT=AEZ,顶X*0.98,'0.236')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AFZ,顶X*0.98,'1.00')COLORMAGENTA;VFBVBV:DRAWTEXT(CURRBARSCOUNT=AGZ,顶X*0.98,'1.809')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AHZ,顶X*0.98,'1.500')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AIZ,顶X*0.98,'1.618')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AJZ,顶X*0.98,'1.382')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AKZ,顶X*0.98,'1.236')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=ALZ,顶X*0.98,'2.00')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AMZ,顶X*0.98,'2.236')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=ANZ,顶X*0.98,'2.382')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AOZ,顶X*0.98,'2.500')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=APZ,顶X*0.98,'2.618')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=AQZ,顶X*0.98,'2.809')COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=ARZ,顶X*0.98,'3.00')COLORMAGENTA;该公式包含未来函数:DHIGH未发现:DOPEN...该公式包含未来函数:DLOW。
MA5:MA(CLOSE,5);MA10:MA(CLOSE,10);MA30:MA(CLOSE,30);MA60:MA(CLOSE,60),LINETHICK2;VAR3:=LLV(HIGH,240);VAR4:=100*(CLOSE-VAR3)/VAR3;VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100; VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100; VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE ,1)),7,1)*100;VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE ,1)),13,1)*100;VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) ANDREF(ZIG(3,22),1)<=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) ANDREF(ZIG(3,22),1)>=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) ANDREF(ZIG(3,51),1)<=REF(ZIG(3,51),2) ANDREF(ZIG(3,51),2)<=REF(ZIG(3,51),3);VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) ANDREF(ZIG(3,51),1)>=REF(ZIG(3,51),2) ANDREF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) ANDREF(ZIG(3,72),1)<=REF(ZIG(3,72),2) ANDREF(ZIG(3,72),2)<=REF(ZIG(3,72),3);VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) ANDREF(ZIG(3,72),1)>=REF(ZIG(3,72),2) ANDREF(ZIG(3,72),2)>=REF(ZIG(3,72),3);VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);买1:=VAR10;买2:=(VAR11+VAR13+VAR15+VAR17);卖1:=(VAR12+VAR14+VAR16+VAR18);B:=IF(买1>0 OR 买2>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORRED; DRAWTEXT(买1>0 OR 买2>0,LOW*0.99,' 买入'),COLORRED;S:=IF(卖1>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN; DRAWTEXT(卖1>0,HIGH*1.02,' 卖出'),COLORGREEN;VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) -LLV(LOW,20))));VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) -LLV(LOW,20))));VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) -LLV(LOW,5))),34));加仓:=CROSS(VAR200,MA(VAR300,5));DRAWTEXT(加仓>0,LOW*0.98,'★加仓'),COLOREE00EE;公式有未来。
通达信黄金K线主图指标公式本指标是在其他指标里摘录出来的,一些股票之前的走势,出先黄金K线时进入的话,好像还蛮可以的,当然也有出现黄金K线时下跌厉害的地方,其结果只能由将来来验证了!这个根据个人的爱好来选股!也欢迎大家拍砖和指正!A=(3C+H+L+O)6;XJ=(A+0.618REF(A,1)+0.382REF(A,2)+0.236REF(A,3)+0.146REF(A,4))2.382; YCZXH=(MA(HHV(A,2),5)+MA(HHV(A,2),13)+MA(HHV(A,2),21)+MA(HHV(A,2 ),32))4;YCZXL=(MA(LLV(A,2),5)+MA(LLV(A,2),13)+MA(LLV(A,2),21)+MA(LLV(A,2),32 ))4;PJ=(10A+9REF(A,1)+8REF(A,2)+7REF(A,3)+6REF(A,4)+5REF(A,5)+4REF(A,6 )+3REF(A,7)+2REF(A,8)+REF(A,9))55;A1=EMA(PJ,3),COLOR004000;A2=EMA(PJ,5),COLOR004000;A3=EMA(PJ,7),COLOR004000;A4=EMA(PJ,9),COLOR004000;A5=EMA(PJ,11),COLOR004000;LX=REF(XJ,1);ZD=(SMA(MAX(XJ-LX,0),5,1)SMA(ABS(XJ-LX),5,1))100;KX1=(CLOSE=OPEN) AND ZD=50;KX2=(CLOSEOPEN) AND ZD=50;KX3=(CLOSE=OPEN) AND ZD50;KX4=(CLOSEOPEN) AND ZD50;AAA2=SUM(IF( CLOSEREF(CLOSE,1),VOLC,0),0);AAA3=SUM(IF( CLOSEREF(CLOSE,1),VOLC,0),0);AAA4=SUM(IF( CLOSE=REF(CLOSE,1),VOLC,0),0);BBB1=0;B1万元=DVOLDCLOSE100;B1差=B1万元-REF(B1万元,1);B2万元=DVOLDCLOSE100;B2比=B2万元REF(B2万元,1);净流入万元=(AAA2-AAA3-0.5AAA4);PM=MA(净流入万元,1);PMA=PMREF(PM,1)1;PMB=REF(PMA,1)1 AND PMA;密码=(EMA(MA(B1万元,2),2))100000,COLORYELLOW,NODRAW;二日比=密码REF(密码,1);选股=PMB AND 密码REF(密码,1) AND 二日比1 ,COLORRED,NODRAW;均价线=AMOUNTV100;均价线2=MA(均价线,3);均价线5=MA(均价线,5);均价线10=MA(均价线,10);均价线30=MA(均价线,30);突破=C均价线2 AND 均价线2REF(均价线2,1) AND REF(均价线2,1)REF(均价线2,2)AND REF(均价线2,2)REF(均价线2,3) AND 选股; STICKLINE(突破,O,C,3,0),COLORYELLOW; STICKLINE(突破,H,C,0.01,0),COLORYELLOW; STICKLINE(突破,L,O,0.01,0),COLORYELLOW; DRAWTEXT(突破,L0.98, '黄金K线'),COLORYELLOW;。
通达信多纬度黄⾦分割尺主图指标公式(功能强⼤到⽆语)指标公式如下:⾼点:=22;低点:=10;GD:=CONST(FINDHIGH(H,0,⾼点*10,1));DD:=CONST(FINDLOW(L,0,低点*10,1));GT:=CONST(BARSLAST(GD=H))+1;DT:=CONST(BARSLAST(DD=L))+1;SH:=CONST(IF(GT=1,H,REF(H,GT-1)));SL:=CONST(IF(DT=1,L,REF(L,DT-1)));CC:=IF(DT>GT,DT,GT);CD:=INTPART(CC-(DT+GT)/2);CG:=IF(⾼点>CD,CD/2,⾼点);{黄⾦分割}ZG:=IF(CURRBARSCOUNT<=CD,SH,DRAWNULL);DRAWBAND(ZG,RGB(0,0,0),ZG,RGB(0,0,0)),DOTLINE,COLORLIRED;ZD:=IF(CURRBARSCOUNT<=CD,SL,DRAWNULL);DRAWBAND(ZD,RGB(0,0,0),ZD,RGB(0,0,0)),DOTLINE,COLORLIRED;X191:=IF(CURRBARSCOUNT<=CD,SH-(SH-SL)*0.191,DRAWNULL);DRAWBAND(X191,RGB(0,0,0),X191,RGB(0,0,0)),DOTLINE,COLORLIRED;X382:=IF(CURRBARSCOUNT<=CD,SH-(SH-SL)*0.382,DRAWNULL);DRAWBAND(X382,RGB(0,0,0),X382,RGB(0,0,0)),DOTLINE,COLORLIRED;X500:=IF(CURRBARSCOUNT<=CD,SH-(SH-SL)*0.500,DRAWNULL);DRAWBAND(X500,RGB(0,0,0),X500,RGB(0,0,0)),DOTLINE,COLORRED;X618:=IF(CURRBARSCOUNT<=CD,SH-(SH-SL)*0.618,DRAWNULL);DRAWBAND(X618,RGB(0,0,0),X618,RGB(0,0,0)),DOTLINE,COLORLIRED;X809:=IF(CURRBARSCOUNT<=CD,SH-(SH-SL)*0.809,DRAWNULL);DRAWBAND(X809,RGB(0,0,0),X809,RGB(0,0,0)),DOTLINE,COLORLIRED;DRAWTEXT(CURRBARSCOUNT=CG,(ZD)*1.02,STRCAT('起点:',CON2STR(ZD,2))),COLORLIGRAY;DRAWTEXT(CURRBARSCOUNT=CG,(X191)*0.986,STRCAT('80.9%',CON2STR(X191,2))),COLORLIGRAY;DRAWTEXT(CURRBARSCOUNT=CG,(X382)*0.985,STRCAT('61.8%',CON2STR(X382,2))),COLORLIGRAY;DRAWTEXT(CURRBARSCOUNT=CG,(X500)*0.984,STRCAT('50%',CON2STR(X500,2))),COLORLIGRAY;DRAWTEXT(CURRBARSCOUNT=CG,(X618)*0.982,STRCAT('38.2%',CON2STR(X618,2))),COLORLIGRAY;DRAWTEXT(CURRBARSCOUNT=CG,(X809)*0.98,STRCAT('19.1%',CON2STR(X809,2))),COLORLIGRAY;DRAWTEXT(CURRBARSCOUNT=CG,(ZG)*0.98,STRCAT('100%',CON2STR(ZG,2))),COLORLIGRAY;{斐波那契周期}DRAWTEXT(CURRBARSCOUNT=GT-2 ,L*0.98,'3'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-4 ,L*0.98,'5'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-7 ,L*0.98,'8'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-12 ,L*0.98,'13'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-20 ,L*0.98,'21'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-33 ,L*0.98,'34 '),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-54 ,L*0.98,'55'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-88 ,L*0.98,'89'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-143 ,L*0.98,'144'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-232 ,L*0.98,'233'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=GT-376 ,L*0.98,'377'),COLOR00FF00;DRAWTEXT(CURRBARSCOUNT=DT-2,H,'3'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-4,H,'5'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-7,H,'8'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-12,H,'13'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-20,H,'21'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-33,H,'34'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-54,H,'55'),DRAWABOVE,COLORRED;DRAWTEXT(CURRBARSCOUNT=DT-88,H,'89'),DRAWABOVE,COLORRED; DRAWTEXT(CURRBARSCOUNT=DT-143,H,'144'),DRAWABOVE,COLORRED; DRAWTEXT(CURRBARSCOUNT=DT-232,H,'233'),DRAWABOVE,COLORRED; DRAWTEXT(CURRBARSCOUNT=DT-376,H,'377'),DRAWABOVE,COLORRED; {幅度尺}STICKLINE(CURRBARSCOUNT=IF(DT<GT,DT,GT),SH,SL,0,-1),COLORRED; STICKLINE(CURRBARSCOUNT=IF(DT>GT,DT,GT),SH,SL,0,-1),COLORGREEN; DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.1,STRCAT('⼀10% ',CON2STR(SH-SH*0.1,2))),COLORBLUE;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.15,STRCAT('⼀15% ',CON2STR(SH-SH*0.15,2))),COLORCYAN;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.2,STRCAT('⼀20% ',CON2STR(SH-SH*0.2,2))),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.3,STRCAT('⼀30% ',CON2STR(SH-SH*0.3,2))),COLORWHITE;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.4,STRCAT('⼀40% ',CON2STR(SH-SH*0.4,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.5,STRCAT('⼀50% ',CON2STR(SH-SH*0.5,2))),COLORRED;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.6,STRCAT('⼀60% ',CON2STR(SH-SH*0.6,2))),COLORLIMAGENTA;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.7,STRCAT('⼀70% ',CON2STR(SH-SH*0.7,2))),COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.8,STRCAT('⼀80% ',CON2STR(SH-SH*0.8,2))),COLORWHITE;DRAWTEXT(CURRBARSCOUNT=GT,SH-SH*0.9,STRCAT('⼀90% ',CON2STR(SH-SH*0.9,2))),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.1,STRCAT('⼀10%',CON2STR(SL*1.1,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.15,STRCAT('⼀15%',CON2STR(SL*1.15,2))),COLORWHITE;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.2,STRCAT('⼀20%',CON2STR(SL*1.2,2))),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.25,STRCAT('⼀25%',CON2STR(SL*1.25,2))),COLORLIMAGENTA;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.3,STRCAT('⼀30%',CON2STR(SL*1.3,2))),COLORRED;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.4,STRCAT('⼀40%',CON2STR(SL*1.4,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.5,STRCAT('⼀50%',CON2STR(SL*1.5,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.6,STRCAT('⼀60%',CON2STR(SL*1.6,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.7,STRCAT('⼀70%',CON2STR(SL*1.7,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.8,STRCAT('⼀80%',CON2STR(SL*1.8,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*1.9,STRCAT('⼀90%',CON2STR(SL*1.9,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*2,STRCAT('⼀100%',CON2STR(SL*2,2))),COLORYELLOW;{DRAWTEXT(CURRBARSCOUNT=DT,SL*2.25,STRCAT('⼀125%',CON2STR(SL*2.25,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*2.5,STRCAT('⼀150%',CON2STR(SL*2.5,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*2.75,STRCAT('⼀175%',CON2STR(SL*2.75,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*3,STRCAT('⼀200%',CON2STR(SL*3,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*3.5,STRCAT('⼀250%',CON2STR(SL*3.5,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*3.75,STRCAT('⼀275%',CON2STR(SL*375,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*4,STRCAT('⼀300% ',CON2STR(SL*4,2))),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=DT,SL*5,STRCAT('⼀400% ',CON2STR(SL*5,2))),COLORYELLOW;}。
主图K线画三角形主图源码通达信A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1);B10304:=FILTER(A10304,3);C10304:=BACKSET(B10304,3+1);D10304:=FILTER(C10304,3);{高点}A20304:=REF(LOW,3)=LLV(LOW,2*3+1);B20304:=FILTER(A20304,3);C20304:=BACKSET(B20304,3+1);D20304:=FILTER(C20304,3);{低点}E10304:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E20304:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}H10304:=(D10304 AND NOT(D20304 AND E10304>=E20304)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;H20304:=D10304 AND NOT(D20304 AND E10304>=E20304);L10304:=D20304 AND NOT(D10304 AND E10304=E20304);X10304:=REF(BARSLAST(H10304),1)+1;F10304:=BACKSET(H10304 ANDCOUNT(L10304,X10304)>0,LLVBARS(IF(L10304,LOW,10000),X10304));G10304:=F10304>REF(F10304,1);I10304:=BACKSET(G10304,2);LD0304:=I10304>REF(I10304,1);{过滤后低点}L20304:=LD0304 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;X20304:=REF(BARSLAST(L20304),1)+1;F2:=BACKSET(L20304 ANDCOUNT(H20304,X20304)>0,HHVBARS(IF(H20304,HIGH,0),X20304));G20304:=F2>REF(F2,1); I2:=BACKSET(G20304,2);HD0304:=I2>REF(I2,1);{过滤后高点}J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD0304),BARSLAST(LD0304))+1); J2:=J1>REF(J1,1);A3:=H;B3:=REF(H,REF(BARSLAST(HD0304),1)+1)>REF(H,REF(BARSLAST(HD0304), 1)+2+REF(BARSLAST(HD0304),REF(BARSLAST(HD0304),1)+2));D3:=A3 AND B3 AND HD0304;E3:=BACKSET(D3,REF(BARSLAST(HD0304),1)+2);HH:=E3>REF(E3,1);{找出全部长期高点}A4:=L>REF(L,REF(BARSLAST(LD0304),1)+1);B4:=REF(L,REF(BARSLAST(LD0304),1)+1);D4:=A4 AND B4 AND LD0304;E4:=BACKSET(D4,REF(BARSLAST(LD0304),1)+2);LL:=E4>REF(E4,1);{找出全部长期低点}H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤,方法同前。
通达信终极黄金主图指标公式【短线关注、控制风险、逃顶、低吸】DIFF:=EMA(C,5)-EMA(C,20);DEA:=EMA(DIFF,10);MACD:=2*(DIFF-DEA);JC:=CROSS(DIFF,DEA);SC:=CROSS(DEA,DIFF);DCJC:=JC AND DEA>0;VAR1:=1;VAR2:=(CLOSE-MA(CLOSE,30))/MA(CLOSE,30)*100;VAR3:=CLOSE>OPEN AND OPEN-LOW>HIGH-CLOSE;VAR4:=REF(VAR2,1)<-20 AND VAR3;VAR5:=REF(VAR2,1)<-20 AND CLOSE>OPEN AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*1000>20;VAR6:=FILTER(VAR4 OR VAR5,3);VAR7:=OPEN>CLOSE AND HIGH-IF(CLOSE>OPEN,CLOSE,OPEN)>IF(OPEN<CLOSE,OPEN,CLOSE)-LOW;VAR8:=REF(VAR2,1)>ABS(-20) AND VAR7;VAR9:=REF(VAR2,1)>ABS(-20) AND CLOSE<OPEN AND (REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*1000>20;VARA:=FILTER(VAR8 OR VAR9,3);VARB:=CLOSE>OPEN AND OPEN-LOW>HIGH-CLOSE;VARC:=REF(VAR2,1)<-13 AND VAR3;VARD:=REF(VAR2,1)<-13 AND CLOSE>OPEN AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*1000>20;VARE:=FILTER(VARC OR VARD,3);VARF:=OPEN>CLOSE AND HIGH-IF(CLOSE>OPEN,CLOSE,OPEN)>IF(OPEN<CLOSE,OPEN,CLOSE)-LOW;VAR10:=REF(VAR2,1)>ABS(-13) AND VAR7;VAR11:=REF(VAR2,1)>ABS(-13) AND CLOSE<OPEN AND (REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*1000>20;VAR12:=FILTER(VAR10 OR VAR11,3);DRAWTEXT(VARE*VAR1>0,LOW,'短线关注'),COLORRED;DRAWTEXT(VAR12*VAR1>0,HIGH,'控制风险'),COLORCYAN ;LC:=REF(CLOSE,1);RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWTEXT(CROSS(84,RSI) , HIGH,'→逃顶'),COLORBLUE ; DRAWTEXT(CROSS(RSI,11) , LOW,'→低吸'),COLORRED ; JJ:=(CLOSE+HIGH+LOW)/3;A:=EMA(JJ,5);B:=REF(A,1);终极黄金:STICKLINE(A>B,A,B,5,0),COLORC44CF0;一卸千里:STICKLINE(A<B,A,B,5,0),COLORBLUE;天籁:HHV(HIGH,35),COLORRED,LINETHICK2;地籁:LLV(LOW,55),COLORRED,LINETHICK2;三十四日:MA(CLOSE,34);八十九日:MA(CLOSE,89);一百四十四日:MA(CLOSE,144);无穷成本均线: DMA(CLOSE,VOL/CAPITAL),LINET HICK2;。
M30:=MA(CLOSE,30);压力线:M30 + 2*STD(CLOSE,55),COLOR1010FF,LINETHICK1;支撑线:M30 - 2*STD(CLOSE,55),COLOR1010FF,LINETHICK1;BOLL:MA(CLOSE,10),COLORWHITE,LINETHICK2;UPPER:BOLL+2*STD(CLOSE,10),COLORYELLOW,LINETHICK2;LOWER:BOLL-2*STD(CLOSE,10),COLORLIMAGENTA,LINETHICK2;HH:=HHV(H,200);LL:=LLV(L,200);上涨:BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=LL)+1)),COLOR0000FF,NO DRAW;↑空间%:(C/REF(L,上涨)-1)*100,COLOR00FFFF,NODRAW;最高%:(HH/REF(L,上涨)-1)*100,COLORFF00FF,NODRAW;下跌:BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=HH)+1)),COLOR00FF00,N ODRAW;↓空间%:(C/REF(H,下跌)-1)*100,COLOR888899,NODRAW;最低%:(LL/REF(H,下跌)-1)*100,COLORFF0000,NODRAW;天线:REFDATE(REF(H,下跌),DATE),POINTDOT,LINETHICK3,COLORYELLOW;地线:REFDATE(REF(L,上涨),DATE),POINTDOT,LINETHICK3,COLOR00FF00; 中线:REFDATE((天线-地线)*0.5+地线,DATE),POINTDOT,LINETHICK3,COLOR00FF00;STICKLINE(上涨=0,天线,地线,0,-1),COLORYELLOW;STICKLINE(下跌=0,天线,地线,0,-1),COLORGREEN;DRAWTEXT(下跌=0,地线*1.01,'-最低'),COLOR00FF00;DRAWTEXT(上涨=0,天线*0.99,'-最高'),COLOR0000FF;{2}高:=天线;低:=地线;H1:=高-(高-低)*0.191;H2:=高-(高-低)*0.382;H3:=高-(高-低)*0.5;H4:=高-(高-低)*0.618;H5:=高-(高-低)*0.809;DRAWTEXT(下跌=0,高,'高'),COLORGREEN;DRAWTEXT(下跌=0,H1,'809'),COLORCYAN;DRAWTEXT(下跌=0,H2,'618'),COLORGRAY;DRAWTEXT(下跌=0,H3,'中'),COLORYELLOW;DRAWTEXT(下跌=0,H4,'382'),COLORLIRED;DRAWTEXT(下跌=0,H5,'191'),COLORMAGENTA;DRAWTEXT(上涨=0,H1,'风险'),COLORCYAN;DRAWTEXT(上涨=0,H2,'高位'),COLORGRAY;DRAWTEXT(上涨=0,H3,'中'),COLORYELLOW;DRAWTEXT(上涨=0,H4,'低吸'),COLORLIRED;DRAWTEXT(上涨=0 ,H5,'盘整'),COLORMAGENTA;DRAWTEXT(上涨=0,低,'低'),COLORRED;DRAWTEXT(上涨=5,H*1.02,'5'),COLOR00FFFF;DRAWTEXT(上涨=8,H*1.02,'8'),COLOR00FFFF;DRAWTEXT(上涨=13,H*1.02,'13'),COLOR00FFFF;DRAWTEXT(上涨=21,H*1.02,'21'),COLOR00FFFF;DRAWTEXT(上涨=34,H*1.02,'34'),COLOR00FFFF;DRAWTEXT(上涨=55,H*1.02,'55'),COLOR00FFFF;DRAWTEXT(上涨=89,H*1.02,'89'),COLOR00FFFF;DRAWTEXT(上涨=144,H*1.02,'144'),COLOR00FFFF;DRAWTEXT(上涨=180,H*1.02,'180'),COLOR00FFFF;DRAWTEXT(上涨=250,H*1.02,'250'),COLOR00FFFF;DRAWTEXT(下跌=5,L*0.98,'-5'),COLOR00FF00;DRAWTEXT(下跌=8,L*0.98,'-8'),COLOR00FF00;DRAWTEXT(下跌=13,L*0.98,'-13'),COLOR00FF00;DRAWTEXT(下跌=21,L*0.98,'-21'),COLOR00FF00;DRAWTEXT(下跌=34,L*0.98,'-34'),COLOR00FF00;DRAWTEXT(下跌=55,L*0.98,'-55'),COLOR00FF00;DRAWTEXT(下跌=89,L*0.98,'-89'),COLOR00FF00;DRAWTEXT(下跌=144,L*0.98,'-144'),COLOR00FF00; DRAWTEXT(下跌=180,L*0.98,'-180'),COLOR00FF00; DRAWTEXT(下跌=250,L*0.98,'-250'),COLOR00FF00;。
通达信黄金三角上是望高台主图指标公式MA5:MA(C,5);MA6:=MA(C,6);MA10:MA(C,10);MA20:MA(C,20);A2:=REF(MA20,1);J1:=(MA20-A2)/A2*100;MJ1:=MA(J1,3);MA30:MA(C,30);MA60:MA(C,60);MA120:MA(C,120);乖离2:=(MA20-MA30)/MA30*100;VAR1:=IF(BETWEEN(乖离2,-2,5),2,0);MAX1:=MAX(MA20,MA30);MAX2:=MAX(MAX1,MA60);MIN1:=MIN(MA20,MA30);MIN2:=MIN(MIN1,MA60);K1:=(MAX2/MIN2-1)*100;{粘合度符合条件}VAR2:=IF(K1<=8,1,0);短线暴张:DRAWTEXT(FILTER( (VAR1 OR VAR2) AND MA10>REF(MA10,1) AND COUNT(MA30>REF(MA30,1),3)=3 AND MA30>MA60 AND COUNT(CROSS(MA5,MA30),3) AND J1>MJ1 AND MA(V,5)>MA(V,60)AND MA(V,60)>REF(MA(V,60),1),5),MA60*0.99,'短线暴张'),COLORRED;DRAWTEXT(CROSS("KDJ.K"(5,2,3),"KDJ.D"(5,2,3)) AND "KDJ.D"(5,2,3)<30 AND J1>MJ1 AND MA60>REF(MA60,1) AND COUNT(J1<1,3)>=1 ,L*0.995,'←买入'),COLORYELLOW;DRAWTEXT(CROSS("KDJ.D"(5,2,3),"KDJ.K"(5,2,3)) AND "KDJ.D"(5,2,3)>65 AND J1<MJ1 AND COUNT(J1>1,3)>=1,H*1.005,'←卖出'),COLORGREEN;DRAWTEXT(CROSS("KDJ.D"(18,9,6),"KDJ.K"(18,9,6)) AND "KDJ.D"(18,9,6)>60 AND "KDJ.J"(45,15,15)>90,H*1.03,'←顶'),COLORRED;DRAWTEXT(CROSS(MA5,MA6) AND "KDJ.K"(5,3,3)>=50 AND "KDJ.J"(5,3,3)<31 ,L*0.92,'←再买'),COLORMAGENTA;XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04));XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100);XL3:=CROSS(XL2,(0 - 20));DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW - 0.4),'●买点');DRAWTEXT((XL3 > 0),(LOW - 0.2),'●绝对底部');X6:=REF(CLOSE,1);X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);X8:=CROSS(79,X7);X9:=FILTER(X8,4);DRAWTEXT(X9,(HIGH * 1.02),'●出货'),COLOR9000F5;STICKLINE(C>1.098*REF(C,1),C,O,0,0),COLORYELLOW;AAA:=CONST(HHV(H,90));R1:=MA(CLOSE,1);R2:=MA(CLOSE,3);R3:=(MA(R2,1)*1);R4:=(MA(R2,3)*1);LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;VAR12:=(HIGH+LOW+CLOSE)/3;VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0); VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;VAR18:=100-ABS(VAR17);VAR19:=IF(VAR18<90,VAR18,100);VAR1A:=IF(VARE>0,VARE,0);VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66;AA1:=AMOUNT/V;BB1:=L<AA1*0.9;CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;DRAWTEXT(老鼠仓,(LOW* 0.99),'老鼠仓'),COLOR40CCFF;A74:=MA(CLOSE,20);A75:=(CLOSE > MA(CLOSE,5));A76:=(MA(CLOSE,5) > MA(CLOSE,10));A77:=(CLOSE > MA(CLOSE,10));A78:=(MA(CLOSE,5) > MA(CLOSE,20));A79:=(CLOSE > MA(CLOSE,20));A710:=REF(A74,1);A711:=(A74 > A710);AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))+ IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));DSLX:=(CLOSE / INDEXC);DSLX1:=MA(DSLX,5);DSLX2:=MA(DSLX,10);V1:=MA(VOL,5);V2:=MA(VOL,10);T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0)); T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0)); T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0)); T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0)); AA:=BARSCOUNT(C);AH:=HHV(H,200);AL:=LLV(L,200);A0:=(AH-AL)/40;B1:=L-A0;STICKLINE((AA+0)/34=FLOOR((AA+0)/34),B1,B1-1.5*A0,2,0),COLORF00FF0; DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),B1-1*A0,'时间窗变盘'),COLORF00FF0;VAR2S:=(2*CLOSE+HIGH+LOW)/4;VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1);VAR4S:=LLV(LOW,5); VAR5S:=HHV(HIGH,4);散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S;DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.05,'←吸'),COLORRED;BBB1:=MA(C,1);B2:=SMA(SMA(SMA(BBB1,2,1),2,1),2,1),COLORRED;SMA2:=MA(B2,2);VARB1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21)))); VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)); 买:DRAWTEXT(CROSS(VARB1,VAR3) AND B2>SMA2,(LOW * 0.97),'←⊙鱼儿买'),COLORRED;新SAR100:=NEWSAR(1,100),COLORLIMAGENTA;新SAR10:=NEWSAR(1,10);新SAR5:=NEWSAR(1,5);新SAR1:=NEWSAR(1,1);现价:=C;DRAWBAND(新SAR10,RGB(41,36,33),新SAR100+0.02,RGB(41,36,33));前20内高:=HHV(C,20);昨前高:CONST(REF(前20内高,2)),COLORYELLOW;XX:=DRAWLINE(CURRBARSCOUNT=5,昨前高*0.98,CURRBARSCOUNT=1,昨前高,0); DRAWBAND(昨前高,RGB(255,255,0),XX,RGB(0,0,0));XX1:=DRAWLINE(CURRBARSCOUNT=9,昨前高,CURRBARSCOUNT=5,昨前高*0.98,0); DRAWBAND(昨前高,RGB(255,255,0),XX1,RGB(0,0,0));新SAR101:NEWSAR(1,100),COLORLIMAGENTA;DRAWKLINE(HIGH,OPEN,LOW,CLOSE);DRAWRECTREL(780,850,920,980,90);DRAWTEXT_FIX(1,0.81,0.9,0,'两山凹陷处有大阳'),COLORYELLOW;DRAWRECTREL(680,50,820,170,90);DRAWTEXT_FIX(1,0.70,0.10,0,'黄金三角上是望高台'),COLORYELLOW;反转:=新SAR101<REF(新SAR101,1) AND REF(新SAR101,1)<REF(新SAR101,2) AND REF(新SAR101,2)<REF(新SAR101,3) AND C>新SAR101;{选股时去掉前面的等号}M120:MA(C,120);M240:MA(C,240);MSAR24:MA(新SAR100,24),COLORYELLOW;。
MA5:MA(C,5),COLORYELLOW;MA10:MA(CLOSE,10),COLORFF00FF;MA30:MA(C,30),COLORRED,LINETHICK2;跌:IF(MA(CLOSE,30)<=REF(MA(CLOSE,30),1),MA(CLOSE,30),DRAWNULL),CO LORGREEN,LINETHICK2;MA60:MA(CLOSE,60),COLORFFCC66;GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));BAIJIN1:=BARSLAST(CROSS(30,GJTJ1))<2 ANDBARSLAST(CROSS(GJTJ1,50))<2;BAIJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;BAIJIN3:=GJTJ1>60 AND GJTJ4>70;DRAWTEXT(BAIJIN1 AND BAIJIN2 AND BAIJIN3,L-0.02,'白金'),COLORWHITE; HUANGJIN1:=BARSLAST(CROSS(50,GJTJ1))<3 ANDBARSLAST(CROSS(GJTJ1,50))<3;HUANGJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4; DRAWTEXT(HUANGJIN1 AND HUANGJIN2,L-0.03,'黄金'),COLORYELLOW; XG:=BARSLAST(CROSS(GJTJ4,GJTJ1))<5 AND GJTJ1>GJTJ4; DRAWTEXT(COUNT(XG,3)=1 AND XG AND C>MA(C,20),L-0.02,'启动金三角'),COLORRED;M10:=MA(C,10);M13:=MA(C,13);VVVV5:=CROSS(M10,M13);WWF1:DRAWICON(VVVV5,H,11);QQQQ1:STICKLINE(VVVV5<C,REF(C,BARSLAST(CROSS(M10,M13))),REF(C,BA RSLAST(CROSS(M10,M13))),-1,-1),COLORWHITE;RC1:=REF(C,1);大阴线:=C<0.96*O OR C<=RC1*0.96 OR C>1000 AND C<=RC1*0.98;大阴T:=BARSLAST(FILTER(大阴线,3));{调整显示密度}大阴实顶: REF(O,大阴T),COLORLIGREEN,POINTDOT;{显示大阴K线的开盘价O};MTM:=MA(C,6)-MA(C,13)+C;MTMMA:MA(MTM,5),DOTLINE,COLORRED;AAA:=(3*C+H+L+O)/6;VAR21:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA, 4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR21;立桩量:=FILTER(TJ1,5);D1:REF(LOW,BARSLAST(立桩量)),COLORYELLOW,NODRAW,LINETHICK1;买线:=EMA(C,2);卖线:=EMA(SLOPE(C,21)*20+C,42);BU:=CROSS(买线,卖线);SEL:=CROSS(卖线,买线);DRAWICON(BU,L-0.1,1);DRAWICON(SEL,H+0.1,2);空:=EMA(CLOSE,5);动平衡:EMA(空,34),COLORYELLOW,LINETHICK2;双线持币:HHV(MA(HIGH,3),2),COLORGREEN,LINETHICK2;单线持股:LLV(MA(HIGH,3),1),COLORRED,LINETHICK2;STICKLINE(买线>=卖线,LOW,HIGH,0,0),COLORLIRED;STICKLINE(买线>=卖线,CLOSE,OPEN,3,2),COLORLIRED;STICKLINE(买线<卖线,LOW,HIGH,0,0),COLORCYAN;STICKLINE(买线<卖线,CLOSE,OPEN,3,2),COLORCYAN;STICKLINE(OPEN>CLOSE,CLOSE,OPEN,2.5,0),COLORCYAN;涨停:=IF(REF(C,1)*1.1-C<0.2 ,1,0);STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW;STICKLINE(涨停,H,L,0,0),COLORYELLOW;核心K线:=V/REF(V,1)>=1.91 AND C>REF(C,1) AND C>O;TT:=V=HHV(V,21);BBL:=核心K线AND TT;BL:=FILTER(BBL,2);K1:=SUMBARS(BL,1);一买:=BL,NODRAW;DRAWTEXT(一买,L,'↖一买'),COLORYELLOW;二买:=CROSS(C,REFV(C,K1-1)),NODRAW;DRAWTEXT(二买,REFV(C,K1-1),'↖二买'),COLORRED;。
通达信⾦三⾓波段主图源码⾦三⾓波段主DRAWGBK(C>O,RGB(205,105,0),RGB(0,0,0),1,2,1);DRAWTEXT_FIX(1,0.65,0,0,'所属⾏业: ')COLORCYAN,LINETHICK2;DRAWTEXT_FIX(1,0.72,0,0,HYBLOCK), COLORRED,LINETHICK2;DRAWTEXT_FIX(1,0.50,0,0,'所属地区: ')COLORCYAN,LINETHICK2;DRAWTEXT_FIX(1,0.57,0,0,DYBLOCK), COLORRED,LINETHICK2;{稳涨}红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW;轨道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2;NOTEXT_升:IF(红轨道>=轨道,轨道,DRAWNULL),COLORMAGENTA,LINETHICK2;AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);BA:=EMA(AB,5);A1{⾼}:=REFDATE(REF(HHV(H,96),5),DATE);B1{低}:=REFDATE(REF(LLV(L,96),5),DATE);DY{中}:=((A1)+(B1))/2;箱顶:IF(AB>0 AND AB-BA<=0,A1,A1),LINETHICK3,COLOR00FF00;箱腰:IF(AB>0 AND AB-BA<=0,DY,DY),LINETHICK3,COLOR00FF00;箱低:IF(AB>0 AND AB-BA<=0,B1,B1),LINETHICK3,COLOR00FF00;⾼1:IF(AB>0 AND AB-BA>0,A1,DRAWNULL),LINETHICK3,COLORRED;中1:IF(AB>0 AND AB-BA>0,DY,DRAWNULL),LINETHICK3,COLORRED;低1:IF(AB>0 AND AB-BA>0,B1,DRAWNULL),LINETHICK3,COLORRED;{⾦三⾓波段拐点定位线,有未来函数}局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);局部⾼点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);局部⾼点预选B:=BACKSET(局部⾼点预选A=0 AND REF(局部⾼点预选A,1)=1,2);局部⾼点预选C:=IF(局部⾼点预选B=1 AND REF(局部⾼点预选B,1)=0,1,0);缺⼝判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));距前⾼天:=BARSLAST(局部⾼点预选C=1);距前低天:=BARSLAST(局部低点预选C=-1);⼩值周期:=LOWRANGE(L);⼤值周期:=TOPRANGE(H);低保留AA:=IF(局部低点预选C=-1 AND REF(距前⾼天,1)>REF(距前低天,1) AND LLV(L,距前⾼天+1)<REF(LLV(L,距前⾼天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1 AND REF(距前⾼天,1)<=REF(距前低天,1) AND (距前⾼天>=4 OR LLV(缺⼝判断,距前⾼天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前⾼天+1),-1,0);预判:=IF((距前低天<4 AND HHV(缺⼝判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);判断:=IF(局部⾼点预选C=1 AND REF(距前低天,1)<=REF(距前⾼天,1) AND 预判=1 AND ⼤值周期>REF(⼩值周期,距前低天+1) AND ⼤值周期>REF(⼩值周期,距前低天) AND ⼤值周期>REF(⼤值周期,距前⾼天),1,0);⾼保留A:=IF(局部⾼点预选C=1 AND REF(距前低天,1)>REF(距前⾼天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);⾼保留B:=IF(局部⾼点预选C=1 AND REF(距前低天,1)<=REF(距前⾼天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺⼝判断,距前低天)=1),1,0);⾼保留:=IF((⾼保留A=1 OR ⾼保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);预判A:=IF((距前⾼天<4 AND HHV(缺⼝判断,距前⾼天)!=1) OR REF(⾼保留,距前⾼天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前⾼天,1)<=REF(距前低天,1) AND 预判A=1 AND ⼩值周期>REF(⼤值周期,距前⾼天+1) AND ⼩值周期>REF(⼤值周期,距前⾼天) AND ⼩值周期>REF(⼩值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1 AND REF(距前⾼天,1)>REF(距前低天,1) AND LLV(L,距前⾼天+1)<REF(LLV(L,距前⾼天+1),1),-1,0);低保留B:=IF(局部低点预选C=-1 AND REF(距前⾼天,1)<=REF(距前低天,1) AND (距前⾼天>=4 OR LLV(缺⼝判断,距前⾼天)=-1 OR 判断A=-1),-1,0);低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前⾼天+1),-1,0);距前⾼天A:=BARSLAST(⾼保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF((距前低天A<4 AND HHV(缺⼝判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);判断X:=IF(局部⾼点预选C=1 AND REF(距前低天A,1)<=REF(距前⾼天A,1) AND 预判X=1 AND ⼤值周期>REF(⼩值周期,距前低天A+1) AND ⼤值周期>REF(⼩值周期,距前低天A) AND ⼤值周期>REF(⼤值周期,距前⾼天A),1,0);⾼保留XA:=IF(局部⾼点预选C=1 AND REF(距前低天A,1)>REF(距前⾼天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);⾼保留XB:=IF(局部⾼点预选C=1 AND REF(距前低天A,1)<=REF(距前⾼天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺⼝判断,距前低天A)=1),1,0);⾼保留X:=IF((⾼保留XA=1 OR ⾼保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);预判XA:=IF((距前⾼天A<4 AND HHV(缺⼝判断,距前⾼天A)!=1) OR REF(⾼保留XA,距前⾼天A)=0,1,0);判断XA:=IF(局部低点预选C=-1 AND REF(距前⾼天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND ⼩值周期>REF(⼤值周期,距前⾼天A+1) AND ⼩值周期>REF(⼤值周期,距前⾼天A) AND ⼩值周期>REF(⼩值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1 AND REF(距前⾼天A,1)>REF(距前低天A,1) AND LLV(L,距前⾼天A+1)<REF(LLV(L,距前⾼天A+1),1),-1,0);低保留XB:=IF(局部低点预选C=-1 AND REF(距前⾼天A,1)<=REF(距前低天A,1) AND (距前⾼天A>=4 OR LLV(缺⼝判断,距前⾼天A)=-1 OR 判断XA=-1),-1,0);低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前⾼天A+1),-1,0);距前⾼天YA:=BARSLAST(⾼保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF((距前低天YA<4 AND HHV(缺⼝判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部⾼点预选C=1 AND REF(距前低天YA,1)<=REF(距前⾼天YA,1) AND 预判YX=1 AND ⼤值周期>REF(⼩值周期,距前低天YA+1) AND ⼤值周期>REF(⼩值周期,距前低天YA) AND ⼤值周期>REF(⼤值周期,距前⾼天YA),1,0);⾼保留YXA:=IF(局部⾼点预选C=1 AND REF(距前低天YA,1)>REF(距前⾼天YA,1) ANDHHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);⾼保留YXB:=IF(局部⾼点预选C=1 AND REF(距前低天YA,1)<=REF(距前⾼天YA,1) ANDREF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺⼝判断,距前低天YA)=1),1,0);⾼保留YX:=IF((⾼保留YXA=1 OR ⾼保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);预判YXA:=IF((距前⾼天YA<4 AND HHV(缺⼝判断,距前⾼天YA)!=1) OR REF(⾼保留YXA,距前⾼天YA)=0,1,0);判断YXA:=IF(局部低点预选C=-1 AND REF(距前⾼天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND ⼩值周期>REF(⼤值周期,距前⾼天YA+1) AND ⼩值周期>REF(⼤值周期,距前⾼天YA) AND ⼩值周期>REF(⼩值周期,距前低天YA),-1,0);低保留YXA:=IF(局部低点预选C=-1 AND REF(距前⾼天YA,1)>REF(距前低天YA,1) AND LLV(L,距前⾼天YA+1)<REF(LLV(L,距前⾼天YA+1),1),-1,0);低保留YXB:=IF(局部低点预选C=-1 AND REF(距前⾼天YA,1)<=REF(距前低天YA,1) AND (距前⾼天YA>=4 OR LLV(缺⼝判断,距前⾼天YA)=-1 OR 判断YXA=-1),-1,0);低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前⾼天YA+1),-1,0); AAAD:=IF(⾼保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前⾼天YA,1)+2),1,IF(⾼保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));极点保留:=IF(AAAD=0,⾼保留YX+低保留YX,AAAD);局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)),CIRCLEDOT,COLORYELLOW; DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIRED,LINETHICK1; DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORLICYAN,LINETHICK1;DD1:=BARSLAST(ABS(极点保留)!=1);DRAWTEXT(极点保留=1,局部极点,'卖'),COLORLIBLUE;DRAWTEXT(极点保留=-1,局部极点,'买'),COLORRED;{跌K线}DRAWKLINE(HIGH,OPEN,LOW,CLOSE);STICKLINE(O>=C,C,O,2.6,0),COLORFF0000;STICKLINE(O>=C,C,O,1.9,0),COLORFF3300;STICKLINE(O>=C,C,O,1.2,0),COLORFF6600;STICKLINE(O>=C,C,O,0.5,0),COLORFF9900;{涨K线}STICKLINE(C>O,C,O,2.6,0),COLOR000088;STICKLINE(C>O,C,O,1.9,0),COLOR0000AA;。
★黄金三角主图★自用
新SAR100:=NEWSAR(1,100);
新SAR10:=NEWSAR(1,10);
新SAR5:=NEWSAR(1,5);
新SAR1:=NEWSAR(1,1);
{DRAWBAND(新SAR10,RGB(41,36,33),新SAR100+0.02,RGB(41,36,33));} DRAWBAND(新SAR10,RGB(47,79,79),新SAR100+0.02,RGB(47,79,79));
前20内高:=HHV(C,20);
昨前高:CONST(REF(前20内高,2)),COLOR49B9FD;
XX:=DRAWLINE(CURRBARSCOUNT=5,昨前高*0.9,CURRBARSCOUNT=1,昨前高,0); DRAWBAND(昨前高,RGB(253,185,73),XX,RGB(0,0,0));
XX1:=DRAWLINE(CURRBARSCOUNT=9,昨前高,CURRBARSCOUNT=5,昨前高*0.9,0); DRAWBAND(昨前高,RGB(253,185,73),XX1,RGB(0,0,0));
新SAR101:NEWSAR(1,100),COLORLIGRAY;
DRAWRECTREL(780,850,920,980,90);
DRAWTEXT_FIX(1,0.81,0.9,0,'两山凹陷处有大阳'),COLORYELLOW; DRAWRECTREL(680,50,820,170,90);
DRAWTEXT_FIX(1,0.70,0.10,0,'黄金三角上是望高台'),COLORYELLOW;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
反转:新SAR101<REF(新SAR101,1) AND REF(新SAR101,1)<REF(新SAR101,2) AND REF(新SAR101,2)<REF(新SAR101,3) AND C>新SAR101,NODRAW,COLORRED;{选股时去掉前面的等号}
DRAWICON(反转,L*0.985,38);
M72:MA(C,72),COLORLIGREEN,LINETHICK2;
IF(M72>REF(M72,1),M72,DRAWNULL),COLORRED,LINETHICK2;
M240:MA(C,240),COLORLICYAN;
MSAR24:MA(新SAR100,24),COLORMAGENTA;
{13天变盘时间窗}
AA:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
A0:=(AH-AL)/150;
B1:=L-A0;
STICKLINE((AA+0)/13=FLOOR((AA+0)/13),B1,B1-A0,4,0),COLORF00FF0; DRAWTEXT((AA+0)/13=FLOOR((AA+0)/13),B1-A0,'时窗'),COLORF00FF0;
{老鼠仓}
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠仓:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(老鼠仓,LOW* 0.985,'△老鼠仓'),COLOR40CCFF;
{黄金柱}
C1:=(2*C+H+L+O)/5;
VAR11:=(8*C1+7*REF(C1,1)+6*REF(C1,2)+5*REF(C1,3)+4*REF(C1,4)+3*REF(C1,5)+2 *REF(C1,6)+REF(C1,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR11 AND C>REF(C,1); LJL:=FILTER(TJ1,5);
STICKLINE(LJL,OPEN,CLOSE,0,1),COLORYELLOW;
DRAWTEXT(LJL,L,'←金柱'),COLORYELLOW;
DRAWTEXT(LJL,O+(C-O)*0.618,'------'),COLORYELLOW;{在黄金柱实体的0.618处画虚线} CONST(C),POINTDOT,COLORLIGRAY;
{基本面}
DRAWTEXT_FIX(1,0.00,0.14,0,DYBLOCK),COLORYELLOW,LINETHICK2;
DRAWTEXT_FIX(1,0.00,0.00,0,'主题投资:'),COLORRED;
DRAWTEXT_FIX(1,0.075,0.00,0,EXTERNSTR(0,1)),COLORLIMAGENTA;
DRAWTEXT_FIX(1,0.00,0.08,0,'主营业务:'),COLORFF00FF;
DRAWTEXT_FIX(1,0.075,0.08,0,EXTERNSTR(0,2)),COLORFF00FF;
DRAWTEXT_FIX(1,0.06,0.14,0,EXTERNSTR(0,3)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.01,0.20,0,EXTERNSTR(0,4))COLORCYAN;。