咨詢內容:
老師這個能改成博弈主圖嗎
VAR1:=(H+L)/2;
AO:=SMA(VAR1,5,1)-SMA(VAR1,34,1),COLORCC9966;
AC:=SMA((AO-SMA(AO,5,1)),5,1),COLORCC9966;
X1:=AO>REF(AO,1) AND AC>REF(AC,1);
X2:=AO<REF(AO,1) AND AC<REF(AC,1);
Y:=(H+L)/2;
Y3:=REF(Y,3);
Y5:=REF(Y,5);
Y8:=REF(Y,8);
RED:=SMA(Y,8,1);
R2:=REF(RED,5);
KU1:=IF(H=HHV(H,3),1,0);
KD1:=IF(L=LLV(L,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(H,2),REF(H,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(L,2),REF(L,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
黃:=SMA(Y8,13,1),COLORYELLOW;
紅:=SMA(Y5,8,1),COLORRED;
綠:=SMA(Y3,5,1),COLORGREEN;
上張:=黃>=REF(黃,1) AND 紅>=REF(紅,1) AND 綠>=REF(綠,1);
下張:=黃<REF(黃,1) AND 紅<REF(紅,1) AND 綠<REF(綠,1);
上碎:=IF(H>=R2,UL,REF(UL,BARSLAST(H>R2)));
下碎:=IF(L<=R2,DL,REF(DL,BARSLAST(L<=R2)));
//STICKLINE(BARSLAST(ABS(上碎-REF(上碎,1)))<BARSLAST(C>上碎 AND REF(C,1)<REF(上碎,1)),上碎,上碎,3,1),COLORMAGENTA;
//STICKLINE(BARSLAST(ABS(下碎-REF(下碎,1)))<BARSLAST(C<下碎 AND REF(C,1)>REF(下碎,1)),下碎,下碎,3,1),COLORCYAN;
LC := REF(C,4);
RMI:=SMA(MAX(C-LC,0),7,1)/SMA(ABS(C-LC),7,1)*100;
QS:= HHV(MA(RMI,3),13),COLORFFAD00;
RMIMA:= SMA(RMI,3,1),COLOR009C00;
KTEXT(C>上碎&&ISLASTBAR=1,-5,H+1,1,COLORFF0000,' 向上突破看漲情緒'),FONTSIZE30;
KTEXT(C<下碎&&ISLASTBAR=1,-5,L-1,1,COLOR00FFFF,' 向下突破恐慌情緒'),FONTSIZE30;
KTEXT(X1>0&&ISLASTBAR=1,-5,H+2,1,COLORFF00FF,' AO與AC為多方趨勢'),FONTSIZE30;
KTEXT(X2>0&&ISLASTBAR=1,-5,L-2,1,COLOR00FF00,' AO與AC為空方趨勢'),FONTSIZE30;
KTEXT(上張&&ISLASTBAR=1,-5,H+3,1,COLOR999999,' 情緒向上漲'),FONTSIZE30;
KTEXT(下張&&ISLASTBAR=1,-5,L-3,1,COLOR999999,' 情緒向下跌'),FONTSIZE30;
KTEXT(上張&&X1>0&&ISLASTBAR=1,-5,H+4,1,COLORFF00FF,' 懷疑中想多頭'),FONTSIZE30;
KTEXT(下張&&X2>0&&ISLASTBAR=1,-5,L-4,1,COLOR00FF00,' 懷疑中想空頭'),FONTSIZE30;
KTEXT((RMI>RMIMA&&RMI<QS)&&ISLASTBAR=1,-5,H+5,1,COLORFFFF00,' 小心做多'),FONTSIZE30;
KTEXT((RMI>RMIMA&&RMI>QS)&&ISLASTBAR=1,-5,H+5,1,COLORFF0000,' 堅決做多'),FONTSIZE30;
KTEXT((RMI<RMIMA&&RMI>20)&&ISLASTBAR=1,-5,L-5,1,COLOR0000FF,' 堅決做空'),FONTSIZE30;
KTEXT((RMI<RMIMA&&RMI<20)&&ISLASTBAR=1,-5,L-5,1,COLORFF00FF,' 小心做空'),FONTSIZE30;
//DRAWKLINE1(H,O,L,C);
?
?來源:程序化99網( www.tumamayizhan.com )
博易技術人員:
VAR1:=(H+L)/2;?
AO:=SMA(VAR1,5,1)-SMA(VAR1,34,1),COLORCC9966;?
AC:=SMA((AO-SMA(AO,5,1)),5,1),COLORCC9966;?
X1:=AO>REF(AO,1) AND AC>REF(AC,1);
X2:=AO<REF(AO,1) AND AC<REF(AC,1);
Y:=(H+L)/2;
Y3:=REF(Y,3);
Y5:=REF(Y,5);
Y8:=REF(Y,8);
RED:=SMA(Y,8,1);
R2:=REF(RED,5);?
KU1:=IF(H=HHV(H,3),1,0);
KD1:=IF(L=LLV(L,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(H,2),REF(H,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(L,2),REF(L,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
黃:=SMA(Y8,13,1),COLORYELLOW;
紅:=SMA(Y5,8,1),COLORRED;
綠:=SMA(Y3,5,1),COLORGREEN;
上張:=黃>=REF(黃,1) AND 紅>=REF(紅,1) AND 綠>=REF(綠,1);
下張:=黃<REF(黃,1) AND 紅<REF(紅,1) AND 綠<REF(綠,1);
上碎:=IF(H>=R2,UL,REF(UL,BARSLAST(H>R2)));
下碎:=IF(L<=R2,DL,REF(DL,BARSLAST(L<=R2)));
//STICKLINE(BARSLAST(ABS(上碎-REF(上碎,1)))<BARSLAST(C>上碎 AND REF(C,1)<REF(上碎,1)),上碎,上碎,3,1),COLORMAGENTA;
//STICKLINE(BARSLAST(ABS(下碎-REF(下碎,1)))<BARSLAST(C<下碎 AND REF(C,1)>REF(下碎,1)),下碎,下碎,3,1),COLORCYAN;
LC := REF(C,4);
RMI:=SMA(MAX(C-LC,0),7,1)/SMA(ABS(C-LC),7,1)*100;
QS:= HHV(MA(RMI,3),13),COLORFFAD00;
RMIMA:= SMA(RMI,3,1),COLOR009C00;
DRAWTEXT(C>上碎&&ISLASTBAR=1,H+1,' 向上突破看漲情緒'),COLORFF0000;
DRAWTEXT(C<下碎&&ISLASTBAR=1,L-1,' 向下突破恐慌情緒'),COLOR00FFFF;
DRAWTEXT(X1>0&&ISLASTBAR=1,H+2,' AO與AC為多方趨勢'),COLORFF00FF;
DRAWTEXT(X2>0&&ISLASTBAR=1,L-2,' AO與AC為空方趨勢'),COLOR00FF00;
DRAWTEXT(上張&&ISLASTBAR=1,H+3,' 情緒向上漲'),COLOR999999;
DRAWTEXT(下張&&ISLASTBAR=1,L-3,' 情緒向下跌'),COLOR999999;
DRAWTEXT(上張&&X1>0&&ISLASTBAR=1,H+4,' 懷疑中想多頭'),COLORFF00FF;
DRAWTEXT(下張&&X2>0&&ISLASTBAR=1,L-4,' 懷疑中想空頭'),COLOR00FF00;
DRAWTEXT((RMI>RMIMA&&RMI<QS)&&ISLASTBAR=1,H+5,' 小心做多'),COLORFFFF00;
DRAWTEXT((RMI>RMIMA&&RMI>QS)&&ISLASTBAR=1,H+5,' 堅決做多'),COLORFF0000;
DRAWTEXT((RMI<RMIMA&&RMI>20)&&ISLASTBAR=1,L-5,' 堅決做空'),COLOR0000FF;
DRAWTEXT((RMI<RMIMA&&RMI<20)&&ISLASTBAR=1,L-5,' 小心做空'),COLORFF00FF;
//DRAWKLINE1(H,O,L,C);?
謝謝老師
來源 程序化久久網