通达信光哥主图高位兰色源码分享 附图
LY:=10;
BL:=40;
CJQS:=XMA(CLOSE,LY);
JBQS:=XMA(CLOSE,BL);
N:=REF(JBQS,BL/2+1-CURRBARSCOUNT)/REF(JBQS,BL/2+2-CURRBARSCOUNT);
M:=REF(CJQS,LY/2+1-CURRBARSCOUNT)/REF(CJQS,LY/2+2-CURRBARSCOUNT);
JB上轨:=IF(CURRBARSCOUNT>BL/2,JBQS*1.1,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*1.1);
JB下轨:=IF(CURRBARSCOUNT>BL/2,JBQS*0.9,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*0.9);
CJ上轨:=IF(CURRBARSCOUNT>LY/2,CJQS*1.05,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*1.05);
CJ下轨:=IF(CURRBARSCOUNT>LY/2,CJQS*0.95,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*0.95);
DRAWTEXT(O<=CJ下轨,(L * 0.99),'←加仓'),COLORMAGENTA;
DRAWTEXT(CROSS(H,CJ上轨),(H * 1.01),'震仓'),COLORYELLOW;
DRAWTEXT(CROSS(CJ下轨,L),(L * 0.90),'补'),COLORBLACK;
DRAWTEXT(O<=CJ下轨 AND CJ下轨<JB下轨,(L * 0.93),'←绝 sha'),COLORRED;
DRAWTEXT(CROSS(H,CJ上轨) AND CJ上轨>JB上轨,(H * 1.04),''),COLORGREEN;
DRAWTEXT(O<=JB下轨,(L * 0.96),'←涨'),COLORYELLOW;
DRAWTEXT(O<=JB下轨 AND C>JB下轨,(L * 0.91),'←黑马'),COLORWHITE;
R1:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2);{ZIG 有未来}
R2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2);
STICKLINE(R1,C,O,3,0),COLORBLUE,LINETHICK1;{高位兰色}
STICKLINE(R1,C,O,2,0),COLORBLUE,LINETHICK1;{高位兰色}
STICKLINE(R1,H,L,1,0),COLORBLUE,LINETHICK1;{高位兰色}
STICKLINE(R2,C,O,3,0),COLORFF00FF,LINETHICK1;{底位红色}
STICKLINE(R2,C,O,2,0),COLORFF00FF,LINETHICK1;{底位红色}
STICKLINE(R2,H,L,1,0),COLORFF00FF,LINETHICK1;{底位红色};
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;
DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);
白龙:= MA(CLOSE,125);
黄龙:= 白龙+2*STD(CLOSE,170);
紫龙:= 白龙-2*STD(CLOSE,145);
青龙: SAR(125,1,7);
VAR42:=HHV(HIGH,70);
VAR43:=HHV(HIGH,20);
红龙:= VAR42*0.83;
蓝龙:= VAR43*0.91;
T1B:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1B));
CC:=CONST(CURRBARSCOUNT);
T2B:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1B AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2B));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2B AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
必杀线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORRED,LINETHICK3;{,LINETHICK2,COLOR0000FF;}
DRAWTEXT(ISLASTBAR, T3HIGH, '必杀线')LINETHICK1,COLOR0000FF;
MA5K:必杀线,COLORYELLOW,LINETHICK1;
DRAWICON(CROSS(CLOSE,必杀线),LOW*0.97,13);
M1:=5;M2:=10;M3:=30;M4:=60;
MA1:=MA(CLOSE,M1);
MA2:=MA(CLOSE,M2);
MA3:=MA(CLOSE,M3);
MA4:=MA(CLOSE,M4);
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) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买１:=VAR10;
买２:=(VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
B:IF(买１>0 OR 买２>0,LOW*0.97,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
N1:=5;N2:=10;
LC:=REF(CLOSE,1);
A0:=(2*C+H+L)/4;
均线:=MA(A0,3)>REF(MA(A0,3),1);
安全线:=2,COLORRED,POINTDOT,LINETHICK4;
A1:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*10;
K:=MA(3*SMA(A1,6,1)-2*SMA(SMA(A1,5,1),5,1),3),LINETHICK1,COLORF00FF0;
D:=MA(K,3),COLORFF0000,LINETHICK1;
J:=3*K-2*D,LINETHICK1,COLORF00FF0;
VAR1:=C-REF(C,1);
VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(ABS(VAR1),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00;
BT:=(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
底线:=0,COLORFF00FF;
顶线:=10,COLORFF0000;
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33;
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1);
DIFF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIFF,9),COLORFFFF00;
A11:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A11+1)>CLOSE AND DIFF>REF(DIFF,A11+1) AND CROSS(DIFF,DEA);
BB:IF(底背离,LOW*0.97,DRAWNULL),CROSSDOT,LINETHICK3,COLORRED;
来函数检测结果如下：
该公式包含未来函数:ZIG
该公式包含未来函数:TROUGH
该公式包含未来函数:TROUGHBARS
该公式包含未来函数:XMA
该公式包含未来函数:DCLOSE
解密、定制、编写指标公式请联系QQ或微信同号：88652583
置顶指标
相关指标公式
LY赋值:10
BL赋值:40
CJQS赋值:XMA(收盘价,LY)
JBQS赋值:XMA(收盘价,BL)
N赋值:BL/2+1- 到最后交易的周期日前的JBQS/BL/2+2- 到最后交易的周期日前的JBQS
M赋值:LY/2+1- 到最后交易的周期日前的CJQS/LY/2+2- 到最后交易的周期日前的CJQS
JB上轨赋值:IF( 到最后交易的周期>BL/2,JBQS*1.1,BL/2+1- 到最后交易的周期日前的JBQS*POW(N,BL/2+1- 到最后交易的周期)*1.1)
JB下轨赋值:IF( 到最后交易的周期>BL/2,JBQS*0.9,BL/2+1- 到最后交易的周期日前的JBQS*POW(N,BL/2+1- 到最后交易的周期)*0.9)
CJ上轨赋值:IF( 到最后交易的周期>LY/2,CJQS*1.05,LY/2+1- 到最后交易的周期日前的CJQS*POW(M,LY/2+1- 到最后交易的周期)*1.05)
CJ下轨赋值:IF( 到最后交易的周期>LY/2,CJQS*0.95,LY/2+1- 到最后交易的周期日前的CJQS*POW(M,LY/2+1- 到最后交易的周期)*0.95)
DRAWTEXT(O<=CJ下轨,(L * 0.99),'←加仓'),画洋红色
DRAWTEXT(H上穿CJ上轨,(H * 1.01),'震仓'),画黄色
DRAWTEXT(CJ下轨上穿L,(L * 0.90),'补'),COLORBLACK
DRAWTEXT(O<=CJ下轨 AND CJ下轨
DRAWTEXT(H上穿CJ上轨 AND CJ上轨>JB上轨,(H * 1.04),''),画绿色
DRAWTEXT(O<=JB下轨,(L * 0.96),'←涨'),画黄色
DRAWTEXT(O<=JB下轨 AND C>JB下轨,(L * 0.91),'←黑马'),画白色
R1赋值:ZIG(3,10)REF(ZIG(3,10),2)
{ZIG 有未来}
R2赋值:ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)当满足条件R1时,在C和O之间画柱状线
当满足条件R1时,在C和O之间画柱状线
当满足条件R1时,在H和L之间画柱状线
当满足条件R2时,在C和O之间画柱状线
当满足条件R2时,在C和O之间画柱状线
当满足条件R2时,在H和L之间画柱状线
{底位红色}
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),最低价*0.98,1)
DRAWICON((ZIG(3,5)=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),最高价*1.01,2)
白龙赋值: MA(收盘价,125)
黄龙赋值: 白龙+2*收盘价的170估算标准差
紫龙赋值: 白龙-2*收盘价的145估算标准差
输出
青龙: SAR(125,1,7)
VAR42赋值:70日内最高价最高值
VAR43赋值:20日内最高价最高值
红龙赋值: VAR42*0.83
蓝龙赋值: VAR43*0.91
T1B赋值:CONST(LLVBARS(最低价,10))
T1最高价:=CONST(T1B日前的最高价)
CC赋值:CONST( 到最后交易的周期)
T2B赋值:CONST(上次 到最后交易的周期>CC+T1B AND H>T1最高价距今天数)
T2最高价:=CONST(T2B日前的最高价)
T3赋值:CONST(上次 到最后交易的周期>CC+T2B AND 最高价>T2最高价距今天数)
T3最高价:=CONST(T3日前的最高价)
输出
必杀线:DRAWLINE( 到最后交易的周期=T3+1, T3最高价, ISLASTBAR, T3最高价, 1),画红色, 线宽为3
{, 线宽为2,COLOR0000FF
当满足条件ISLASTBAR时,在 T3最高价和 '必杀线'位置书写文字
MA5K:必杀线,画黄色, 线宽为1
当满足条件收盘价上穿必杀线时,在最低价*0.97和13之间画图标
M1赋值:5
M2赋值:10
M3赋值:30
M4赋值:60
MA1:=MA(收盘价,M1)
MA2:=MA(收盘价,M2)
MA3:=MA(收盘价,M3)
MA4:=MA(收盘价,M4)
VAR3赋值:240日内最高价最低值
VAR4赋值:100*(收盘价-VAR3)/VAR3
VAR5赋值:(收盘价-528日内最低价最低值)/(528日内最高价最高值-528日内最低价最低值)*100
VAR6赋值:(收盘价-530日内收盘价最低值)/(530日内收盘价最高值-530日内收盘价最低值)*100
VAR7赋值:0
收盘价-1日前的收盘价和0较大值的34日[1日权重]移动平均
收盘价-1日前的收盘价和0较大值的13日[1日权重]移动平均
VAR10赋值:IF(TROUGHBARS(3,16,1)=0 AND 最高价>最低价+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),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3)
VAR13赋值:ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3)
VAR14赋值:ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3)
VAR15赋值:ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3)
VAR16赋值:ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3)
VAR17赋值:ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3)
VAR18赋值:ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3)
VAR19赋值:收盘价的2日指数移动平均-收盘价的150日指数移动平均
买１赋值:VAR10
买２赋值:(VAR11+VAR13+VAR15+VAR17)
卖１赋值:(VAR12+VAR14+VAR16+VAR18)
如果买１>0 OR 买２>0返回最低价*0.97否则返回DRAWNULL
N1赋值:5
N2赋值:10
LC赋值:1日前的收盘价
A0赋值:(2*C+H+L)/4
均线赋值:MA(A0,3)>REF(MA(A0,3),1)
安全线赋值:2,画红色,POINTDOT, 线宽为4
A1赋值:(收盘价-7日内最低价最低值)/(7日内最高价最高值-7日内最低价最低值)*10
A1的6日[1日权重]移动平均
D赋值:MA(K,3),COLORFF0000, 线宽为1
J赋值:3*K-2*D, 线宽为1,COLORF00FF0
VAR1赋值:C-1日前的C
VAR2赋值:100*VAR1的6日指数移动平均,6)/VAR1的绝对值的6日指数移动平均,6)
MA5:=C的5日指数移动平均
MA13:=C的13日指数移动平均
UP赋值:DRAWLINE(L=上次MA13上穿MA5距今天数+1日内L最低值,LLV(L,上次CROSS
(MA13,MA5距今天数)+1),H=HHV(H,BARSLAST(MA5上穿MA13)+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF
DOWN:=DRAWLINE(H=上次MA5上穿MA13距今天数+1日内H最高值,HHV(H,上次CROSS
(MA5,MA13距今天数)+1),L=LLV(L,BARSLAST(MA13上穿MA5)+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00
BT:=(2日内VAR2最低值=7日内VAR2最低值 AND 统计2日满足VAR2<0的天数 AND CROSS(VAR2,MA(VAR2,2))) AND
1日前的DOWN<2日前的DOWN AND UP>1日前的DOWN
底线赋值:0,COLORFF00FF
顶线赋值:10,COLORFF0000
TJ1赋值:1日前的DOWN<2日前的DOWN AND UP>1日前的DOWN AND C<21日内H最高值*0.82
HR赋值:55日内最高价最高值
HRY:=55日内最低价最低值
HRY11:=HR*HRY
HRY33:=SQRT(HRY11)
TJ2赋值:1日前的DOWN<2日前的DOWN AND UP>1日前的DOWN AND C
ST赋值:1日前的UP>2日前的UP AND DOWN<1日前的UP
DIFF:=D收盘价的12日指数移动平均-D收盘价的26日指数移动平均
DEA:=DIFF的9日指数移动平均,COLORFFFF00
A11:=上次1日前的DIFF上穿DEA距今天数
底背离赋值:A11+1日前的收盘价>收盘价 AND DIFF>A11+1日前的DIFF AND DIFF上穿DEA
如果底背离返回最低价*0.97否则返回DRAWNULL
