基本面財務公式指標源碼-精品公式[同花順公式]
相關標簽: 飛狐基本面指標公式 、 基本面選股指標公式 、 通達信基本面指標公式 、 通達信基本面主圖指標 、 飛狐基本面公式 、 基本面選股公式 、 基本面 、 股票基本面分析方法 、 基本面分析 、
聚源數據F10資料。注:圖中彩色柱狀為人均持股不同季度的柱狀顯示。
基本面分析指標源碼:
VARIABLE:銷售毛利率1[8]='str',主營收入1[8]='str',主營利潤1[8]='str',凈利1[8]='str',財務費用1[8]='str',現金流凈額1[8]='str',營收增長1[8]='str',凈利增長1[8]='str',每股收益1[8]='str',每股凈資產1[8]='str',凈資收益率1[8]='str',現金流增長1[8]='str',日期1[8]='str';
VARIABLE:SJA[4]='str',SYA[4]='str',TTA=1,ttb=1;
//控盤情況:人均持股 www.kzuj.com.cn //
jdgA:=F10FIND('控盤情況',50);
SJTA:=F10TEXT(F10FIND(' │',jdgA)+3,500);
SJA[1]:=STRmid(SJTA,111,12);
SJA[2]:=STRMID(SJTA,171,14);
SJA[3]:=STRMID(SJTA,233,14);
SJA[4]:=STRMID(SJTA,295,14);
jdg0:=F10FIND('控盤情況',50);
SYTA:=F10TEXT(f10find(' │',jdg0)+3,500);
SyA[1]:=STRmid(SyTA,141,12);
SyA[2]:=STRMID(SyTA,201,14);
SyA[3]:=STRMID(SyTA,263,14);
SyA[4]:=STRMID(SyTA,325,14);
新:=capital/STRTONUM(SYA[1])*100;
YJ1:=capital/STRTONUM(SYA[2])*100;
YJ2:=capital/STRTONUM(SYA[3])*100;
YJ3:=capital/STRTONUM(SYA[4])*100;
上:=IF(YJ1<>0,YJ1,YJ2);
SY:=IF(新<>0,新,上);
STICKLINE(BARPOS=DATACOUNT-9,0,新,35,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-17,0,YJ1,35,0),COLOR008800;
STICKLINE(BARPOS=DATACOUNT-25,0,YJ2,35,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-33,0,YJ3,35,0),COLORBB00BB;
DRAWTEXT(BARPOS=DATACOUNT-11,0,'\n\n \n\n'+SJA[1]),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-19,0,'\n\n \n\n'+SJA[2]),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-27,0,'\n\n \n\n'+SJA[3]),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-35,0,'\n\n \n\n'+SJA[4]),PXUP60,ColorFFFFFF;
DRAWTEXTEX(C,1,3,950,'人均持股(環比變化%) | '+NUMTOSTR(capital/STRTONUM(SYA[1])*100,0)+'('+NUMTOSTR((capital/STRTONUM(SYA[1])-capital/STRTONUM(SYA[2]))/(capital/STRTONUM(SYA[2]))*100,2)+') | '+NUMTOSTR(capital/STRTONUM(SYA[2])*100,0)+'('+NUMTOSTR((capital/STRTONUM(SYA[2])-capital/STRTONUM(SYA[3]))/(capital/STRTONUM(SYA[3]))*100,2)+') | '+NUMTOSTR(capital/STRTONUM(SYA[3])*100,0)+'('+NUMTOSTR((capital/STRTONUM(SYA[3])-capital/STRTONUM(SYA[4]))/(capital/STRTONUM(SYA[4]))*100,2)+') | '+NUMTOSTR(capital/STRTONUM(SYA[4])*100,0)+'(/)|'),Coloryellow;
DRAWTEXTEX((capital/STRTONUM(SYA[1])-capital/STRTONUM(SYA[2]))/(capital/STRTONUM(SYA[2]))*100>0,1,3,950,' | '+NUMTOSTR(capital/STRTONUM(SYA[1])*100,0)+'('+NUMTOSTR((capital/STRTONUM(SYA[1])-capital/STRTONUM(SYA[2]))/(capital/STRTONUM(SYA[2]))*100,2)+') | '),Colorred;
DRAWTEXTEX(1,1,3,3,'☆流通股:'+NUMTOSTR(FINANCE(7)/10000,2)+'億股'),colormagenta;
DRAWTEXTEX(1,1,170,3,'☆總資產:'+NUMTOSTR(FINANCE(10)/100000,2)+'億元'),colorwhite;
DRAWTEXTEX(1,1,350,3,'☆無形資產:'+NUMTOSTR(FINANCE(13)/10,2)+'萬元'),colormagenta;
DRAWTEXTEX(1,1,540,3,'☆流動負債:'+NUMTOSTR(FINANCE(15)/10,2)+'萬元'),colorwhite;
DRAWTEXTEX(1,1,720,3,'☆市盈率:'+NUMTOSTR(DYNAINFO(39),2)),colormagenta;
r:=F10FIND('財務分析',1);
r1:=F10FIND('財務指標-每股指標:',r);
qd11:=f10find('指標名稱',r1);
qd12:=f10find('指標名稱',qd11+10);
wz91:=f10find('每股收益',r1);
wz92:=f10find('每股收益',wz91+100); //本文來至CXH99.COM//
wza1:=f10find('每股凈資產',r1);
wza2:=f10find('每股凈資產',wza1+100);
日期1[1]:=F10TEXT(qd11+16,10);
日期1[2]:=F10TEXT(qd11+30,10);
日期1[3]:=F10TEXT(qd11+44,10);
日期1[4]:=F10TEXT(qd11+58,10);
日期1[5]:=F10TEXT(qd12+16,10);
日期1[6]:=F10TEXT(qd12+30,10);
日期1[7]:=F10TEXT(qd12+44,10);
日期1[8]:=F10TEXT(qd12+58,10);
每股收益1[1]:=F10TEXT(wz91+20,12);
每股收益1[2]:=F10TEXT(wz91+34,12);
每股收益1[3]:=F10TEXT(wz91+48,12);
每股收益1[4]:=F10TEXT(wz91+62,12);
每股收益1[5]:=F10TEXT(wz92+20,12);
每股收益1[6]:=F10TEXT(wz92+34,12);
每股收益1[7]:=F10TEXT(wz92+48,12);
每股收益1[8]:=F10TEXT(wz92+62,12);
每股凈資產1[1]:=F10TEXT(wza1+20,12);
每股凈資產1[2]:=F10TEXT(wza1+34,12);
每股凈資產1[3]:=F10TEXT(wza1+48,12);
每股凈資產1[4]:=F10TEXT(wza1+62,12);
每股凈資產1[5]:=F10TEXT(wza2+20,12);
每股凈資產1[6]:=F10TEXT(wza2+34,12);
每股凈資產1[7]:=F10TEXT(wza2+48,12);
每股凈資產1[8]:=F10TEXT(wza2+62,12);
r2:=F10FIND('財務指標-盈利能力:',r);
Wz11:=f10find('銷售毛利率',r2);
Wz12:=f10find('銷售毛利率',wz11+100);
Wzb1:=f10find('凈資產收益率',r2);
Wzb2:=f10find('凈資產收益率',wzb1+100);
銷售毛利率1[1]:=F10TEXT(wz11+20,12);
銷售毛利率1[2]:=F10TEXT(wz11+34,12);
銷售毛利率1[3]:=F10TEXT(wz11+48,12);
銷售毛利率1[4]:=F10TEXT(wz11+62,12);
銷售毛利率1[5]:=F10TEXT(wz12+20,12);
銷售毛利率1[6]:=F10TEXT(wz12+34,12);
銷售毛利率1[7]:=F10TEXT(wz12+48,12);
銷售毛利率1[8]:=F10TEXT(wz12+62,12);
凈資收益率1[1]:=F10TEXT(wzb1+20,12);
凈資收益率1[2]:=F10TEXT(wzb1+34,12);
凈資收益率1[3]:=F10TEXT(wzb1+48,12);
凈資收益率1[4]:=F10TEXT(wzb1+62,12);
凈資收益率1[5]:=F10TEXT(wzb2+20,12);
凈資收益率1[6]:=F10TEXT(wzb2+34,12);
凈資收益率1[7]:=F10TEXT(wzb2+48,12);
凈資收益率1[8]:=F10TEXT(wzb2+62,12);
R3:=F10FIND('財務指標-增長能力:',r);
Wz71:=f10find('主營業務收入增長率',r3);
Wz72:=f10find('主營業務收入增長率',wz71+100);
Wz81:=f10find('凈利潤增長率',r3); //文章來至程序化交易網 cxh99.com//
Wz82:=f10find('凈利潤增長率',wz81+100);
營收增長1[1]:=F10TEXT(wz71+20,12);
營收增長1[2]:=F10TEXT(wz71+34,12);
營收增長1[3]:=F10TEXT(wz71+48,12);
營收增長1[4]:=F10TEXT(wz71+62,12);
營收增長1[5]:=F10TEXT(wz72+20,12);
營收增長1[6]:=F10TEXT(wz72+34,12);
營收增長1[7]:=F10TEXT(wz72+48,12);
營收增長1[8]:=F10TEXT(wz72+62,12);
凈利增長1[1]:=F10TEXT(wz81+20,12);
凈利增長1[2]:=F10TEXT(wz81+34,12);
凈利增長1[3]:=F10TEXT(wz81+48,12);
凈利增長1[4]:=F10TEXT(wz81+62,12);
凈利增長1[5]:=F10TEXT(wz82+20,12);
凈利增長1[6]:=F10TEXT(wz82+34,12);
凈利增長1[7]:=F10TEXT(wz82+48,12);
凈利增長1[8]:=F10TEXT(wz82+62,12);
r4:=F10FIND('財務簡表-利潤表(單位:萬元):',r);
Wz21:=f10find('主營業務收入',r4);
Wz22:=f10find('主營業務收入',wz21+100);
Wz31:=f10find('主營業務利潤',r4);
Wz32:=f10find('主營業務利潤',wz31+100);
Wz41:=f10find('凈利潤',r4);
Wz42:=f10find('凈利潤',wz41+100);
主營收入1[1]:=F10TEXT(wz21+20,12);
主營收入1[2]:=F10TEXT(wz21+34,12);
主營收入1[3]:=F10TEXT(wz21+48,12);
主營收入1[4]:=F10TEXT(wz21+62,12);
主營收入1[5]:=F10TEXT(wz22+20,12);
主營收入1[6]:=F10TEXT(wz22+34,12);
主營收入1[7]:=F10TEXT(wz22+48,12);
主營收入1[8]:=F10TEXT(wz22+62,12);
主營利潤1[1]:=F10TEXT(wz31+20,12);
主營利潤1[2]:=F10TEXT(wz31+34,12);
主營利潤1[3]:=F10TEXT(wz31+48,12);
主營利潤1[4]:=F10TEXT(wz31+62,12);
主營利潤1[5]:=F10TEXT(wz32+20,12);
主營利潤1[6]:=F10TEXT(wz32+34,12);
主營利潤1[7]:=F10TEXT(wz32+48,12);
主營利潤1[8]:=F10TEXT(wz32+62,12);
凈利1[1]:=F10TEXT(wz41+20,12);
凈利1[2]:=F10TEXT(wz41+34,12);
凈利1[3]:=F10TEXT(wz41+48,12);
凈利1[4]:=F10TEXT(wz41+62,12);
凈利1[5]:=F10TEXT(wz42+20,12);
凈利1[6]:=F10TEXT(wz42+34,12);
凈利1[7]:=F10TEXT(wz42+48,12);
凈利1[8]:=F10TEXT(wz42+62,12);
R5:=F10FIND('財務簡表-現金流量表:',r);
Wz51:=f10find('財務費用',r5);
Wz52:=f10find('財務費用',wz51+100);
Wz61:=f10find('經營活動現金流量',r5);
Wz62:=f10find('經營活動現金流量',wz61+100);
財務費用1[1]:=F10TEXT(wz51+20,12);
財務費用1[2]:=F10TEXT(wz51+34,12);
財務費用1[3]:=F10TEXT(wz51+48,12);
財務費用1[4]:=F10TEXT(wz51+62,12);
財務費用1[5]:=F10TEXT(wz52+20,12);
財務費用1[6]:=F10TEXT(wz52+34,12);
財務費用1[7]:=F10TEXT(wz52+48,12);
財務費用1[8]:=F10TEXT(wz52+62,12);
現金流凈額1[1]:=F10TEXT(wz61+20,12);
現金流凈額1[2]:=F10TEXT(wz61+34,12);
現金流凈額1[3]:=F10TEXT(wz61+48,12);
現金流凈額1[4]:=F10TEXT(wz61+62,12);
現金流凈額1[5]:=F10TEXT(wz62+20,12);
現金流凈額1[6]:=F10TEXT(wz62+34,12);
現金流凈額1[7]:=F10TEXT(wz62+48,12);
現金流凈額1[8]:=F10TEXT(wz62+62,12);
DRAWTEXTEX(C,1,10,80,' '+日期1[1] +' '+日期1[2]+ ' '+日期1[3]+ ' '+日期1[4]+ ' '+日期1[5]+ ' '+日期1[6]+ ' '+日期1[7]+ ' '+日期1[8]),Color00FFFF;
DRAWTEXTEX(C,1,3,150,'銷售毛利率%: |'+銷售毛利率1[1]+' |'+銷售毛利率1[2]+ ' |'+銷售毛利率1[3]+ ' |'+銷售毛利率1[4]+ ' |'+銷售毛利率1[5]+ ' |'+銷售毛利率1[6]+ ' |'+銷售毛利率1[7]+ ' |'+銷售毛利率1[8]),Colorcyan;
DRAWTEXTEX(C,1,3,220,'主營業務收入(萬元)|'+主營收入1[1] +' |'+主營收入1[2]+ ' |'+主營收入1[3]+ ' |'+主營收入1[4]+ ' |'+主營收入1[5]+ ' |'+主營收入1[6]+ ' |'+主營收入1[7]+ ' |'+主營收入1[8]),Colorwhite;
DRAWTEXTEX(C,1,3,290,'主營業務利潤(萬元)|'+主營利潤1[1] +' |'+主營利潤1[2]+ ' |'+主營利潤1[3]+ ' |'+主營利潤1[4]+ ' |'+主營利潤1[5]+ ' |'+主營利潤1[6]+ ' |'+主營利潤1[7]+ ' |'+主營利潤1[8]),Colorcyan;
DRAWTEXTEX(C,1,3,360,'凈利潤(萬元) |'+凈利1[1] +' |'+凈利1[2]+ ' |'+凈利1[3]+ ' |'+凈利1[4]+ ' |'+凈利1[5]+ ' |'+凈利1[6]+ ' |'+凈利1[7]+ ' |'+凈利1[8]),Colorwhite;
DRAWTEXTEX(C,1,3,430,'財務費用(萬元) |'+財務費用1[1] +' |'+財務費用1[2]+ ' |'+財務費用1[3]+ ' |'+財務費用1[4]+ ' |'+財務費用1[5]+ ' |'+財務費用1[6]+ ' |'+財務費用1[7]+ ' |'+財務費用1[8]),Colorcyan;
DRAWTEXTEX(C,1,3,500,'主營收入增長率% |'+營收增長1[1] +' |'+營收增長1[2]+ ' |'+營收增長1[3]+ ' |'+營收增長1[4]+ ' |'+營收增長1[5]+ ' |'+營收增長1[6]+ ' |'+營收增長1[7]+ ' |'+營收增長1[8]),Colorwhite;
DRAWTEXTEX(C,1,3,570,'凈利潤增長率% |'+凈利增長1[1] +' |'+凈利增長1[2]+ ' |'+凈利增長1[3]+ ' |'+凈利增長1[4]+ ' |'+凈利增長1[5]+ ' |'+凈利增長1[6]+ ' |'+凈利增長1[7]+ ' |'+凈利增長1[8]),Colorcyan;
DRAWTEXTEX(C,1,3,640,'現金流量凈額(萬元)|'+現金流凈額1[1] +' |'+現金流凈額1[2]+ ' |'+現金流凈額1[3]+ ' |'+現金流凈額1[4]+ ' |'+現金流凈額1[5]+ ' |'+現金流凈額1[6]+ ' |'+現金流凈額1[7]+ ' |'+現金流凈額1[8]),Colorwhite;
DRAWTEXTEX(C,1,3,710,'每股收益(元) |'+每股收益1[1] +' |'+每股收益1[2]+ ' |'+每股收益1[3]+ ' |'+每股收益1[4]+ ' |'+每股收益1[5]+ ' |'+每股收益1[6]+ ' |'+每股收益1[7]+ ' |'+每股收益1[8]),Colorcyan;
DRAWTEXTEX(C,1,3,780,'每股凈資產(元) |'+每股凈資產1[1] +' |'+每股凈資產1[2]+ ' |'+每股凈資產1[3]+ ' |'+每股凈資產1[4]+ ' |'+每股凈資產1[5]+ ' |'+每股凈資產1[6]+ ' |'+每股凈資產1[7]+ ' |'+每股凈資產1[8]),Colorwhite;
DRAWTEXTEX(C,1,3,850,'凈資產收益率%: |'+凈資收益率1[1] +' |'+凈資收益率1[2]+ ' |'+凈資收益率1[3]+ ' |'+凈資收益率1[4]+ ' |'+凈資收益率1[5]+ ' |'+凈資收益率1[6]+ ' |'+凈資收益率1[7]+ ' |'+凈資收益率1[8]),Colorcyan;
DRAWTEXTEX(STRTONUM(銷售毛利率1[1])>STRTONUM(銷售毛利率1[2]) and STRTONUM(銷售毛利率1[1])>0,1,3,150,' |'+銷售毛利率1[1]+' |'),Colorred;
DRAWTEXTEX(STRTONUM(營收增長1[1])>0,1,3,500,' |'+營收增長1[1] +' |'),Colorred;
DRAWTEXTEX(STRTONUM(凈利增長1[1])>0,1,3,570,' |'+凈利增長1[1] +' |'),Colorred;
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯系技術人員 QQ: 262069696 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內容