 | |  |  |
{副图源码如下}
ZBGS1:=EMA(CLOSE,5);
ZBGS2:=EMA(VOL,5);
ZBGS3:=MA(CLOSE,5);
ZBGS4:=MA(CLOSE,10);
ZBGS5:=MA(CLOSE,20);
ZBGS6:=EMA(SLOPE(CLOSE,21)*20+CLOSE,55);
ZBGS7:=CLOSE>ZBGS3;
ZBGS8:=CLOSE>ZBGS4;
ZBGS9:=CLOSE>ZBGS5;
ZBGS10:=ZBGS3>ZBGS4;
ZBGS11:=ZBGS3>ZBGS5;
ZBGS12:=REF(ZBGS5,1);
ZBGS13:=ZBGS5>ZBGS12;
QXS:=NOT(CODELIKE('4'));
QKC:=NOT(CODELIKE('688'));
QST:=IF(NAMELIKE('S'),0,1);
QXX:=IF(NAMELIKE('*'),0,1);
QBJ:=NOT(CODELIKE('8'));
TTXD:=QXS AND QST AND QKC AND QXX AND QBJ;
ZBGS14:=IF(ZBGS7,10,0-10)+IF(ZBGS8,10,0-10)+IF(ZBGS9,10,0-10)+IF(ZBGS10,10,0-10)+IF(ZBGS11,10,0-10)+IF(ZBGS13,10,0-10);
ZBGS15:=ATAN((ZBGS1/REF(ZBGS1,1)-1)*100)*180/3.1416;
ZBGS16:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
ZBGS17:=CEILING(SMA(ZBGS16,13,8));
ZBGS18:=ZBGS17< 10 AND ZBGS14=(-60) AND ZBGS15< (-60);
ZBGS19:=ATAN((ZBGS2/REF(ZBGS2,1)-1)*100)*180/3.1416;
ZBGS20:=CLOSE>ZBGS6 AND OPEN>ZBGS6 AND CLOSE>OPEN AND ZBGS15>50 AND ZBGS19>70;
ZBGS21:=FILTER(ZBGS20,13);
XG1:=EXIST(ZBGS18,30) AND ZBGS21 AND TTXD;
X1:=IF(MA(C,5)>MA(C,10),20,0);
X2:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
QD:=X1+X2+X3+X4+X5+X6+X7+X8;
XG:XG1 AND QD>=80;
STICKLINE(XG,0,72,2,1),COLORRED;
STICKLINE(XG,0,50,3,1),COLORMAGENTA;
STICKLINE(XG,0,72,0.6,0),COLORMAGENTA;
STICKLINE(XG,0,50,0.6,0),COLORRED;
STICKLINE(XG,0,20,4,0),COLORYELLOW;
DRAWICON(XG,76,9);
DRAWICON(XG,45,9);
DRAWICON(XG,25,9);
DRAWTEXT(XG,50,' ★ 黄金眼精选'),COLORRED;
{选股源码如下}
zbw_2:=((C-REF(C,5))/REF(C,5)*100)-((INDEXC-REF(INDEXC,5))/REF(INDEXC,5)*100);
zbw_3:=((C-REF(C,10))/REF(C,10)*100)-((INDEXC-REF(INDEXC,10))/REF(INDEXC,10)*100);
zbw_4:=zbw_2>=5 AND zbw_2>=REF(zbw_2,1) AND zbw_3>=5;
zbw_5:=zbw_3>=10;
XG替换:=zbw_4 OR zbw_5;
zbw1:=EMA(CLOSE,5);
zbw2:=EMA(VOL,5);
zbw3:=MA(CLOSE,5);
zbw4:=MA(CLOSE,10);
zbw5:=MA(CLOSE,20);
zbw6:=EMA(SLOPE(CLOSE,21)*20+CLOSE,55);
zbw7:=CLOSE>zbw3;
zbw8:=CLOSE>zbw4;
zbw9:=CLOSE>zbw5;
zbw10:=zbw3>zbw4;
zbw11:=zbw3>zbw5;
zbw12:=REF(zbw5,1);
zbw13:=zbw5>zbw12;
QXS:=NOT(CODELIKE('4'));
QKC:=NOT(CODELIKE('688'));
QST:=IF(NAMELIKE('S'),0,1);
QXX:=IF(NAMELIKE('*'),0,1);
QBJ:=NOT(CODELIKE('8'));
TTXD:=QXS AND QST AND QKC AND QXX AND QBJ;
zbw14:=IF(zbw7,10,0-10)+IF(zbw8,10,0-10)+IF(zbw9,10,0-10)+IF(zbw10,10,0-10)+IF(zbw11,10,0-10)+IF(zbw13,10,0-10);
zbw15:=ATAN((zbw1/REF(zbw1,1)-1)*100)*180/3.1416;
zbw16:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
zbw17:=CEILING(SMA(zbw16,13,8));
zbw18:=zbw17< 10 AND zbw14=(-60) AND zbw15< (-60);
zbw19:=ATAN((zbw2/REF(zbw2,1)-1)*100)*180/3.1416;
zbw20:=CLOSE>zbw6 AND OPEN>zbw6 AND CLOSE>OPEN AND zbw15>50 AND zbw19>70;
{股票指标 公式源码
zbw21:=FILTER(zbw20,13);
XG:=EXIST(zbw18,30) AND zbw21 AND TTXD;
X1:=IF(MA(C,5)>MA(C,10),20,0);
X2:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
QD:=X1+X2+X3+X4+X5+X6+X7+X8;
XG替换 AND XG AND QD>=80;
未
| |  | |  |
|
