通达信分时黄金分割线指标

用于**杨凯老师所教分时黄金分割买入指标。用于上涨浪、洗盘、回抽后第二天买入使用

{分时黄金分割:上涨浪、洗盘、回抽后第二天买入使用}
十点价格:=SUM(IF(HOUR=10 AND MINUTE=0,C,0),0);
低点1:=SUM(IF(HOUR=10 AND MINUTE=0,LLV(L,0),0),0);
高点1:=SUM(IF(HOUR=10 AND MINUTE=0,HHV(H,0),0),0);
低点2:=MIN(CONST(低点1),DYNAINFO(4));
高点2:=MAX(CONST(高点1),DYNAINFO(4));
低点:=IF(低点1>0,CONST(低点2),DRAWNULL);
高点:=IF(低点1>0,CONST(高点2),DRAWNULL);
 {黄金分割线定点}
 %7.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 7.61803)) * 100)) / 100);
 %6.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 6.61803)) * 100)) / 100);
 %5.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 5.61803)) * 100)) / 100);
 %4.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 4.61803)) * 100)) / 100);
 %3.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 3.61803)) * 100)) / 100);
 %2.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 2.61803)) * 100)) / 100);
 %1.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 1.61803)) * 100)) / 100);
 %1.000位:=CONST(高点);
 %0.618位:=CONST(INTPART(((低点 + ((高点 - 低点) * 0.61803)) * 100)) / 100);
 %0.500位:=CONST(INTPART(((低点 + ((高点 - 低点) * 0.500)) * 100)) / 100);
 %0.382位:=CONST(INTPART(((低点 + ((高点 - 低点) * 0.382)) * 100)) / 100);
 %0.236位:=CONST(INTPART(((低点 + ((高点 - 低点) * 0.236)) * 100)) / 100);
 %0.000位:=CONST(低点);
 %负4.618位:=CONST(INTPART(((低点 - ((高点 - 低点) * 4.61803)) * 100)) / 100);
 %负3.618位:=CONST(INTPART(((低点 - ((高点 - 低点) * 3.61803)) * 100)) / 100);
 %负2.618位:=CONST(INTPART(((低点 - ((高点 - 低点) * 2.61803)) * 100)) / 100);
 %负1.618位:=CONST(INTPART(((低点 - ((高点 - 低点) * 1.61803)) * 100)) / 100);
 %负1.000位:=CONST(2*低点 - 高点);
 %负0.618位:=CONST((INTPART(((低点 - ((高点 - 低点) * 0.61803)) * 100)) / 100));
 %负0.500位:=CONST((INTPART(((低点 - ((高点 - 低点) * 0.500)) * 100)) / 100));
 %负0.382位:=CONST((INTPART(((低点 - ((高点 - 低点) * 0.382)) * 100)) / 100));
 %负0.236位:=CONST((INTPART(((低点 - ((高点 - 低点) * 0.236)) * 100)) / 100));

{画黄金分割线}
F9:=IF( LLV(L,0)<%负3.618位,%负4.618位,DRAWNULL);
 F8:=IF( LLV(L,0)<%负2.618位,%负3.618位,DRAWNULL);
 F7:=IF( LLV(L,0)<%负1.618位,%负2.618位,DRAWNULL);
 F6:=IF( LLV(L,0)<%负1.000位,%负1.618位,DRAWNULL);
 F5:=IF( LLV(L,0)<%负0.618位,%负1.000位,DRAWNULL);
 F4:=IF( LLV(L,0)<%负0.500位,%负0.618位,DRAWNULL);
 F3:=IF( LLV(L,0)<%负0.382位,%负0.618位,DRAWNULL);

