电竞比分网-中国电竞赛事及体育赛事平台

分享

在分時(shí)圖上加入日K線,有圖有說(shuō)明

 紅牛2008 2017-03-14

以下是在分時(shí)圖上加入日K線,有圖有說(shuō)明(無(wú)源碼的請(qǐng)下載附件導(dǎo)入)

這年代窮人日子不好過(guò)呀,鄉(xiāng)親們,眼看著自己的共享幣日漸消瘦,也不得不想辦法掙幾個(gè)。  說(shuō)正事:在分時(shí)圖里加進(jìn)日K線,在 論壇早有人發(fā)過(guò)。說(shuō)實(shí)話在我看來(lái)都有瑕疵。我現(xiàn)在是站在各位前輩的肩膀上,盡自己最大努力修改了關(guān)鍵部位的不足。自己認(rèn)為尚可能用。我自己用的分時(shí)加了自己的MACD在里面,放在這里的沒(méi)加,特別說(shuō)明。日K線在上午,我讓他在分時(shí)圖的右半部分顯示,下午自動(dòng)跳轉(zhuǎn)到左辦部分顯示。這樣不影響我們看盤(pán)。
 提供的是導(dǎo)出來(lái)的指標(biāo),不加密、不限時(shí)。主要是考慮有些童鞋們不會(huì)自己裝嵌套指標(biāo),因?yàn)檫@個(gè)指標(biāo)要用線建立應(yīng)用指標(biāo),有些人不會(huì)。所以干脆弄現(xiàn)成的給你。直接導(dǎo)入用就是。勿喜繞道,最見(jiàn)不得啥都給大家不干還屁話一大堆。
 此指標(biāo)還有個(gè)瑕疵就是極個(gè)別票日K線乖離太大的話,分時(shí)日K線會(huì)顯示失真。暫時(shí)還沒(méi)辦法完美解決。主要是解決它有會(huì)引起壓縮分時(shí)圖的問(wèn)題。這只是極個(gè)別票。

當(dāng)然日K線數(shù)量可以想加多少加多少。這里只加了9天的。自己需要可以動(dòng)手加。
 

在分時(shí)圖上加入日k線,有圖有說(shuō)明

在分時(shí)圖上加入日k線,有圖有說(shuō)明

