老師看看這個能實現嗎
作者:文華財經 來源:cxh99.com 發布時間:2023年11月18日
-
咨詢內容:
?X1:=(C+L+H)/3;X2:=EMA(X1,1);X3:=EMA(X2,3);X4:=EMA(X3,13);X5:=EMA(X4,3);STICKLINE(X4>=X5,X4,X5,10,0),COLORRED;STICKLINE(X4<X5,X4,X5,10,0),COLORGREEN;
N:=25;天機線:EMA(EMA(C,N),N),COLORRED,LINETHICK1;B:=天機線>REF(天機線,1);IF(B-1,天機線,NULL),COLORGREEN,LINETHICK1;
AA:=EMA(C,N) > EMA(C,N);BB:=EMA(C,N) < EMA(C,N);CC:= EMA(C,N) > EMA(C,N);CC1:=EMA(C,N) < EMA(C,N);DD:=CLOSE<=OPEN;DD1:=CLOSE>OPEN;
E:=EMA(EMA(C,10),10),COLORRED,LINETHICK2;//PARTLINE1(REF(E,1)>E,E),LINETHICK2,COLOR00FF00;//PARTLINE1(REF(E,1)<E,E),LINETHICK2,COLORRED;
TY:=CLOSE;HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);A:=REF(CLOSE,BARSLAST(HD));B1:=REF(CLOSE,BARSLAST(LD));T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);VAR3:=LLV(H,240);VAR4:=100*(C-VAR3)/VAR3;VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;VAR7:=0;VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;VARA:=BARSCOUNT(C);VARB:=VAR8<20 AND VAR9<23 AND VARA>35;VARC:=VARB AND COUNT(VARB,1)=1;VARD:=EMA(C,21)-EMA(C,8);VARE:=EMA(VARD,5);VARF:=(361)<4 AND CROSS(VARD,VARE);VAR10:=IF((3161)=0 AND H>L+0.04,4,0);
LC:=REF(CLOSE,1);WRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWICON(CROSS(WRSI,15),L,4),VALIGN0;DRAWICON(CROSS(85,WRSI),H,5),VALIGN2;
只要紅綠線, 不要附帶的小紅色綠色方塊了。??
?
?來源:程序化99
-
文華技術人員:
?參考:
?X1:=(C+L+H)/3;
X2:=EMA(X1,1);
X3:=EMA(X2,3);
X4:=EMA(X3,13);
X5:=EMA(X4,3);
N:=25;
天機線:EMA(EMA(C,N),N),COLORRED,LINETHICK1;
B:=天機線>REF(天機線,1);
IF(B-1,天機線,NULL),COLORGREEN,LINETHICK1;
AA:=EMA(C,N) > EMA(C,N);
BB:=EMA(C,N) < EMA(C,N);
CC:= EMA(C,N) > EMA(C,N);
CC1:=EMA(C,N) < EMA(C,N);
DD:=CLOSE<=OPEN;
DD1:=CLOSE>OPEN;
E:=EMA(EMA(C,10),10),COLORRED,LINETHICK2;
//PARTLINE1(REF(E,1)>E,E),LINETHICK2,COLOR00FF00;
//PARTLINE1(REF(E,1)<E,E),LINETHICK2,COLORRED;
TY:=CLOSE;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(CLOSE,BARSLAST(HD));
B1:=REF(CLOSE,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VARA:=BARSCOUNT(C);
VARB:=VAR8<20 AND VAR9<23 AND VARA>35;
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(C,21)-EMA(C,8);
VARE:=EMA(VARD,5);
VARF:=(361)<4 AND CROSS(VARD,VARE);
VAR10:=IF((3161)=0 AND H>L+0.04,4,0);
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWICON(CROSS(WRSI,15),L,4),VALIGN0;
DRAWICON(CROSS(85,WRSI),H,5),VALIGN2;
?
?來源: m.kzuj.com.cn
-
文華客服:
?謝謝老師,再麻煩老師加一下條件。
紅色線上,k線用紅色空心實心,聲音提示;綠色線下,k線用綠色空心實心,聲音提示。
謝謝老師,拜托了!
?
-
網友回復:
?參考:
X1:=(C+L+H)/3;
X2:=EMA(X1,1);
X3:=EMA(X2,3);
X4:=EMA(X3,13);
X5:=EMA(X4,3);
N:=25;
天機線:EMA(EMA(C,N),N),COLORRED,LINETHICK1;
B:=天機線>REF(天機線,1);
IF(B-1,天機線,NULL),COLORGREEN,LINETHICK1;
DRAWCOLORKLINE(B&&C>天機線&&ISUP,COLORRED,1);
DRAWCOLORKLINE(B&&C>天機線&&ISDOWN,COLORRED,0);
DRAWCOLORKLINE(NOT(B)&&C<天機線&&ISUP,COLORGREEN,1);
DRAWCOLORKLINE(NOT(B)&&C<天機線&&ISDOWN,COLORGREEN,0);
C>天機線&&B,SOUND('A');
C<天機線&&NOT(B),SOUND('A');AA:=EMA(C,N) > EMA(C,N);BB:=EMA(C,N) < EMA(C,N);CC:= EMA(C,N) > EMA(C,N);CC1:=EMA(C,N) < EMA(C,N);DD:=CLOSE<=OPEN;DD1:=CLOSE>OPEN;
E:=EMA(EMA(C,10),10),COLORRED,LINETHICK2;//PARTLINE1(REF(E,1)>E,E),LINETHICK2,COLOR00FF00;//PARTLINE1(REF(E,1)<E,E),LINETHICK2,COLORRED;
TY:=CLOSE;HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);A:=REF(CLOSE,BARSLAST(HD));B1:=REF(CLOSE,BARSLAST(LD));T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);VAR3:=LLV(H,240);VAR4:=100*(C-VAR3)/VAR3;VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;VAR7:=0;VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;VARA:=BARSCOUNT(C);VARB:=VAR8<20 AND VAR9<23 AND VARA>35;VARC:=VARB AND COUNT(VARB,1)=1;VARD:=EMA(C,21)-EMA(C,8);VARE:=EMA(VARD,5);VARF:=(361)<4 AND CROSS(VARD,VARE);VAR10:=IF((3161)=0 AND H>L+0.04,4,0);
LC:=REF(CLOSE,1);WRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWICON(CROSS(WRSI,15),L,4),VALIGN0;DRAWICON(CROSS(85,WRSI),H,5),VALIGN2;
?