老師幫忙改一下 謝謝！ [文華財經]
-
咨詢內容：
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;
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 1145508240 或微信號：cxh99cxh99 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，謝謝您！)
相關文章
-
沒有相關內容
會員登錄/注冊