NOTEXT1:0,POINTDOT;?NOTEXT21:100,POINTDOT;?NOTEXT22:85,POINTDOT;大趨勢:=EMA(3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1),3);趨勢吸籌:IF(大趨勢<=14,大趨勢,DRAWNULL),NODRAW,COLORCYAN;?DRAWICON(大趨勢>85 AND 大趨勢>REF(大趨勢,1),100,35);?DRAWICON(大趨勢>85 AND 大趨勢>REF(大趨勢,1),90,35);?DRAWICON(大趨勢>85 AND 大趨勢>REF(大趨勢,1),80,35); ZLXH2:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;?ZLXH3:=EMA(ZLXH2*10,3);?ZLXH4:=LLV(L,38);?ZLXH5:=HHV(ZLXH3,38);?ZLXH7:=EMA(IF(L<=ZLXH4,(ZLXH3+ZLXH5*2)/2,0),3)/618;?ZLXH8:=IF(ZLXH7>=100,100,ZLXH7);主力吸籌:IF(ZLXH8>0,ZLXH8,DRAWNULL),COLORRED,NODRAW; {發財乾坤}FCQK3:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;?FCQK4:=EMA(FCQK3*10,3);?FCQK5:=LLV(L,13);?FCQK6:=HHV(FCQK4,13);?FCQK7:=EMA(IF(LOW<=FCQK5,(FCQK4+FCQK6*2)/2,0),3)/618;?FCQK8:=IF(FCQK7>500,500,FCQK7);發財吸籌:IF(FCQK8>-120,ABS(FCQK8),DRAWNULL),COLORGRAY,NODRAW;黃柱:FCQK8>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),COLORYELLOW,NODRAW;粉柱:FCQK8>0.1 AND FCQK8<1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),COLORMAGENTA,NODRAW;最大值:=MAX(趨勢吸籌,MAX(主力吸籌,發財吸籌));最小值:=MIN(趨勢吸籌,MIN(主力吸籌,發財吸籌));STICKLINE(趨勢吸籌=最大值,0,IF(趨勢吸籌>0,趨勢吸籌,DRAWNULL),2,0),COLORCYAN;?STICKLINE(主力吸籌=最大值,0,IF(主力吸籌>0,主力吸籌,DRAWNULL),2,0),COLORRED;?STICKLINE(發財吸籌=最大值,0,IF(發財吸籌>0,發財吸籌,DRAWNULL),2,1),COLORGRAY;?STICKLINE(RANGE(趨勢吸籌,最小值,最大值)=1,0,IF(趨勢吸籌>0,趨勢吸籌,DRAWNULL),2,0),COLORCYAN;?STICKLINE(RANGE(主力吸籌,最小值,最大值)=1,0,IF(主力吸籌>0,主力吸籌,DRAWNULL),2,0),COLORRED;?STICKLINE(RANGE(發財吸籌,最小值,最大值)=1,0,IF(發財吸籌>0,發財吸籌,DRAWNULL),2,1),COLORGRAY;?STICKLINE(趨勢吸籌=最小值,0,IF(趨勢吸籌>0,趨勢吸籌,DRAWNULL),2,0),COLORCYAN;?STICKLINE(主力吸籌=最小值,0,IF(主力吸籌>0,主力吸籌,DRAWNULL),2,0),COLORRED;?STICKLINE(發財吸籌=最小值,0,IF(發財吸籌>0,發財吸籌,DRAWNULL),2,1),COLORGRAY;?STICKLINE(黃柱,0,FCQK8,0.1,0),COLORYELLOW;?STICKLINE(粉柱,0,FCQK8,0.1,0),COLORMAGENTA;?DRAWICON(CROSS(大趨勢,10),最大值,23); VAR10:=IF(FCQK8>-120,FCQK8,0);?VAR11:=VAR10<REF(VAR10,1);?DRAWICON(VAR11 AND REF(NOT(VAR11),1),FCQK8+5,1);?VAR12:=SMA(((HHV(C,13)-C)/(HHV(C,13)-LLV(C,13))),5,1);沖頂:2/VAR12-2,NODRAW,COLORGREEN;?STICKLINE(2/VAR12-2>0,20,2/VAR12-2+20,0,-1),COLORLIRED;?STICKLINE(1/13>VAR12,0+20,2/VAR12-2+20,1,0),COLORGREEN;?STICKLINE(1/13>VAR12,0+20,2/VAR12-2+20,0,0),COLORGREEN; 趨勢線:大趨勢-10,COLORBLUE,LINETHICK2;?DRAWTEXT(FILTER(趨勢線<=4,15),最大值+5,'倉區',COLORCYAN; 快線:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;慢線:=SMA(快線,3,1),COLORRED,LINETHICK2;空:=SMA(慢線,3,1),COLOR00FF00;牛股:IF(BARSLAST(CROSS(慢線,空))<9 AND BARSLAST(CROSS(空,慢線))<9 AND CROSS(慢線,空) AND 慢線<20,100,0),COLORWHITE,LINETHICK2,STICK;?AAA:=IF(BARSLAST(CROSS(慢線,快線))>=3 AND CROSS(快線,慢線) AND 慢線<30,20,0);?STICKLINE(AAA,0,60,0.5,0),COLORLIMAGENTA;?BBB:=IF(BARSLAST(CROSS(快線,慢線))>=4 AND CROSS(慢線,快線) AND 快線>50,20,0);?STICKLINE(BBB,80,100,3,0),COLORGREEN;
?
?來源:程序化99
文華技術人員:參考: NOTEXT1:0,POINTDOT;?NOTEXT21:100,POINTDOT;?NOTEXT22:85,POINTDOT;大趨勢:=EMA(3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1),3);趨勢吸籌:IF(大趨勢<=14,大趨勢,NULL),NODRAW,COLORCYAN;?DRAWICON(大趨勢>85 AND 大趨勢>REF(大趨勢,1),100,35);?DRAWICON(大趨勢>85 AND 大趨勢>REF(大趨勢,1),90,35);?DRAWICON(大趨勢>85 AND 大趨勢>REF(大趨勢,1),80,35); ZLXH2:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;?ZLXH3:=EMA(ZLXH2*10,3);?ZLXH4:=LLV(L,38);?ZLXH5:=HHV(ZLXH3,38);?ZLXH7:=EMA(IF(L<=ZLXH4,(ZLXH3+ZLXH5*2)/2,0),3)/618;?ZLXH8:=IF(ZLXH7>=100,100,ZLXH7);主力吸籌:IF(ZLXH8>0,ZLXH8,NULL),COLORRED,NODRAW; {發財乾坤}FCQK3:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;?FCQK4:=EMA(FCQK3*10,3);?FCQK5:=LLV(L,13);?FCQK6:=HHV(FCQK4,13);?FCQK7:=EMA(IF(LOW<=FCQK5,(FCQK4+FCQK6*2)/2,0),3)/618;?FCQK8:=IF(FCQK7>500,500,FCQK7);發財吸籌:IF(FCQK8>-120,ABS(FCQK8),NULL),COLORGRAY,NODRAW; RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;黃柱:FCQK8>1 AND J>REF(J,1) AND REF(J,1)<REF(J,2),COLORYELLOW,NODRAW;粉柱:FCQK8>0.1 AND FCQK8<1 AND J>REF(J,1) AND REF(J,1)<REF(J,2),COLORMAGENTA,NODRAW;最大值:=MAX(趨勢吸籌,MAX(主力吸籌,發財吸籌));最小值:=MIN(趨勢吸籌,MIN(主力吸籌,發財吸籌));STICKLINE(趨勢吸籌=最大值,0,IF(趨勢吸籌>0,趨勢吸籌,NULL),2,0),COLORCYAN;?STICKLINE(主力吸籌=最大值,0,IF(主力吸籌>0,主力吸籌,NULL),2,0),COLORRED;?STICKLINE(發財吸籌=最大值,0,IF(發財吸籌>0,發財吸籌,NULL),2,1),COLORGRAY;?STICKLINE(RANGE(趨勢吸籌,最小值,最大值)=1,0,IF(趨勢吸籌>0,趨勢吸籌,NULL),2,0),COLORCYAN;?STICKLINE(RANGE(主力吸籌,最小值,最大值)=1,0,IF(主力吸籌>0,主力吸籌,NULL),2,0),COLORRED;?STICKLINE(RANGE(發財吸籌,最小值,最大值)=1,0,IF(發財吸籌>0,發財吸籌,NULL),2,1),COLORGRAY;?STICKLINE(趨勢吸籌=最小值,0,IF(趨勢吸籌>0,趨勢吸籌,NULL),2,0),COLORCYAN;?STICKLINE(主力吸籌=最小值,0,IF(主力吸籌>0,主力吸籌,NULL),2,0),COLORRED;?STICKLINE(發財吸籌=最小值,0,IF(發財吸籌>0,發財吸籌,NULL),2,1),COLORGRAY;?STICKLINE(黃柱,0,FCQK8,0.1,0),COLORYELLOW;?STICKLINE(粉柱,0,FCQK8,0.1,0),COLORMAGENTA;?DRAWICON(CROSS(大趨勢,10),最大值,23); VAR10:=IF(FCQK8>-120,FCQK8,0);?VAR11:=VAR10<REF(VAR10,1);?DRAWICON(VAR11 AND REF(NOT(VAR11),1),FCQK8+5,1);?VAR12:=SMA(((HHV(C,13)-C)/(HHV(C,13)-LLV(C,13))),5,1);沖頂:2/VAR12-2,NODRAW,COLORGREEN;?STICKLINE(2/VAR12-2>0,20,2/VAR12-2+20,0,-1),COLORLIGHTRED;?STICKLINE(1/13>VAR12,0+20,2/VAR12-2+20,1,0),COLORGREEN;?STICKLINE(1/13>VAR12,0+20,2/VAR12-2+20,0,0),COLORGREEN; 趨勢線:大趨勢-10,COLORBLUE,LINETHICK2;?DRAWTEXT(FILTER(趨勢線<=4,15),最大值+5,'倉區',COLORCYAN; 快線:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;慢線:=SMA(快線,3,1),COLORRED,LINETHICK2;空:=SMA(慢線,3,1),COLOR00FF00;牛股:IF(BARSLAST(CROSS(慢線,空))<9 AND BARSLAST(CROSS(空,慢線))<9 AND CROSS(慢線,空) AND 慢線<20,100,0),COLORWHITE,LINETHICK2,STICK;?AAA:=IF(BARSLAST(CROSS(慢線,快線))>=3 AND CROSS(快線,慢線) AND 慢線<30,20,0);?STICKLINE(AAA,0,60,0.5,0),COLORMAGENTA;?BBB:=IF(BARSLAST(CROSS(快線,慢線))>=4 AND CROSS(慢線,快線) AND 快線>50,20,0);?STICKLINE(BBB,80,100,3,0),COLORGREEN;