首頁 股票學校 股票入門 選股 買入 看盤 跟莊 短線 炒股技巧 技術指標 k線圖 MACD 均線 成交量 股票書籍 股票視頻 網站導航

767股票學習網 > 股票學校 > 飛狐公式 > 正文

證券K線(副圖 源碼)

說明:疊加分析主圖,飛狐4.9版本用,可能看不了創業板。

證券K線主圖公式

{N-代碼參數;M-證券類型參數。
M=0時,可顯示深指、基金等,N=證券代碼。如,399001則N=399001;
M=1時,可顯示滬A,N=證券代碼的6之后的實數部份。如,600001則N=1,特別600000則N=0;
M=2時,可顯示深A,N=代碼的實數部份。如,000008則N=8;
M=3時,可顯示滬A指。N=代碼A后的實數部份。如,1A0001則N=1;
M=4時,可顯示滬B指。N=代碼B后的實數部份。如,1B0007則N=7;
M=5時,可顯示板塊指數,N=代碼AA后的實數部份。如,AA99則N=99;
M=6時,可顯示板塊指數,N=代碼BB后的實數部份。如,BB01則N=1;}
INPUT:n(3,0,999999){(0,0,999999)},m(3,0,6){(1,0,6)};{證券K線**  B指}
{INPUT:n(16,0,999999){(0,0,999999)},m(4,0,6){(1,0,6),mm(900,1,2000)};{證券K線**  50指}}
{INPUT:n(399300,0,999999){(0,0,999999)},m(0,0,6){(1,0,6),mm(900,1,2000)};{證券K線**  300指}}

i:=if(m=1 or m=0,6,if(m=2,5,if(m=3 or m=4,4,2)));
s:=if(m=1,600000,if(m=2,100000,if(m=3 or m=4,10000,if(m=5 or m=6,100,0))));
u:=STRRIGHT(NUMTOSTR(n+s,0),i);
t:=if(m=1 or m=0,u,if(m=2,'0'+u,if(m=3,'1A'+u,if(m=4,'1B'+u,if(m=5,'AA'+u,'BB'+u)))));
cc:STKINDI(t,'KXSJ.cc',0,6),LINETHICK0;
oo:STKINDI(t,'KXSJ.oo',0,6),LINETHICK0;
hh:STKINDI(t,'KXSJ.hh',0,6),LINETHICK0;
LL:STKINDI(t,'KXSJ.LL',0,6),LINETHICK0;
DRAWTEXT(BARPOS=datacount-90,hh,'引用的證券名稱和代碼:'+STKNAMEEX(t)+' '+t)ALIGN4,Color57FFD8;
STICKLINE(cc>oo or (cc=oo and cc>=ref(cc,1)),hh,ll,0.6,0),COLORMAGENTA;
STICKLINE(cc>oo or (cc=oo and cc>=ref(cc,1)),cc,oo,6,1),COLORMAGENTA;
STICKLINE(cc<oo or (cc=oo and cc<ref(cc,1)),hh,ll,0.6,0),COLORGREEN;
STICKLINE(cc<oo or (cc=oo and cc<ref(cc,1)),cc,oo,6,0),COLORGREEN;
m5:ma(cc,5),COLORWHITE;
m1:ma(cc,10),COLORYELLOW;
vv:STKINDI(t,'KXSJ.DV',0,6),LINETHICK0;
r0:=mm/1000;
p:=SYSPARAM(3)-SYSPARAM(2);
q:=SYSPARAM(3);
zL:=LLv(LL,p);
XL:=ZL[q];
r:=(LL-r0*XL)/vv;
r1:=llv(r,p);
r2:=r1[q];
r3:=llv(LL-r2*vv,p);
r4:=r3[q];
r5:=(r2*vv+r4)*0.998;
STICKLINE(cc>=ref(cc,1),r5,r0*XL,5,1)COLORRED;
STICKLINE(cc<ref(cc,1),r5,r0*XL,5,0)COLORCYAN;
PARTLINE(1,r0*XL) colorbrown;
v5:ma(vv,5),LINETHICK0,COLORGREEN;
v10:ma(vv,10),LINETHICK0,COLORMAGENTA;
PARTLINE(1,ma(r5,5)),COLORGREEN;
PARTLINE(1,ma(r5,10)),COLORMAGENTA;
引用公式源碼
{KXSJ}

cc:c,LINETHICK0;
oo:o,LINETHICK0;
hh:h,LINETHICK0;
LL:L,LINETHICK0;
dv:v,LINETHICK0;

 

下載地址: 證券K線

上一篇文章:

下一篇文章:

 




767股票學習網 | 手機版 | 微信 | 微博 | 聯系站長





腾讯麻将怎么玩
安全的快三app 广东11选5追号输惨 辽宁快乐12走势图下载 .老时时 香港最快开奘现场直报六传说 p5预测汇总 时彩计划软件 北京精确 仼我发高手论坛 pk10八码技巧心得