相關標簽:飛狐主圖最新指標源碼 、 飛狐期貨主圖指標源碼 、 飛狐主圖指標源碼 、 飛狐主圖技術指標源碼 、 飛狐主圖分型指標源碼 、 飛狐股票主圖指標源碼 、 kdj指標公式源碼 、 雪山飛狐 、 雪山飛狐老版 、 雪山飛狐孟飛版高清 、

 

{基本面\高送轉選股要求}
//1、具有長期投資價值、且嚴重超跌。
//2、企業的現金流量良好、動態市盈率小于靜態市盈率。
SJV:=C/FINANCE(34)<5 and FINANCE(33)>0.2;
FZL:=FINANCE(11)/FINANCE(15)>1 and C/FINANCE(33)<40;
基本面選股:=sjv and fzl;
aT1:=F10FIND('主要指標:',1);lTt:=FINANCE(7)/10000;gTb:=FINANCE(1)/10000;
cT1:=F10FIND('每股凈資產(元)',aT1);
eT1:=F10FIND('每股現金凈流量(元)',aT1);
fT1:=F10FIND('每股資本公積金(元)',aT1);
dT1:=F10FIND('每股未分配利潤(元)',aT1);
xTj:=STRTONUM(F10TEXT(eT1+20,10));
gTj:=STRTONUM(F10TEXT(fT1+20,10));
jTz:=STRTONUM(F10TEXT(cT1+20,10));
lTr:=STRTONUM(F10TEXT(dT1+20,10));
tTj:=jTz>=5 and gTj>=1 and lTr>=0.5 and xTj>=0.5 and lTt<3 and gTb<10;
高送轉概念選股:=tTj;
DRAWTEXTEX(1,1,5,820,'當前光標下共 '+NUMTOSTR(SYSPARAM(3)-SYSPARAM(2)+1,0)+' 棵K線'),COLOR888888;
DRAWTEXTEX(c,1,1,10,'板塊:'+BLKNAME),COLOR888888;
DRAWTEXTEX(c,1,1,60,'總股本:'+NUMTOSTR(FINANCE(1)/10000 ,2 )+'億'+' 流通A股:'+ NUMTOSTR(FINANCE(7)/10000,2)+'億'+
' 每股收益:'+ NUMTOSTR(FINANCE(33),2)+' 市盈率:'+NUMTOSTR(DYNAINFO(39),2)),COLOR888888;
DRAWTEXTEX(c,1,1,110,'上漲家數:'+NUMTOSTR(INDEXADV,0)+' 下跌家數:'+NUMTOSTR(INDEXDEC,0)),COLOR888888;
DRAWTEXTEX(c,1,1,160,'五日換手:'+NUMTOSTR(SUM(((VOL/CAPITAL)*100),5),2)+' 五日漲跌:'+NUMTOSTR((c-ref(c,5))/ref(c,5)*100,2)+'%'),COLOR888888;
DRAWTEXTEX(基本面選股=1,1,5,820,'當前光標下共 '+NUMTOSTR(SYSPARAM(3)-SYSPARAM(2)+1,0)+' 棵K線'),COLOR008888;
DRAWTEXTEX(基本面選股=1,1,1,10,'板塊:'+BLKNAME),COLOR008888;
DRAWTEXTEX(基本面選股=1,1,1,60,'總股本:'+NUMTOSTR(FINANCE(1)/10000 ,2 )+'億'+' 流通A股:'+ NUMTOSTR(FINANCE(7)/10000,2)+'億'+
' 每股收益:'+ NUMTOSTR(FINANCE(33),2)+' 市盈率:'+NUMTOSTR(DYNAINFO(39),2)),COLOR008888;
DRAWTEXTEX(基本面選股=1,1,1,110,'上漲家數:'+NUMTOSTR(INDEXADV,0)+' 下跌家數:'+NUMTOSTR(INDEXDEC,0)),COLOR008888;
DRAWTEXTEX(基本面選股=1,1,1,160,'五日換手:'+NUMTOSTR(SUM(((VOL/CAPITAL)*100),5),2)+' 五日漲跌:'+NUMTOSTR((c-ref(c,5))/ref(c,5)*100,2)+'%'),COLOR008888;
{時間}
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
wd:=WEEKDAY;
p:=SYSPARAM(1);
str1:=''+'今日： '+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1];
DRAWTEXTEX(CLOSE,1,1,210,str1),Color888888;DRAWTEXTEX(高送轉概念選股=1,100,1,210,'該股具有高送轉概念'),Color0000aa;
DRAWTEXTEX(基本面選股=1,1,1,210,str1),Color008888;
N:=9;M1:=3;M2:=3;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,0),colorFFFF00;
STICKLINE((OPEN >= CLOSE),HIGH,LOW,0,0),colorFFFF00;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,7,1),color4040FF;
STICKLINE((CLOSE >= OPEN),CLOSE,HIGH,0,0),color4040FF;
STICKLINE((CLOSE >= OPEN),LOW,OPEN,0,0),color4040FF;
HH:=HHV(H,N);
LL:=LLV(L,N);
F:=(HH-LL)/100;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=((3 * K) - (2 * D));
【KDJ日交叉價】:(((((D * 3) - (K * 2)) * (HHV(HIGH,(N - 1)) - LLV(LOW,(N - 1)))) / 100) + LLV(LOW,(N - 1))),LINETHICK0,colorFF00FF;
●K:K*F+LL,color00FFFF;
●D:=D*F+LL;
●j:=3*●k-2*●d;
●21:=21*F+LL;
上軌:sma(sma(hhv(HIGH,9),3,1),3,1),COLOR00FF00,LINEDOT;
下軌: sma(sma(llv(LOW,9),3,1),3,1),COLOR00FF00,LINEDOT;
中軌:=SMA(c,3,1);
趨勢: SMA(中軌,3,1),COLORFF00FF;
DRAWICON(CROSS(●J,●21),下軌*0.97,12);
DRAWICON(CROSS(●K,下軌*1.01),下軌*0.96,10);{程序化交易 www.kzuj.com.cn }