通達信瘋牛看盤主圖 無未來(附源碼)


通達信瘋牛看盤主圖 無未來(附源碼)

EMA5:EMA(C,5),COLORWHITE;

EMA8:EMA(C,8)COLORBLUE;

EMA13:EMA(C,13),COLORYELLOW LINETHICK2;

EMA34:EMA(C,34),COLORF00FF0;

EMA50:EMA(C,50);

EMA55:EMA(C,55),COLORGREEN LINETHICK2;

EMA60:EMA(C,60);

EMA144:EMA(C,144)COLORLIGRAY LINETHICK3;

AA05:=EMA5;

角度1:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;

AA051:=EMA13;

角度2:=ATAN((AA051/REF(AA051,1)-1)*100)*180/3.1416;

AA052:=EMA34;

角度3:=ATAN((AA052/REF(AA052,1)-1)*100)*180/3.1416;

IF(角度1>60,EMA5,DRAWNULL),COLORRED,LINETHICK1;

IF(角度2>45,EMA13,DRAWNULL),COLORRED,LINETHICK1;

IF(角度3>30,EMA34,DRAWNULL),COLORRED,LINETHICK1;

漲停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);

STICKLINE(漲停,OPEN,CLOSE,3,0),COLORYELLOW;

S1:="DMI.PDI";

S2:=S1>EMA(EMA(EMA(S1,2),2),2);

S3:= C/REF(C,1)>1.05;

DRAWTEXT(BETWEEN(DMI.PDI,37,45) AND S3 AND S2,L*0.98,'↖亮劍'),COLORYELLOW;

DRAWTEXT(BETWEEN(DMI.PDI,45,50)AND S3 AND S2,L*0.98,'↖小牛'),COLORYELLOW;

DRAWTEXT(BETWEEN(DMI.PDI,50,53)AND S3 AND S2,L*0.98,'↖大牛'),COLORYELLOW;

DRAWTEXT(DMI.PDI>53 AND S3 AND S2, L*0.98,'↖瘋牛'),COLORYELLOW;

DRAWTEXT(REF(DMI.ADX,1)>50 AND CROSS(REF(DMI.ADX,1),DMI.ADX),H*1.01,'↙變盤'),COLORMAGENTA;

DRAWTEXT(REF(DMI.PDI,1)>53 AND CROSS(REF(DMI.PDI,1),DMI.PDI),H*0.98,'←大頂'),COLORGREEN;

DRAWTEXT(REF(DMI.PDI,1)<7 AND CROSS(DMI.PDI,REF(DMI.PDI,1)),L*1.02,'←大底'),COLORRED;

{通達信文字指標}

所屬板塊:=STRCAT('所屬板塊: ',STRCAT(STRCAT(STRCAT('[行業]-',HYBLOCK),STRCAT(' [地域]-',DYBLOCK)),STRCAT(' [概念]-',GNBLOCK)));

總股本:=STRCAT(STRCAT('總股本: ',CON2STR(TOTALCAPITAL/1000000,3)),'億股');

流通盤:=STRCAT(STRCAT('流通盤: ',CON2STR(CAPITAL/1000000,3)),'億股');

每股收益:=STRCAT(STRCAT('每股收益: ',CON2STR(FINANCE(29)/FINANCE(1),2)),'元');

每股未分配:=STRCAT(STRCAT('每股未分配: ',CON2STR(FINANCE(32),2)),'元');

每股公積金:=STRCAT(STRCAT('每股公積金: ',CON2STR(FINANCE(18),2)),'元');

每股淨資產:=STRCAT(STRCAT('每股淨資產: ',CON2STR(FINANCE(34),2)),'元');

總市值:=STRCAT(STRCAT('總市值: ',CON2STR(FINANCE(1)*C/100000000,3)),'億元');

市值:=STRCAT(STRCAT('流通值: ',CON2STR((CAPITAL/1000000)*C,3)),'億元');

A1:=FINANCE(42);

A2:=DATETODAY(CONST(DATE));

A3:=A2-A1;

XDATE:=DAYTODATE(A3)+19000000;

上市日期:=STRCAT(' 上市日期: ',CON2STR(XDATE,0));

收入同比增長:=STRCAT(STRCAT('收入同比增長: ',CON2STR(FINANCE(44),2)),'%');

市盈率:=STRCAT('市盈率: ',CON2STR(DYNAINFO(39),2));

主營毛利潤率:=STRCAT(STRCAT('主營毛利潤率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)),'%');

主營淨利潤率:=STRCAT(STRCAT('主營淨利潤率: ',CON2STR(FINANCE(30)/FINANCE(20)*100,2)),'%');

主營利潤率:=STRCAT(' 主營利潤率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));

淨利同比增長:=STRCAT(STRCAT('淨利同比增長: ',CON2STR(FINANCE(43),2)),'%');

DRAWTEXT_FIX(ISLASTBAR,0.001,0,0,上市日期),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.002,0.05,0,所屬板塊),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,0.002,0.10,0,總股本),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.127,0.10,0,收入同比增長),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.257,0.10,0,每股收益),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.002,0.15,0,流通盤),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.127,0.15,0,主營毛利潤率),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.257,0.15,0,每股淨資產),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.002,0.20,0,總市值),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.127,0.20,0,主營淨利潤率),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.257,0.20,0,每股未分配),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.002,0.25,0,市值),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.127,0.25,0,淨利同比增長),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.257,0.25,0,每股公積金),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.002,0.30,0,市盈率),COLORCYAN;

注意:指標是參考,決策在自己!


分享到:


相關文章: