您好!请登录注册

联系我们:400-8888-888   |   切换皮肤颜色

102

主题

0

回帖

124

积分
积分
124

大智慧强势出击整合的主图公式源码

2023-11-1 19:30:04 4875 复制链接

image.png image.png image.png


{因为源码太多,画图太多,电脑配置低的不要安装,回卡死,如果卡死请耐心等待画面加载}

R1:=MA(CLOSE,1);

R2:=MA(CLOSE,3);

R3:=(MA(R2,1)*1);

R4:=(MA(R2,3)*1);

X1:=(C+L+H)/3;

DD:=FINANCE2(35);

SS:=FINANCE2(37);

GG:=FINANCE2(3);

TH:=DYNAINFO(39);

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);

a1:=IF((CLOSE < 800),((AMOUNT / VOL) / 100),((((CLOSE * 2) + HIGH) + LOW) / 4));

a2:=((HHV(HIGH,15)) + (LLV(LOW,30))) / 2;

a3:=EMA((MA(a1,5)),10);

a4:=EMA((MA(a1,15)),10);

a5:=EMA((MA(a1,13)),21);

a6:=((a3 + a4) + a5) / 3;

决策线:EMA((MA(CLOSE,5)),3),linethick2,colorFF0000;

PARTLINE(决策线,决策线 > (REF(决策线,3)),RGB(255,0,0)),linethick2,Color3300FF;

DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(决策线 * 0.95),'决策价:'+决策线),MOVE10,ALIGN2,linethick2,colorRed;

VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);

VAR2222:=CROSS(VAR1111,0.9);

VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);

VAR4444:=CROSS(VAR3333,0.9);

压力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5;

STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),LINETHICK3,ColorEA91B5;

支撑: REF(LOW,BARSLAST(Var4444)), POINTDOT,Color00b4ff,linethick3;

STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4444)),REF(LOW,BARSLAST(Var4444)),5,0),LINETHICK3,Color00b4ff;

弱势双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,COLOR00FF00;

强势单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,ColorFF00FF;

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;

老鼠仓:BB1 AND CC1 AND DD1 AND EE1,linethick0;

DRAWTEXT(老鼠仓, (LOW* 0.99),'老鼠仓'),LINETHICK3,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);

IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股的量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右。' ),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股虽然走势趋强,但量能还显不足,可以考虑短线进场,仓位在1/2左右。' ),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(20,100,'该股量价配合良好,但相对其它股票并没有明显走强,可以考虑短线进场,仓位1/2左右。 '),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股形态尚可,但量能不足,股票也未完全走强,可以短线参与,仓位1/3左右。' ),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股形态变坏,但走势相对其它股票尚可,重仓者减持大半,清仓者可以观望。' ),color00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股随大盘一起下跌,程明显缩量走势,考虑到大盘风险,减持或清仓。' ),color00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股放量下跌,走势明显偏弱,离场观望。' ),color00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股缩量下跌,走势偏弱,离场观望。' ),color00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股形态良好,强势明显,量能充足,可以继续持有。' ),color00FFFF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股上行趋势不变,强势依然,但量能开始转弱,注意风险。' ),color00FFFF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。 '),color00FFFF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股走势趋弱,量能不足,减持大部分筹码。' ),color00FFFF,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股形态不佳,注意成交量的变化,但目前不适合参与。' ),COLOR00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN

DRAWTEXTABS(32,100,'该股趋势不明,股价偏弱,注意量能变化,目前不宜参与。 '),COLOR00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股有走强迹象,但量能不足,趋势不明,不适合操作。' ),COLOR00FF00,LINETHICK3;

IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN

DRAWTEXTABS(32,100,'该股走势太弱,没有参与价值。 '),COLOR00FF00,LINETHICK3;

IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN

DRAWTEXTABS(32,100,'大盘量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右。' ),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN

DRAWTEXTABS(32,100,'如前期经过一轮下跌,此时为最佳买点,但如果前期有过一段涨幅则介入需谨慎。' ),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN

DRAWTEXTABS(32,100,'大盘虽然走势趋强,但量能还显不足,如果前期经过一轮下跌。'),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN

DRAWTEXTABS(32,100,'可以考虑短线进场,仓位在1/2左右,一旦量能放大可以加仓买入。 '),color0000FF,LINETHICK3;

IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN

DRAWTEXTABS(32,100,'大盘形态走坏,重仓者可以减去大部分仓位。' ),color00FF00,LINETHICK3;

IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN

DRAWTEXTABS(32,100,'大盘缩量调整,注意风险,短线清仓观望。' ),color00FF00,LINETHICK3;

IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN

DRAWTEXTABS(32,100,'大盘走势良好,量能理想,可以继续持有强势股。' ),color00FFFF,LINETHICK3;

IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN

DRAWTEXTABS(32,100,'大盘形态良好,但量能稍显不足,随时准备减仓。' ),color00FFFF,LINETHICK3;

IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN

DRAWTEXTABS(32,100,'大盘趋势不明,注意成交量变化,目前不适宜进场。' ),COLOR00FF00,LINETHICK3;

IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN

DRAWTEXTABS(32,100,'大盘趋势向下,量能萎缩,不适合进场。' ),COLOR00FF00,LINETHICK3;

VAR3:=LLV(HIGH,240);

VAR4:=100*(CLOSE-VAR3)/VAR3;

VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR7:=0;

VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);

买1:=VAR10;

买2:=(VAR11+VAR13+VAR15+VAR17);

卖1:=(VAR12+VAR14+VAR16+VAR18);

DRAWTEXT(买1>0 OR 买2>0,LOW*1,'←买'),CROSSDOT,LINETHICK3,COLORRED;

DRAWTEXT(卖1>0,HIGH*1,'←卖'),CROSSDOT,LINETHICK3,COLORGREEN;

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);

黑马线:=EMA(A51,5);

A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;

趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));

DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,(HIGH* 0.97),'▲大黑马'),LINETHICK3,COLORYELLOW;

VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VAR20:=(HIGH+LOW+CLOSE)/3;

VAR21:=(VAR20-MA(VAR20,14))/(0.015*AVEDEV(VAR20,14));

VAR22:=(VAR20-MA(VAR20,70))/(0.015*AVEDEV(VAR20,70));

VAR23:=IF(VAR21>=150 AND VAR21<200 AND VAR22>=150 AND VAR22<200,10,0);

VAR24:=IF(VAR21<=-150 AND VAR21>-200 AND VAR22<=-150 AND VAR22>-200,-10,VAR23);

VAR25:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;

VAR26:=100-ABS(VAR25);

VAR27:=IF(VAR26<90,VAR26,100);

VAR1A:=IF(VARE>0,VARE,0);

VAR1B:=IF(VAR22>=200 AND VAR21>=150,15,IF(VAR22<=-200 AND VAR21<=-150,-15,VAR24))+60;

VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR27<100;

{DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,HIGH*1.02,大笔出货),LINETHICK3,COLORFFCC66;}

AB1:=COST(0.33);

AB2:=COST(5);

AB3:=COST(15

支付1荣誉值,阅读全文
还有更多精彩内容付费后可见,签到发帖可获取荣誉值