|
《飞跃彩虹线》源码：
参数 最小 最大 缺省
底 2 1000 10
初 2 1000 20
顶 2 1000 90
-----------------------------------
DRAWBAND(顶,RGB(0,100,255),底,RGB(0,0,0));
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
XG1:=VOL<HHV(VOL,120)/10 AND CROSS(DIF,DEA) AND VOL<MA(VOL,60)/1.9;
XG2:=HHV(C,120)/LLV(C,120)<1.5;
趋势线:=3*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1),3,1),COLORYELLOW;
STICKLINE(底>趋势线,底,趋势线,2,0),COLORRED;
STICKLINE(趋势线>顶,趋势线,顶,2,0),COLORGREEN;
STICKLINE(REF(趋势线,1)<顶 AND 趋势线>顶,90,100,2,0),COLORCYAN;
STICKLINE(REF(趋势线,1)>顶 AND 趋势线<顶,90,80,2,0),COLORBLUE;
STICKLINE(CROSS(趋势线,底),0,60,2,0),COLORMAGENTA;
STICKLINE(CROSS(趋势线,初),20,30,2,0),COLORRED;
牛:3*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1),3,1), COLORWHITE;
DRAWTEXT(CROSS(趋势线,底),底,'杀庄'),COLORLIMAGENTA;
趋势:(趋势线-REF(趋势线,1))*100/REF(趋势线,1),NODRAW,COLORYELLOW;
彩泓:IF(趋势>=1,趋势线,DRAWNULL),COLORRED,LINETHICK3;
VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10;
能量: SMA(VAR2,5,1)/100,COLORLIMAGENTA;
DRAWBAND(能量>REF(能量,1),RGB(250,0,120),0,RGB(0,180,180));
STICKLINE(能量>REF(能量,1),0,能量,2.5,0),COLOR7800FF;
STICKLINE(能量<REF(能量,1),0,能量,2.5,0),COLORGREEN;
VAR3:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
VAR4:=(IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))/(IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1))-IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1)/IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2)));
VAR5:=AMOUNT/(100*VOL);
VAR6:=MA(VAR5,40);
VAR7:=100*(CLOSE-VAR6)/VAR6;
量堆:=COUNT(V>=REF(V,1)*2,BARSLAST(CROSS(C,MA(C,20))));
地量:DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L*1,'地量'),COLOR00FFFF;
STICKLINE(地量>0,0,30,2,0),COLOR008888;
STICKLINE(地量>0,0,30,1.5,0),COLOR00AAAA;
STICKLINE(地量>0,0,30,0.8,0),COLOR00DDDD;
STICKLINE(地量>0,0,30,0.3,0),COLOR00FFFF;
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,VARR1),10,15);
VAR10:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR12:=VAR10<REF(VAR11,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR12 AND COUNT(VAR12,30)=1,40,'有大资金进场迹象，关注！'),COLORRED;
============================
选股公式：
参数 最小 最大 缺省
底 2 1000 10
初 2 1000 20
顶 2 1000 90
-----------------------------------------------
DRAWBAND(顶,RGB(0,100,255),底,RGB(0,0,0));
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
XG1:=VOL<HHV(VOL,120)/10 AND CROSS(DIF,DEA) AND VOL<MA(VOL,60)/1.9;
XG2:=HHV(C,120)/LLV(C,120)<1.5;
趋势线:=3*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1),3,1),COLORYELLOW;
STICKLINE(底>趋势线,底,趋势线,2,0),COLORRED;
STICKLINE(趋势线>顶,趋势线,顶,2,0),COLORGREEN;
STICKLINE(REF(趋势线,1)<顶 AND 趋势线>顶,90,100,2,0),COLORCYAN;
STICKLINE(REF(趋势线,1)>顶 AND 趋势线<顶,90,80,2,0),COLORBLUE;
STICKLINE(CROSS(趋势线,底),0,60,2,0),COLORMAGENTA;
STICKLINE(CROSS(趋势线,初),20,30,2,0),COLORRED;
牛:3*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1),3,1), COLORWHITE;
选股:IF(CROSS(趋势线,底),50,0),COLORSTICK,COLORMAGENTA;
DRAWTEXT(CROSS(趋势线,底),底,'杀庄'),COLORLIMAGENTA;
趋势:(趋势线-REF(趋势线,1))*100/REF(趋势线,1),NODRAW,COLORYELLOW;
彩泓:IF(趋势>=1,趋势线,DRAWNULL),COLORRED,LINETHICK3;
VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10;
能量: SMA(VAR2,5,1)/100,COLORLIMAGENTA;
DRAWBAND(能量>REF(能量,1),RGB(250,0,120),0,RGB(0,180,180));
STICKLINE(能量>REF(能量,1),0,能量,2.5,0),COLOR7800FF;
STICKLINE(能量<REF(能量,1),0,能量,2.5,0),COLORGREEN;
VAR3:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
VAR4:=(IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))/(IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1))-IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1)/IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2)));
VAR5:=AMOUNT/(100*VOL);
VAR6:=MA(VAR5,40);
VAR7:=100*(CLOSE-VAR6)/VAR6;
量堆:=COUNT(V>=REF(V,1)*2,BARSLAST(CROSS(C,MA(C,20))));
地量:DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L*1,'地量'),COLOR00FFFF;
STICKLINE(地量>0,0,30,2,0),COLOR008888;
STICKLINE(地量>0,0,30,1.5,0),COLOR00AAAA;
STICKLINE(地量>0,0,30,0.8,0),COLOR00DDDD;
STICKLINE(地量>0,0,30,0.3,0),COLOR00FFFF;
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,VARR1),10,15);
VAR10:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR12:=VAR10<REF(VAR11,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR12 AND COUNT(VAR12,30)=1,40,'有大资金进场迹象，关注！'),COLORRED;
===============================
预警：
参数 最小 最大 缺省
底 2 1000 10
初 2 1000 20
顶 2 1000 90
----------------------------------
趋势线:=3*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1),3,1),COLORYELLOW;
选股:CROSS(趋势线,底);
312477149.jpg
|
