通達信改文華 805 謝謝

作者：文華財經來源：cxh99.com 發布時間：2022年02月10日

咨詢內容： ?M5:MA(CLOSE,5);M10:MA(CLOSE,10);M30:MA(CLOSE,30);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;BUY1:=ZIG(3,10);SELL1:=MA(BUY1,2);DRAWICON(CROSS(BUY1,SELL1),L-0.1,7);DRAWICON(CROSS(SELL1,BUY1),H+0.1,8);STICKLINE(BUY1>SELL1 AND O>=C,C,O,-1,0),COLORRED;STICKLINE(BUY1>SELL1 AND O>=C,L,H,0,0),COLORRED;STICKLINE(BUY1<SELL1 AND O<=C,O,C,-1,1),COLORCYAN;STICKLINE(BUY1<SELL1 AND O<=C,O,L,0,1),COLORCYAN;STICKLINE(BUY1<SELL1 AND O<=C,C,H,0,1),COLORCYAN;VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;VAR12:=SMA(VAR11,3,1);VAR13:=SMA(VAR12,3,1);VAR14:=VAR13 AND VAR13<20;LJB:=1/WINNER(CLOSE);

DRAWTEXT(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.99,'買' , COLORYELLOW,LINETHICK1;DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.008,'賣' , COLORGREEN,LINETHICK1;

S-B出現前一根K線改成黃色，謝謝
?
?來源:程序化99
文華技術人員： ?參考；
?M5:MA(CLOSE,5); M10:MA(CLOSE,10); M30:MA(CLOSE,30); 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; BUY1:=ZIGZAG(C,10,1); SELL1:=MA(BUY1,2); DRAWICON(CROSS(BUY1,SELL1),L-0.1,7); DRAWICON(CROSS(SELL1,BUY1),H+0.1,8); STICKLINE(BUY1>SELL1 AND O>=C,C,O,-1,0),COLORRED; STICKLINE1(BUY1>SELL1 AND O>=C,L,H,0,0),COLORRED;
STICKLINE(BUY1<SELL1 AND O<=C,O,C,-1,1),COLORCYAN; STICKLINE1(BUY1<SELL1 AND O<=C,O,L,0,1),COLORCYAN; STICKLINE1(BUY1<SELL1 AND O<=C,C,H,0,1),COLORCYAN; VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; VAR12:=SMA(VAR11,3,1); VAR13:=SMA(VAR12,3,1); VAR14:=VAR13 AND VAR13<20; LJB:=1/WINNER(CLOSE);

DRAWTEXT(CROSS(ZIGZAG(C,10,1),REF(ZIGZAG(C,10,1),1)),LOW*0.99,'買' , COLORYELLOW,LINETHICK1; DRAWTEXT(CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)),HIGH*1.008,'賣' , COLORGREEN,LINETHICK1;
DRAWCOLORKLINE( REFX(CROSS(ZIGZAG(C,10,1),REF(ZIGZAG(C,10,1),1))||CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)),1),COLORYELLOW,0);