您現在的位置：程序化交易>> 股票公式>> 其他>> 其他軟件公式>>正文內容

優化整合指標幅度線均價線布林線支撐與壓力線一陽穿三線[其他軟件公式]

作者：飛狐來源：cxh99.com 發布時間：2012年06月26日點擊數：　【收藏到本網的會員中心】

相關標簽: 理想一陽穿三線指標、支撐線和壓力線指標、優化布林線源碼、布林線指標、布林線指標公式、布林線boll指標詳解、布林線指標的竅門、通達信布林線指標公式、帶買賣點的布林線指標、

優化整合指標單陽不破一陽穿三線幅度線均價線布林線支撐與壓力線
此指標是以某日期為定點團結量價，此指標可調解轉換均價線或布林線以”研判漲幅度“交易。
通達信公式指標 CXH99.COM 圖中的修飾符{信號}是出布林線上軌和RSI>76 RSI>80.K線有單陽不破和一陽破三線。
通達信公式指標 CXH99.COM {優化整合主圖單陽不破一陽穿三線幅度線均價線布林線支撐與壓力線}

源碼：

{公式指標大全 CXH99.COM}
INPUT:RQA(2011,1990,3000),RQB(1,1,12),RQC(1,1,31),DF(0,0,6),FA(0,0,2),EA(0,0,2);
INPUT:P1(5,0,255),P2(10,0,255),P3(20,0,255),P4(55,0,255),P5(120,0,255);
TTt:=ISLASTBAR=1;
AS1:=((H-L)/L)*100;
AS2:=H-L;
MAI:=C*1.015;
MAII:=C*1.03;
DRAWTEXTEX(TTT,0,310,1,'▼明短線獲利[1.5%--3%:]'+'/'+NUMTOSTR(MAI[SYSPARAM(1)],2)+'--'+NUMTOSTR(MAII [SYSPARAM(1)],2)),Color00dd00;
DRAWTEXTEX(TTt,0,176,1,'【振幅:'+NUMTOSTR(AS1[SYSPARAM(1)],2)+'% '+NUMTOSTR(AS2[SYSPARAM(1)],2)+'元 】'+''),Colordddd00;
DRAWTEXTEX(TTT,0,1,1,'【代碼:'+STKLABEL+' 名稱:'+STKNAME+'】'),ColorffFFFF;//DRAWTEXTEX(TTT,0,270,14,'【創于2011.02.17晚】'),ColorffFFFF;
aa:=BLKNAME;
BB:=STRLEFT(AA,STRFIND(AA,',',1)-1);
K:=STKCOUNT(BB);
SYL:=C/FINANCE(33);
DRAWTEXTEX(TTT AND fa,0,3,14,' 所屬板塊: '+BB+', 共有：'+NUMTOSTR(K,0)+' 家上市公*'+'  刊行價'+NUMTOSTR(FINANCE(51),2)+'元'+'  刊行量'+NUMTOSTR(FINANCE(52),2)+ '萬股【市盈率:'+NUMTOSTR(SYL,2)),COLORDDaaDD;
RQD:=(RQA-1900)*10000+RQB*100+RQC;
DJ:=REF(L,BARSLAST(DATE<=RQD ));//求某一日期的最低價
上漲:=BARSSINCE(BACKSET(BARSTATUS=2,BARSLAST(L=DJ)+1));
VERTLINE(DJ AND DATE>=RQD AND DF>=1),COLOR333333,LINEDOT;//畫垂直線
STICKLINE(C>=O,low,high,0.5,0),colorFF;
STICKLINE(C>=O,close,open,8,0),color102088;
STICKLINE(C>=O,close,open,7,0),color102099;
STICKLINE(C>=O,close,open,6,0),color1020AA;
STICKLINE(C>=O,close,open,5,0),color1020BB;
STICKLINE(C>=O,close,open,4,0),color1020CC;
STICKLINE(C>=O,close,open,3,0),color1020DD;
STICKLINE(C>=O,close,open,2,0),color1020EE;
STICKLINE(C>=O,close,open,1,0),color1020FF;
STICKLINE(C<=O,low,high,0.5,0),colorFF8800;
STICKLINE(C<=O,close,open,8,0),colorFF7700;
STICKLINE(C<=O,close,open,7,0),colorFF8800;
STICKLINE(C<=O,close,open,6,0),colorFF9900;
STICKLINE(C<=O,close,open,5,0),colorFFAA00;
STICKLINE(C<=O,close,open,4,0),colorFFBB00;
STICKLINE(C<=O,close,open,3,0),colorFFCC00;
STICKLINE(C<=O,close,open,2,0),colorFFDD00;
STICKLINE(C<=O,close,open,1,0),colorFFEE00;
POLYLINE(DATE>=RQD AND DF>=1,DJ),Color999999;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=2,DJ*1.03),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=2,DJ*1.05),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=3,DJ*1.08),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=3,DJ*1.13),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=4,DJ*1.18),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=4,DJ*1.25),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=5,DJ*1.34),Color999999,LINEDOT;//實用畫直線
POLYLINE(DATE>=RQD AND DF>=5,DJ*1.37),Color999999,LINEDOT;//實用畫直線
DRAWTEXT(上漲=0 AND DF>=1,DJ,'1'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=1 AND DF>=1,DJ,'2'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=2 AND DF>=1,DJ,'3'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=3 AND DF>=1,DJ,'4'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=4 AND DF>=1,DJ,'5'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=5 AND DF>=1,DJ,'6'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=6 AND DF>=1,DJ,'7'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=7 AND DF>=1,DJ,'8'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=8 AND DF>=1,DJ,'9'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=9 AND DF>=1,DJ,'10'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=10 AND DF>=1,DJ,'11'),COLORFFFFFF,pxdn5;
DRAWTEXT(上漲=11 AND DF>=1,DJ,'12'),COLORFFFFFF,pxdn5;
{單陽不破}
//陽漲幅:=4;
//陽倍量:=2;
//單陽:=C>O*(1+陽漲幅/100) AND VOL>REF(VOL,1)*陽倍量;
陽漲幅:=3.5;
陽倍量:=1.9;
單陽收:=C;
單陽開:=O;
單陽:=單陽收>=REF(C,1)*(1+陽漲幅/100)AND VOL>REF(VOL,1)*陽倍量;
DRAWTEXT(BARSTATUS=0 AND 單陽,L,'陽'),COLOR00FFFF,pxdn5;
高不破價:=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,LINEDOT;
STICKLINE(單陽不破,實體幅度2,實體幅度2,4,1),COLORFFFF00;
STICKLINE(單陽不破,實體幅度1,實體幅度1,4,1),COLORFFFF00;
DRAWTEXT(BARSLAST(單陽)=1 AND 單陽不破,低不破價,'1'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=2 AND 單陽不破,低不破價,'2'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=3 AND 單陽不破,低不破價,'3'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=4 AND 單陽不破,低不破價,'4'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=5 AND 單陽不破,低不破價,'5'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=6 AND 單陽不破,低不破價,'6'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=7 AND 單陽不破,低不破價,'7'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=8 AND 單陽不破,低不破價,'8'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=9 AND 單陽不破,低不破價,'9'),COLORGREEN,pxdn5;
DRAWTEXT(BARSLAST(單陽)=10 AND 單陽不破,低不破價,'10'),COLORGREEN,pxdn5;
DRAWTEXT(上漲=0 AND DF>=2,DJ*1.03,'  3％ ['+NUMTOSTR(DJ*1.03,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=2,DJ*1.05,'  5％ ['+NUMTOSTR(DJ*1.05,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=3,DJ*1.08,'  8％ ['+NUMTOSTR(DJ*1.08,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=3,DJ*1.13,'  13％ ['+NUMTOSTR(DJ*1.13,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=4,DJ*1.18,'  18％ ['+NUMTOSTR(DJ*1.18,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=4,DJ*1.25,'  25％ ['+NUMTOSTR(DJ*1.25,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=5,DJ*1.34,'  34％ ['+NUMTOSTR(DJ*1.34,2)+']'),ALIGN1,PXDN5,COLORWHITE;
DRAWTEXT(上漲=0 AND DF>=5,DJ*1.37,'  37％ ['+NUMTOSTR(DJ*1.37,2)+']'),ALIGN1,PXDN5,COLORWHITE;
{一陽穿三線}
MA2:=EMA(C,2);
MA5:=EMA(C,5),COLORFFFFFF;
MA13:=EMA(C,13),COLOR00FFFF;
MA34:=EMA(C,34),COLORFF00FF;
MA55:=EMA(C,55),COLOR00FF00;
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;
BQ:=IF((SYSPARAM(1) = (BARSSINCE((C > 0)) + 1)),1,0);
BQ1:=(H<REF(L,1));BQ2:=(L>REF(H,1));
BQ3:=REF(L,1)-H;  BQ4:=L-REF(H,1);
BQ5:=REF(L,1);    BQ6:=H;
BQ7:=REF(H,1);    BQ8:=L;
QZH:=IF(BQ1,BQ1,BQ2);
QZH1:=IF(BQ1,BQ5,BQ7);
QZH2:=IF(BQ1,BQ6,BQ8);
QK:=IF(C>O,C,O);
QK1:=IF(C>O,O,C);
QKA:=IF(C>O,o+(c-o)*0.65,o+(c-o)*0.35);
QKB:=IF(C>O,o+(c-o)*0.35,o+(c-o)*0.65);
STICKLINE(BQ1,QKA,QK,5.5,0),colorEE0000;
STICKLINE(BQ2,QKB,QK1,5,0),color20CEEE;
DRAWTEXT(((BQ > 0) AND Bq1),H,'↓缺口 '+'\n '+NUMTOSTR(BQ3[SYSPARAM(1)],2)+' '+'\n  '+NUMTOSTR(BQ5[SYSPARAM(1)],2)+'-'+NUMTOSTR(BQ6[SYSPARAM(1)],2)+' '),colorFFFFEE,pxdn10,ALIGN2;
DRAWTEXT(((BQ > 0) AND Bq2),L,'↑缺口 '+'\n  '+NUMTOSTR(BQ4[SYSPARAM(1)],2)+' '+'\n  '+NUMTOSTR(BQ7[SYSPARAM(1)],2)+'-'+NUMTOSTR(BQ8[SYSPARAM(1)],2)+' '),color00FFEE,pxup20,ALIGN2;
DRAWSL(SYSPARAM(1)=BARPOS AND QZH,QZH1,0,0,0),COLOR888888;//隨光標顯示缺口直線
DRAWSL(SYSPARAM(1)=BARPOS AND QZH,QZH2,0,0,0),COLOR888888;
QKD:=BQ8[DATACOUNT]; QKE:=0;
QK:=IF(BQ2,1,IF(BQ1,-1,0));
for I=DATACOUNT-1 downto 2 do begin
  IF BQ8[I ]<QKD then QKD:=BQ8 [I ];
  IF BQ6[I ]>QKE then QKE:=BQ6 [I ];
  IF QK[I ]=1 and QKD<=BQ6[I-1] then QK [I ]:=0;
  IF QK[I ]=-1 and QKE>=BQ8[I-1] then QK [I ]:=0;
end;
DRAWTEXT(QK=1,BQ8,'未補'),COLOR999999,PXUP;
DRAWTEXT(QK=-1,BQ6,'未補  '),COLOR999999,PXDN ;
AS:=(o+h+l+c)/4;
BL:=EMA(AS,17);
BLS:=BL+2.58*STDP(C,20);
BL2:=BL+1.96*STDP(C,20);
BL3:=BL-1.96*STDP(C,20);
BLX:=BL-2.58*STDP(C,20);
BMA:IF(EA=1,BLS,0),LINETHICK1,COLOR00FFFF,LINEDOT;
BMB:IF(EA=1,BL2,0),LINETHICK1,COLORFF99FF,LINEDOT;
BMC:IF(EA=1,BL3,0),LINETHICK1,COLORF0FF00,LINEDOT;
BMD:IF(EA=1,BLX,0),LINETHICK1,COLOR00FF00,LINEDOT;
BME:IF(EA=1,BL,0),LINETHICK1,COLOR00FFFF;
BLT:=BARSTATUS=2 AND EA=1;
DRAWTEXT(BLT AND BLS>REF(BLS,1),BLS,'↑：'+NUMTOSTR(BLS,2)),COLOR00ffff;
DRAWTEXT(BLT AND BLS<REF(BLS,1),BLS,'↓：'+NUMTOSTR(BLS,2)),Color4BFACE;
DRAWTEXT(BLT AND BL2>REF(BL2,1),BL2,'↑：'+NUMTOSTR(BL2,2)),COLORMAGENTA;
DRAWTEXT(BLT AND BL2<REF(BL2,1),BL2,'↓：'+NUMTOSTR(BL2,2)),ColorF29BE1;
DRAWTEXT(BLT AND BL>REF(BL,1),BL,' ↑：'+NUMTOSTR(BL,2)),COLOR00ffff;
DRAWTEXT(BLT AND BL<REF(BL,1),BL,' ↓：'+NUMTOSTR(BL,2)),Color00FF00;
DRAWTEXT(BLT AND BL3>REF(BL3,1),BL3,'↑：'+NUMTOSTR(BL3,2)),COLORffff00;
DRAWTEXT(BLT AND BL3<REF(BL3,1),BL3,'↓：'+NUMTOSTR(BL3,2)),ColorFAD994;
DRAWTEXT(BLT AND BLX>REF(BLX,1),BLX,'↑：'+NUMTOSTR(BLX,2)),COLOR00ff00;
DRAWTEXT(BLT AND BLX<REF(BLX,1),BLX,'↓：'+NUMTOSTR(BLX,2)),ColorB7FD91;
{1.96統計學中為95％可信區間，2.58為99％可信區間，故回收1.96和2.58作為參數}
DI:=EMA(CLOSE,10) - EMA(CLOSE,22);
PARTLINE(EA=1 AND BL<REF(BL,1),BL),colorffF000,linethick1;
DRAWICON(CROSS(H,BLS),H,5);
DRAWICON(CROSS(H,BL2),H,7),pxup19;
DRAWICON(CROSS(C,BL) AND BL>REF(BL,1) AND DI>REF(DI,1),L,8);
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
PARTLINE(RSI1>76,H),CIRCLEDOT,LINETHICK1,COLORFFFF00,pxup5;
PARTLINE(RSI1>80,H),CROSSDOT,LINETHICK1,COLOR000FF,pxup5;
DRAWTEXT((BQ > 0) AND RSI1>76,h,''+NUMTOSTR(RSI1[SYSPARAM(1)],2)+':RSI>76 '),pxup29,COLORFFFF00,ALIGN2;
DRAWTEXT((BQ > 0) AND CROSS(H,BL2),h,''+NUMTOSTR(BL2[SYSPARAM(1)],2)+':上穿上軌'),pxup39,COLORFFFF00,ALIGN1;
DRAWTEXT((BQ > 0) AND CROSS(H,BLS),h,''+NUMTOSTR(BLS[SYSPARAM(1)],2)+':上穿外軌'),pxup39,COLORFFFF00,ALIGN1;
MMA5:=EMA(AS,P1);
SYAA:=EMA(AS,P2);
SYAB:=EMA(AS,P3);
SYAC:=EMA(AS,P4);
SYAD:=EMA(AS,P5);
BMA5:IF(EA=2,MMA5,0),LINETHICK1,COLORFFFFFF;
BMA10:IF(EA=2,SYAA,0),LINETHICK1,COLOR00FFFF;
BMA20:IF(EA=2,SYAB,0),LINETHICK1,COLORFF99FF;
BMA55:IF(EA=2,SYAC,0),LINETHICK1,COLOR209FFF;
BMAX:IF(EA=2,SYAD,0),LINETHICK1,COLORFFFF00;
BLTF:=BARSTATUS=2 AND EA=2;
DRAWTEXT(BLTF AND MMA5>REF(MMA5,1),MMA5,'↑：'+NUMTOSTR(MMA5,2)),COLORFFffff;
DRAWTEXT(BLTF AND MMA5<REF(MMA5,1),MMA5,'↓：'+NUMTOSTR(MMA5,2)),ColorFFFFFF;
DRAWTEXT(BLTF AND SYAA>REF(SYAA,1),SYAA,'↑：'+NUMTOSTR(SYAA,2)),COLOR00ffff;
DRAWTEXT(BLTF AND SYAA<REF(SYAA,1),SYAA,'↓：'+NUMTOSTR(SYAA,2)),Color00FFFF;
DRAWTEXT(BLTF AND SYAB>REF(SYAB,1),SYAB,'↑：'+NUMTOSTR(SYAB,2)),COLORFF99ff;
DRAWTEXT(BLTF AND SYAB<REF(SYAB,1),SYAB,'↓：'+NUMTOSTR(SYAB,2)),ColorFF99FF;
DRAWTEXT(BLTF AND SYAC>REF(SYAC,1),SYAC,'↑：'+NUMTOSTR(SYAC,2)),COLOR209fff;
DRAWTEXT(BLTF AND SYAC<REF(SYAC,1),SYAC,'↓：'+NUMTOSTR(SYAC,2)),Color209FFF;
FUZ:=L+((H-L)/2);FUS:=O+((C-O)/2); FUSY:=C+((O-C)/2);SSFU:=(FUZ+IF(C>O,FUS,FUSY))/2;
FUZ1:=L+((H-L)*0.333);FUS1:=O+((C-O)*0.333);FUS1Y:=C+((O-C)*0.333);SSFU1:=(FUZ1+IF(C>O,FUS1,FUS1Y))/2;
FUZ2:=L+((H-L)*0.667);FUS2:=O+((C-O)*0.677);FUS2Y:=C+((O-C)*0.667);SSFU2:=(FUZ2+IF(C>O,FUS2,FUS2Y))/2;
STICKLINE(C=C AND fa,SSFU2,SSFU2,4,0),COLORFFaaff,LINETHICK1;
STICKLINE(C=C AND fa,SSFU1,SSFU1,4,0),COLORFFaaff,LINETHICK1;
STICKLINE(C=C AND fa,SSFU,SSFU,5.5,0),COLOR20dFFF,LINETHICK1;
STICKLINE(C=C AND fa,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;
STICKLINE(C=C AND fa,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;
AJ:=AMOUNT/(VOL*100),COLORFFFFFF,LINETHICK0;
DRAWTEXT(C=C AND fa=2,AJ,'←'),COLORFF5f00;
A3:=C=HHV(C,6);
A9:=C=LLV(C,6);
A4:=BARSLAST(A3);
A5:=BARSLAST(A9);
A6:=IF(A4,REF(C,A4),REF(C,A4))*1.005;
A7:=IF(A5,REF(C,A5),REF(C,A5))*0.995;
PARTLINE(A6=ref(A6,1) AND FA,A6),COLOR00ff00,LINEDOT;
PARTLINE(A7=ref(A7,1) AND FA,A7),COLOR00ffff,LINEDOT;
漲停:=C>REF(C,1)*1.099;
盤價:REF(O,BARSLAST(漲停)),COLOR666666{,DOTLINE,POINTDOT},LINEDASHDOT;
{添加參數精靈
{--------顯示年代日低點日期--------}
調解年 Param#1  顯示年度
調解月 Param#2  顯示月份
調解日 Param#3  顯示日期
---------參數=1顯示低點程度線------
參數=2--5 Param#4 顯示漲幅幅度線
參數=0--2 Param#5 顯示K線幅度線
參數=1--2 Param#6  轉換布林與EMA線
--------顯示均價線--------
P1計較    Param#7 任意均價線;
P2計較    Param#8 任意均價線;
P3計較    Param#9 任意均價線;
P4計較    Param#10 任意均價線;
P5計較    Param#11 任意均價線;
    {<span style="display:none;"><a href="http://www.kzuj.com.cn">程序化交易模型</a></span>}

公式導入教程: 【通達信公式源碼導入方法教程】【同花順公式源碼導入方法教程】【大智慧新一代公式源碼導入方法教程】