// 參數設置
N1 := 20; // 大周期均線參數1
N2 := 60; // 大周期均線參數2
VOLUME_MA_PERIOD := 3; // 成交量對比的周期

// 1. 大周期趨勢判斷 (基于1小時數據)
HHV_H1 := CALLSTOCK('', VT_HOUR, 5, -1); // 1小時最高價
LLV_H1 := CALLSTOCK('', VT_HOUR, 6, -1); // 1小時最低價
CLOSE_H1 := CALLSTOCK('', VT_HOUR, 2, -1); // 1小時收盤價
EMA20_H1 := EMA(CLOSE_H1, N1);
EMA60_H1 := EMA(CLOSE_H1, N2);

// 計算大周期趨勢條件 (1:多, -1:空, 0:震蕩)
COND_TREND_UP := CLOSE_H1 > EMA20_H1 AND EMA20_H1 > EMA60_H1 AND LLV_H1 > REF(LLV_H1, 1) AND HHV_H1 >= REF(HHV_H1, 1);
COND_TREND_DOWN := CLOSE_H1 < EMA20_H1 AND EMA20_H1 < EMA60_H1 AND HHV_H1 < REF(HHV_H1, 1) AND LLV_H1 <= REF(LLV_H1, 1);
TREND_H1 := IFELSE(COND_TREND_UP, 1, IFELSE(COND_TREND_DOWN, -1, 0));

// 2. 關鍵點位與均線劃分多空區域
KEY_RESISTANCE := VALUEWHEN(DATE<>REF(DATE,1), REF(HHV(H, 0), 1)); // 昨日高點
KEY_SUPPORT := VALUEWHEN(DATE<>REF(DATE,1), REF(LLV(L, 0), 1)); // 昨日低點
OPEN_PRICE := VALUEWHEN(DATE<>REF(DATE,1), O); // 今日開盤價

EMA20_CURRENT := EMA(C, N1); // 當前周期（如5分鐘）的EMA20
EMA60_CURRENT := EMA(C, N2); // 當前周期（如5分鐘）的EMA60

// 當前K線多空區域條件
COND_CURRENT_ABOVE_KEY := C > KEY_RESISTANCE && C > OPEN_PRICE; // 價格在關鍵阻力上方
COND_CURRENT_BELOW_KEY := C < KEY_SUPPORT && C < OPEN_PRICE; // 價格在關鍵支撐下方
COND_MA_UP := C > EMA20_CURRENT && EMA20_CURRENT > EMA60_CURRENT; // 均線多頭排列
COND_MA_DOWN := C < EMA20_CURRENT && EMA20_CURRENT < EMA60_CURRENT; // 均線空頭排列

// 3. 成交量驗證
VOL_MA := MA(V, VOLUME_MA_PERIOD); // 最近3根K線的均量
VOLUME_SPIKE := V > VOL_MA * 1.3; // 成交量放大30%以上
VOLUME_SHRINK := V < VOL_MA * 0.8; // 成交量萎縮20%以上

// 4. 小周期趨勢延續性 (與H1趨勢對比)
// 這里直接在當前小周期圖表上觀察，可通過畫線或顏色提示

// 5. 趨勢連續性信號 (過濾震蕩)
// 連續3根K線站穩/跌破關鍵均線
CONSECUTIVE_ABOVE_MA := COUNT(C > EMA20_CURRENT, 3) == 3;
CONSECUTIVE_BELOW_MA := COUNT(C < EMA20_CURRENT, 3) == 3;

// 綜合信號與可視化呈現

// 繪制大周期趨勢背景色 (副圖或主圖背景)
FILLRGN(TREND_H1 == 1, 0, COLORRGB(200, 255, 200)), LAYER0; // 多頭趨勢-淺綠背景
FILLRGN(TREND_H1 == -1, 0, COLORRGB(255, 200, 200)), LAYER0; // 空頭趨勢-淺紅背景

// 繪制關鍵價位線
KEY_RESISTANCE, COLORRED, LINETHICK2;
KEY_SUPPORT, COLORGREEN, LINETHICK2;
OPEN_PRICE, COLORBLUE, LINETHICK1;

// 繪制均線
EMA20_CURRENT, COLORCYAN, LINETHICK2;
EMA60_CURRENT, COLORYELLOW, LINETHICK2;

// 在K線上畫箭頭標記成交量驗證點
STICKLINE(VOLUME_SPIKE && C>REF(C,1), L, L*0.998, 4, 0), COLORRED; // 放量上漲，在最低價下方畫紅色箭頭
STICKLINE(VOLUME_SPIKE && C<REF(C,1), H, H*1.002, 4, 0), COLORGREEN; // 放量下跌，在最高價上方畫綠色箭頭
STICKLINE(VOLUME_SHRINK, (H+L)/2, (H+L)/2, 8, 0), COLORGRAY; // 縮量，在K線中點畫灰色點

// 文字提示（左上角）
DRAWTEXT_FIX(ISLASTBAR, 0, 0, 0, '--- 日內多空趨勢系統 ---'), COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR, 0, 0.05, 0, '大周期(H1)趨勢：'), COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR, 0.15, 0.05, 0, IFELSE(TREND_H1==1, '多頭', IFELSE(TREND_H1==-1, '空頭', '震蕩'))), IFELSE(TREND_H1==1, COLORRED, IFELSE(TREND_H1==-1, COLORGREEN, COLORYELLOW));
DRAWTEXT_FIX(ISLASTBAR, 0, 0.10, 0, '操作建議：'), COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR, 0.10, 0.10, 0, IFELSE(TREND_H1==1, '逢低做多', IFELSE(TREND_H1==-1, '逢高做空', '區間操作'))), IFELSE(TREND_H1==1, COLORRED, IFELSE(TREND_H1==-1, COLORGREEN, COLORYELLOW));

?

?來源:程序化99