// 以下是原超級趨勢指標的后續邏輯 L1:=REF(UP,BARSLAST(UP<=REF(UP,1)));L2:=LLV(UP,N1);LL:=IF(L2<>REF(L2,1) AND L1<REF(L1,1),L1,IF(L1=L2,L1,L2));S1:=BARSLAST(CROSS(0.5,UP=LL))+1;S2:=CROSS(COUNT((CROSS(C,LL) OR CROSS(C,REF(LL,2))) AND UP>LL,S1),0.5);A6:=BARSLAST(S2);B6:=BARSLAST(CROSS(HHV(DN,A6+1),C));BY:=CROSS(B6,A6);SL:=CROSS(A6,B6);SUPERTREN:=IF(B6>A6,HHV(DN,BARSLAST(BY)+1),LLV(UP,BARSLAST(SL)+1));ST1:IF(B6<=A6,SUPERTREN,NULL),COLORGREEN,LINETHICK2;ST2:IF(B6>A6,SUPERTREN,NULL),COLORRED,LINETHICK2; DRAWICON(CROSS(B6,A6),SUPERTREN,'CO7';DRAWICON(CROSS(A6,B6),SUPERTREN,'CO8';買進:CROSS(B6,A6)*100,NODRAW,COLORRED;賣出:CROSS(A6,B6)*100,NODRAW,COLORGREEN;DIF:=100*(EMA(CLOSE,12)-EMA(CLOSE,26)),COLORWHITE,LINETHICK1;?//計算12日指數移動平均與26日指數移動平均的差值乘以100，定義為DIF指標線，顯示為白色，線寬為1?DEA:=EMA(DIF,9),COLORYELLOW,LINETHICK1; //對DIF值進行9日指數移動平均計算，定義為DEA指標線，顯示為黃色，線寬為1?MACD:=(DIF-DEA)*2; //計算MACD柱狀線值，其值為(DIF-DEA)的兩倍?QEAAA:=C>UP AND MACD>0; //定義QEAAA條件：當前收盤價高于20日最高價且MACD柱狀線為正?QEBBB:=C<DN AND MACD<0 ; //定義QEBBB條件：當前收盤價低于20日最低價且MACD柱狀線為負?DRAWGBK1(BARSLAST(QEAAA)<BARSLAST(QEBBB),RGB(64,0,0)); //當最近QEAAA條件發生的K線位置早于QEBBB條件時，用深紅色(RGB64,0,0)繪制背景?DRAWGBK1(BARSLAST(QEBBB)<BARSLAST(QEAAA),RGB(0,64,0)); //當最近QEBBB條件發生的K線位置早于QEAAA條件時，用深綠色(RGB0,64,0)繪制背景?DRAWTEXT(CROSS(BARSLAST(QEAAA)<BARSLAST(QEBBB),0.5),L,'',COLORRED,FONTSIZE20,VALIGN0; //當QEAAA條件更近的信號首次成立時，在最低價位置顯示紅色"多"字，字號20，底部對齊?DRAWTEXT(CROSS(BARSLAST(QEAAA)>BARSLAST(QEBBB),0.5),H,'',COLORGREEN,FONTSIZE20; //當QEBBB條件更近的信號首次成立時，在最高價位置顯示綠色"空"字，字號20?DRAWKLINE1(H,O,L,C); //繪制包含最高價、開盤價、最低價、收盤價的K線圖 這是完整版的代碼
打印本文
關閉窗口