{年月日}
DA:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),''年'');
AA2:=STRCAT(CON2STR(MONTH,0),''月'');
AA3:=STRCAT(CON2STR(DAY,0),''日'');
AA4:=STRCAT(''【'',IF(WEEKDAY=1,''一'',IF(WEEKDAY=2,''二'',IF(WEEKDAY=3,''三'',IF(WEEKDAY=4,''四'',IF
(WEEKDAY=5,''五'',IF(WEEKDAY=6,''六'',''日'')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),''】'');
DRAWTEXT_FIX(DA,0.85,0.01,0,AA),COLORWHITE;
{分時(shí)K線}
KP:=DYNAINFO(4);
ZX:=DYNAINFO(7);
ZS:=DYNAINFO(3);
ZG:=DYNAINFO(5);
ZD:=DYNAINFO(6);
OP:=400-(KP/ZS-1)*4000;
CL:=400-(ZX/ZS-1)*4000;
HI:=400-(ZG/ZS-1)*4000;
LO:=400-(ZD/ZS-1)*4000;
N1:=IF(FROMOPEN<=120,950,360);
Q:=IF(ZX>KP,RGB(255,0,0),IF(ZX<KP,RGB(84,255,255),IF(ZX=KP,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1+4,HI,N1+8,LO,Q );
DRAWRECTREL(N1-10,OP,N1+22,CL,Q );

ZO:="FSKY.ZO#DAY";
ZC:="FSKY.ZC#DAY";
ZH:="FSKY.ZH#DAY";
ZL:="FSKY.ZL#DAY";
ZKP:=400-(ZO/ZS-1)*4000;
ZCP:=400-(ZC/ZS-1)*4000;
ZZG:=400-(ZH/ZS-1)*4000;
ZZD:=400-(ZL/ZS-1)*4000;
Q1:=IF(ZC>ZO,RGB(255,0,0),IF(ZC<ZO,RGB(84,255,255),IF(ZC=ZO,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-36,ZZG,N1-32,ZZD,Q1);
DRAWRECTREL(N1-49,ZKP,N1-17,ZCP,Q1);
JO:="FSKY.JO#DAY";
JC:="FSKY.JC#DAY";
JH:="FSKY.JH#DAY";
JL:="FSKY.JL#DAY";
ZZKP:=400-(JO/ZS-1)*4000;
ZZCP:=400-(JC/ZS-1)*4000;
ZZZG:=400-(JH/ZS-1)*4000;
ZZZD:=400-(JL/ZS-1)*4000;
Q2:=IF(JC>JO,RGB(255,0,0),IF(JC<JO,RGB(84,255,255),IF(JC=JO,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-76,ZZZG,N1-72,ZZZD,Q2);
DRAWRECTREL(N1-89,ZZKP,N1-57,ZZCP,Q2);

JO3:="FSKY.JO3#DAY";
JC3:="FSKY.JC3#DAY";
JH3:="FSKY.JH3#DAY";
JL3:="FSKY.JL3#DAY";
ZZKP3:=400-(JO3/ZS-1)*4000;
ZZCP3:=400-(JC3/ZS-1)*4000;
ZZZG3:=400-(JH3/ZS-1)*4000;
ZZZD3:=400-(JL3/ZS-1)*4000;
Q3:=IF(JC3>JO3,RGB(255,0,0),IF(JC3<JO3,RGB(84,255,255),IF(JC3=JO3,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-116,ZZZG3,N1-112,ZZZD3,Q3);
DRAWRECTREL(N1-129,ZZKP3,N1-97,ZZCP3,Q3);

JO4:="FSKY.JO4#DAY";
JC4:="FSKY.JC4#DAY";
JH4:="FSKY.JH4#DAY";
JL4:="FSKY.JL4#DAY";
ZZKP4:=400-(JO4/ZS-1)*4000;
ZZCP4:=400-(JC4/ZS-1)*4000;
ZZZG4:=400-(JH4/ZS-1)*4000;
ZZZD4:=400-(JL4/ZS-1)*4000;
Q4:=IF(JC4>JO4,RGB(255,0,0),IF(JC4<JO4,RGB(84,255,255),IF(JC4=JO4,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-156,ZZZG4,N1-152,ZZZD4,Q4);
DRAWRECTREL(N1-169,ZZKP4,N1-137,ZZCP4,Q4);

JO5:="FSKY.JO5#DAY";
JC5:="FSKY.JC5#DAY";
JH5:="FSKY.JH5#DAY";
JL5:="FSKY.JL5#DAY";
ZZKP5:=400-(JO5/ZS-1)*4000;
ZZCP5:=400-(JC5/ZS-1)*4000;
ZZZG5:=400-(JH5/ZS-1)*4000;
ZZZD5:=400-(JL5/ZS-1)*4000;
Q5:=IF(JC5>JO5,RGB(255,0,0),IF(JC5<JO5,RGB(84,255,255),IF(JC5=JO5,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-196,ZZZG5,N1-192,ZZZD5,Q5);
DRAWRECTREL(N1-209,ZZKP5,N1-177,ZZCP5,Q5);

JO6:="FSKY.JO6#DAY";
JC6:="FSKY.JC6#DAY";
JH6:="FSKY.JH6#DAY";
JL6:="FSKY.JL6#DAY";
ZZKP6:=400-(JO6/ZS-1)*4000;
ZZCP6:=400-(JC6/ZS-1)*4000;
ZZZG6:=400-(JH6/ZS-1)*4000;
ZZZD6:=400-(JL6/ZS-1)*4000;
Q6:=IF(JC6>JO6,RGB(255,0,0),IF(JC6<JO6,RGB(84,255,255),IF(JC6=JO6,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-236,ZZZG6,N1-232,ZZZD6,Q6);
DRAWRECTREL(N1-249,ZZKP6,N1-217,ZZCP6,Q6);

JO7:="FSKY.JO7#DAY";
JC7:="FSKY.JC7#DAY";
JH7:="FSKY.JH7#DAY";
JL7:="FSKY.JL7#DAY";
ZZKP7:=400-(JO7/ZS-1)*4000;

ZZCP7:=400-(JC7/ZS-1)*4000;
ZZZG7:=400-(JH7/ZS-1)*4000;
ZZZD7:=400-(JL7/ZS-1)*4000;
Q7:=IF(JC7>JO7,RGB(255,0,0),IF(JC7<JO7,RGB(0,255,255),IF(JC7=JO7,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-276,ZZZG7,N1-272,ZZZD7,Q7);
DRAWRECTREL(N1-289,ZZKP7,N1-257,ZZCP7,Q7);
JO8:="FSKY.JO8#DAY";
JC8:="FSKY.JC8#DAY";
JH8:="FSKY.JH8#DAY";
JL8:="FSKY.JL8#DAY";
ZZKP8:=400-(JO8/ZS-1)*4000;
ZZCP8:=400-(JC8/ZS-1)*4000;
ZZZG8:=400-(JH8/ZS-1)*4000;
ZZZD8:=400-(JL8/ZS-1)*4000;
Q8:=IF(JC8>JO8,RGB(255,0,0),IF(JC8<JO8,RGB(0,255,255),IF(JC8=JO8,RGB(255,255,255),DRAWNULL)));
DRAWRECTREL(N1-316,ZZZG8,N1-312,ZZZD8,Q8);
DRAWRECTREL(N1-329,ZZKP8,N1-297,ZZCP8,Q8);
{分時(shí)均價(jià)線和分時(shí)線}
最新:CLOSE,COLORWHITE;
AQA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
DRAWTEXT( ISLASTBAR  AND 最新>REF(最新,1),最新,STRCAT('' 漲▲'',CON2STR(最新,2))),COLORMAGENTA;
DRAWTEXT( ISLASTBAR  AND 最新<REF(最新,1),最新,STRCAT('' 跌▼'',CON2STR(最新,2))),COLOR00FF00;
均價(jià):SUM(V*C,0)/SUM(V,0),COLORGREEN,LINETHICK1;
IF(均價(jià)<=REF(均價(jià),1),均價(jià),DRAWNULL),COLORGREEN,LINETHICK3;
IF(均價(jià)>=REF(均價(jià),1),均價(jià),DRAWNULL),COLORYELLOW,LINETHICK3;
DRAWTEXT(CURRBARSCOUNT=8,均價(jià),''均''),COLORYELLOW,LINETHICK3;
DRAWNUMBER(CURRBARSCOUNT=1,均價(jià),均價(jià)),COLORYELLOW,LINETHICK3;
{板塊概念}
DRAWTEXT_FIX(1,0.000,1-0.05,0,DYBLOCK),COLORWHITE;
DRAWTEXT_FIX(1,0.0550,1-0.05,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.1050,1-0.05,0,GNBLOCK),COLORYELLOW;

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買(mǎi)等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類(lèi)似文章 更多