老師看看這個能實現嗎

作者：文華財經來源：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;
?

?來源: www.tumamayizhan.com
文華客服： ?謝謝老師，再麻煩老師加一下條件。
紅色線上，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; ?