[求助]請老師改為文華語句 [文華財經]
-
咨詢內容：
?MMS:=MA(SMA((L+H+2*C)/4-REF((L+H+2*C)/4,1),5,1)/SMA(ABS((L+H+2*C)/4-REF((L+H+2*C)/4,1)),5,1)*100,1)+50;
G1:=IF(-MMS>95,0,20);
UOO:=(-(((CLOSE-LLV(CLOSE,7))/(HHV(CLOSE,7)-LLV(CLOSE,7))*100=100)>0 AND G1)+1);
KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
KS1:=IF(BARSCOUNT(C)=1,C/10000,(1-C/SMA(C,13,1))*100);
趨勢線:=EMA(((KS / 10) + EMA(CLOSE,10)),3);
AA:=-100*(趨勢線-CLOSE)/趨勢線;
AC:=(EMA(AA,5) );
SSL:=EMA(CLOSE,3);
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
MM:=MA(MMV,1);
STICKLINE(((SSL>MM)),SSL,MM,0.01,0),COLORRED;
買線:=ZIG(3,10);
賣線:=MA(買線,2);
BU:=CROSS(買線,賣線);
SEL:=CROSS(賣線,買線);
DRAWTEXT(BU,L*0.99,'#39),LINETHICK2,COLOR00FFFF;
DRAWTEXT(SEL,H*1.0,'#39),LINETHICK1,COLOR00FF00;
STICKLINE(買線>=賣線,CLOSE,OPEN,3,0),COLOR0000CC;
STICKLINE(買線<賣線,CLOSE,OPEN,3,0),COLORCCCC00;
STICKLINE(買線<賣線,LOW,HIGH,0,0),COLORCCCC00;
STICKLINE(CROSS(買線,賣線),OPEN,CLOSE,3,0),COLOR00AAFF;
STICKLINE(CROSS(賣線,買線),OPEN,CLOSE,3,0),COLOR00DD00;
DRAWICON(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*1.07,7);
DRAWTEXT(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*1.04,'#39);
DRAWICON(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.04,8);
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.01,'#39);
VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
VAR2:=HIGH-REF(HIGH,1);
VAR3:=REF(LOW,1)-LOW;
VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25);
VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25);
VAR6:=VAR4*100/VAR1;
VAR7:=VAR5*100/VAR1;
VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);
VAR9:=(VAR8+REF(VAR8,15))/2;
A:=(VAR7>VAR6 AND VAR7>25 AND VAR6<25);
B:=ZIG(3,51/5)*100,COLORWHITE;
G:=MA(B,2),COLORYELLOW;
D:=CROSS(B,G)*1000,COLORRED;
W:=CROSS(G,B)*1000,COLORBLUE;
A30:=MA(C,30);
ANGLEA30:=ATAN((A30/REF(A30,1)-1)*100)*57.3;
ANGLE30:=ANGLEA30>40 OR ANGLEA30<-48;
A10:=MA(C,10);
ANGLEA10:=ATAN((A10/REF(A10,1)-1)*100)*57.3;
ANGLE10:=ANGLEA10>20 OR ANGLEA10<-25 AND CLOSE>MA(CLOSE,20) ;
A3010:=ANGLE30 OR ANGLE10;
AAZT:=COUNT(CLOSE>REF(CLOSE,1)*1.097 ,20)>0;
DRAWTEXT(CROSS(ZIG(3,5),REF(ZIG(3,5),1)),LOW*0.9,'發財' ,LINETHICK2,COLORRED;
MA5:MA(CLOSE,5),LINETHICK1,COLORWHITE;
A0:=(3*C+L+O+H)/6;
X:=(20*A0+19*REF(A0,1)+18*REF(A0,2)+17*REF(A0,3)+16*REF(A0,4)+15*REF(A0,5)+14*REF(A0,6)+13*REF(A0,7)+12*REF(A0,8)+11*REF(A0,9)+10*REF(A0,10)+9*REF(A0,11)+8*REF(A0,12)+7*REF(A0,13)+6*REF(A0,14)+5*REF(A0,15)+4*REF(A0,16)+3*REF(A0,17)+2*REF(A0,18)+REF(A0,20))/210;
主力成本:EMA(X,13),COLORFF00FF,LINETHICK0;
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'拐點買',COLOR00FFFF;
STICKLINE(W=1000,CONST(HHV(H,0)),CONST(LLV(L,0)),2,0),COLORCYAN;
STICKLINE(D=1000,CONST(HHV(H,0)),CONST(LLV(L,0)),2,0),COLOR0099FF;
STICKLINE(W=1000 AND AAZT,CONST(HHV(H,0)),CONST(LLV(L,0)),2,0),COLORGREEN;
STICKLINE(D=1000 AND AAZT,CONST(HHV(H,0)),CONST(LLV(L,0)),2,0),COLORRED;?
?來源:程序化99
-
文華技術人員：
?參考：
?MMS:=MA(SMA((L+H+2*C)/4-REF((L+H+2*C)/4,1),5,1)/SMA(ABS((L+H+2*C)/4-REF((L+H+2*C)/4,1)),5,1)*100,1)+50;
G1:=IF(MMS<-95,0,20);
UOO:=(-(((CLOSE-LLV(CLOSE,7))/(HHV(CLOSE,7)-LLV(CLOSE,7))*100=100)>0 AND G1)+1);
KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
KS1:=IF(BARSCOUNT(C)=1,C/10000,(1-C/SMA(C,13,1))*100);
趨勢線:=EMA(((KS / 10) + EMA(CLOSE,10)),3);
AA:=-100*(趨勢線-CLOSE)/趨勢線;
AC:=(EMA(AA,5) );
SSL:=EMA(CLOSE,3);
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
MM:=MA(MMV,1);
STICKLINE(((SSL>MM)),SSL,MM,0.01,0),COLORRED;
買線:=ZIGZAG(C,10,1);
賣線:=MA(買線,2);
BU:=CROSS(買線,賣線);
SEL:=CROSS(賣線,買線);
DRAWTEXT(BU,L*0.99,'#39),LINETHICK2,COLOR00FFFF;
DRAWTEXT(SEL,H*1.0,'#39),LINETHICK1,COLOR00FF00;
STICKLINE(買線>=賣線,CLOSE,OPEN,3,0),COLOR0000CC;
STICKLINE(買線<賣線,CLOSE,OPEN,3,0),COLORCCCC00;
STICKLINE(買線<賣線,LOW,HIGH,0,0),COLORCCCC00;
STICKLINE(CROSS(買線,賣線),OPEN,CLOSE,3,0),COLOR00AAFF;
STICKLINE(CROSS(賣線,買線),OPEN,CLOSE,3,0),COLOR00DD00;
DRAWICON(CROSS(ZIGZAG(C,10,1),REF(ZIGZAG(C,10,1),1)),LOW*1.07,7);
DRAWTEXT(CROSS(ZIGZAG(C,10,1),REF(ZIGZAG(C,10,1),1)),LOW*1.04,'#39);
DRAWICON(CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)),HIGH*1.04,8);
DRAWTEXT(CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)),HIGH*1.01,'#39);
VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
VAR2:=HIGH-REF(HIGH,1);
VAR3:=REF(LOW,1)-LOW;
VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25);
VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25);
VAR6:=VAR4*100/VAR1;
VAR7:=VAR5*100/VAR1;
VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);
VAR9:=(VAR8+REF(VAR8,15))/2;
A:=(VAR7>VAR6 AND VAR7>25 AND VAR6<25);
B:=ZIGZAG(C,51/5,1)*100,COLORWHITE;
G:=MA(B,2),COLORYELLOW;
D:=CROSS(B,G)*1000,COLORRED;
W:=CROSS(G,B)*1000,COLORBLUE;
A30:=MA(C,30);
ANGLEA30:=ATAN((A30/REF(A30,1)-1)*100)*57.3;
ANGLE30:=ANGLEA30>40 OR ANGLEA30<-48;
A10:=MA(C,10);
ANGLEA10:=ATAN((A10/REF(A10,1)-1)*100)*57.3;
ANGLE10:=ANGLEA10>20 OR ANGLEA10<-25 AND CLOSE>MA(CLOSE,20) ;
A3010:=ANGLE30 OR ANGLE10;
AAZT:=COUNT(CLOSE>REF(CLOSE,1)*1.097 ,20)>0;
DRAWTEXT(CROSS(ZIGZAG(C,5,1),REF(ZIGZAG(C,5,1),1)),LOW*0.9,'發財' ,LINETHICK2,COLORRED;
MA5:MA(CLOSE,5),LINETHICK1,COLORWHITE;
A0:=(3*C+L+O+H)/6;
X:=(20*A0+19*REF(A0,1)+18*REF(A0,2)+17*REF(A0,3)+16*REF(A0,4)+15*REF(A0,5)+14*REF(A0,6)+13*REF(A0,7)+12*REF(A0,8)+11*REF(A0,9)+10*REF(A0,10)+9*REF(A0,11)+8*REF(A0,12)+7*REF(A0,13)+6*REF(A0,14)+5*REF(A0,15)+4*REF(A0,16)+3*REF(A0,17)+2*REF(A0,18)+REF(A0,20))/210;
主力成本:EMA(X,13),COLORFF00FF,NODRAW;
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'拐點買',COLOR00FFFF;
STICKLINE1(W=1000,REFX1(H,10000),REFX1(LLV(L,0),10000),0,2),COLORCYAN;
STICKLINE1(D=1000,REFX1(H,10000),REFX1(LLV(L,0),10000),0,2),COLOR0099FF;
STICKLINE1(W=1000 AND AAZT,REFX1(H,100000),REFX1(LLV(L,0),10000),0,2),COLORGREEN;
STICKLINE1(D=1000 AND AAZT,REFX1(H,10000),REFX1(LLV(L,0),10000),0,2),COLORRED;
有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號：cxh99cxh99 進行 有償收費 編寫！
(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
相關文章
-
沒有相關內容
會員登錄/注冊