股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索

[大智慧] 双线BS(超震撼的无敌主图,无未来,源码)


   
楼主
2023-10-16 12:05:06

以下是双线BS(超震撼的无敌主图,无未来,源码)

R1:=MA(CLOSE,1);
R2:=MA(CLOSE,3);
R3:=(MA(R2,1)*1);
R4:=(MA(R2,3)*1);
DRAWTEXT(CROSS(R3,R4),(LOW-0.1),'B'),colorBDB76B;
X1:=(C+L+H)/3;
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(88,RSI),(HIGH*1.02),'S'),colorGREEN;
双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,color00FF00;
单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,color0000FF;
{以下大笔出货标识}
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150ANDVAR13<200ANDVAR14>=150ANDVAR14<200,10,0);
VAR16:=IF(VAR13<=-150ANDVAR13>-200ANDVAR14<=-150ANDVAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200ANDVAR13>=150,15,IF(VAR14<=-200ANDVAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48ANDVAR1B>60ANDVAR19<100;
DRAWTEXT(VAR1CANDCOUNT(VAR1C,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66;
{老鼠仓}
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠仓:BB1ANDCC1ANDDD1ANDEE1,linethick0;
DRAWTEXT(老鼠仓,(LOW*0.99),'老鼠仓'),Color40CCFF;
A74:=MA(CLOSE,20);
A75:=(CLOSE>MA(CLOSE,5));
A76:=(MA(CLOSE,5)>MA(CLOSE,10));
A77:=(CLOSE>MA(CLOSE,10));
A78:=(MA(CLOSE,5)>MA(CLOSE,20));
A79:=(CLOSE>MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74>A710);
AVX:=(((((IF(A75,10,(0-10))+IF(A76,10,(0-10)))+IF(A77,10,(0-10)))+IF(A78,10,(0-10)))+IF(A79,10,(0-10)))+IF(A711,10,(0-10)));
DSLX:=(CLOSE/INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);T:=BARSLAST(DISPSTATUS=1)+1;
T:=BARSLAST(DISPSTATUS=1)+1;
HHg:=HHV(H,T);
ddg:=LLV(L,T);
{Hk:=LL-HH;G12:=LL-HK*1.55;}
IFBARSTATUS=2andc<200and((CROSS(AVX,1)AND(V1>=V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股的量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右。'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(AVX,1)AND(V1<V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股虽然走势趋强,但量能还显不足,可以考虑短线进场,仓位在1/2左右。'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(AVX,1)AND(V1>V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(20,100,'该股量价配合良好,但相对其它股票并没有明显走强,可以考虑短线进场,仓位1/2左右。'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(AVX,1)AND(V1<=V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股形态尚可,但量能不足,股票也未完全走强,可以短线参与,仓位1/3左右。'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(1,AVX)AND(V1>=V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股形态变坏,但走势相对其它股票尚可,重仓者减持大半,清仓者可以观望。'),color00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(1,AVX)AND(V1<V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股随大盘一起下跌,程明显缩量走势,考虑到大盘风险,减持或清仓。'),color00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(1,AVX)AND(V1>=V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股放量下跌,走势明显偏弱,离场观望。'),color00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((CROSS(1,AVX)AND(V1<V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股缩量下跌,走势偏弱,离场观望。'),color00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX>=1)AND(REF(AVX,1)>0))AND(V1>=V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股形态良好,强势明显,量能充足,可以继续持有。'),color00FFFF,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX>=1)AND(REF(AVX,1)>0))AND(V1<V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股上行趋势不变,强势依然,但量能开始转弱,注意风险。'),color00FFFF,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX>=1)AND(REF(AVX,1)>0))AND(V1>=V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。'),color00FFFF,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX>=1)AND(REF(AVX,1)>0))AND(V1<V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股走势趋弱,量能不足,减持大部分筹码。'),color00FFFF,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX<1)AND(REF(AVX,1)<0))AND(V1>=V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股形态不佳,注意成交量的变化,但目前不适合参与。'),COLOR00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX<1)AND(REF(AVX,1)<0))AND(V1<V2))AND(DSLX>=DSLX1))THEN
DRAWTEXTABS(32,100,'该股趋势不明,股价偏弱,注意量能变化,目前不宜参与。'),COLOR00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX<1)AND(REF(AVX,1)<0))AND(V1>=V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股有走强迹象,但量能不足,趋势不明,不适合操作。'),COLOR00FF00,LINETHICK3;
IFBARSTATUS=2andc<200and((((AVX<1)AND(REF(AVX,1)<0))AND(V1<V2))AND(DSLX<DSLX1))THEN
DRAWTEXTABS(32,100,'该股走势太弱,没有参与价值。'),COLOR00FF00,LINETHICK3;
IFBARSTATUS=2andc>200and(CROSS(AVX,1)AND(V1>=V2))THEN
DRAWTEXTABS(32,100,'大盘量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右,'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc>200and(CROSS(AVX,1)AND(V1>=V2))THEN
DRAWTEXTABS(32,100,'如前期经过一轮下跌,此时为最佳买点,但如果前期有过一段涨幅则介入需谨慎。'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc>200and(CROSS(AVX,1)AND(V1<V2))THEN
DRAWTEXTABS(32,100,'大盘虽然走势趋强,但量能还显不足,如果前期经过一轮下跌,'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc>200and(CROSS(AVX,1)AND(V1<V2))THEN
DRAWTEXTABS(32,100,'可以考虑短线进场,仓位在1/2左右,一旦量能放大可以加仓买入。'),color0000FF,LINETHICK3;
IFBARSTATUS=2andc>200and(CROSS(1,AVX)AND(V1>=V2))THEN
DRAWTEXTABS(32,100,'大盘形态走坏,重仓者可以减去大部分仓位。'),color00FF00,LINETHICK3;
IFBARSTATUS=2andc>200and(CROSS(1,AVX)AND(V1<V2))THEN
DRAWTEXTABS(32,100,'大盘缩量调整,注意风险,短线清仓观望。'),color00FF00,LINETHICK3;
IFBARSTATUS=2andc>200and(((AVX>=1)AND(REF(AVX,1)>0))AND(V1>=V2))THEN
DRAWTEXTABS(32,100,'大盘走势良好,量能理想,可以继续持有强势股。'),color00FFFF,LINETHICK3;
IFBARSTATUS=2andc>200and(((AVX>=1)AND(REF(AVX,1)>0))AND(V1<V2))THEN
DRAWTEXTABS(32,100,'大盘形态良好,但量能稍显不足,随时准备减仓。'),color00FFFF,LINETHICK3;
IFBARSTATUS=2andc>200and(((AVX<1)AND(REF(AVX,1)<0))AND(V1>=V2))THEN
DRAWTEXTABS(32,100,'大盘趋势不明,注意成交量变化,目前不适宜进场。'),COLOR00FF00,LINETHICK3;
IFBARSTATUS=2andc>200and(((AVX<1)AND(REF(AVX,1)<0))AND(V1<V2))THEN
DRAWTEXTABS(32,100,'大盘趋势向下,量能萎缩,不适合进场。'),COLOR00FF00,LINETHICK3;
PT:=REF(HIGH,1)-REF(LOW,1);
重心:=(HIGH+LOW+CLOSE)/3;
压力Ⅰ:=2*重心-LOW;
压力Ⅱ:=重心+PT;
支撑Ⅰ:=2*重心-HIGH;
支撑Ⅱ:=重心-PT;
DRAWTEXTABS(100,13,'《逆势操作》'),ColorFFFFFF;
DRAWTEXTABS(175,13,'重心:'+重心),Coloryellow;
DRAWTEXTABS(100,32,'支撑'),ColorFFFFFF;
DRAWTEXTABS(100,49,''+支撑Ⅰ),ColorFFFFFF;
DRAWTEXTABS(100,67,''+支撑Ⅱ),ColorFFFFFF;
DRAWTEXTABS(100,32,'压力'),ColorFFFFFF;
DRAWTEXTABS(100,49,''+压力Ⅰ),ColorFFFFFF;
DRAWTEXTABS(100,67,''+压力Ⅱ),ColorFFFFFF;
DRAWTEXTABS(100,10,'│'),Color00FFFF;
DRAWTEXTABS(100,22,'│'),Color00FFFF;
DRAWTEXTABS(100,34,'│'),Color00FFFF;
DRAWTEXTABS(100,46,'│'),Color00FFFF;
DRAWTEXTABS(100,58,'│'),Color00FFFF;
DRAWTEXTABS(100,70,'│'),Color00FFFF;
DRAWTEXTABS(243,10,'│'),Color00FFFF;
DRAWTEXTABS(243,22,'│'),Color00FFFF;
DRAWTEXTABS(243,34,'│'),Color00FFFF;
DRAWTEXTABS(243,46,'│'),Color00FFFF;
DRAWTEXTABS(243,58,'│'),Color00FFFF;
DRAWTEXTABS(243,70,'│'),Color00FFFF;
DRAWTEXTABS(171,30,'│'),Color00FFFF;
DRAWTEXTABS(171,34,'│'),Color00FFFF;
DRAWTEXTABS(171,46,'│'),Color00FFFF;
DRAWTEXTABS(171,58,'│'),Color00FFFF;
DRAWTEXTABS(171,70,'│'),Color00FFFF;
DRAWTEXTABS(105,5,'────────────'),Color00FFFF;
DRAWTEXTABS(105,25,'────────────'),Color00FFFF;
DRAWTEXTABS(105,42,'────────────'),Color00FFFF;
DRAWTEXTABS(105,59,'────────────'),Color00FFFF;
DRAWTEXTABS(105,76,'────────────'),Color00FFFF;




回复

举报