分时主图（公式源码）（分时三日K线+10点至14点30分6个时间段+阻力支撑线）附图[售价1

吴建新

分时-关键点引入
阻力3:"关键点.阻力3#DAY",COLORGREEN;
阻力1:"关键点.阻力1#DAY",COLORBLUE;
关键点:"关键点.关键点位#DAY",COLORWHITE;
支撑1:"关键点.支撑1#DAY",COLORBLUE;
支撑3:"关键点.支撑3#DAY",COLORGREEN;
均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
关键点位REF(H,1)+REF(L,1)+REF(C,1))/3,COLORGRAY;
阻力33:REF(H,1)-2*((REF(L,1)-关键点位)),COLORGREEN;
阻力11:2*关键点位-REF(L,1),COLORBLUE;
支撑11:2*关键点位-REF(H,1),COLORBLUE;
支撑33:REF(L,1)-2*(REF(H,1)-关键点位),COLORGREEN;
O1:REF(O,1);
C1:REF(C,1);
H1:REF(H,1);
L1:REF(L,1);
O2:REF(O,2);
C2:REF(C,2);
H2:REF(H,2);
L2:REF(L,2);
O3:REF(O,3);
C3:REF(C,3);
H3:REF(H,3);
L3:REF(L,3);
主图公式
O1:="SS.O1#DAY";
C1:="SS.C1#DAY";
H1:="SS.H1#DAY";
L1:="SS.L1#DAY";
O2:="SS.O2#DAY";
C2:="SS.C2#DAY";
H2:="SS.H2#DAY";
L2:="SS.L2#DAY";
O3:="SS.O3#DAY";
C3:="SS.C3#DAY";
H3:="SS.H3#DAY";
L3:="SS.L3#DAY";
GGJ:=CONST(IF(BARSLAST(TIME=93100),HHV(H,0),REF(HHV(H,0),BARSLAST(TIME=93100))));
DDJ:=CONST(IF(BARSLAST(TIME=93100),LLV(H,0),REF(LLV(H,0),BARSLAST(TIME=93100))));
E1:=IF(BETWEEN(TIME,94900,95700),O1,DRAWNULL);
E2:=IF(BETWEEN(TIME,94900,95700),C1,DRAWNULL);
E12:=IF(BETWEEN(TIME,94000,94800),O2,DRAWNULL);
E22:=IF(BETWEEN(TIME,94000,94800),C2,DRAWNULL);
E13:=IF(BETWEEN(TIME,93100,93900),O3,DRAWNULL);
E23:=IF(BETWEEN(TIME,93100,93900),C3,DRAWNULL);
时间:=TIME=100000;
N:=BARSLAST(时间);
CS1:=CONST(IF(N,HHV(H,0),REF(HHV(H,0),N)));
CS2:=CONST(IF(N,LLV(L,0),REF(LLV(L,0),N)));
三高:=IF(BETWEEN(TIME,93100,100000),MAX(H1,MAX(H2,H3)),DRAWNULL);
三低:=IF(BETWEEN(TIME,93100,100000),MIN(L1,MIN(L2,L3)),DRAWNULL);
三日高:=IF(BETWEEN(TIME,95700,100000),MAX(H1,MAX(H2,H3)),DRAWNULL);
三日低:=IF(BETWEEN(TIME,95700,100000),MIN(L1,MIN(L2,L3)),DRAWNULL);
三日高1:=IF(BETWEEN(TIME,94900,93100),MAX(H1,MAX(H2,H3)),DRAWNULL);
三日低1:=IF(BETWEEN(TIME,954900,93100),MIN(L1,MIN(L2,L3)),DRAWNULL);
三日高2:=IF(BETWEEN(TIME,94000,93100),MAX(H1,MAX(H2,H3)),DRAWNULL);
三日低2:=IF(BETWEEN(TIME,94000,93100),MIN(L1,MIN(L2,L3)),DRAWNULL);
DRAWBAND(三日高,RGB(0,0,0),三日低,RGB(0,0,0));
STICKLINE(TIME=95300 AND C1>O1,H1,L1,1,0),COLOR0000CC;
STICKLINE(TIME=95300 AND C1<O1,H1,L1,1,0),COLORFFFF54;
STICKLINE(TIME=95300 AND C1=O1,H1,L1,1,0),COLORWHITE;
DRAWBAND(IF(C1>O1,E2,DRAWNULL),RGB(204,0,0),E1,RGB(204,0,0));
DRAWBAND(IF(C1<O1,E2,DRAWNULL),RGB(84,255,255),E1,RGB(84,255,255));
DRAWBAND(IF(C1=O1,E2,DRAWNULL),RGB(255,255,255),E1,RGB(255,255,255));
DRAWBAND(三日高1,RGB(0,0,0),三日低1,RGB(0,0,0));
STICKLINE(TIME=94400 AND C2>O2,H2,L2,1,0),COLOR0000CC;
STICKLINE(TIME=94400 AND C2<O2,H2,L2,1,0),COLORFFFF54;
STICKLINE(TIME=94400 AND C2=O2,H2,L2,1,0),COLORWHITE;
DRAWBAND(IF(C2>O2,E22,DRAWNULL),RGB(204,0,0),E12,RGB(204,0,0));
DRAWBAND(IF(C2<O2,E22,DRAWNULL),RGB(84,255,255),E12,RGB(84,255,255));
DRAWBAND(IF(C2=O2,E22,DRAWNULL),RGB(255,255,255),E12,RGB(255,255,255));
DRAWBAND(三日高2,RGB(0,0,0),三日低2,RGB(0,0,0));
STICKLINE(TIME=93500 AND C3>O3,H3,L3,1,0),COLOR0000CC;
STICKLINE(TIME=93500 AND C3<O3,H3,L3,1,0),COLORFFFF54;
STICKLINE(TIME=93500 AND C3=O3,H3,L3,1,0),COLORWHITE;
DRAWBAND(IF(C3>O3,E23,DRAWNULL),RGB(204,0,0),E13,RGB(204,0,0));
DRAWBAND(IF(C3<O3,E23,DRAWNULL),RGB(84,255,255),E13,RGB(84,255,255));
DRAWBAND(IF(C3=O3,E23,DRAWNULL),RGB(255,255,255),E13,RGB(255,255,255));
STICKLINE(时间=1,三日高,三日低,-1,-1),COLOR0000CC;  
IF(BETWEEN(TIME,93100,94000) AND BETWEEN(C,C1,O1),C,DRAWNULL),COLORWHITE;
STICKLINE(时间=1,CS1,CS2,-1,-1),COLORGREEN;  
阻力3:"关键点.阻力3#DAY",COLORGREEN;
阻力1:"关键点.阻力1#DAY",COLORBLUE;
关键点:"关键点.关键点位#DAY",COLORWHITE;
均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
常数:=CONST(IF(N=0,C,REF(C,N))),COLORGREEN,DOTLINE;
A10点线:STICKLINE(时间=1,CS1,CS2,-1,0),COLORGREEN;
DRAWTEXT(A10点线,阻力1*1.01,'10:00'),COLORRED;
时间R:=TIME=103100;
NR:=BARSLAST(时间R);
常数R:=CONST(IF(NR=0,C,REF(C,NR))),COLORGREEN,DOTLINE;
CS1R:=CONST(IF(NR,HHV(H,0),REF(HHV(H,0),NR)));
CS2R:=CONST(IF(NR,LLV(L,0),REF(LLV(L,0),NR)));
A10点30线:STICKLINE(时间R=1,CS1R,CS2R,-1,0),COLORGREEN;
均价R:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(A10点30线,阻力1*1.01,'10:30'),COLORRED;
时间T:=TIME=110100;
NT:=BARSLAST(时间T);
常数T:=CONST(IF(NT=0,C,REF(C,NT))),COLORGREEN,DOTLINE;
CS1T:=CONST(IF(NT,HHV(H,0),REF(HHV(H,0),NT)));
CS2T:=CONST(IF(NT,LLV(L,0),REF(LLV(L,0),NT)));
A11点线:STICKLINE(时间T=1,CS1T,CS2T,-1,0),COLORGREEN;
均价T:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(A11点线,阻力3*1.01,'11:00'),COLORRED;
时间T1:=TIME=130100;
NT1:=BARSLAST(时间T1);
常数T1:=CONST(IF(NT1=0,C,REF(C,NT1))),COLORGREEN,DOTLINE;
CS1T1:=CONST(IF(NT1,HHV(H,0),REF(HHV(H,0),NT1)));
CS2T1:=CONST(IF(NT1,LLV(L,0),REF(LLV(L,0),NT1)));
A11点30线:STICKLINE(时间T1=1,CS1T1,CS2T1,-1,0),COLORGREEN;
均价T1:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(A11点30线,阻力3*1.01,'13:00'),COLORRED;
时间T2:=TIME=133100;
NT2:=BARSLAST(时间T2);
常数T2:=CONST(IF(NT2=0,C,REF(C,NT2))),COLORGREEN,DOTLINE;
CS1T2:=CONST(IF(NT2,HHV(H,0),REF(HHV(H,0),NT2)));
CS2T2:=CONST(IF(NT2,LLV(L,0),REF(LLV(L,0),NT2)));
A1点30线:STICKLINE(时间T2=1,CS1T2,CS2T2,-1,0),COLORGREEN;
均价T2:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(A1点30线,阻力3*1.01,'13:30'),COLORRED;
时间T3:=TIME=140100;
NT3:=BARSLAST(时间T3);
常数T3:=CONST(IF(NT3=0,C,REF(C,NT3))),COLORGREEN,DOTLINE;
CS1T3:=CONST(IF(NT3,HHV(H,0),REF(HHV(H,0),NT3)));
CS2T3:=CONST(IF(NT3,LLV(L,0),REF(LLV(L,0),NT3)));
A2点线:STICKLINE(时间T3=1,CS1T3,CS2T3,-1,0),COLORGREEN;
均价T3:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(A2点线,阻力3*1.01,'14:00'),COLORRED;
时间T4:=TIME=143100;
NT4:=BARSLAST(时间T4);
常数T4:=CONST(IF(NT4=0,C,REF(C,NT4))),COLORGREEN,DOTLINE;
CS1T4:=CONST(IF(NT4,HHV(H,0),REF(HHV(H,0),NT4)));
CS2T4:=CONST(IF(NT4,LLV(L,0),REF(LLV(L,0),NT4)));
A2点30线:STICKLINE(时间T4=1,CS1T4,CS2T4,-1,0),COLORGREEN;
均价T4:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(A2点30线,阻力3*1.01,'14:30'),COLORRED;

