- {优化整合指标}【主图 源码 贴图】 
- 
                        相关简介:INPUT:K1(2011,1990,3000),K2(1,1,12),K3(1,1,31),DX(0,0,2),FA(0,0,5),P1(5,0,255),P2(10,0,255),P3(20,0,255),P4(0,0,255),P5(0,0,255); AS:=(o+h+l+c)/4; MMA5:EMA(AS,P1); SYAA:EMA(AS,P2); SYAB:EMA(AS,P3);{ SYAC:EMA(AS,P4); SYAD:EMA(AS,P5);} RQD:=(K1-1900)*1 
- 
                        文章来源:股海网作者:股海网发布时间:2014-01-02浏览次数: 
 
                    INPUT:K1(2011,1990,3000),K2(1,1,12),K3(1,1,31),DX(0,0,2),FA(0,0,5),P1(5,0,255),P2(10,0,255),P3(20,0,255),P4(0,0,255),P5(0,0,255);
 AS:=(o+h+l+c)/4;
 MMA5:EMA(AS,P1);
 SYAA:EMA(AS,P2);
 SYAB:EMA(AS,P3);{
 SYAC:EMA(AS,P4);
 SYAD:EMA(AS,P5);}
 
RQD:=(K1-1900)*10000+K2*100+K3;
 DJ:REF(L,BARSLAST(DATE<=RQD )),LINETHICK0,COLOR55BB55;
 上涨:=BARSSINCE(BACKSET(BARSTATUS=2,BARSLAST(L=DJ)+1));
 STICKLINE(C>=O,C,O,8,0),COLOR0000FF,LAYER4;
 STICKLINE(C>=O,H,L,0,0),COLOR0000FF,LAYER4;
 STICKLINE(C<=O,C,O,8,0),COLORFFFF00,LAYER4;
 STICKLINE(C<=O,H,L,0,0),COLORFFFF00,LAYER4;
 DRAWTEXT(上涨=0 AND FA>=1,DJ,'1'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=1 AND FA>=1,DJ,'2'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=2 AND FA>=1,DJ,'3'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=3 AND FA>=1,DJ,'4'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=4 AND FA>=1,DJ,'5'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=5 AND FA>=1,DJ,'6'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=6 AND FA>=1,DJ,'7'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=7 AND FA>=1,DJ,'8'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=8 AND FA>=1,DJ,'9'),COLORFFFFFF,VALIGN1;
 DRAWTEXT(上涨=9 AND FA>=1,DJ,'10'),COLORFFFFFF,VALIGN1;
 
