老師幫忙改一下 謝謝！
作者：文華財經 來源：cxh99.com 發布時間：2019年12月13日
-
咨詢內容：
A1P:=REF(CLOSE,2);
A2P:=SMA(MAX(CLOSE-A1P,0),7,1)/SMA(ABS(CLOSE-A1P),7,1)*100;
A4P:=REF(LOW,1);
A5P:=SMA(ABS(LOW-A4P),3,1)/SMA(MAX(LOW-A4P,0),3,1)*100;
A6P:=EMA(IF(CLOSE*1.3,A5P*10,A5P/10),3);
A7P:=LLV(LOW,29);
A8P:=HHV(A6P,37);
A9P:=IF(MA(CLOSE,90),1,0);
A10P:=EMA(IF(LOW<=A7P,(A6P+A8P*2)/2,0),3)/1688*A9P;
A11P:=IF(A10P>100,100,A10P);
STICKLINE(A11P,0,A11P,4,1),COLOR666666;
VAR1:=MA(CLOSE,27);
VAR2:=(CLOSE-VAR1)/VAR1*100;
RSV1:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
RSV2:=(CLOSE-LLV(LOW,37))/(HHV(HIGH,37)-LLV(LOW,37))*100;
RSV3:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
VARA:=MA(VAR2,2);
VARB:=BARSLAST(CROSS(-10,VARA)=1);
VARC:=BARSLAST(CROSS(VARA,10)=1);
VARD:=VARA<-10 AND VARB>3;
VARE:=VARA>10 AND VARC>3;
短線:SMA(SMA(RSV1,3,1),3,1)+3*STD(CLOSE,21),COLOR009900;
中線:SMA(RSV2,5,1)+2*STD(CLOSE,37),COLORRED;
中長線:=-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40));
長線:SMA(RSV3,5,1),COLORYELLOW;
看底:STICKLINE(中線<15,中線,15,6,0),COLORF00FF0;
黃金:STICKLINE(短線<20 AND 中線<20 AND 長線<20,MAX(長線,MAX(短線,中線)),20,3,0),COLOR00CCFF;
看頂:STICKLINE(中線>80,80,中線,3,0),COLORFFF000;
DR:=IF(COUNT(CROSS(中長線,-90),12)=3,30,5);
KH1:=IF(VARD,VARA,0);
KH2:=REF(KH1,1)<0;
DRAWICON(CROSS(長線,15),中線,1);
DRAWTEXT(LONGCROSS(中線,20,15),20,'反彈');
DRAWTEXT(CROSS(短線,長線)AND 長線<18 AND 長線>REF(長線,1)OR CROSS(長線,5),20,'絕佳機會'),COLOR00BBBB;
底:DRAWTEXT(CROSS(中長線,-90) AND (長線<中線 AND 長線>REF(長線,1)OR 短線<20 AND 中線<20 AND 長線 <20),長線,'底'),COLORFF00FF;
{波段軌道}
TC1:=IF(H=HHV(H,48),H,DRAWNULL);
TC2:=CONST(BARSLAST(TC1=H))+1;
UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1)));
BC1:=IF(L=LLV(L,48),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;{低點定位}
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;{高點定位}
DRAWTEXT(LP,40,'↖波段底'),COLORLIGREEN;{波段底文字提示}
DRAWTEXT(HP,89,'波段頂'),COLORMAGENTA;{波段頂文字提示};
?
?來源:程序化99
-
文華技術人員：
?參考：
A1P:=REF(CLOSE,2);
CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
A2P:=SMA(MAX(CLOSE-A1P,0),7,1)/SMA(ABS(CLOSE-A1P),7,1)*100;
A4P:=REF(LOW,1);
A5P:=SMA(ABS(LOW-A4P),3,1)/SMA(MAX(LOW-A4P,0),3,1)*100;
A6P:=EMA(IF(CLOSE*1.3,A5P*10,A5P/10),3);
A7P:=LLV(LOW,29);
A8P:=HHV(A6P,37);
A9P:=IF(MA(CLOSE,90),1,0);
A10P:=EMA(IF(LOW<=A7P,(A6P+A8P*2)/2,0),3)/1688*A9P;
A11P:=IF(A10P>100,100,A10P);
STICKLINE(A11P,0,A11P,4,1),COLOR666666;
VAR1:=MA(CLOSE,27);
VAR2:=(CLOSE-VAR1)/VAR1*100;
RSV1:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
RSV2:=(CLOSE-LLV(LOW,37))/(HHV(HIGH,37)-LLV(LOW,37))*100;
RSV3:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
VARA:=MA(VAR2,2);
VARB:=BARSLAST(CROSS(-10,VARA)=1);
VARC:=BARSLAST(CROSS(VARA,10)=1);
VARD:=VARA<-10 AND VARB>3;
VARE:=VARA>10 AND VARC>3;
短線:SMA(SMA(RSV1,3,1),3,1)+3*STD(CLOSE,21),COLOR009900;
中線:SMA(RSV2,5,1)+2*STD(CLOSE,37),COLORRED;
中長線:=-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40));
長線:SMA(RSV3,5,1),COLORYELLOW;
STICKLINE(中線<15,中線,15,6,0),COLORF00FF0;
STICKLINE(短線<20 AND 中線<20 AND 長線<20,MAX(長線,MAX(短線,中線)),20,3,0),COLOR00CCFF;
STICKLINE(中線>80,80,中線,3,0),COLORFFF000;
DR:=IF(COUNT(CROSS(中長線,-90),12)=3,30,5);
KH1:=IF(VARD,VARA,0);
KH2:=REF(KH1,1)<0;
DRAWICON(CROSS(長線,15),中線,1);
DRAWTEXT(LONGCROSS(中線,20,15),20,'彈';
DRAWTEXT(CROSS(短線,長線) AND 長線<18 AND 長線>REF(長線,1) OR CROSS(長線,5),20,'佳機會',COLOR00BBBB;
DRAWTEXT(CROSS(中長線,-90) AND (長線<中線 AND 長線>REF(長線,1) OR 短線<20 AND 中線<20 AND 長線 <20),長線,'',COLORFF00FF;
TC1:=IF(H=HHV(H,48),H,NULL);
TC2:=REFX1(BARSLAST(TC1=H),10000)+1;
UPPER:=REFX1(IF(TC2=1,H,REF(H,TC2-1)),10000);
BC1:=IF(L=LLV(L,48),L,NULL);
BC2:=REFX1(BARSLAST(BC1=L),10000)+1;
LOWER:=REFX1(IF(BC2=1,L,REF(L,BC2-1)),10000);
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;
DRAWTEXT(LP,40,'波段底',COLORGREEN;
DRAWTEXT(HP,89,'段頂',COLORMAGENTA;
打印本文
關閉窗口