手机版 官方微博
官方微信
扫描关注:理想财富微信公众号
理想论坛App
扫描下载理想论坛App
RSS

请老师将下面改成大智慧可以用,谢谢

[通达信]
设置
1002 0 呐喊abc Lv.4 发表于 · 2020-6-29 22:26 举报 显示全部楼层 复制 正序浏览 |
跳转到指定楼层
DRAWTEXT_FIX(C>0,0.004,0.11,0,DYBLOCK),COLORRED,LINETHICK2;
DRAWTEXT_FIX(C>0,0.06,0.11,0,HYBLOCK),COLORYELLOW,LINETHICK2;
DRAWTEXT_FIX(C>0,0.13,0.11,0,GNBLOCK),COLORCYAN,LINETHICK2;
DRAWTEXT_FIX(C>0,0.11,0.11,0,CON2STR(GNBLOCKNUM,0)),COLORMAGENTA,LINETHICK2;
DRAWTEXT_FIX(C>0,0.13,0.18,0,FGBLOCK),COLORCYAN,LINETHICK2;
DRAWTEXT_FIX(C>0,0.11,0.18,0,CON2STR(FGBLOCKNUM,0)),COLORMAGENTA,LINETHICK2;
DRAWTEXT_FIX(C>0,0.13,0.25,0,ZHBLOCK),COLORCYAN,LINETHICK2;
现价:=IF(DYNAINFO(4)=0,C,DYNAINFO(7));
XG:=HHV(H,480);
STICKLINE(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,C,1,0),COLORMAGENTA;{紫竖线}
DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,'突')AND C<ZTPRICE(REF(CLOSE,1),0.1),COLORYELLOW;{突}

RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;
JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;
MA01:=REF(C,JY);
MA02:=REF(MA01,JY);
MA03:=REF(MA02,JY);
MA04:=REF(MA03,JY);
MA05:=REF(MA04,JY);
MA6:=REF(MA05,JY);
MA7:=REF(MA6,JY);
MA8:=REF(MA7,JY);
MA9:=REF(MA8,JY);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*8/9,COLORLIRED,DOTLINE;
支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;

XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));
主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);
底:=1;1.022,NODRAW;高:=1.033;

{DRAWTEXT(CROSS(主力,1.02),C*0.999,' 拉')AND C<ZTPRICE(REF(CLOSE,1),0.1),COLORMAGENTA;
DRAWTEXT(CROSS(主力,1.04),C*0.999,' 冲')AND C<ZTPRICE(REF(CLOSE,1),0.1),COLORRED;}


DRAWICON(LONGCROSS(支撑,C,2),C-0.01,7);
DRAWICON(LONGCROSS(C,阻力,2)AND C<ZTPRICE(REF(CLOSE,1),0.1),C+0.01,8);

ZG:=分时引用JIN.H1#DAY;
ZJ:=分时引用JIN.昨均价#DAY;
ZD:=分时引用JIN.L1#DAY;
ZK:=分时引用JIN.K1#DAY;
DRAWTEXT_FIX(1,1,1-0.638,1,STRCAT('昨高:  ',CON2STR(ZG,2))),COLORWHITE;
DRAWTEXT_FIX(1,1,1-0.538,1,STRCAT('昨均:  ',CON2STR(ZJ,2))),COLORCYAN;
DRAWTEXT_FIX(1,1,1-0.438,1,STRCAT('昨低:  ',CON2STR(ZD,2))),COLORWHITE;
DRAWTEXT_FIX(1,1,1-0.338,1,STRCAT('昨开:  ',CON2STR(ZK,2))),COLORWHITE;

五日:=分时引用JIN.M5#DAY;
十日:=分时引用JIN.M10#DAY;
二十日:=分时引用JIN.M20#DAY;

DRAWTEXT_FIX(1,1,1-0.238,1,STRCAT('M5 :  ',CON2STR(五日,2))),COLORGREEN;
DRAWTEXT_FIX(1,1,1-0.138,1,STRCAT('M10:  ',CON2STR(十日,2))),COLORWHITE;
DRAWTEXT_FIX(1,1,1-0.038,1,STRCAT('M20:  ',CON2STR(二十日,2))),COLORWHITE;
DK:=分时引用JIN.DKX#DAY;
DRAWTEXT_FIX(1,0,1,0,STRCAT('BBI :  ',CON2STR(DK,2))),COLORGREEN;




