|
唐仁政老師的精品公式 【杠上開花】最初是由,，找回來的公式【CCI主圖】發(fā)展成：【CCI主圖 TDX】,、 【CCI資金】,、【杠上開花】,。最后找出在通達(dá)信自動(dòng)畫線的方法后定為： 【杠上開花】自動(dòng)畫線版,。同時(shí)也是提供了,，DZH2和飛狐有關(guān)版本,。 一,，【杠上開花】上兩條短點(diǎn)的線叫杠(雙杠,，高低杠由你叫)。長出圖的是 撐壓力線和底線,。杠上的手式加上K線是紅是黑指向K線可能的走勢,。 當(dāng)K線走出杠區(qū)后趨勢成立。虛線是近期高低點(diǎn)位,。 二,，開花信號也是立樁量成立信號。但這里不是量能立樁量,，而是CCI立樁量,。 其功能與量能立樁量相以,，在低位是強(qiáng)烈買入信號。其它還有兩個(gè)買入信 號和一個(gè)走人信號,。 三,，畫趨勢線本身就用未來函數(shù)作圖。 通達(dá)信精品公式“杠上開花”指標(biāo)帶趨勢線 {杠上開花 N=8} A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N);{高點(diǎn)} R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1); DRAWLINE(D1,H,S11,H,1),COLORBLUE; A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N);{低點(diǎn)} T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1); DRAWLINE(D2,L,U11,L,1),COLORBLUE; M:=INTPART(3*N/5); A12:=REF(H,M)=HHV(H,2*M+1); B12:=FILTER(A12,M); C12:=BACKSET(B12,M+1); D12:=FILTER(C12,M);{高點(diǎn)} R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1); S112:=R112>REF(R112,1); DRAWLINE(D12,H,S112,H,1),COLORRED; A22:=REF(L,M)=LLV(L,2*M+1); B22:=FILTER(A22,M); C22:=BACKSET(B22,M+1); D22:=FILTER(C22,M);{低點(diǎn)} T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1); U112:=T112>REF(T112,1); DRAWLINE(D22,L,U112,L,1),COLORRED; VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3); VAR2222:=CROSS(VAR1111,0.9); VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3); VAR4444:=CROSS(VAR3333,0.9); 壓力:= REF(HIGH,BARSLAST(VAR2222)); STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),COLOREA91B5,LINETHICK3; 支撐:= REF(LOW,BARSLAST(VAR4444)); STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),COLOR00B4FF,LINETHICK3; 下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); RRRSV:=SMA(下檔線,3,1); KKK:=SMA(RRRSV,3,1); DDD:=((3 * RRRSV) - (2 * KKK)); JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100); RSV24:=SMA(JJ12,3,1); K24:=SMA(RSV24,3,1); D24:=((3 * RSV24) - (2 * K24)); 壓力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),COLORFFFFFF; 壓力位:=IF(ISLASTBAR,壓力2,DRAWNULL); STICKLINE(ISLASTBAR ,壓力位,壓力位,120,0),LINETHICK4,COLORFFFFFF; 底部:=LLV(HIGH,30),COLOR00FF00; 底部位:=IF(ISLASTBAR,底部,DRAWNULL); STICKLINE(ISLASTBAR ,底部位,底部位,100,0),LINETHICK4,COLOR00FF00; AA05:=MA(C,5),COLOR0099CC; 五日乖離率:=(C-AA05)/AA05*100; BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416; 速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1); 加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW; AA10:=MA(C,10); AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416; AA30:=MA(C,30); 三拾日乖離率:=(C-AA30)/AA30*100; VAR11:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1); VAR22:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1); BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416; 強(qiáng)勢狙擊:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10); 加倉:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖離率>REF(三拾日乖離率,1) AND AA10>REF(AA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ; 清倉:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1) AND 三拾日乖離率<REF(三拾日乖離率,1) AND AA10<REF(AA10,1),10); DRAWICON(加倉 ,LOW*0.99,23); DRAWICON(清倉 ,HIGH*1.01,15); DRAWICON(強(qiáng)勢狙擊 ,LOW*0.99,13); TYP := (HIGH + LOW + CLOSE)/3; CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6)); 差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0; CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10)); 差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0; CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20)); 差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0; CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30)); 差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0; CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60)); 差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0; CCI:=CCI1+CCI2+CCI3+CCI4+CCI5; AAA:=(3*C+H+L+O)/6; VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36; VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3; VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3; VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3; VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3; VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; 短線:VAR1,COLORWHITE; 中線:VAR6,COLORYELLOW; 下跌:IF(VAR1=VAR6,VAR6, DRAWNULL),COLORGREEN; TJ1:= CCI1>差值4; 立樁量:=FILTER(TJ1,0); TJ2:=IF(BARSLAST(立樁量)=1 ,1,IF(BARSLAST(立樁量)=2 ,1, IF(BARSLAST(立樁量)=3 ,1,0))); 成立1:=TJ2; 條件成立1:=FILTER(成立1,5); TJ11:= CCI1<-差值4 ; 立樁量2:=FILTER(TJ11,0); TJ22:=IF(BARSLAST(立樁量2)=1 AND CLOSE>REF(HIGH,1),1, IF(BARSLAST(立樁量2)=2 AND CLOSE>REF(HIGH,2),1, IF(BARSLAST(立樁量2)=3 AND CLOSE>REF(HIGH,3),1,0))); 成立2:=TJ22; 條件成立2:=FILTER(成立2,5); TJ111:=(ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5)) OR (VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1); 立樁量3:=FILTER(TJ111,5); TJ222:=IF(BARSLAST(立樁量3)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量3)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量3)=3 AND CLOSE>REF(HIGH,3),1,0))); 突破3:=TJ222=1; STICKLINE(CLOSE AND 下跌!= VAR6,REF(HIGH,BARSLAST(立樁量3)), REF(HIGH,BARSLAST(立樁量3)),10,1),COLORCYAN; STICKLINE(CLOSE AND 下跌!= VAR6,REF(LOW,BARSLAST(立樁量3)), REF(LOW,BARSLAST(立樁量3)),10,1),COLORYELLOW; TJ3:=IF(BARSLAST(立樁量3)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量3)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量3)=3 AND CLOSE>REF(LOW,3),1,0))); 三天法則:=TJ3=1; 成立:=三天法則 AND 突破3; 條件成立:=FILTER(成立,5); TJ31:=(VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1); TJ32:=FILTER(TJ31,1); IF(條件成立 AND 下跌!= VAR6 AND AA30>=REF(AA30,1),H*1.03,DRAWNULL),CROSSDOT,LINETHICK6,COLORFF33FF; IF(條件成立 AND 下跌!= VAR6 AND AA30>=REF(AA30,1),H*1.03,DRAWNULL),POINTDOT,LINETHICK4,COLOR00CCFF; STICKLINE(C>=O,L,H,0,0),COLORRED; STICKLINE(C<O,L,H,0,0),COLORFFFF00; STICKLINE(C>O,C,O,3.2,0),COLORRED; STICKLINE(1,C,O,2.8,0),COLOR454500; STICKLINE(1,C,O,2,0),COLOR555500; STICKLINE(1,C,O,1.5,0),COLOR656500; STICKLINE(1,C,O,1,0),COLOR757500; STICKLINE(1,C,O,0.5,0),COLOR858500; STICKLINE(立樁量,C,O,2.8,0),COLOR000045; STICKLINE(立樁量,C,O,2.8,0),COLOR000065; STICKLINE(立樁量,C,O,2,0),COLOR000085; STICKLINE(立樁量,C,O,1.5,0),COLOR0000A5; STICKLINE(立樁量,C,O,1,0),COLOR0000C5; STICKLINE(立樁量,C,O,0.5,0),COLOR0000E5; DRAWICON(條件成立1,REF(HIGH,BARSLAST(立樁量3)),12); DRAWICON(條件成立2,REF(LOW,BARSLAST(立樁量3)),11); 大智慧L2版 {杠上開花 DZH2 } input:n(4,1,255); DRAWGBKLAST(CLOSE>0,STRIP(RGB(95,95,95),RGB(0,0,0),0)); wN:=N;{原碼 N:=3;} wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高點(diǎn)} wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低點(diǎn)} wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wD1)+1); wS1:=wR1>REF(wR1,1); {前一高} wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wD2)+1); wU1:=wT1>REF(wT1,1); {前一低} wR2:=BACKSET(wS1,REF(BARSLAST(wD1),1)+2); wS2:=wR2>REF(wR2,1); {前二高} wT2:=BACKSET(wU1,REF(BARSLAST(wD2),1)+2); wU2:=wT2>REF(wT2,1); {前二低} wR3:=BACKSET(wS2,REF(BARSLAST(wD1),1)+2); wS3:=wR3>REF(wR3,1); {前三高} wT3:=BACKSET(wU2,REF(BARSLAST(wD2),1)+2); wU3:=wT3>REF(wT3,1); {前三低} wR4:=BACKSET(wS3,REF(BARSLAST(wD1),1)+2); wS4:=wR4>REF(wR4,1); {前四高} wT4:=BACKSET(wU3,REF(BARSLAST(wD2),1)+2); wU4:=wT4>REF(wT4,1); {前四高} DRAWLINE(wS2,H,wS1,H,1),Color0000Ff; {★壓力１:} DRAWLINE(wU2,L,wU1,L,1),POINTDOT,Color0000FF;{★支撐１:} DRAWLINE(wS3,H,wS2,H,1),Color888000; {★壓力２:} DRAWLINE(wU3,L, wU2,L,1),POINTDOT,Color888000;{★支撐２:} {DRAWLINE(wS4,H,wS3,H,1),Color00ccCC;{★壓力３:} {DRAWLINE(wU4,L, wU3,L,1),POINTDOT,Color00ccCC;{★支撐３;} 平均成本:=COST(50); 獲利盤:=WINNER(CLOSE)*100; DRAWTEXTREL(20,400,'獲利盤:'+獲利盤+'% '),colormagenta; DRAWTEXTREL(20,500,'平均成本:'+平均成本),colormagenta; zg:=FINANCE2(35);{總股} lta:=FINANCE2(37);{流通A} sy:=FINANCE2(3);{收益} sl:=DYNAINFO(39);{市盈率} wf:=FINANCE2(8);{未分} gj:=FINANCE2(7);{公積}; jz:=FINANCE2(4);{凈資} cw:='總股:'+zg+' 流通A:'+lta+' 收益:'+sy+' 市盈率:'+sl+' 未分:'+wf+' 公積:'+gj+' 凈資:'+jz; DRAWTEXTREL(20,100,cw),COLOR0055FF; DRAWTEXTREL(20,200,BKNAME),COLOR0055FF; AA05:=MA(C,5); 五日乖離率:=(C-AA05)/AA05*100; BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416; 速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1); 加速度5:=EMA((速度5-REF(速度5,1)),3); AA10:=MA(C,10); AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416; AA30:=MA(C,30); 三拾日乖離率:=(C-AA30)/AA30*100; VAR11:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1); VAR22:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1); BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416; 強(qiáng)勢狙擊:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10); 加倉:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖離率>REF(三拾日乖離率,1) AND AA10>REF(AA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ; 清倉:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1) AND 三拾日乖離率<REF(三拾日乖離率,1) AND AA10<REF(AA10,1),10); DRAWICON(加倉 ,LOW*0.99,9); DRAWICON(清倉 ,HIGH*1.01,4); DRAWICON(強(qiáng)勢狙擊 ,LOW*0.99,5); VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3); VAR2222:=CROSS(VAR1111,0.9); VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3); VAR4444:=CROSS(VAR3333,0.9); 壓力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5; STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5; 支撐: REF(LOW,BARSLAST(Var4444)), POINTDOT,Color00b4ff; STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4444)),REF(LOW,BARSLAST(Var4444)),5,0),Color00b4ff; 下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); aRSV:=SMA(下檔線,3,1); aK:=SMA(aRSV,3,1); aD:=((3 * aRSV) - (2 * aK)); aJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100); aRSV24:=SMA(aJ12,3,1); aK24:=SMA(aRSV24,3,1); aD24:=((3 * aRSV24) - (2 * aK24)); 撐壓位:=IF(CROSS(aD24,aD),HIGH,REF(HIGH,BARSLAST(CROSS(aD24,aD)))){,LINETHICK2,COLORFFFFFF}; 底:=LLV(HIGH,30){,COLOR00FF00,LINETHICK2}; STICKLINE(BARSTATUS=2 ,撐壓位,撐壓位,50,1),LINETHICK1,COLORFFFFFF; DRAWTEXT(BARSTATUS=2 ,撐壓位,' 撐壓'),COLORFFFFFF,VALIGN1; STICKLINE(BARSTATUS=2 ,底,底,50,1),COLOR00FF00,LINETHICK1; DRAWTEXT(BARSTATUS=2 ,底,' 底線'),COLOR00FF00,VALIGN0; TYP := (HIGH + LOW + CLOSE)/3; CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6)); 差值1:=ABS(REF(CCI1,1)-CCI1); CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10)); 差值2:=ABS(REF(CCI2,1)-CCI2); CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20)); 差值3:=ABS(REF(CCI3,1)-CCI3); CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30)); 差值4:=ABS(REF(CCI4,1)-CCI4); CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60)); 差值5:=ABS(REF(CCI5,1)-CCI5); CCI:=CCI1+CCI2+CCI3+CCI4+CCI5; AAA:=(3*C+H+L+O)/6; VAR1:=WMA(AAA,8); VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3; VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3; VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3; VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3; VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; 短線:VAR1,COLORWHITE; 中線:VAR6,COLORYELLOW; 下跌:=IF(VAR1=VAR6,VAR6,0); PARTLINE(VAR6,下跌=VAR6,RGB(0,255,0)); {條件1} TJ1:= CCI1>差值4; 立樁量:=TJ1; TJ2:=IF(BARSLAST(立樁量)=1 ,1,IF(BARSLAST(立樁量)=2 ,1, IF(BARSLAST(立樁量)=3 ,1,0))); 三天法則1:=TJ2=1; 成立1:=三天法則1; 條件成立1:=FILTER(成立1,5); TJ11:= cci1<-差值4 ; 立樁量2:=TJ11; TJ22:=IF(BARSLAST(立樁量2)=1 AND CLOSE>REF(HIGH,1),1, IF(BARSLAST(立樁量2)=2 AND CLOSE>REF(HIGH,2),1, IF(BARSLAST(立樁量2)=3 AND CLOSE>REF(HIGH,3),1,0))); 三天法則2:=TJ22=1; 成立2:=三天法則2; 條件成立2:=FILTER(成立2,5); {條件2} TJ111:=(ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5)); 立樁量3:=FILTER(TJ111,5); TJ222:=IF(BARSLAST(立樁量3)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量3)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量3)=3 AND CLOSE>REF(HIGH,3),1,0))); STICKLINE(CLOSE AND 下跌<>VAR6,REF(HIGH,BARSLAST(立樁量3)),REF(HIGH,BARSLAST(立樁量3)),20,0),COLORCYAN; STICKLINE(CLOSE AND 下跌<> VAR6,REF(LOW,BARSLAST(立樁量3)),REF(LOW,BARSLAST(立樁量3)),20,0),COLORYELLOW; DRAWICON(條件成立1 AND 下跌=0,REF(HIGH,BARSLAST(立樁量3)),8),VALIGN1; DRAWICON(條件成立2,REF(LOW,BARSLAST(立樁量3)),7),VALIGN1,ALIGN1; 三天法則:=TJ222=1; 成立:=三天法則{ AND 突破3}; 條件成立:FILTER(成立,5),LINETHICK0,COLORYELLOW; PARTLINE(H*1.02,條件成立 AND 下跌=0),CROSSDOT,LINETHICK6,COLORFF66FF,LAYER2; PARTLINE(H*1.02,條件成立 AND 下跌=0),POINTDOT,LINETHICK4,COLOR00CCFF,LAYER2; STICKLINE(C>=O,L,H,0,0),COLORred; STICKLINE(C<O,L,H,0,0),COLORFFFF00; STICKLINE(1 and C>O,C,O,7,0),COLORred; STICKLINE(1,C,O,6,0),COLOR454500; STICKLINE(1,C,O,5,0),COLOR555500; STICKLINE(1,C,O,4,0),COLOR656500; STICKLINE(1,C,O,3,0),COLOR757500; STICKLINE(1,C,O,2,0),COLOR858500; STICKLINE(TJ1,C,O,6,0),COLOR000065; STICKLINE(TJ1,C,O,5,0),COLOR000085; STICKLINE(TJ1,C,O,4,0),COLOR0000A5; STICKLINE(TJ1,C,O,3,0),COLOR0000C5; STICKLINE(TJ1,C,O,2,0),COLOR0000E5; 大智慧L2版
{杠上開花 DZH2 } input:n(4,1,255); DRAWGBKLAST(CLOSE>0,STRIP(RGB(95,95,95),RGB(0,0,0),0)); wN:=N;{原碼 N:=3;} wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高點(diǎn)} wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低點(diǎn)} wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wD1)+1); wS1:=wR1>REF(wR1,1); {前一高} wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wD2)+1); wU1:=wT1>REF(wT1,1); {前一低} wR2:=BACKSET(wS1,REF(BARSLAST(wD1),1)+2); wS2:=wR2>REF(wR2,1); {前二高} wT2:=BACKSET(wU1,REF(BARSLAST(wD2),1)+2); wU2:=wT2>REF(wT2,1); {前二低} wR3:=BACKSET(wS2,REF(BARSLAST(wD1),1)+2); wS3:=wR3>REF(wR3,1); {前三高} wT3:=BACKSET(wU2,REF(BARSLAST(wD2),1)+2); wU3:=wT3>REF(wT3,1); {前三低} wR4:=BACKSET(wS3,REF(BARSLAST(wD1),1)+2); wS4:=wR4>REF(wR4,1); {前四高} wT4:=BACKSET(wU3,REF(BARSLAST(wD2),1)+2); wU4:=wT4>REF(wT4,1); {前四高} DRAWLINE(wS2,H,wS1,H,1),Color0000Ff; {★壓力１:} DRAWLINE(wU2,L,wU1,L,1),POINTDOT,Color0000FF;{★支撐１:} DRAWLINE(wS3,H,wS2,H,1),Color888000; {★壓力２:} DRAWLINE(wU3,L, wU2,L,1),POINTDOT,Color888000;{★支撐２:} {DRAWLINE(wS4,H,wS3,H,1),Color00ccCC;{★壓力３:} {DRAWLINE(wU4,L, wU3,L,1),POINTDOT,Color00ccCC;{★支撐３;} 平均成本:=COST(50); 獲利盤:=WINNER(CLOSE)*100; DRAWTEXTREL(20,400,'獲利盤:'+獲利盤+'% '),colormagenta; DRAWTEXTREL(20,500,'平均成本:'+平均成本),colormagenta; zg:=FINANCE2(35);{總股} lta:=FINANCE2(37);{流通A} sy:=FINANCE2(3);{收益} sl:=DYNAINFO(39);{市盈率} wf:=FINANCE2(8);{未分} gj:=FINANCE2(7);{公積}; jz:=FINANCE2(4);{凈資} cw:='總股:'+zg+' 流通A:'+lta+' 收益:'+sy+' 市盈率:'+sl+' 未分:'+wf+' 公積:'+gj+' 凈資:'+jz; DRAWTEXTREL(20,100,cw),COLOR0055FF; DRAWTEXTREL(20,200,BKNAME),COLOR0055FF; AA05:=MA(C,5); 五日乖離率:=(C-AA05)/AA05*100; BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416; 速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1); 加速度5:=EMA((速度5-REF(速度5,1)),3); AA10:=MA(C,10); AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416; AA30:=MA(C,30); 三拾日乖離率:=(C-AA30)/AA30*100; VAR11:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1); VAR22:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1); BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416; 強(qiáng)勢狙擊:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10); 加倉:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖離率>REF(三拾日乖離率,1) AND AA10>REF(AA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ; 清倉:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1) AND 三拾日乖離率<REF(三拾日乖離率,1) AND AA10<REF(AA10,1),10); DRAWICON(加倉 ,LOW*0.99,9); DRAWICON(清倉 ,HIGH*1.01,4); DRAWICON(強(qiáng)勢狙擊 ,LOW*0.99,5); VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3); VAR2222:=CROSS(VAR1111,0.9); VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3); VAR4444:=CROSS(VAR3333,0.9); 壓力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5; STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5; 支撐: REF(LOW,BARSLAST(Var4444)), POINTDOT,Color00b4ff; STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4444)),REF(LOW,BARSLAST(Var4444)),5,0),Color00b4ff; 下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); aRSV:=SMA(下檔線,3,1); aK:=SMA(aRSV,3,1); aD:=((3 * aRSV) - (2 * aK)); aJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100); aRSV24:=SMA(aJ12,3,1); aK24:=SMA(aRSV24,3,1); aD24:=((3 * aRSV24) - (2 * aK24)); 撐壓位:=IF(CROSS(aD24,aD),HIGH,REF(HIGH,BARSLAST(CROSS(aD24,aD)))){,LINETHICK2,COLORFFFFFF}; 底:=LLV(HIGH,30){,COLOR00FF00,LINETHICK2}; STICKLINE(BARSTATUS=2 ,撐壓位,撐壓位,50,1),LINETHICK1,COLORFFFFFF; DRAWTEXT(BARSTATUS=2 ,撐壓位,' 撐壓'),COLORFFFFFF,VALIGN1; STICKLINE(BARSTATUS=2 ,底,底,50,1),COLOR00FF00,LINETHICK1; DRAWTEXT(BARSTATUS=2 ,底,' 底線'),COLOR00FF00,VALIGN0; TYP := (HIGH + LOW + CLOSE)/3; CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6)); 差值1:=ABS(REF(CCI1,1)-CCI1); CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10)); 差值2:=ABS(REF(CCI2,1)-CCI2); CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20)); 差值3:=ABS(REF(CCI3,1)-CCI3); CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30)); 差值4:=ABS(REF(CCI4,1)-CCI4); CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60)); 差值5:=ABS(REF(CCI5,1)-CCI5); CCI:=CCI1+CCI2+CCI3+CCI4+CCI5; AAA:=(3*C+H+L+O)/6; VAR1:=WMA(AAA,8); VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3; VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3; VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3; VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3; VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; 短線:VAR1,COLORWHITE; 中線:VAR6,COLORYELLOW; 下跌:=IF(VAR1=VAR6,VAR6,0); PARTLINE(VAR6,下跌=VAR6,RGB(0,255,0)); {條件1} TJ1:= CCI1>差值4; 立樁量:=TJ1; TJ2:=IF(BARSLAST(立樁量)=1 ,1,IF(BARSLAST(立樁量)=2 ,1, IF(BARSLAST(立樁量)=3 ,1,0))); 三天法則1:=TJ2=1; 成立1:=三天法則1; 條件成立1:=FILTER(成立1,5); TJ11:= cci1<-差值4 ; 立樁量2:=TJ11; TJ22:=IF(BARSLAST(立樁量2)=1 AND CLOSE>REF(HIGH,1),1, IF(BARSLAST(立樁量2)=2 AND CLOSE>REF(HIGH,2),1, IF(BARSLAST(立樁量2)=3 AND CLOSE>REF(HIGH,3),1,0))); 三天法則2:=TJ22=1; 成立2:=三天法則2; 條件成立2:=FILTER(成立2,5); {條件2} TJ111:=(ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5)); 立樁量3:=FILTER(TJ111,5); TJ222:=IF(BARSLAST(立樁量3)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量3)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量3)=3 AND CLOSE>REF(HIGH,3),1,0))); STICKLINE(CLOSE AND 下跌<>VAR6,REF(HIGH,BARSLAST(立樁量3)),REF(HIGH,BARSLAST(立樁量3)),20,0),COLORCYAN; STICKLINE(CLOSE AND 下跌<> VAR6,REF(LOW,BARSLAST(立樁量3)),REF(LOW,BARSLAST(立樁量3)),20,0),COLORYELLOW; DRAWICON(條件成立1 AND 下跌=0,REF(HIGH,BARSLAST(立樁量3)),8),VALIGN1; DRAWICON(條件成立2,REF(LOW,BARSLAST(立樁量3)),7),VALIGN1,ALIGN1; 三天法則:=TJ222=1; 成立:=三天法則{ AND 突破3}; 條件成立:FILTER(成立,5),LINETHICK0,COLORYELLOW; PARTLINE(H*1.02,條件成立 AND 下跌=0),CROSSDOT,LINETHICK6,COLORFF66FF,LAYER2; PARTLINE(H*1.02,條件成立 AND 下跌=0),POINTDOT,LINETHICK4,COLOR00CCFF,LAYER2; STICKLINE(C>=O,L,H,0,0),COLORred; STICKLINE(C<O,L,H,0,0),COLORFFFF00; STICKLINE(1 and C>O,C,O,7,0),COLORred; STICKLINE(1,C,O,6,0),COLOR454500; STICKLINE(1,C,O,5,0),COLOR555500; STICKLINE(1,C,O,4,0),COLOR656500; STICKLINE(1,C,O,3,0),COLOR757500; STICKLINE(1,C,O,2,0),COLOR858500; STICKLINE(TJ1,C,O,6,0),COLOR000065; STICKLINE(TJ1,C,O,5,0),COLOR000085; STICKLINE(TJ1,C,O,4,0),COLOR0000A5; STICKLINE(TJ1,C,O,3,0),COLOR0000C5; STICKLINE(TJ1,C,O,2,0),COLOR0000E5; |
|
|
