老師好，麻煩把通達信的均線指標改下能在文華財經里使用，謝謝！ [文華財經]
-
咨詢內容：
?
假陽真陰:=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.tumamayizhan.com
-
文華客服：
?老師你好，這個指標的“換”，熊1，熊2.熊3分別代表什么信號？
?
-
網友回復：
天線人線的金叉 地線人線的金叉??天線地線的金叉?
?
- 網友回復： ??
- 網友回復：?老師你好，這個指標的“換”，熊1，熊2.熊3分別代表什么信號？笑臉與哭臉代表什么？謝謝老師
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 262069696 或微信：cxhjy888 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，謝謝您！)
相關文章
-
沒有相關內容
會員登錄/注冊