马山水巢

学习学习学习

南萍晚钟

钱先生
本文来自: 股海明灯论坛  详细文章参考：http://www.178448.com/thread-464980-1-1.html
本文来自: 股海明灯论坛  详细文章参考：http://www.178448.com/thread-464980-1-1.html
本文来自: 股海明灯论坛  详细文章参考：http://www.178448.com/thread-464980-1-1.html

天牛久久

好！！！！！！！！！！！！！！！

快乐老头儿

谢谢分享学习

魏青山

老舍得

好好学习天天向上

老舍得

错误句 :  
详细信息 : 输入字符串请用单引号'!

吴建新

老舍得 发表于 2012-12-9 23:59
错误句 :  
详细信息 : 输入字符串请用单引号'!

在O1----L3公式建SS:
SS{主图}
O1:REF(O,1);
C1:REF(C,1);
H1:REF(H,1);
L1:REF(L,1);
O2:REF(O,2);
C2:REF(C,2);
H2:REF(H,2);
L2:REF(L,2);
O3:REF(O,3);
C3:REF(C,3);
H3:REF(H,3);
L3:REF(L,3);

老舍得

还是没有弄好

洗衣粉猫

不知道怎么装

洗衣粉猫

洗衣粉猫

吴建新

老舍得 发表于 2012-12-10 01:12
还是没有弄好

通达信软件：按照指标公式源码，在专家系统---公式管理器---特色型---新建---（将画线方法副图改为主图叠加）----粘贴公式。建第一个引用公式分时-关键点；     建第二个引用公式
SS;       最后建主图公式就OK了。

吴建新

洗衣粉猫 发表于 2012-12-10 01:21
不知道怎么装

通达信软件：按照指标公式源码，在专家系统---公式管理器---特色型---新建---（将画线方法副图改为主图叠加）----粘贴公式。建第一个引用公式分时-关键点；     建第二个引用公式
SS;       最后建主图公式就OK了。

马孝谦

谢谢分享学习
本文来自: 股海明灯论坛  详细文章参考：http://www.178448.com/thread-465056-1-1.html