老師麻煩幫助轉換到文華WH6上使用，謝謝！
作者：文華財經 來源：cxh99.com 發布時間：2019年02月16日
-
咨詢內容：
?老師幫我把這個指標改為文華的，另外幫我把背景顏色去掉，謝謝！
DRAWTEXT_FIX(1,0.80,0,0,'黃線RSI--判中期頂底，用來判斷個股的位置】',COLORWHITE;DRAWTEXT_FIX(1,0.80,0.1,0,'粉線J值--判短期頂底】',COLORWHITE;DRAWTEXT_FIX(1,0.40,0.00,0,?RSI1下穿20后再次上穿20，底部確認，反彈開始；2.如再上穿50，啟動走強確認；',COLOR3333FF;DRAWTEXT_FIX(1,0.40,0.10,0,'柱與2點共振，底部確認；該2N1指標適用于震蕩行情；急漲急跌的單邊市RSI放大到周線看，J值不看；',COLOR3333FF;
DRAWBAND(100,RGB(0,78,78),80,RGB(0,0,0));{底色帶}DRAWBAND(80,RGB(0,118,118),50,RGB(0,0,0));{底色帶}DRAWBAND(20,RGB(0,38,38),0,RGB(0,0,0));{底色帶}{二點出擊}VAR2:=REF(LOW,1);VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;VAR4:=EMA(VAR3*10,3);VAR5:=LLV(LOW,13);VAR6:=HHV(VAR4,13);VAR7:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618;VAR8:=IF(VAR7>50,50,VAR7);RSVDS:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;AS:=SMA(RSVDS,3,1);AC:=SMA(AS,3,1);AF:=3*AS-2*AC;AW:=LLV(AF,2)=LLV(AF,8);AH:=IF(CROSS(AF,REF(AF+0.01,1)) AND AW AND AF<20,30,0);SJ:=WMA(((2*C+H+L)/4-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);?ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);VAR3A:=3;VAR2A:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);MTM:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);STICKLINE(VAR8>-120,0,VAR8,3,1),COLORGRAY;STICKLINE(VAR8>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),0,VAR8,3,0),COLORRED;
超買區:80,COLORFFFF00,LINETHICK4;風險區:90,COLORFF0000,LINETHICK2;超賣區:20,COLOR208FFF,LINETHICK4;0,COLORWHITE,LINETHICK4;中軸強弱分界:50,LINETHICK4,COLORLIRED;100,COLORWHITE,LINETHICK4;
{J值}N1:=9;M1:=3;M2:=3;RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100;K:=SMA(RSV,M1,1);D:=SMA(K,M2,1);J:3*K-2*D,COLORMAGENTA;DRAWNUMBER(ISLASTBAR,J,J),COLORMAGENTA;{標注J位置};DRAWICON(CROSS(J,超賣區),超賣區,30);{上穿顯示};
{RSI1強弱線}LC1:=REF(CLOSE,1);RSI1強弱線:SMA(MAX(CLOSE-LC1,0),6,1)/SMA(ABS(CLOSE-LC1),6,1)*100,COLORYELLOW;DRAWNUMBER(ISLASTBAR,RSI1強弱線,RSI1強弱線),COLORYELLOW;{標注RSI1位置};{RSI與J值底部共振}底部共振:RSI1強弱線<20 AND J<0 ,NODRAW,COLOR00C9FF;STICKLINE(底部共振,-10,10,3,0),COLOR0055AA;STICKLINE(底部共振,-10,10,2.8,0),COLOR0066BB;STICKLINE(底部共振,-10,10,2.5,0),COLOR0077CC;STICKLINE(底部共振,-10,10,2.2,0),COLOR0088DD;STICKLINE(底部共振,-10,10,1.7,0),COLOR0099EE;STICKLINE(底部共振,-10,10,1.2,0),COLOR00AAFF;STICKLINE(底部共振,-10,10,0.7,0),COLOR00CCFF;STICKLINE(底部共振,-10,10,0.2,0),COLOR00FFFF;DRAWTEXT(底部共振,12,'底部共振',COLOR00C9FF;
IF(RSI1強弱線>REF(超賣區,1),RSI1強弱線,DRAWNULL)LINETHICK2,COLORYELLOW;IF(RSI1強弱線<REF(超賣區,1),RSI1強弱線,DRAWNULL)LINETHICK4,COLORBLUE;{RSI1}IF(J>REF(0,1),J,DRAWNULL)LINETHICK2,COLORMAGENTA;IF(J<REF(0,1),J,DRAWNULL)LINETHICK4,COLORGREEN;{J}DRAWICON(CROSS(RSI1強弱線,中軸強弱分界),中軸強弱分界,1);{上穿顯示};{RSI底背離和頂背離}A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));DRAWICON((D3>0),99,2);DRAWTEXT((D3>0),97,'nbsp; ?RSI頂背',COLORCYAN;DRAWICON((B3>0),21,1);DRAWTEXT((B3>0),23,'nbsp; ?RSI底背',COLORRED;
{頂底符號}DRAWTEXT(ISLASTBAR,90,?100超買區',COLORFFFF00;DRAWTEXT(ISLASTBAR,超賣區,'賣線',COLOR208FFF;DRAWTEXT(ISLASTBAR,65,?80強勢區',COLORLIRED;DRAWTEXT(ISLASTBAR,50,'弱分界',COLORLIRED;DRAWTEXT(ISLASTBAR,35,?50弱勢區',COLORLIGRAY;DRAWTEXT(ISLASTBAR,10,?0超賣區',COLORLIGREEN;DRAWTEXT(ISLASTBAR,0,'nbsp; ?0軸',COLORWHITE;
{籌碼集中度}獲利比例:WINNER(CLOSE)*100,NODRAW;AA:=P1+(100-P1)/2;B:=(100-P1)/2;CC:=COST(AA);DD:=COST(B);籌碼集中度:(CC-DD)/(CC+DD)*100,NODRAW;STICKLINE(獲利比例>=80 AND 籌碼集中度<=10,0,15,1,0),COLORYELLOW;STICKLINE(獲利比例>=80 AND 籌碼集中度<=10,15,30,1,0),COLORGREEN;STICKLINE(獲利比例>=90 AND 籌碼集中度<=10,20,40,1,0),COLORRED;STICKLINE(獲利比例>=90 AND 籌碼集中度<=10,0,20,1,0),COLORYELLOW;
?
?來源:程序化99
-
文華技術人員：
?參考：
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;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(VAR3*10,3);
VAR5:=LLV(LOW,13);
VAR6:=HHV(VAR4,13);
VAR7:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618;
VAR8:=IF(VAR7>50,50,VAR7);
RSVDS:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
AS:=SMA(RSVDS,3,1);
AC:=SMA(AS,3,1);
AF:=3*AS-2*AC;
AW:=LLV(AF,2)=LLV(AF,8);
AH:=IF(CROSS(AF,REF(AF+0.01,1)) AND AW AND AF<20,30,0);
SJ:=EMA(((2*C+H+L)/4-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);?
ZJ:=EMA(0.618*REF(SJ,1)+0.382*SJ,2);
VAR3A:=3;
VAR2A:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
STICKLINE(VAR8>-120,0,VAR8,3,1),COLORGRAY;
STICKLINE(VAR8>1 AND J>REF(J,1) AND REF(J,1)<REF(J,2),0,VAR8,3,0),COLORRED;
超買區:80,COLORFFFF00,LINETHICK4;
風險區:90,COLORFF0000,LINETHICK2;
超賣區:20,COLOR208FFF,LINETHICK4;
0,COLORWHITE,LINETHICK4;
中軸強弱分界:50,LINETHICK4,COLORRED;
100,COLORWHITE,LINETHICK4;
DRAWNUMBER1(ISLASTBAR,J,J,2),COLORMAGENTA;
DRAWICON(CROSS(J,超賣區),超賣區,30);
LC1:=REF(CLOSE,1);
RSI1強弱線:SMA(MAX(CLOSE-LC1,0),6,1)/SMA(ABS(CLOSE-LC1),6,1)*100,COLORYELLOW;
DRAWNUMBER1(ISLASTBAR,RSI1強弱線,RSI1強弱線,2),COLORYELLOW;
底部共振:RSI1強弱線<20 AND J<0 ,NODRAW,COLOR00C9FF;
STICKLINE(底部共振,-10,10,3,0),COLOR0055AA;
STICKLINE(底部共振,-10,10,2.8,0),COLOR0066BB;
STICKLINE(底部共振,-10,10,2.5,0),COLOR0077CC;
STICKLINE(底部共振,-10,10,2.2,0),COLOR0088DD;
STICKLINE(底部共振,-10,10,1.7,0),COLOR0099EE;
STICKLINE(底部共振,-10,10,1.2,0),COLOR00AAFF;
STICKLINE(底部共振,-10,10,0.7,0),COLOR00CCFF;
STICKLINE(底部共振,-10,10,0.2,0),COLOR00FFFF;
DRAWTEXT(底部共振,12,'底部共振',COLOR00C9FF;
IF(RSI1強弱線>REF(超賣區,1),RSI1強弱線,NULL),LINETHICK2,COLORYELLOW;
IF(RSI1強弱線<REF(超賣區,1),RSI1強弱線,NULL),LINETHICK4,COLORBLUE;
{RSI1}
IF(J>REF(0,1),J,NULL),LINETHICK2,COLORMAGENTA;
IF(J<REF(0,1),J,NULL),LINETHICK4,COLORGREEN;
DRAWICON(CROSS(RSI1強弱線,中軸強弱分界),中軸強弱分界,1);
LC := REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWICON((D3>0),99,2);
DRAWTEXT((D3>0),97,'nbsp; ?RSI頂背',COLORCYAN;
DRAWICON((B3>0),21,1);
DRAWTEXT((B3>0),23,'nbsp; ?RSI底背',COLORRED;
DRAWTEXT(ISLASTBAR,90,'100超買區',COLORFFFF00;
DRAWTEXT(ISLASTBAR,超賣區,'賣線',COLOR208FFF;
DRAWTEXT(ISLASTBAR,65,'80強勢區',COLORRED;
DRAWTEXT(ISLASTBAR,50,'弱分界',COLORRED;
DRAWTEXT(ISLASTBAR,35,'50弱勢區',COLORGRAY;
DRAWTEXT(ISLASTBAR,10,'0超賣區',COLORGREEN;
DRAWTEXT(ISLASTBAR,0,'nbsp; ?0軸',COLORWHITE;
P1:=10;
獲利比例:WINNER(CLOSE)*100,NODRAW;
AA:=P1+(100-P1)/2;
B:=(100-P1)/2;
CC:=COST(AA);
DD:=COST(B);
籌碼集中度:(CC-DD)/(CC+DD)*100,NODRAW;
STICKLINE(獲利比例>=80 AND 籌碼集中度<=10,0,15,1,0),COLORYELLOW;
STICKLINE(獲利比例>=80 AND 籌碼集中度<=10,15,30,1,0),COLORGREEN;
STICKLINE(獲利比例>=90 AND 籌碼集中度<=10,20,40,1,0),COLORRED;
STICKLINE(獲利比例>=90 AND 籌碼集中度<=10,0,20,1,0),COLORYELLOW;
打印本文
關閉窗口