量价:=(VOL/CLOSE)/3;
A52:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);
A53:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);
A56:=A52+A53;DD1:=1;比:=A52/A53;
AAA1:=STRCAT(STRCAT('买= ',CON2STR((100*A52)/A56,0)),'%');
AAA2:=STRCAT(STRCAT('卖= ',CON2STR((100*A53)/A56,0)),'%');
AAA3:=STRCAT(STRCAT('差= ',CON2STR((100*(A52-A53))/A56,0)),'%');
DRAWTEXT_FIX(DD1=1,0,0.23,0,AAA3),COLOR00FFFF;
DRAWTEXT_FIX(DD1=1,0,0.23,0,AAA3),COLOR00FFFF;  




LTPDW:=IF((FINANCE(46))/1000000>1,'亿股','万股');
LTP:=IF((FINANCE(46))/1000000>1,CON2STR((FINANCE(46))/100000000,2),CON2STR((FINANCE(46))/10000,0));
LTP1:=STRCAT(STRCAT('自由流通盘:',LTP),LTPDW);
LTPWS:=STRCAT(VAR2STR(FINANCE(46)/1000000,2),'万手');
LTP2:=STRCAT(LTP1,'  ≈  ');
DRAWTEXT_FIX(1,0.50,0.85,0,STRCAT(LTP2,LTPWS))COLORMAGENTA;

DRAWTEXT_FIX(1,0.50,0.90,0,STRCAT(STRCAT('流通市值:',CON2STR(FINANCE(46)*C/100000000,2)),'亿元'))COLORMAGENTA;

市盈率:=STRCAT('市盈率:',CON2STR(C/FINANCE(33),2));
DRAWTEXT_FIX(1,0.50,0.95,0,STRCAT(市盈率,'倍'))COLORYELLOW;

DRAWTEXT_FIX(1,0.30,0.85,0,STRCAT('最高价:',CON2STR(DYNAINFO(5),2)))COLORYELLOW;
DRAWTEXT_FIX(1,0.30,0.90,0,STRCAT('最低价:',CON2STR(DYNAINFO(6),2)))COLORYELLOW;
HS:=100*DYNAINFO(8)/CAPITAL;
ZHWS:=STRCAT(VAR2STR(DYNAINFO(8)/10000,2),'万手');
JHS:=STRCAT('今换手:',STRCAT(VAR2STR(HS,2),'%'));
JHS1:=STRCAT(JHS,'  ≈  ');
DRAWTEXT_FIX(1,0.30,0.95,0,STRCAT(JHS1,ZHWS))COLORYELLOW;

JJCJL:=DYNAINFO(15)/DYNAINFO(4)/100;
JJJEDW:=IF(DYNAINFO(15)>10000,'万元','元');
JJJE:=IF(DYNAINFO(15)>10000,CON2STR(DYNAINFO(15)/10000,1),CON2STR(DYNAINFO(15),1));
JJJE1:=STRCAT(JJJE,JJJEDW);
JJ:=STRCAT('竞价:',STRCAT(CON2STR(JJCJL,0),'手'));
JJ1:=STRCAT(JJ,' = ');
DRAWTEXT_FIX(1,0.1,0.75,0,STRCAT(JJ1,JJJE1))COLORMAGENTA;

今日竞价股数:=DYNAINFO(15)/DYNAINFO(4);
ZSPJ:=分时引用JIN.ZSP#DAY;
A:=今日竞价股数/FINANCE(46)*10000*(O-ZSPJ)/ZSPJ;
DRAWTEXT_FIX(1,0.1,0.8,0,STRCAT(STRCAT('竞价动能值:',CON2STR(A,2)),''))COLORRED;

KP:=(DYNAINFO(4)-DYNAINFO(3))/DYNAINFO(3)*100;
DRAWTEXT_FIX(1,0.1,0.85,0,STRCAT('开盘:',STRCAT(VAR2STR(KP,2),'%')))COLORYELLOW;

开盘换手Z:=DYNAINFO(15)/DYNAINFO(4)/FINANCE(46)*100;
DRAWTEXT_FIX(1,0.1,0.9,0,STRCAT(STRCAT('开盘换手Z:',CON2STR(开盘换手Z,2)),''))COLORYELLOW;

