飞狐量化趋势选股指标公式源码

飞狐量化趋势选股指标公式源码

源码正文：

正版【阳光股道】【大交易师】可以直接导入使用。
盗版【飞狐】需要删除最上面的两句源码，改用大括号内的那两句源码。
思路:分别统计股价在中期均线上下的天数，然后再加以运算以达到研判中期趋势的功能。

沪昨额:REF("SH000001$AMOUNT",1)/100000000,Color00FF00,LINETHICK,PRECISION2{XG51};
沪今额:"SH000001$AMOUNT"/100000000,Color91FFEF,LINETHICK,PRECISION2{XG51};

深昨额:REF("SZ399001$AMOUNT",1)/100000000,ColorDDDDDD,LINETHICK,PRECISION2{XG51};
深今额:"SZ399001$AMOUNT"/100000000,Color9CFF7A,LINETHICK,PRECISION2{XG51};
N:=if(DATATYPE=7,20,if(DATATYPE=8,10,30)){XG51};
X:=if(DATATYPE=7,ema(c,11),if(DATATYPE=8,ema(c,4),ma(c,22))){XG51};
variable:Z[7]='星期六';Z[1]:='星期日';Z[2]:='星期一';Z[3]:='星期二'{XG51};
Z[4]:='星期三';Z[5]:='星期四';Z[6]:='星期五'{XG51};
nf:=YEAR;yf:=MONTH;rq:=DAY;xq:=WEEkdAY;p:=SYSPARAM(1){XG51};
股票总数:stKCOUNT('A股板块'),LINETHICK{XG51};
AA:=count(c>x,n);BB:=n-aa{XG51};
强弱:(AA-BB)/n*100,LINETHICK,Color00ddff{XG51};
100,LINEDOT,Color939190;90,LINEDOT,Color939190{XG51};
70,LINEDOT,Color939190;60,LINEDOT,Color939190{XG51};
40,LINEDOT,Color939190;30,LINEDOT,Color939190{XG51};
10,LINEDOT,Color939190;0,LINEDOT,Color939190{XG51};
x:=SYSPARAM(2)=BARPOS;k:=(SYSPARAM(3)-SYSPARAM(2))/110{XG51};
x1:=SYSPARAM(2)+ROUND(26*k)=BARPOS{XG51};
x2:=SYSPARAM(2)+ROUND(55*k)=BARPOS{XG51};
x3:=SYSPARAM(2)+ROUND(86*k)=BARPOS{XG51};
x4:=SYSPARAM(2)+ROUND(110*k)=BARPOS{XG51};
VERTLINE(x or x1 or x2 or x3 or x4),Color939190{XG51};
FILLRGN(强弱>0,0,abs(强弱)),Color650056{XG51};
FILLRGN(强弱<ref(强弱,1) and 强弱>0,0,abs(强弱)),Color005633{XG51};
FILLRGN(强弱<0,0,abs(强弱)),Color006533{XG51};
FILLRGN(强弱>ref(强弱,1) and 强弱<0,0,abs(强弱)),Color650056{XG51};
80,LINEDOT,Color00FF00;50,LINEDOT,Color00FFFF{XG51};
20,LINEDOT,Color0000FF;DRAWTEXTEX(c,1,0,0,'100'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,0,180,' 80'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,960,180,' 转折区'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,0,380,' 60'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,960,480,' 趋势线'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,0,580,' 40'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,0,780,' 20'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,960,780,' 弱势区'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,0,980,'  0'),ColorFFFFFF{XG51};
DRAWTEXTEX(c,1,50,10,STKLABEL+' '+STKNAME+''),Color00feef{XG51};
显示:='今天是: '+NUMTOSTR(nf[p],0)+'年'+NUMTOSTR(yf[p],0)+'月'+NUMTOSTR(rq[p],0)+'日 '+Z[xq[p]+1]{XG51};
DRAWTEXTEX(c,1,200,10,显示),Color00feef{X-G=5=1-C-N-{};