更新~基本面關(guān)注點(diǎn)主圖疊加信息20230428增加效果圖和源代碼
效果圖

公式經(jīng)過測試過的
如有報錯的原因可能是?沒有設(shè)置RPS,沒有下載專業(yè)財務(wù)數(shù)據(jù)等。
有問題可以私信我。
以下是更新過的通達(dá)信導(dǎo)出文件直接導(dǎo)入即可
鏈接:https://pan.baidu.com/s/1PQshJtPH0Yw-2-sxeWA9_Q?pwd=7m9t
提取碼:7m9t
源代碼
{來自微信公眾號:趨勢跟蹤之道}
{DRAWRECTREL(0,0,378,348,RGB(36,36,36))NOFRAME;}
{基本資料}
FUNDS:=FINVALUE(254)/FINVALUE(246)*100;
PE:=C/FINANCE(33);
機(jī)構(gòu):=FINVALUE(246);
A:=BARSCOUNT(C)<251;
{B:=IPORPS.IPORPS250;
B1:=RPS.RPS250;
RS:=IF(A,B,B1);}
RS:=RPS.RPS250;
流通:=FINANCE(7)/100000000;
基金持股:=FINVALUE(255)/FINVALUE(239)*100;
北上持股:=GPJYVALUE(6,1,1)/10000;
漲跌量比50:=漲跌量比.RIO;
DRAWTEXT_FIX(1,0.44,0.02,0,'基金持股:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.49,0.02,0,STRCAT(VAR2STR(基金持股,1),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.44,0.06,0,'北上持股:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.49,0.06,0,STRCAT(VAR2STR(北上持股,1),' 萬')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.44,0.10,0,'漲跌量比:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.49,0.10,0,STRCAT(VAR2STR(漲跌量比50,1),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.35,0.06,0,'RS:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.38,0.06,0,CON2STR(RS,0))COLORRED;
DRAWTEXT_FIX(1,0.35,0.02,0,'行業(yè):')COLORLIGREEN;
DRAWTEXT_FIX(1,0.38,0.02,0,HYBLOCK),COLORGRAY;
DRAWTEXT_FIX(1,0.35,0.10,0,'機(jī)構(gòu):')COLORLIGREEN;
DRAWTEXT_FIX(1,0.38,0.10,0,CON2STR(機(jī)構(gòu),0))COLORLIBLUE;
DRAWTEXT_FIX(1,0.35,0.14,0,'P/E:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.38,0.14,0,CON2STR(PE,0))COLORLIBLUE;
DRAWTEXT_FIX(1,0.35,0.18,0,'FUNDS:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.39,0.18,0,STRCAT(VAR2STR(FUNDS,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.35,0.22,0,'流通:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.38,0.22,0,STRCAT(VAR2STR(流通,1),' 億')),COLORLIGRAY;
{財務(wù)(1)每股凈利潤EPS 和 EPS增長率}
EPS2020Q4:=FINONE(2,2020,1231);
EPS2021Q1:=FINONE(2,2021,0331);
EPS2021Q2:=FINONE(2,2021,0630);
EPS2021Q3:=FINONE(2,2021,0930);
EPS2021Q4:=FINONE(2,2021,1231);
EPS2022Q1:=FINONE(2,2022,0331);
EPS2022Q2:=FINONE(2,2022,0630);
EPS2022Q3:=FINONE(2,2022,0930);
EPS2022Q4:=FINONE(2,2022,1231);
EPS2023Q1:=FINONE(2,2023,0331);
EPS2023Q2:=FINONE(2,2023,0630);
EPS2023Q3:=FINONE(2,2023,0930);
EPS2023Q4:=FINONE(2,2023,1231);
EPS2017:=FINONE(2,2017,1231);
EPS2018:=FINONE(2,2018,1231);
EPS2019:=FINONE(2,2019,1231);
EPS2020:=FINONE(2,2020,1231);
EPS2021:=FINONE(2,2021,1231);
EPS2022:=FINONE(2,2022,1231);
EPS2023:=FINONE(2,2023,1231);
EPS2024:=FINONE(2,2024,1231);
EPS增長率2017:=FINONE(190,2017,1231);
EPS增長率2018:=FINONE(190,2018,1231);
EPS增長率2019:=FINONE(190,2019,1231);
EPS增長率2020:=FINONE(190,2020,1231);
EPS增長率2021:=FINONE(190,2021,1231);
EPS增長率2022:=FINONE(190,2022,1231);
EPS增長率2023:=FINONE(190,2023,1231);
EPS增長率2024:=FINONE(190,2024,1231);
EPS增長率2020Q4:=FINONE(190,2020,1231);
EPS增長率2023Q1:=FINONE(190,2023,0331);
EPS增長率2023Q2:=FINONE(190,2023,0630);
EPS增長率2023Q3:=FINONE(190,2023,0930);
EPS增長率2023Q4:=FINONE(190,2023,1231);
EPS增長率2022Q1:=FINONE(190,2022,0331);
EPS增長率2022Q2:=FINONE(190,2022,0630);
EPS增長率2022Q3:=FINONE(190,2022,0930);
EPS增長率2022Q4:=FINONE(190,2022,1231);
DRAWTEXT_FIX(1,0.00,0.02,0,'季度周期'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.00,0.07,0,'EPS'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.00,0.11,0,'EPS增長率'),COLORLIGREEN;
{年度EPS增長率}
DRAWTEXT_FIX(1,0.00,0.24,0,'2017'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.24,0,CON2STR(EPS2017,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.24,0,STRCAT(VAR2STR(EPS增長率2017,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.28,0,'2018'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.28,0,CON2STR(EPS2018,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.28,0,STRCAT(VAR2STR(EPS增長率2018,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.32,0,'2019'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.32,0,CON2STR(EPS2019,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.32,0,STRCAT(VAR2STR(EPS增長率2019,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.36,0,'2020'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.36,0,CON2STR(EPS2020,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.36,0,STRCAT(VAR2STR(EPS增長率2020,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.40,0,'2021'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.40,0,CON2STR(EPS2021,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.40,0,STRCAT(VAR2STR(EPS增長率2021,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.44,0,'2022'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.44,0,CON2STR(EPS2022,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.44,0,STRCAT(VAR2STR(EPS增長率2022,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.48,0,'2023'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.48,0,CON2STR(EPS2023,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.48,0,STRCAT(VAR2STR(EPS增長率2024,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.00,0.52,0,'2024'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.04,0.52,0,CON2STR(EPS2024,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.08,0.52,0,STRCAT(VAR2STR(EPS增長率2024,0),' %')),COLORLIGRAY;
{季度EPS增長率,來自微信公眾號:趨勢跟蹤之道}
DRAWTEXT_FIX(1,0.05,0.02,0,'23Q1'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.05,0.07,0,CON2STR(EPS2023Q1,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.05,0.11,0,STRCAT(VAR2STR(EPS增長率2023Q1,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.09,0.02,0,'23Q2'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.09,0.07,0,CON2STR(EPS2023Q2,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.09,0.11,0,STRCAT(VAR2STR(EPS增長率2023Q2,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0.02,0,'23Q3'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.13,0.07,0,CON2STR(EPS2023Q3,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0.11,0,STRCAT(VAR2STR(EPS增長率2023Q3,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.17,0.02,0,'23Q4'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.17,0.07,0,CON2STR(EPS2023Q4,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.17,0.11,0,STRCAT(VAR2STR(EPS增長率2023Q4,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.21,0.02,0,'22Q1'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.21,0.07,0,CON2STR(EPS2022Q1,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.21,0.11,0,STRCAT(VAR2STR(EPS增長率2022Q1,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0.02,0,'22Q2'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.25,0.07,0,CON2STR(EPS2022Q2,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0.11,0,STRCAT(VAR2STR(EPS增長率2022Q2,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.28,0.02,0,'22Q3'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.28,0.07,0,CON2STR(EPS2022Q3,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.28,0.11,0,STRCAT(VAR2STR(EPS增長率2022Q3,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.31,0.02,0,'22Q4'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.31,0.07,0,CON2STR(EPS2022Q4,2)),COLORLIGRAY;
DRAWTEXT_FIX(1,0.31,0.11,0,STRCAT(VAR2STR(EPS增長率2022Q4,0),' %')),COLORLIGRAY;
{財務(wù)(2)銷售收入增長率 來自微信公眾號:趨勢跟蹤之道}
SALES2020Q4:=FINONE(183,2020,1231);
SALES2023Q1:=FINONE(183,2023,0331);
SALES2023Q2:=FINONE(183,2023,0630);
SALES2023Q3:=FINONE(183,2023,0930);
SALES2023Q4:=FINONE(183,2023,1231);
SALES2022Q1:=FINONE(183,2022,0331);
SALES2022Q2:=FINONE(183,2022,0630);
SALES2022Q3:=FINONE(183,2022,0930);
SALES2022Q4:=FINONE(183,2022,1231);
DRAWTEXT_FIX(1,0.00,0.19,0,'銷售增長率'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.05,0.19,0,STRCAT(VAR2STR(SALES2023Q1,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.09,0.19,0,STRCAT(VAR2STR(SALES2023Q2,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0.19,0,STRCAT(VAR2STR(SALES2023Q3,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.17,0.19,0,STRCAT(VAR2STR(SALES2023Q4,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.21,0.19,0,STRCAT(VAR2STR(SALES2022Q1,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0.19,0,STRCAT(VAR2STR(SALES2022Q2,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.28,0.19,0,STRCAT(VAR2STR(SALES2022Q3,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.31,0.19,0,STRCAT(VAR2STR(SALES2022Q4,0),' %')),COLORLIGRAY;
{{財務(wù)(3)凈利潤增長率}
凈利潤2020Q4:=FINONE(184,2020,1231);
凈利潤2023Q1:=FINONE(184,2023,0331);
凈利潤2023Q2:=FINONE(184,2023,0630);
凈利潤2023Q3:=FINONE(184,2023,0930);
凈利潤2023Q4:=FINONE(184,2023,1231);
凈利潤2022Q1:=FINONE(184,2022,0331);
凈利潤2022Q2:=FINONE(184,2022,0630);
凈利潤2022Q3:=FINONE(184,2022,0930);
凈利潤2022Q4:=FINONE(184,2022,1231);
DRAWTEXT_FIX(1,0.00,0.15,0,'凈利潤同比'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.05,0.15,0,STRCAT(VAR2STR(凈利潤2023Q1,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.09,0.15,0,STRCAT(VAR2STR(凈利潤2023Q2,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.13,0.15,0,STRCAT(VAR2STR(凈利潤2023Q3,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.17,0.15,0,STRCAT(VAR2STR(凈利潤2023Q4,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.21,0.15,0,STRCAT(VAR2STR(凈利潤2022Q1,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.25,0.15,0,STRCAT(VAR2STR(凈利潤2022Q2,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.28,0.15,0,STRCAT(VAR2STR(凈利潤2022Q3,0),' %')),COLORLIGRAY;
DRAWTEXT_FIX(1,0.31,0.15,0,STRCAT(VAR2STR(凈利潤2022Q4,0),' %')),COLORLIGRAY;
{調(diào)整幅度%來自微信公眾號:趨勢跟蹤之道}
ZG:=CONST(HHV(H,200));{最高}
SJ:=HHVBARS(H,200)+1;{高低時間差}
ZD:=CONST(LLV(L,SJ));{最低}
DZ:=ZD/ZG;{低/高}
DF:=DZ*100-100;{跌幅}
DRAWNUMBER(L=ZD,ZD,DF),COLORYELLOW;
RED:=DF,NODRAW,COLORRED;
GREEN:=DF,NODRAW,COLORGREEN;
調(diào)整幅度%:IF(DF<=-30,RED,GREEN);
{凈利潤斷層};
高開缺口 := LOW>REF(HIGH,1);
當(dāng)前日期 := DATE+19000000-20000000;
SV := -1;
EV := IF(WEEKDAY=1,3,2);
{業(yè)績預(yù)告}
預(yù)告下限 :=FINVALUE(285);
預(yù)告上限 :=FINVALUE(286);
預(yù)告凈利潤均值% : (預(yù)告上限+預(yù)告下限)/2,COLORYELLOW,NODRAW;
預(yù)告日期 := FINVALUE(313);
預(yù)告日期差 := (當(dāng)前日期-預(yù)告日期>SV) AND (當(dāng)前日期-預(yù)告日期<EV);
預(yù)告斷層 := (預(yù)告凈利潤均值%>0) AND 高開缺口 AND 預(yù)告日期差;
{業(yè)績快報}
快報凈利潤 :=FINVALUE(287);
快報日期 := FINVALUE(315);
快報日期差 := (當(dāng)前日期-快報日期>SV) AND (當(dāng)前日期-快報日期<EV);
快報斷層 := (快報凈利潤>0) AND 高開缺口 AND 快報日期差;
{財報}
財報凈利潤 :=FINVALUE(95);
EPSRATE := FINVALUE(184);
財報日期 :=FINVALUE(314);
財報日期差 := (當(dāng)前日期-財報日期>SV) AND (當(dāng)前日期-財報日期<EV);
財報斷層 := 財報凈利潤 > 0 AND EPSRATE? > 0 AND 高開缺口 AND 財報日期差;
報告期 := FINONE(0,0,0) - INTPART(FINONE(0,0,0)/10000)*10000;
{指定日期1}
指定日期 := IF(報告期=331,1201,IF(報告期=630,301,IF(報告期=930,601,301)));
{指定日期業(yè)績預(yù)告}
指預(yù)告下限 := FINONE(285,0,指定日期);
指預(yù)告上限 := FINONE(286,0,指定日期);
指預(yù)告中值 := (指預(yù)告上限+指預(yù)告下限)/2;
指預(yù)告日期 := FINONE(313,0,指定日期);
指預(yù)告日期差 := (當(dāng)前日期-指預(yù)告日期>SV) AND (當(dāng)前日期-指預(yù)告日期<EV);
指預(yù)告斷層 := (指預(yù)告中值>0) AND 高開缺口 AND 指預(yù)告日期差;
{指定日期業(yè)績快報來自微信公眾號:趨勢跟蹤之道}
指快報凈利潤 := FINONE(287,0,指定日期);
指快報日期 := FINONE(315,0,指定日期);
指快報日期差 := (當(dāng)前日期-指快報日期>SV) AND (當(dāng)前日期-指快報日期<EV);
指快報斷層 := (指快報凈利潤>0) AND 高開缺口 AND 指快報日期差;
{指定日期財報}
指財報凈利潤 := FINONE(95,0,指定日期);
指EPSRATE := FINONE(184,0,指定日期);
指財報日期 := FINONE(314,0,指定日期);
指財報日期差 := (當(dāng)前日期-指財報日期>SV) AND (當(dāng)前日期-指財報日期<EV);
指財報斷層 := 指財報凈利潤 > 0 AND 指EPSRATE? > 0 AND 高開缺口 AND 指財報日期差;
{指定日期2}
指定日期2 := IF(報告期=331, 301, IF(報告期=630, 601, IF(報告期=930, 901, 1201)));
{指定日期業(yè)績預(yù)告2}
指預(yù)告下限2 := FINONE(285,0,指定日期2);
指預(yù)告上限2 := FINONE(286,0,指定日期2);
指預(yù)告中值2 := (指預(yù)告上限2+指預(yù)告下限2)/2;
指預(yù)告日期2 := FINONE(313,0,指定日期2);
指預(yù)告日期差2 := (當(dāng)前日期-指預(yù)告日期2>SV) AND (當(dāng)前日期-指預(yù)告日期2<EV);
指預(yù)告斷層2 := (指預(yù)告中值2>0) AND 高開缺口 AND 指預(yù)告日期差2;
{指定日期業(yè)績快報2}
指快報凈利潤2 := FINONE(287,0,指定日期2);
指快報日期2 := FINONE(315,0,指定日期2);
指快報日期差2 := (當(dāng)前日期-指快報日期2>SV) AND (當(dāng)前日期-指快報日期2<EV);
指快報斷層2 := (指快報凈利潤2>0) AND 高開缺口 AND 指快報日期差2;
{指定日期財報}
指財報凈利潤2 := FINONE(95,0,指定日期2);
指EPSRATE2 := FINONE(184,0,指定日期2);
指財報日期2 := FINONE(314,0,指定日期2);
指財報日期差2 := (當(dāng)前日期-指財報日期2>SV) AND (當(dāng)前日期-指財報日期2<EV);
指財報斷層2 := 指財報凈利潤2 > 0 AND 指EPSRATE2? > 0 AND 高開缺口 AND 指財報日期差2;
凈利潤斷層:=預(yù)告斷層 OR 快報斷層 OR 財報斷層 OR 指預(yù)告斷層 OR 指快報斷層 OR 指財報斷層 OR 指預(yù)告斷層2 OR 指快報斷層2 OR 指財報斷層2;
DRAWICON(BARSSINCEN(凈利潤斷層,3)=0,L,5);{畫笑臉};
歷史更新文章
更新基本面關(guān)注點(diǎn)主圖信息20220523
基本面關(guān)注點(diǎn)主圖疊加信息20220704更新??
本文使用 文章同步助手 同步