CJE:=DYNAINFO(8)*DYNAINFO(11);
DW:=IF(CJE/1000000>1,'亿','万');
AB:=IF(CJE/1000000>1,CJE/1000000,CJE/100);
DRAWTEXT_FIX(1,0.1,0.95,0,STRCAT(STRCAT('成交额:',CON2STR(AB,2)),DW))COLORYELLOW;


DRAWTEXT_FIX(1,0.1,0.65,0,STRCAT('',EXTERNSTR(0,4))),COLORRED,LINETHICK2;
DRAWTEXT_FIX(1,0.1,0.70,0,STRCAT('',EXTERNSTR(0,5))),COLORYELLOW,LINETHICK2;


DRAWTEXT_FIX(1,0.70,0.67,0,STRCAT('净流入(万元):= ',CON2STR(ZJBY.净流入#DAY,2))),COLORWHITE;
DRAWTEXT_FIX(1,0.70,0.74,0,STRCAT('超大单(万元):= ',CON2STR(ZJBY.超大单#DAY,2))),COLORRED;
DRAWTEXT_FIX(1,0.70,0.81,0,STRCAT('大单(万元):= ',CON2STR(ZJBY.大单#DAY,2))),COLORGREEN;
DRAWTEXT_FIX(1,0.70,0.88,0,STRCAT('中单(万元):= ',CON2STR(ZJBY.中单#DAY,2))),COLORMAGENTA;
DRAWTEXT_FIX(1,0.70,0.95,0,STRCAT('小单(万元):= ',CON2STR(ZJBY.小单#DAY,2))),COLORCYAN;
超大单:="ZJBY.超大单#DAY";
大单:="ZJBY.大单#DAY";
中单:="ZJBY.中单#DAY";
小单:="ZJBY.小单#DAY";
ZDZ:=MAX(MAX(ABS(超大单),ABS(大单)),MAX(ABS(中单),ABS(小单)));
M1:=超大单/ZDZ*300;
M2:=大单/ZDZ*300;
M3:=中单/ZDZ*300;
M4:=小单/ZDZ*300;
DRAWRECTREL(850,700-M1,870,700,RGB(255,0,0));
DRAWRECTREL(875,700-M2,895,700,RGB(0,255,0));
DRAWRECTREL(900,700-M3,920,700,RGB(255,0,255));
DRAWRECTREL(925,700-M4,945,700,RGB(0,255,255));



AF1:=1;
TT:=BARSLAST(HOUR=9 AND MINUTE=(30+AF1))+1;
均价:=AMOUNT/VOL/100,COLORYELLOW;
价位:=C,COLORWHITE,LINETHICK4;
盘整:=IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2;



STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))>=REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED;
STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))<REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN;
STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))>=REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED;
STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))<REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN;
STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))>=REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED;
STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))<REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN;


IF(MACD.DEA<0,C,DRAWNULL),COLORYELLOW ,LINETHICK9;

突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL);
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL);
STICKLINE(A1X>=0,多方,突破,10,0),COLOR000099;
STICKLINE(A1X<0,空方,突破,10,0),COLOR00CC66;
日牛熊线:=EMA(C,120),COLORFF0080,LINETHICK1;
最新:CLOSE,LINETHICK1,COLORWHITE;
{CLOSE,LINETHICK1,COLORWHITE;}
AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
BB:=BETWEEN(C/AA,C+H,C-H);
DRAWTEXT( ISLASTBAR  AND 最新>REF(最新,1),最新,STRCAT(' 我赢涨↑',CON2STR(最新,2))),COLOR0000FF;
DRAWTEXT( ISLASTBAR  AND 最新<REF(最新,1),最新,STRCAT(' 跌↓',CON2STR(最新,2))),COLOR00FF00;

举报

扔鸡蛋(0) 回复

您需要登录后才可以回帖 免费注册登录

本版积分规则 《理想财富服务协议》《免责声明》

论坛问题
微信扫一扫,添加好友咨询
驿站问题
微信扫一扫,添加好友咨询
广告投放
微信扫一扫,添加好友咨询
回顶部 到页底
快速回复 返回顶部 返回列表