老師好，麻煩把通達信的均線指標改下能在文華財經里使用，謝謝！
作者：文華財經 來源：cxh99.com 發布時間：2019年09月10日
-
咨詢內容：
?
假陽真陰:=C>O AND C<REF(C,1);STICKLINE(假陽真陰,O,C,1,0),COLORGREEN;
均價:=AMOUNT/VOL/100;TJ01:=C<O AND 均價>REF(C,1);{假陰真陽};?TJ02:=C<O AND C>REF(C,1);?STICKLINE(TJ01 OR TJ02,O,C,1,0),COLORRED;{假陰柱};
人線:=MA(CLOSE,13),COLOR4080FF,LINETHICK2; ?
人和:IF(人線>REF(人線,1),人線,DRAWNULL), ?COLORRED,LINETHICK2;人熊:IF(人線<REF(人線,1),人線,DRAWNULL),COLORGREEN,LINETHICK2;
地線:MA(CLOSE,55),COLOR5080FF,LINETHICK3;地利1:IF(地線>REF(地線,1),地線,DRAWNULL), COLORYELLOW,LINETHICK3;地熊1:IF(地線<REF(地線,1),地線,DRAWNULL),COLORGRAY,LINETHICK3;
天線:MA(CLOSE,3),COLOR5080FF,LINETHICK1;天時2:IF(天線>REF(天線,1),天線,DRAWNULL),COLORMAGENTA,LINETHICK1;天熊2:IF(天線<REF(天線,1),天線,DRAWNULL),COLORBLUE,LINETHICK1;{CYAN}
長牛線:MA(CLOSE,188),COLOR5080FF,LINETHICK1;牛線3:IF(長牛線>REF(長牛線,1),長牛線,DRAWNULL), COLORFF6EC7,LINETHICK4;熊線3:IF(長牛線<REF(長牛線,1),長牛線,DRAWNULL),COLORCYAN,LINETHICK4;
DRAWTEXT(CROSS(長牛線,人線 ) ?AND 人線>=REF(人線,1) ,L*1,'買11',COLORMAGENTA;DRAWTEXT(CROSS(長牛線,地線 ) AND 地線>=REF(地線,1),L*1,'買12',COLORRED;DRAWTEXT(CROSS(長牛線,天線) AND 天線>=REF(天線,1),L*1,'買13',COLORMAGENTA;DRAWTEXT(CROSS(人線,地線) AND 地線>=REF(地線,1),L*1,'買22',COLORRED;DRAWTEXT(CROSS(人線,天線 ) AND 天線>=REF(天線,1),L*1,'買23',COLORMAGENTA;DRAWTEXT(CROSS(地線,天線 )AND 天線>=REF(天線,1),L*1,'買31',COLORRED;
DRAWTEXT(CROSS(人線,長牛線 ) AND C>MA(C,人線),L*1,'賣11',COLORBLUE;DRAWTEXT(CROSS(地線,長牛線) AND C>MA(C,人線),L*1,'賣12',COLORGREEN;DRAWTEXT(CROSS(天線,長牛線) AND C>MA(C,人線),L*1,'賣13',COLORWHITE;
DRAWTEXT(CROSS(地線,人線),L*1,'熊1',COLORBLUE;DRAWTEXT(CROSS(天線,人線),L*1,'熊2',COLORGREEN;
DRAWTEXT(CROSS(天線,地線),L*1,'熊3',COLORWHITE;
?STICKLINE(C/REF(C,1)>=1.045 AND C/REF(C,1)<=1.095,C,O,2.5,0),COLORB0B0FF;{漲停變黃顏色}STICKLINE(C>1.095*REF(C,1),C,O,2.5,0),COLORYELLOW;
{二線}WH1:=IF(L=LLV(L,9),L,0);WH2:=CONST(BARSLAST(WH1!=0));WH3:=CONST(IF(WH2=0,H,REF(H,WH2)));WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1);WH5:=CONST(IF(WH4=0,H,REF(H,WH4)));WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1);WH7:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL),COLORYELLOW,DOTLINE;DRAWTEXT(ISLASTBAR,WH7,'-----,起漲',COLORFF00FF;{必殺線}N1:=10;T11:=CONST(LLVBARS(LOW,N1));T11HIGH:=CONST(REF(HIGH,T11));CC:=CONST(CURRBARSCOUNT);T2:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T11)) AND (HIGH>T11HIGH)));T2HIGH:=CONST(REF(HIGH,T2));T3:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T2)) AND (HIGH>T2HIGH)));T3HIGH:=CONST(REF(HIGH,T3));一線: DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),LINETHICK2,COLOR0000FF;DRAWTEXT(ISLASTBAR, T3HIGH, '突破'LINETHICK1,COLORRED;
?TT:=IF(ISLASTBAR,240/FROMOPEN,1);?NN:=120;?HH:=HHV(V*TT,NN);?LL:=LLV(V,NN);最高:=CONST(HH);最低:=CONST(LL);最高2:=CONST(HHV(H,NN));最低2:=CONST(LLV(L,NN));?PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;?RCC1:=最高2*0.9-(最高2-最低2)*PP;最低3:=MIN(RCC1,最低2);?AA:=最低3;{股海網提供：WWW.GUHAI.COM.CN}周J:=MA("KDJ.J#WEEK"(9,3,3) ,5),COLORFFFF00,LINETHICK2;?AA1:=周J<0 AND 周J<REF(周J,1) ;?FF1:=周J<0 AND 周J>REF(周J,1);?BB1:=周J>=0 AND 周J<85 AND 周J>REF(周J,1);?DD1:=周J>=REF(周J,1) AND 周J>=85 ;?EE1:=周J<REF(周J,1) AND 周J>0;?ZJ1:=MA("KDJ.J#WEEK"(9,3,3) ,5);?YK:=MA("KDJ.K#MONTH"(9,3,3),20),LINETHICK0;?YD:=MA("KDJ.D#MONTH"(9,3,3),20),LINETHICK0;?YJ:=MA("KDJ.J#MONTH"(9,3,3),20);??ZK:=MA("KDJ.K#WEEK"(9,3,3) ,5),LINETHICK0;?ZD:=MA("KDJ.D#WEEK"(9,3,3) ,5),LINETHICK0;?RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;?K:=SMA(RSV,3,1),LINETHICK0;?D:=SMA(K,3,1),LINETHICK0;?J:=3*K-2*D,LINETHICK0;?GG1:=C>0;?RJC:DRAWICON(CROSS(K,D),L*0.95,0);?DRAWTEXT(RJC,L*0.96,'',COLORFF00FF;?RSC:DRAWICON(CROSS(D,K),H*1.03,0),;?DRAWTEXT(RSC,H*1.03,'',COLORFFFFFF;?ZJC: DRAWICON (CROSS(ZK,ZD), L*0.98,0);?DRAWTEXT(ZJC,L*0.98,'',COLORFF00FF;?ZSC: DRAWICON (CROSS(ZD,ZK), H*1.03,2),;??DRAWTEXT(ZSC,H*1.03,'',COLOR00FFFF;?YJC: DRAWICON (CROSS(YK,YD), L*0.98,1);?DRAWTEXT(YJC,L*0.98,'',COLORFF0000;?YSC: DRAWICON (CROSS(YD,YK), H*1.03,2),;?DRAWTEXT(YSC,H*1.03,'',COLORFFFF00;
STICKLINE(C/REF(C,1)>=1.045 AND C/REF(C,1)<=1.095,C,O,2.5,0),COLORB0B0FF;{漲停變黃顏色}STICKLINE(C>1.095*REF(C,1),C,O,2.5,0),COLORYELLOW;
賣:=J<100 AND REF(J,1)>100;大于30:=J-K>30;STICKLINE(賣,REF(LOW,1),REF(LOW,1),20,0),COLORBLUE;DRAWICON(大于30,HIGH,2);大于230:=K-J>30;剎:=J>0 AND REF(J,1)<0;DRAWICON(大于230,LOW,1);STICKLINE(剎,REF(CLOSE,1),REF(CLOSE,1),20,0),COLORYELLOW;DRAWTEXT(剎,L*0.99,'',COLORYELLOW,LINETHICK2;所屬地域:DRAWTEXT_FIX(ISLASTBAR ,0.88,1,1,DYBLOCK),COLORYELLOW;所屬行業:DRAWTEXT_FIX(ISLASTBAR ,0.91,1,0,HYBLOCK),COLORYELLOW;DRAWTEXT_FIX(1,0.00,0.18,0,'題投資：'COLORWHITE;DRAWTEXT_FIX(1,0.09,0.18,0,EXTERNSTR(0,1))COLORWHITE;DRAWTEXT_FIX(1,0.00,0.26,0,'營業務：'COLORFF00FF;DRAWTEXT_FIX(1,0.09,0.26,0,EXTERNSTR(0,2))COLORFF00FF;DRAWTEXT_FIX(1,0.00,1,0,'大股東：'COLORYELLOW;DRAWTEXT_FIX(1,0.07,1,0,EXTERNSTR(0,3))COLORYELLOW;
{成交量比大于昨天一倍}?大量:=VOL>REF(VOL,1)*1.1;?新高:=C>REF(C,1);RJC1:=DRAWICON(CROSS(K,D) AND 大量 ,L*0.98,0);DRAWTEXT(REF(RJC,1) AND 新高 AND ?大量 ,L*0.98,'',COLOR00FFFF;
?
?來源:程序化99
-
文華技術人員：
不同軟件函數機制處理不同，加載效果可能略有差異是正常的，改寫參考
假陽真陰:=C>O AND C<REF(C,1);
STICKLINE(假陽真陰,O,C,1,0),COLORGREEN;
AMOUNT:=AVPRICE*V;
均價:=AMOUNT/VOL/100;
TJ01:=C<O AND 均價>REF(C,1);
?TJ02:=C<O AND C>REF(C,1);
?STICKLINE(TJ01 OR TJ02,O,C,1,0),COLORRED;
人線:=MA(CLOSE,13),COLOR4080FF,LINETHICK2;??
人和:IF(人線>REF(人線,1),人線,NULL),? COLORRED,LINETHICK2;
人熊:IF(人線<REF(人線,1),人線,NULL),COLORGREEN,LINETHICK2;
地線:MA(CLOSE,55),COLOR5080FF,LINETHICK3;
地利1:IF(地線>REF(地線,1),地線,NULL), COLORYELLOW,LINETHICK3;
地熊1:IF(地線<REF(地線,1),地線,NULL),COLORGRAY,LINETHICK3;
天線:MA(CLOSE,3),COLOR5080FF,LINETHICK1;
天時2:IF(天線>REF(天線,1),天線,NULL),COLORMAGENTA,LINETHICK1;
天熊2:IF(天線<REF(天線,1),天線,NULL),COLORBLUE,LINETHICK1;
{CYAN}
長牛線:MA(CLOSE,188),COLOR5080FF,LINETHICK1;
牛線3:IF(長牛線>REF(長牛線,1),長牛線,NULL), COLORFF6EC7,LINETHICK4;
熊線3:IF(長牛線<REF(長牛線,1),長牛線,NULL),COLORCYAN,LINETHICK4;
DRAWTEXT(CROSS(長牛線,人線 )? AND 人線>=REF(人線,1) ,L*1,'↑買11'),COLORMAGENTA;
DRAWTEXT(CROSS(長牛線,地線 ) AND 地線>=REF(地線,1),L*1,'↑買12'),COLORRED;
DRAWTEXT(CROSS(長牛線,天線) AND 天線>=REF(天線,1),L*1,'↑買13'),COLORMAGENTA;
DRAWTEXT(CROSS(人線,地線) AND 地線>=REF(地線,1),L*1,'↑買22'),COLORRED;
DRAWTEXT(CROSS(人線,天線 ) AND 天線>=REF(天線,1),L*1,'↑買23'),COLORMAGENTA;
DRAWTEXT(CROSS(地線,天線 ) AND 天線>=REF(天線,1),L*1,'↑買31'),COLORRED;
DRAWTEXT(CROSS(人線,長牛線 ) AND C>MA(C,人線),L*1,'↑賣11'),COLORBLUE;
DRAWTEXT(CROSS(地線,長牛線) AND C>MA(C,人線),L*1,'↑賣12'),COLORGREEN;
DRAWTEXT(CROSS(天線,長牛線) AND C>MA(C,人線),L*1,'↑賣13'),COLORWHITE;
DRAWTEXT(CROSS(地線,人線),L*1,'↑熊1'),COLORBLUE;
DRAWTEXT(CROSS(天線,人線),L*1,'↑熊2'),COLORGREEN;
DRAWTEXT(CROSS(天線,地線),L*1,'↑熊3'),COLORWHITE;
?
STICKLINE(C/REF(C,1)>=1.045 AND C/REF(C,1)<=1.095,C,O,2.5,0),COLORB0B0FF;
STICKLINE(C>1.095*REF(C,1),C,O,2.5,0),COLORYELLOW;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
WH1:=IF(L=LLV(L,9),L,0);
WH2:=REFX1(BARSLAST(WH1<>0),10000);
WH3:=REFX1(IF(WH2=0,H,REF(H,WH2)),10000);
WH4:=REFX1(REF(BARSLAST(H>WH3),WH2+1)+WH2+1,10000);
WH5:=REFX1(IF(WH4=0,H,REF(H,WH4)),10000);
WH6:=REFX1(REF(BARSLAST(H>WH5),WH4+1)+WH4+1,10000);
WH7:IF(CURRBARSCOUNT<=WH2+10,REFX1(IF(WH6=0,H,REF(H,WH6)),10000),NULL),COLORYELLOW,DOT;
DRAWTEXT(ISLASTBAR,WH7,'------,起漲'),COLORFF00FF;
{必殺線}
N1:=10;
T11:=REFX1(LLVBARS(LOW,N1),10000);
T11HIGH:=REFX1(REF(HIGH,T11),10000);
CC:=REFX1(CURRBARSCOUNT,10000);
T2:=REFX1(BARSLAST((CURRBARSCOUNT >(CC+T11)) AND (HIGH>T11HIGH)),10000);
T2HIGH:=REFX1(REF(HIGH,T2),10000);
T3:=REFX1(BARSLAST((CURRBARSCOUNT >(CC+T2)) AND (HIGH>T2HIGH)),10000);
T3HIGH:=REFX1(REF(HIGH,T3),10000);
一線: TRENDLINES(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH),LINETHICK2,COLOR0000FF;
DRAWTEXT(ISLASTBAR, T3HIGH, ' 突破'),LINETHICK1,COLORRED;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
?TT:=IF(ISLASTBAR,240/FROMOPEN,1);
?NN:=120;
?HH:=HHV(V*TT,NN);
?LL:=LLV(V,NN);
最高:=REFX1(HH,10000);
最低:=REFX1(LL,10000);
最高2:=REFX1(HHV(H,NN),10000);
最低2:=REFX1(LLV(L,NN),10000);
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>REFX1(LLV(L,20),10000),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>REFX1(LLV(L,50),10000),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AA:=最低3;
RSV2:=(CLOSE-LLV(LOW,9*5))/(HHV(HIGH,9*5)-LLV(LOW,9*5))*100;
K2:=SMA(RSV2,3*5,1);
D2:=SMA(K2,3*5,1);
J2:=3*K2-2*D2;
RSV1:=(CLOSE-LLV(LOW,9*5*4))/(HHV(HIGH,9*5*4)-LLV(LOW,9*5*4))*100;
K1:=SMA(RSV1,3*5*4,1);
D1:=SMA(K1,3*5*4,1);
J1:=3*K1-2*D1;
周J:=MA(J2,5),COLORFFFF00,LINETHICK2;
?AA1:=周J<0 AND 周J<REF(周J,1) ;
?FF1:=周J<0 AND 周J>REF(周J,1);
?BB1:=周J>=0 AND 周J<85 AND 周J>REF(周J,1);
?DD1:=周J>=REF(周J,1) AND 周J>=85 ;
?EE1:=周J<REF(周J,1) AND 周J>0;
?ZJ1:=MA(J2,5);
?YK:=MA(K1,20),NODRAW;
?YD:=MA(D1,20);
?YJ:=MA(J1,20);?
?ZK:=MA(K2,5);
?ZD:=MA(D2,5);
?RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
?K:=SMA(RSV,3,1);
?D:=SMA(K,3,1);
?J:=3*K-2*D;
?GG1:=C>0;
?DRAWICON(CROSS(K,D),L*0.95,0);
?DRAWTEXT(CROSS(K,D),L*0.96,'換'),COLORFF00FF;
?DRAWICON(CROSS(D,K),H*1.03,0);
?DRAWTEXT(CROSS(D,K),H*1.03,'倒'),COLORFFFFFF;
?DRAWICON (CROSS(ZK,ZD), L*0.98,0);
?DRAWTEXT(CROSS(ZK,ZD),L*0.98,'周'),COLORFF00FF;
?DRAWICON (CROSS(ZD,ZK), H*1.03,2);?
?DRAWTEXT(CROSS(ZD,ZK),H*1.03,'周'),COLOR00FFFF;
?DRAWICON (CROSS(YK,YD), L*0.98,1);
?DRAWTEXT(CROSS(YK,YD),L*0.98,'月'),COLORFF0000;
?DRAWICON (CROSS(YD,YK), H*1.03,2);
?DRAWTEXT(CROSS(YD,YK),H*1.03,'月'),COLORFFFF00;
STICKLINE(C/REF(C,1)>=1.045 AND C/REF(C,1)<=1.095,C,O,2.5,0),COLORB0B0FF;
STICKLINE(C>1.095*REF(C,1),C,O,2.5,0),COLORYELLOW;
賣:=J<100 AND REF(J,1)>100;
大于30:=J-K>30;
STICKLINE(賣,REF(LOW,1),REF(LOW,1),20,0),COLORBLUE;
DRAWICON(大于30,HIGH,2);
大于230:=K-J>30;
剎:=J>0 AND REF(J,1)<0;
DRAWICON(大于230,LOW,1);
STICKLINE(剎,REF(CLOSE,1),REF(CLOSE,1),20,0),COLORYELLOW;
DRAWTEXT(剎,L*0.99,'剎'),COLORYELLOW,LINETHICK2;
大量:=VOL>REF(VOL,1)*1.1;?
新高:=C>REF(C,1);
DRAWICON(CROSS(K,D) AND 大量 ,L*0.98,0);
DRAWTEXT(REF(CROSS(K,D),1) AND 新高 AND? 大量 ,L*0.98,'加'),COLOR00FFFF;
?
?來源: www.weiqiv.net.cn
-
文華客服：
?老師你好，這個指標的“換”，熊1，熊2.熊3分別代表什么信號？
?
-
網友回復：
天線人線的金叉 地線人線的金叉??天線地線的金叉?
?
-
網友回復：
??
-
網友回復：?老師你好，這個指標的“換”，熊1，熊2.熊3分別代表什么信號？笑臉與哭臉代表什么？謝謝老師
打印本文
關閉窗口