做個(gè)主圖變色K線
作者：文華財(cái)經(jīng) 來(lái)源：cxh99.com 發(fā)布時(shí)間：2022年06月27日
-
咨詢(xún)內(nèi)容：
?做個(gè)主圖變色K線
1.K＞D 紅色K線 ，K=D 白色K線，K＜D 青色K線 。空實(shí)心不變
2.滿足條件后文字顯示與K線對(duì)齊VAR1:=(2*CLOSE+HIGH+LOW)/40;VAR2:=EMA(EMA(EMA(VAR1,4),4),4);FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);J:(VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK;
D:MA(J,3);
K:MA(J,1);
PW1:=EMA(((VOL*(CLOSE-OPEN)*240/FROMOPEN)/(CLOSE+OPEN)),38);
ME:=EMA(PW1,8)*0.1,COLORSTICK;
MEE:=ABS(J);
V10:=PEAKBARS(C,15,1,1)<10;
V12:=IF(V10=1,50,0);
頭部:=IF(V12=50,100,0);
TOB:=J<=REF(J,1) OR K<=D;
賣(mài):IF(頭部>REF(頭部,1){ AND TOB},MEE,0),COLORGREEN,LINETHICK3;
V9:=TROUGHBARS(C,15,1,1)<10;
V11:=IF(V9=1,50,0);
底部:=IF(V11=50,50,0);
買(mǎi)底:IF(底部>REF(底部,1),MEE,0),COLORRED,LINETHICK2;
STICKLINE(買(mǎi)底,0,MEE*0.9,1,0),COLORRED;STICKLINE(賣(mài),0,MEE*0.9,1,0),COLORBLUE;STICKLINE(賣(mài),0,MEE*0.9,0.6,0),COLORWHITE;DRAWTEXT(底部>REF(底部,1),MEE,'★底買(mǎi)'),COLORYELLOW;DRAWTEXT(頭部>REF(頭部,1),MEE,'▲頂賣(mài)！'),COLORWHITE;DRAWTEXT(頭部>REF(頭部,1),MEE*1.04,'▲'),COLORWHITE;DRAWTEXT(頭部>REF(頭部,1),MEE*1.08,'▲'),COLORWHITE;??
?
?來(lái)源:程序化99
-
文華技術(shù)人員：
?
參考：
VAR1:=(2*CLOSE+HIGH+LOW)/40;VAR2:=EMA(EMA(EMA(VAR1,4),4),4);FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);J:=(VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK;D:=MA(J,3);K:=MA(J,1);PW1:=EMA(((VOL*(CLOSE-OPEN)*240/FROMOPEN)/(CLOSE+OPEN)),38);ME:=EMA(PW1,8)*0.1,COLORSTICK;MEE:=ABS(J);V10:=PEAKBARS(C,15,1,1)<10;V12:=IF(V10=1,50,0);頭部:=IF(V12=50,100,0);TOB:=J<=REF(J,1) OR K<=D;賣(mài):=IF(頭部>REF(頭部,1){ AND TOB},MEE,0),COLORGREEN,LINETHICK3;V9:=TROUGHBARS(C,15,1,1)<10;V11:=IF(V9=1,50,0);底部:=IF(V11=50,50,0);買(mǎi)底:=IF(底部>REF(底部,1),MEE,0),COLORRED,LINETHICK2;DRAWTEXT(底部>REF(底部,1),L,'★底買(mǎi)'),COLORYELLOW,VALIGN0;DRAWTEXT(頭部>REF(頭部,1),H,'▲頂賣(mài)！'),COLORWHITE;DRAWTEXT(頭部>REF(頭部,1),L*0.96,'▲'),COLORWHITE,VALIGN0;DRAWTEXT(頭部>REF(頭部,1),H*1.04,'▲'),COLORWHITE;?DRAWCOLORKLINE(K>D&&(ISUP||ISEQUAL),COLORRED,1);DRAWCOLORKLINE(K>D&&ISDOWN,COLORRED,0);DRAWCOLORKLINE(K<D&&(ISUP||ISEQUAL),COLORCYAN,1);DRAWCOLORKLINE(K<D&&ISDOWN,COLORCYAN,0);DRAWCOLORKLINE(K=D&&(ISUP||ISEQUAL),COLORWHITE,1);DRAWCOLORKLINE(K=D&&ISDOWN,COLORWHITE,0);
?
打印本文
關(guān)閉窗口