阳涨幅:=3.5;
 阳倍量:=1.9;
 单阳收:=C;
 单阳开:=O;
 单阳:=单阳收>=REF(C,1)*(1+阳涨幅/100)AND VOL>REF(VOL,1)*阳倍量;
 DRAWTEXT(BARSTATUS=0 AND 单阳,L,'阳'),COLOR00FFFF,VALIGN1;
 高不破价:=REF(C,BARSLAST(单阳));
 低不破价:=REF(L,BARSLAST(单阳));
 单阳不破:=BARSTATUS=0 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价);
 STICKLINE(单阳不破,低不破价-低不破价*0.0005,低不破价,11,0),COLORGREEN;
 STICKLINE(单阳不破,高不破价,高不破价,11,0),COLORRED;
 STICKLINE(单阳,单阳开,单阳收,6,0),COLORYELLOW;
 QKB:=IF(C>O,O,C);
 QKAB:=IF(C>O,O+(C-O)*0.75,O+(C-O)*0.75);
 STICKLINE(BARSTATUS=0 AND 单阳,QKB,QKAB,6,0),COLORFF2693;
 实体幅度2:=REF((O+(C-O)*0.667),BARSLAST(单阳));{//当日实体幅度的2/3}
 实体幅度1:=REF((O+(C-O)*0.333),BARSLAST(单阳));{//当日实体幅度的1/3}
 幅度的1二:=REF((L+(H-L)/2),BARSLAST(单阳));{//当日幅度的1/2}
 STICKLINE(单阳不破,幅度的1二,幅度的1二,8,1),COLOR209FFF,DOTLINE;
 STICKLINE(单阳不破,实体幅度2,实体幅度2,11,1),COLORFFFF00,DOTLINE;
 STICKLINE(单阳不破,实体幅度1,实体幅度1,11,1),COLORFFFF00,DOTLINE;
 DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价,'1'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价,'2'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价,'3'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价,'4'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价,'5'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价,'6'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价,'7'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价,'8'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价,'9'),COLORGREEN;
 DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价,'10'),COLORGREEN;
 {一阳穿三线}
 MA2:=EMA(C,2);
 MA5:=EMA(C,5);
 MA13:=EMA(C,13);
 MA34:=EMA(C,34);
 MA55:=EMA(C,55);
 YCX:=MA5>=REF(MA5,1);
 H1:=MAX(MAX(MA5,MA13),MA34);
 L1:=MIN(MIN(MA5,MA13),MA34);
 QK:=IF(C>O,O,C);
 QKA:=IF(C>O,O+(C-O)*0.35,O+(C-O)*0.25);
 一阳穿三线:= H1<C AND O<L1 AND YCX AND MA2>REF(MA2,1);
 STICKLINE(一阳穿三线,QK,QKA,6,0),COLORYELLOW;
 STICKLINE(C=C AND fa>=1,O+((C-O)*0.667),(O+(C-O)*0.667),4,0),COLORFF0000,LINETHICK1;{//当日实体幅度的2/3}
 STICKLINE(C=C AND fa>=1,O+((C-O)*0.333),(O+(C-O)*0.333),4,0),COLORFF0000,LINETHICK1;{//当日实体幅度的1/3}
 STICKLINE(C=C AND fa>=1,O+((C-O)/2),(O+(C-O)/2),5,0),COLOR00FFFF,LINETHICK1;{//当日实体幅度的1/2}
 STICKLINE(C=C AND fa>=1,L+((H-L)/2),(L+(H-L)/2),6,0),COLOR208FFF,LINETHICK1;{//当日幅度的1/2}
 STICKLINE(C=C AND fa>=1,IF(C>O,H-((H-C)/2),H-((H-O)/2)),IF(C>O,H-((H-C)/2),H-((H-O)/2)),1.3,0),COLORYELLOW,LINETHICK1;{//当日上影线幅度的1/2}
 STICKLINE(C=C AND fa>=1,IF(C<O,L+((C-L)/2),L+((O-L)/2)),IF(C<O,L+((C-L)/2),L+((O-L)/2)),1.3,0),COLORYELLOW,LINETHICK1;{//当日下影线幅度的1/2};
 AJ:=AMOUNT/(VOL*100);
 DRAWTEXT(C=C AND fa=3,AJ,'←'),COLORFF5f00;
 z3:=C=HHV(C,6);
 Z9:=C=LLV(C,6);
 Z4:=BARSLAST(Z3);
 Z5:=BARSLAST(Z9);
 STICKLINE(C>0 AND fa=2,REF(C,Z4)*1.005,REF(C,Z4)*1.005,7,0),COLORFFFF00,DOTLINE;
 STICKLINE(C>0 AND fa=2,REF(C,Z5)*0.995,REF(C,Z5)*0.995,7,0),COLORFF00FF,DOTLINE;
 LC := REF(CLOSE,1);
 RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
 DRAWICON(RSI1>76,H,12),VALIGN1,ALIGN1;
 DRAWICON(RSI1>80,H,13),VALIGN0,ALIGN1;
 BL:=EMA(AS,17);
 BLS:=BL+2.58*STDP(C,20);
 BL2:=BL+1.96*STDP(C,20);
 DRAWICON(CROSS(H,BLS),H,8),VALIGN1,ALIGN1;
 DRAWICON(CROSS(H,BL2),H,6),VALIGN2,ALIGN1;
 Q1:=DJ * 1.03; 
Q2:=DJ * 1.05;
 Q3:=DJ * 1.08;
 Q4:=DJ * 1.13;
 Q5:=DJ * 1.18;
 Q6:=DJ * 1.25;
 Q7:=DJ * 1.33;
 I1:=0;
 flag1:=0;
 while I1<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)
 DO 
IF REF(Q1,I1)<REF(Q1,I1+1) AND REF(Q1,I1+1)>Q1
 THEN BEGIN FLAG1:=1;
 S1:=I1;
 I1:=BARSLAST(DISPSTATUS=1); 
END
 ELSE I1:=I1+1; 
STICKLINE(FLAG1 AND DX>=1,REF(Q1,S1),DJ,(s1+1)*20,0),Color551155,ALIGN1,LAYER5;
 STICKLINE(FLAG1 AND DX>=1,REF(Q1,S1),Q2,(s1+1)*20,0),Color444444,ALIGN1,LAYER5;
 STICKLINE(FLAG1 AND DX>=1,REF(Q2,S1),Q3,(s1+1)*20,0),Color666666,ALIGN1,LAYER5;
 STICKLINE(FLAG1 AND DX>=1,REF(Q3,S1),Q4,(s1+1)*20,0),Color777777,ALIGN1,LAYER5;
 STICKLINE(FLAG1 AND DX>=1,REF(Q4,S1),Q5,(s1+1)*20,0),Color665506,ALIGN1,LAYER5;
 STICKLINE(FLAG1 AND DX>=2,REF(Q5,S1),Q6,(s1+1)*20,0),Color777000,ALIGN1,LAYER5; 
DRAWTEXT(上涨=0 AND DX>=1,DJ*1.003,''+''+NUMTOSTRN(DJ,2)),COLORYELLOW,align2;
 DRAWTEXT(上涨=0 AND DX>=1,Q1,'3%'+'-'+NUMTOSTRN(Q1,2)),COLORYELLOW,align2;
 DRAWTEXT(上涨=0 AND DX>=1,Q2,'5%'+'-'+NUMTOSTRN(Q2,2)),COLORYELLOW,align2;
 DRAWTEXT(上涨=0 AND DX>=1,Q3,'8%'+'-'+NUMTOSTRN(Q3,2)),COLORYELLOW,align2;
 DRAWTEXT(上涨=0 AND DX>=1,Q4,'13%'+'-'+NUMTOSTRN(Q4,2)),COLORYELLOW,align2;
 DRAWTEXT(上涨=0 AND DX>=1,Q5,'18%'+'-'+NUMTOSTRN(Q5,2)),COLORYELLOW,align2;
 DRAWTEXT(上涨=0 AND DX>=2,Q6,'25%'+'-'+NUMTOSTRN(Q6,2)),COLORYELLOW,align2;
 {添加参数精灵
 {--------显示年月日低点日期--------}
 调整年 Param#1 显示年度
 调整月 Param#2 显示月份
 调整日 Param#3 显示日期
 --------参数=1显示低点水平线------
 参数=2--4 Param#4 显示涨幅幅度线
 参数=0--2 Param#5 显示K线幅度线
 --------显示均价线--------
 P1计算 Param#6 任意均价线;
 P2计算 Param#7 任意均价线;
 P3计算 Param#8 任意均价线;
 P4计算 Param#9 任意均价线;
 P5计算 Param#10 任意均价线;
 

 
                 
                 
                

 
                             现在就去充值积分
 现在就去充值积分 加入VIP可下载100以下的所有资源
加入VIP可下载100以下的所有资源