|
以下是机构操盘线新和谐版吴伟军优酷课件主图指标（无源码的请下载附件导入）
TT:=IF(DATE<1170710,1,0);{日期设定}
{板块市值业绩}
所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT(' [行业]—',HYBLOCK),STRCAT(' [地域]—',DYBLOCK)),STRCAT(' [概念]—',GNBLOCK)));
总股本:=STRCAT(STRCAT(' 总股本:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(STRCAT(' 全流通:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'％');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0));
股本市值:=STRCAT('【股本市值】',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期));
市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));
市销率:=STRCAT(' 市销率:',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
市净率:=STRCAT(' 市净率:',CON2STR(C/FINANCE(34),2));
净资收益率:=STRCAT(' 净资收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
毛利率:=STRCAT(' 毛利率:',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
净利润率:=STRCAT(' 净利率:',CON2STR(FINANCE(30)/FINANCE(20)*100,2));
主营利润率:=STRCAT(' 主营利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('【当前业绩】',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.07,0,股本市值),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,当前业绩),COLORMAGENTA;
{两条主线};
短线:=EMA(CLOSE,5)*TT;
趋势线:=EMA(CLOSE,10*TT);
生命线:EMA(CLOSE,30*TT),LINETHICK2,COLORRED;
警戒线:IF(短线 > 趋势线,趋势线,短线),LINETHICK2,COLORBLUE;
{托压双线};
VB1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
VB2:=(1-7/100)*(DMA(CLOSE,VB1));
VB3:=(1+7/100)*(DMA(CLOSE,VB1));
VB5:=MA((LOW+HIGH+CLOSE)/3,5);
支撑:REFDATE(VB2,DATE),DOTLINE,COLORCC66FF;
压力:REFDATE(VB3,DATE),DOTLINE,COLORGREEN;
{IF(短线 > 趋势线,短线,DRAWNULL);
IF(短线 <趋势线,趋势线,DRAWNULL);}
抄底:=(CLOSE / OPEN>1.07 AND 100*(CLOSE-MA(CLOSE,30)) / MA(CLOSE,30)<-10);
买涨:=(BARSLAST(COUNT(生命线>=REF(生命线,1)=3 AND CROSS(趋势线,生命线)AND L<=趋势线,5)));
追进:=COUNT(生命线>=REF(生命线,1),3)=3 AND COUNT(趋势线>生命线,10)>8 AND REF(趋势线,1)<REF(生命线,1)*1.02 AND 趋势线>=生命线*1.02;
VARA1:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));
VARA2:=CROSS(REF(CLOSE,2),VARA1);
VARA3:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),8,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),8,1)) * 100);
VARA4:=CROSS(79,VARA3);
减仓:=(FILTER((VARA2 OR VARA4),5));
STICKLINE(CLOSE / OPEN>1.07 AND 100*(CLOSE-MA(CLOSE,30)) / MA(CLOSE,30)<-10,L*0.992,L*0.98,6,0),COLORRED;
STICKLINE(FILTER(BARSLAST(COUNT(生命线>=REF(生命线,1),3)=3 AND CROSS(趋势线,生命线))<=5 AND L<=趋势线,5),L*0.992,L*0.98,6,0),COLORMAGENTA;
STICKLINE(COUNT(生命线>=REF(生命线,1),3)=3 AND COUNT(趋势线>生命线,10)>8 AND REF(趋势线,1)<REF(生命线,1)*1.02 AND 趋势线>=生命线*1.02,L*0.992,L*0.98,6,0),COLORBLUE;
{买卖点和加仓、牛窝};
{三、买卖点}
买线:=EMA(C*TT,2);
卖线:=EMA(SLOPE(C*TT,21)*20+C,42);
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWICON(BU,L*0.96,38);
DRAWICON(SEL,H*1.03,39);
{四、起爆点}
M:=3*TT; N:=3*TT;
UP:=MAX(C,O)>REF(MAX(C,O),1);
A:=VOL>REF(VOL,1);
DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA1:=EMA(DIF1,9);
DRAWICON(DIF1>DEA1 AND COUNT(IF((UP AND A),1,0),N)=N AND C>O AND (C-REF(MAX(C,OPEN),1))/REF(MAX(O,C),1)<=(3/100) AND VOL/CAPITAL<=(M/100),L*0.96,38);
{买点部分}
EMA13:=EMA(C*TT,5),COLORWHITE; {13-21-34-60}
EMA21:=EMA(C*TT,13),COLORYELLOW;
EMA34:=EMA(C*TT,21),COLORFF00FF;
EMA60:=MA(C*TT,60),COLORFFCC66;
{大阴线：大跌超2.3}
C2:=REF(C,1);
BG:=IF((C2-C)*100/C2>=2.3,1,0) OR IF((O-C)*100/O>=5,1,0){ OR IF((H-L)*100/REF(C,1)>5,1,0)};{第二个条件开盘价过高掉下来}
BG2:=IF((H-L)*100/C2>=3.58,1,0);
BB1:=L<REF(L,1);
{卖点信号}
SELL1:=BG AND BB1 ;
{大阳线：升幅超2.64}
BR:=IF((C-C2)*100/C2>=2.59,1,0) OR IF((C-O)*100/O>=4.5,1,0) OR IF((C-L)*100/L>5,1,0);{第二个条件开盘价太低升上来}
{STICKLINE(BR,O,C,3,0),COLORRED;}
{以下条件记住最近一次卖出点}
DAY1:=BARSLAST(SELL1);
JIA1:=REF(O,DAY1);
JIA2:=REF(O,1);
BB4:=C>JIA2;
BB2:=H>JIA1;
{买入信号}
BUY1:=BR AND BB2 AND BB4;
{记住最后一次买点}
DAY2:=BARSLAST(BUY1);
{买卖谁先}
S1:=DAY1<DAY2;
B1:=DAY2<DAY1;
AA2:=AMOUNT/VOL;
BB3:=L<AA2*0.9;
CC2:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD2:=L*TT<MA(C,6)*0.921;
DD1:=L*TT<MA(C,5)*0.921;
EE2:=VOL<MA(V,5)*1.5;
FF2:=BB3 AND CC2 AND DD2 AND EE2;
B4:=BARSLAST(FF2);{底点日期}
E4:=B4<5;{5日内的线}
F4:=E4 AND C>REF(C,1);
{其它补充2：卖点}
A2:=(C-REF(C,1))/REF(C,1)*100<1.02;
A3:=H>MA(C,5)*1.12;
AA:= A2 AND A3;
{补充阳光买点}
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
VAR2:=8;
CC:=CROSS(VAR1,VAR2);
CCC:=CROSS(VAR1,VAR2) AND H>REF(H,1) AND C>REF(C,1) ;
DRAWICON(CCC,L*0.99,38);
{加强买点后续升势}
CF1:=BARSLAST(CC);{买点日期}
CF2:=CF1<3;{5日内的线}
CF3:=CF2 AND C>REF(C,1);
CD:=CROSS(VAR2,VAR1);
{牛窝}
VAR1A:=LLV(LOW,21);
VAR2A:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1A) / (VAR2A - VAR1A)) * 100),5);
AK:=EMA((((CLOSE - VAR1A) / (VAR2A - VAR1A)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWTEXT((AB = 1),(LOW * 0.95),'○牛窝'),COLORRED;
{大胆博、加仓、小心变盘、逃顶}
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.93),'★大胆搏 '),COLORRED;
DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'★加仓'),COLORRED;
A1AA:=9*TT;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
VAR6:=REF(C*TT,1);
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
{主力进场}
VAR9:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
VAR10:=SMA(VAR9*TT,3,1);
VAR11:=SMA(VAR10,3,1);
VAR12:=SMA(VAR11,3,1);
主力出现:DRAWICON(CROSS(VAR11,VAR12) AND (VAR11<40),L*0.98,38);
{黑马};
TT:=IF(DATE<11160425,1,0);{日期设定}
{两条主线};
短线:=EMA(CLOSE,5)*TT;
趋势线:=EMA(CLOSE,10*TT);
生命线:EMA(CLOSE,30*TT),LINETHICK2,COLORRED;
警戒线:IF(短线 > 趋势线,趋势线,短线),LINETHICK2,COLORBLUE;
{托压双线};
VB1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
VB2:=(1-7/100)*(DMA(CLOSE,VB1));
VB3:=(1+7/100)*(DMA(CLOSE,VB1));
VB5:=MA((LOW+HIGH+CLOSE)/3,5);
支撑:REFDATE(VB2,DATE),DOTLINE,COLORCC66FF;
压力:REFDATE(VB3,DATE),DOTLINE,COLORGREEN;
{IF(短线 > 趋势线,短线,DRAWNULL);
IF(短线 <趋势线,趋势线,DRAWNULL);}
抄底:=(CLOSE / OPEN>1.07 AND 100*(CLOSE-MA(CLOSE,30)) / MA(CLOSE,30)<-10);
买涨:=(BARSLAST(COUNT(生命线>=REF(生命线,1)=3 AND CROSS(趋势线,生命线)AND L<=趋势线,5)));
追进:=COUNT(生命线>=REF(生命线,1),3)=3 AND COUNT(趋势线>生命线,10)>8 AND REF(趋势线,1)<REF(生命线,1)*1.02 AND 趋势线>=生命线*1.02;
VARA1:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));
VARA2:=CROSS(REF(CLOSE,2),VARA1);
VARA3:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),8,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),8,1)) * 100);
VARA4:=CROSS(79,VARA3);
减仓:=(FILTER((VARA2 OR VARA4),5));
STICKLINE(CLOSE / OPEN>1.07 AND 100*(CLOSE-MA(CLOSE,30)) / MA(CLOSE,30)<-10,L*0.992,L*0.98,6,0),COLORRED;
STICKLINE(FILTER(BARSLAST(COUNT(生命线>=REF(生命线,1),3)=3 AND CROSS(趋势线,生命线))<=5 AND L<=趋势线,5),L*0.992,L*0.98,6,0),COLORMAGENTA;
STICKLINE(COUNT(生命线>=REF(生命线,1),3)=3 AND COUNT(趋势线>生命线,10)>8 AND REF(趋势线,1)<REF(生命线,1)*1.02 AND 趋势线>=生命线*1.02,L*0.992,L*0.98,6,0),COLORBLUE;
{买卖点和加仓、牛窝};
{基本面数据}
利润同比:=STRCAT('利润同比：',CON2STR(FINANCE(43),2));
收入同比:=STRCAT('收入同比：',CON2STR(FINANCE(44),2));
主营利润率:=STRCAT('主营利润率：',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
市净率:=STRCAT('市净率：',CON2STR(C/FINANCE(34),2));
所属地域:=STRCAT('所属地域：',DYBLOCK);
所属行业:=STRCAT('所属行业：',HYBLOCK);
所属概念:=STRCAT('所属概念：',GNBLOCK);
所属风格:=STRCAT('所属风格：',FGBLOCK);
主营业务:=STRCAT('主营业务：',EXTERNSTR(0,1));
DRAWTEXT_FIX(1*TT,0.00,0.01,0,利润同比),COLORMAGENTA;
DRAWTEXT_FIX(1*TT,0.11,0.01,0,收入同比),COLORMAGENTA;
DRAWTEXT_FIX(1*TT,0.22,0.01,0,主营利润率),COLORMAGENTA;
DRAWTEXT_FIX(1*TT,0.00,0.05,0,所属地域),COLORYELLOW;
DRAWTEXT_FIX(1*TT,0.00,0.09,0,所属行业),COLORYELLOW;
DRAWTEXT_FIX(1*TT,0.00,0.13,0,所属概念),COLORYELLOW;
DRAWTEXT_FIX(1*TT,0.00,0.17,0,所属风格),COLORCYAN;
DRAWTEXT_FIX(1,0.00,0.21,0,主营业务),COLORGREEN;
{三、买卖点}
买线:=EMA(C*TT,2);
卖线:=EMA(SLOPE(C*TT,21)*20+C,42);
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWICON(BU,L*0.96,38);
DRAWICON(SEL,H*1.03,39);
{四、起爆点}
M:=3*TT; N:=3*TT;
UP:=MAX(C,O)>REF(MAX(C,O),1);
A:=VOL>REF(VOL,1);
DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA1:=EMA(DIF1,9);
DRAWICON(DIF1>DEA1 AND COUNT(IF((UP AND A),1,0),N)=N AND C>O AND (C-REF(MAX(C,OPEN),1))/REF(MAX(O,C),1)<=(3/100) AND VOL/CAPITAL<=(M/100),L*0.96,38);
{买点部分}
EMA13:=EMA(C*TT,5),COLORWHITE; {13-21-34-60}
EMA21:=EMA(C*TT,13),COLORYELLOW;
EMA34:=EMA(C*TT,21),COLORFF00FF;
EMA60:=MA(C*TT,60),COLORFFCC66;
{大阴线：大跌超2.3}
C2:=REF(C,1);
BG:=IF((C2-C)*100/C2>=2.3,1,0) OR IF((O-C)*100/O>=5,1,0){ OR IF((H-L)*100/REF(C,1)>5,1,0)};{第二个条件开盘价过高掉下来}
BG2:=IF((H-L)*100/C2>=3.58,1,0);
BB1:=L<REF(L,1);
{卖点信号}
SELL1:=BG AND BB1 ;
{大阳线：升幅超2.64}
BR:=IF((C-C2)*100/C2>=2.59,1,0) OR IF((C-O)*100/O>=4.5,1,0) OR IF((C-L)*100/L>5,1,0);{第二个条件开盘价太低升上来}
{STICKLINE(BR,O,C,3,0),COLORRED;}
{以下条件记住最近一次卖出点}
DAY1:=BARSLAST(SELL1);
JIA1:=REF(O,DAY1);
JIA2:=REF(O,1);
BB4:=C>JIA2;
BB2:=H>JIA1;
{买入信号}
BUY1:=BR AND BB2 AND BB4;
{记住最后一次买点}
DAY2:=BARSLAST(BUY1);
{买卖谁先}
S1:=DAY1<DAY2;
B1:=DAY2<DAY1;
AA2:=AMOUNT/VOL;
BB3:=L<AA2*0.9;
CC2:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD2:=L*TT<MA(C,6)*0.921;
DD1:=L*TT<MA(C,5)*0.921;
EE2:=VOL<MA(V,5)*1.5;
FF2:=BB3 AND CC2 AND DD2 AND EE2;
B4:=BARSLAST(FF2);{底点日期}
E4:=B4<5;{5日内的线}
F4:=E4 AND C>REF(C,1);
{其它补充2：卖点}
A2:=(C-REF(C,1))/REF(C,1)*100<1.02;
A3:=H>MA(C,5)*1.12;
AA:= A2 AND A3;
{补充阳光买点}
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
VAR2:=8;
CC:=CROSS(VAR1,VAR2);
CCC:=CROSS(VAR1,VAR2) AND H>REF(H,1) AND C>REF(C,1) ;
DRAWICON(CCC,L*0.99,38);
{加强买点后续升势}
CF1:=BARSLAST(CC);{买点日期}
CF2:=CF1<3;{5日内的线}
CF3:=CF2 AND C>REF(C,1);
CD:=CROSS(VAR2,VAR1);
{牛窝}
VAR1A:=LLV(LOW,21);
VAR2A:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1A) / (VAR2A - VAR1A)) * 100),5);
AK:=EMA((((CLOSE - VAR1A) / (VAR2A - VAR1A)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWTEXT((AB = 1),(LOW * 0.95),'○牛窝'),COLORRED;
{大胆博、加仓、小心变盘、逃顶}
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.93),'★大胆搏 '),COLORRED;
DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'★加仓'),COLORRED;
A1AA:=9*TT;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
VAR6:=REF(C*TT,1);
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
{主力进场}
VAR9:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
VAR10:=SMA(VAR9*TT,3,1);
VAR11:=SMA(VAR10,3,1);
VAR12:=SMA(VAR11,3,1);
主力出现:DRAWICON(CROSS(VAR11,VAR12) AND (VAR11<40),L*0.98,38);
{黑马};
这个是早期的老版本的主图源代码，高手看看能否把时间定时器代码搞失灵吗，我是菜鸟
TT:=IF(DATE<11160425,1,0);{日期设定}
把这句删掉就行 |