F1:=IF( LLV(L,0)<%0.000位,%负0.382位,DRAWNULL);
【0】:=IF(TIME>1000,低点,DRAWNULL);
【0.382】:=IF(TIME>1000,低点 + ((高点 - 低点) * 0.382),DRAWNULL), COLORYELLOW DOTLINE ;
【0.500】:=IF(TIME>1000,低点 + ((高点 - 低点) * 0.500),DRAWNULL), COLORYELLOW DOTLINE ;
【0.618】:=IF(TIME>1000,低点 + ((高点 - 低点) * 0.618),DRAWNULL), COLORYELLOW DOTLINE;
【1】:=IF(TIME>1000,高点,DRAWNULL), COLOR00FF00 LINETHICK2;
 E1:=IF(HHV(H,0)>%1.000位,%1.618位,DRAWNULL);
 E2:=IF(HHV(H,0)>%1.618位,%2.618位,DRAWNULL);
 E3:=IF(HHV(H,0)>%2.618位,%3.618位,DRAWNULL);
 E4:=IF(HHV(H,0)>%3.618位,%4.618位,DRAWNULL);
 E5:=IF(HHV(H,0)>%4.618位,%5.618位,DRAWNULL);
 CONST(【0】) ,COLOR00FF00 LINETHICK1;

CONST(【0.382】), COLORFFFF80 DOTLINE;
 CONST(【0.500】), COLORFFFF80 DOTLINE;
 CONST(【0.618】), COLORFFFF80 DOTLINE;
 CONST(【1】) ,COLOR00FF00 LINETHICK1;

CONST(E1),COLORFFFF80 LINETHICK2;
 CONST(E2),COLORFFFF80 LINETHICK2;
 CONST(E3),COLORFFFF80 LINETHICK2;
 CONST(E4),COLORFFFF80 LINETHICK2;
 CONST(E5),COLORFFFF80 LINETHICK2;

CONST(F1),COLORFFFF80 DOTLINE;

CONST(F3),COLORFFFF80 DOTLINE;
 CONST(F4),COLORFFFF80 DOTLINE;
 CONST(F5),COLORFFFF80 LINETHICK2;
 CONST(F6),COLORFFFF80 LINETHICK2;
 CONST(F7),COLORFFFF80 LINETHICK2;
 CONST(F8),COLORFFFF80 LINETHICK2;
 CONST(F9),COLORFFFF80 LINETHICK2;

DRAWTEXT(DYNAINFO(4)<=十点价格 AND TIME=1000,(%0.618位+高点)/2,' 拉'),COLORFF00FF;
 DRAWTEXT(DYNAINFO(4)<=十点价格 AND TIME=1000,(%0.618位+%0.500位)/2,' 洗'),COLORFFFF00;
 DRAWTEXT(DYNAINFO(4)<=十点价格 AND TIME=1000,(%0.382位+%0.500位)/2,' 建'),COLORFF8000;
 DRAWTEXT(DYNAINFO(4)<=十点价格 AND TIME=1000,(%0.382位+低点)/2,' 超跌'),COLOR00FF00;
 DRAWTEXT(DYNAINFO(4)>十点价格 AND TIME=1000,(%0.618位+高点)/2,' 拉'),COLORFF00FF;
 DRAWTEXT(DYNAINFO(4)>十点价格 AND TIME=1000,(%0.618位+%0.500位)/2,' 洗'),COLORFFFF00;
 DRAWTEXT(DYNAINFO(4)>十点价格 AND TIME=1000,(%0.000位+%0.500位)/2,' 建'),COLORFF8000;
 DRAWTEXT(DYNAINFO(4)>十点价格 AND TIME=1000,(%0.000位+%负0.382位)/2,' 超跌'),COLOR00FF00;
 STICKLINE(DYNAINFO(4)<=十点价格 AND TIME=1000,%0.618位,高点,1,0),COLORFF00FF;
 STICKLINE(DYNAINFO(4)<=十点价格 AND TIME=1000,%0.618位,%0.500位,1,0),COLORFFFF00;
 STICKLINE(DYNAINFO(4)<=十点价格 AND TIME=1000,%0.382位,%0.500位,1,0),COLORFF8000;
 STICKLINE(DYNAINFO(4)<=十点价格 AND TIME=1000,%0.382位,低点,1,0),COLOR00FF00;
 STICKLINE(DYNAINFO(4)>十点价格 AND TIME=1000,%0.618位,高点,1,0),COLORFF00FF;
 STICKLINE(DYNAINFO(4)>十点价格 AND TIME=1000,%0.618位,%0.500位,1,0),COLORFFFF00;
 STICKLINE(DYNAINFO(4)>十点价格 AND TIME=1000,%0.000位,%0.500位,1,0),COLORFF8000;
 STICKLINE(DYNAINFO(4)>十点价格 AND TIME=1000,%0.000位,%负0.382位,1,0),COLOR00FF00;