修改成文華用
作者：文華財經 來源：cxh99.com 發布時間：2018年12月18日
-
咨詢內容：
?籌碼集中度:=COST(10)/(COST(80)-COST(10)),NODRAW;
{高低點均線 N=1,500,10}HH:=MA(REF(H,1),N);LL:=MA(REF(L,1),N);?
STICKLINE(C>HH AND C>O,O,C,-1,1),COLOR0000DD;STICKLINE(C>HH AND C>O,H,C,0,0),COLOR0000DD;STICKLINE(C>HH AND C>O,O,L,0,0),COLOR0000DD;STICKLINE(C>HH AND C<=O,O,C,-1,0),COLOR0000DD;STICKLINE(C>HH AND C<=O,H,O,0,0),COLOR0000DD;STICKLINE(C>HH AND C<=O,C,L,0,0),COLOR0000DD;
STICKLINE(C<LL AND C>O,O,C,-1,1),COLORFFBB00;?STICKLINE(C<LL AND C>O,H,C,0,0),COLORFFBB00;STICKLINE(C<LL AND C>O,O,L,0,0),COLORFFBB00;STICKLINE(C<LL AND C<=O,O,C,-1,0),COLORFFBB00;STICKLINE(C<LL AND C<=O,H,O,0,0),COLORFFBB00;STICKLINE(C<LL AND C<=O,C,L,0,0),COLORFFBB00;
STICKLINE(C>LL AND C<HH AND C>O,C,O,-1,1),COLORAAAAAA;STICKLINE(C>LL AND C<HH AND C>O,H,C,0,0),COLORAAAAAA;STICKLINE(C>LL AND C<HH AND C>O,O,L,0,0),COLORAAAAAA;STICKLINE(C>LL AND C<HH AND C<=O,C,O,-1,0),COLORAAAAAA;STICKLINE(C>LL AND C<HH AND C<=O,H,O,0,0),COLORAAAAAA;STICKLINE(C>LL AND C<HH AND C<=O,C,L,0,0),COLORAAAAAA;
UP:HH;DN:LL;BIAS:IF(C>HH,(C-HH)/HH*100,IF(C<LL,(C-LL)/LL*100,0)),NODRAW;
{突破上軌，在該K線的最高價畫紅點、向右畫橫線}TP:=CROSS(C,HH) AND EVERY(REF(C,1)<REF(HH,1),3);{突破上軌}TC:=BARSLAST(TP);STICKLINE(TC>0,REF(H,TC),REF(H,TC),8,-1),COLORLIRED;{突破上軌,在該K線的最高價向右畫橫線};●:IF(TP,H,DRAWNULL),POINTDOT,COLORRED,LINETHICK4;??{突破上軌,在該K線的最高價畫紅點};
{突破上軌、突破橫線 選股}TPUP:=TP AND CROSS(C,REF(H,TC+1));{突破上軌AND前高}{TPUP:=TP AND CROSS(C>REF(H,TC+1),0.5);} {兩個TPUP式等同}
TPHX:=CROSS(C,REF(H*1.004,TC)) AND C>HH;?{突破橫線};{TPHX:=CROSS(C>REF(H*1.004,TC),0.5) AND C>HH;} {兩個TPHX式等同}
XG:=FILTER(({TPUP OR }TPHX),2);DRAWICON(XG,L*0.998,1);
{倒數第2、第3根 K線高低點劃線}{HH2:=HHV(H,2);LL2:=LLV(L,2);T1:=BARSLAST(CURRBARSCOUNT=2);T2:=BARSLAST(CURRBARSCOUNT=3);DRAWLINE(REF(H,T1)=HH2,H,ISLASTBAR,REF(H,T1),0),COLORGREEN;DRAWLINE(REF(L,T1)=LL2,L,ISLASTBAR,REF(L,T1),0),COLORYELLOW;DRAWLINE(REF(H,T2)=REFX(HH2,1),H,ISLASTBAR,REF(H,T2),0),COLORGREEN;DRAWLINE(REF(L,T2)=REFX(LL2,1),L,ISLASTBAR,REF(L,T2),0),COLORYELLOW;};
?
?
?來源:程序化99
-
文華技術人員：
不同軟件機制不同，加載效果可能略有差異，參考：
籌碼集中度:=COST(10)/(COST(80)-COST(10)),NODRAW;
//{高低點均線 N=1,500,10}
N:=1;//N需自行定義
HH:=MA(REF(H,1),N);
LL:=MA(REF(L,1),N);?
STICKLINE1(C>HH AND C>O,O,C,-1,1),COLOR0000DD;
STICKLINE1(C>HH AND C>O,H,C,0,0),COLOR0000DD;
STICKLINE1(C>HH AND C>O,O,L,0,0),COLOR0000DD;
STICKLINE1(C>HH AND C<=O,O,C,-1,0),COLOR0000DD;
STICKLINE1(C>HH AND C<=O,H,O,0,0),COLOR0000DD;
STICKLINE1(C>HH AND C<=O,C,L,0,0),COLOR0000DD;
STICKLINE1(C<LL AND C>O,O,C,-1,1),COLORFFBB00;?
STICKLINE1(C<LL AND C>O,H,C,0,0),COLORFFBB00;
STICKLINE1(C<LL AND C>O,O,L,0,0),COLORFFBB00;
STICKLINE1(C<LL AND C<=O,O,C,-1,0),COLORFFBB00;
STICKLINE1(C<LL AND C<=O,H,O,0,0),COLORFFBB00;
STICKLINE1(C<LL AND C<=O,C,L,0,0),COLORFFBB00;
STICKLINE1(C>LL AND C<HH AND C>O,C,O,-1,1),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C>O,H,C,0,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C>O,O,L,0,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C<=O,C,O,-1,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C<=O,H,O,0,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C<=O,C,L,0,0),COLORAAAAAA;
UP:HH;
DN:LL;
BIAS:IF(C>HH,(C-HH)/HH*100,IF(C<LL,(C-LL)/LL*100,0)),NODRAW;
//{突破上軌，在該K線的最高價畫紅點、向右畫橫線}
TP:=CROSS(C,HH) AND EVERY(REF(C,1)<REF(HH,1),3);
//{突破上軌}
TC:=BARSLAST(TP);
STICKLINE1(TC>0,REF(H,TC),REF(H,TC),8,-1),COLORRED;
//{突破上軌,在該K線的最高價向右畫橫線};
●:IF(TP,H,NULL),POINTDOT,COLORRED,LINETHICK4;??
/*{突破上軌,在該K線的最高價畫紅點};
{突破上軌、突破橫線 選股}*/
TPUP:=TP AND CROSS(C,REF(H,TC+1));
/*{突破上軌AND前高}
{TPUP:=TP AND CROSS(C>REF(H,TC+1),0.5);
} {兩個TPUP式等同}*/
TPHX:=CROSS(C,REF(H*1.004,TC)) AND C>HH;?
//{突破橫線};
//{TPHX:=CROSS(C>REF(H*1.004,TC),0.5) AND C>HH;
//} {兩個TPHX式等同}
XG:=FILTER(({TPUP OR }TPHX),2);
DRAWICON(XG,L*0.998,1);
/*{倒數第2、第3根 K線高低點劃線}
{HH2:=HHV(H,2);
LL2:=LLV(L,2);
T1:=BARSLAST(CURRBARSCOUNT=2);
T2:=BARSLAST(CURRBARSCOUNT=3);
DRAWLINE(REF(H,T1)=HH2,H,ISLASTBAR,REF(H,T1),0),COLORGREEN;
DRAWLINE(REF(L,T1)=LL2,L,ISLASTBAR,REF(L,T1),0),COLORYELLOW;
DRAWLINE(REF(H,T2)=REFX(HH2,1),H,ISLASTBAR,REF(H,T2),0),COLORGREEN;
DRAWLINE(REF(L,T2)=REFX(LL2,1),L,ISLASTBAR,REF(L,T2),0),COLORYELLOW;
};
*/
?
?來源: www.weiqiv.net.cn
-
文華客服：
第45行大括號不配對
?
-
網友回復：
這樣看一下：
籌碼集中度:=COST(10)/(COST(80)-COST(10)),NODRAW;
//{高低點均線 N=1,500,10}
N:=1;//N需自行定義
HH:=MA(REF(H,1),N);
LL:=MA(REF(L,1),N);?
STICKLINE1(C>HH AND C>O,O,C,-1,1),COLOR0000DD;
STICKLINE1(C>HH AND C>O,H,C,0,0),COLOR0000DD;
STICKLINE1(C>HH AND C>O,O,L,0,0),COLOR0000DD;
STICKLINE1(C>HH AND C<=O,O,C,-1,0),COLOR0000DD;
STICKLINE1(C>HH AND C<=O,H,O,0,0),COLOR0000DD;
STICKLINE1(C>HH AND C<=O,C,L,0,0),COLOR0000DD;
STICKLINE1(C<LL AND C>O,O,C,-1,1),COLORFFBB00;?
STICKLINE1(C<LL AND C>O,H,C,0,0),COLORFFBB00;
STICKLINE1(C<LL AND C>O,O,L,0,0),COLORFFBB00;
STICKLINE1(C<LL AND C<=O,O,C,-1,0),COLORFFBB00;
STICKLINE1(C<LL AND C<=O,H,O,0,0),COLORFFBB00;
STICKLINE1(C<LL AND C<=O,C,L,0,0),COLORFFBB00;
STICKLINE1(C>LL AND C<HH AND C>O,C,O,-1,1),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C>O,H,C,0,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C>O,O,L,0,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C<=O,C,O,-1,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C<=O,H,O,0,0),COLORAAAAAA;
STICKLINE1(C>LL AND C<HH AND C<=O,C,L,0,0),COLORAAAAAA;
UP:HH;
DN:LL;
BIAS:IF(C>HH,(C-HH)/HH*100,IF(C<LL,(C-LL)/LL*100,0)),NODRAW;
//{突破上軌，在該K線的最高價畫紅點、向右畫橫線}
TP:=CROSS(C,HH) AND EVERY(REF(C,1)<REF(HH,1),3);
//{突破上軌}
TC:=BARSLAST(TP);
STICKLINE1(TC>0,REF(H,TC),REF(H,TC),8,-1),COLORRED;
//{突破上軌,在該K線的最高價向右畫橫線};
●:IF(TP,H,NULL),POINTDOT,COLORRED,LINETHICK4;??
/*{突破上軌,在該K線的最高價畫紅點};
{突破上軌、突破橫線 選股}*/
TPUP:=TP AND CROSS(C,REF(H,TC+1));
/*{突破上軌AND前高}
{TPUP:=TP AND CROSS(C>REF(H,TC+1),0.5);
} {兩個TPUP式等同}*/
TPHX:=CROSS(C,REF(H*1.004,TC)) AND C>HH;?
//{突破橫線};
//{TPHX:=CROSS(C>REF(H*1.004,TC),0.5) AND C>HH;
//} {兩個TPHX式等同}
XG:=FILTER(TPHX,2);
DRAWICON(XG,L*0.998,1);
/*{倒數第2、第3根 K線高低點劃線}
{HH2:=HHV(H,2);
LL2:=LLV(L,2);
T1:=BARSLAST(CURRBARSCOUNT=2);
T2:=BARSLAST(CURRBARSCOUNT=3);
DRAWLINE(REF(H,T1)=HH2,H,ISLASTBAR,REF(H,T1),0),COLORGREEN;
DRAWLINE(REF(L,T1)=LL2,L,ISLASTBAR,REF(L,T1),0),COLORYELLOW;
DRAWLINE(REF(H,T2)=REFX(HH2,1),H,ISLASTBAR,REF(H,T2),0),COLORGREEN;
DRAWLINE(REF(L,T2)=REFX(LL2,1),L,ISLASTBAR,REF(L,T2),0),COLORYELLOW;
};
*/
?
-
網友回復：
?
文件名：tim截圖20181210141619.png
打印本文
關閉窗口