求助一个文华6简单实用的副图指标代码

mormon

求大佬给一个能适配文华6语言的副图指标代码，类似于macd和kdj叠加的副图指标，另外就是，我属于新手，之前编辑过自编指标，因为出错现在编辑不了也删除不了。叠加指标图形简单就好。类似下图，忘不要嫌弃我cb少.。

ipc2008

以下是一个将MACD和KDJ指标叠加显示在副图中的文华6语言指标代码：

/*----------------------------------------------
  指标名称：MACD+KDJ叠加副图指标
  适用平台：文华6
  编写思路：将MACD和KDJ指标叠加显示在副图中
----------------------------------------------*/


// MACD参数
INPUT:
    SHORT(12,5,40),    // 短期EMA周期
    LONG(26,10,100),   // 长期EMA周期
    MID(9,2,20);       // DEA周期


// KDJ参数
INPUT:
    N(9,1,100),        // KDJ计算周期
    M1(3,1,100),       %K的平滑周期
    M2(3,1,100);       %D的平滑周期


// 计算MACD
DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;


// 计算KDJ
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1);
D:SMA(K,M2,1);
J:3*K-2*D;


// 调整KDJ数值范围以适应MACD显示
SCALE_FACTOR := (HHV(DIF,100)-LLV(DEA,100))/(100);
K_ADJ:K*SCALE_FACTOR+LLV(DEA,100);
D_ADJ:D*SCALE_FACTOR+LLV(DEA,100);
J_ADJ:J*SCALE_FACTOR+LLV(DEA,100);


// 绘制调整后的KDJ曲线
PLOT(K_ADJ,"K",COLORRED);
PLOT(D_ADJ,"D",COLORGREEN);
PLOT(J_ADJ,"J",COLORBLUE);


// 绘制MACD
PLOT(DIF,"DIF",COLORCYAN);
PLOT(DEA,"DEA",COLORYELLOW);


// 绘制零轴
ZERO_LINE:0,COLORGRAY;


// 设置指标显示范围
SETRANGESCALE(LLV(DEA,100)-10,HHV(DIF,100)+10);


使用说明：

• 此指标将MACD和KDJ叠加显示在同一个副图中
• MACD保持原有计算方式，使用柱状图显示
• KDJ指标经过数值调整，使其波动范围与MACD相匹配
• 各曲线使用不同颜色区分：
  
  • DIF: 青色
  • DEA: 黄色
  • K: 红色
  • D: 绿色
  • J: 蓝色
    
  
  

参数调整：您可以通过指标参数面板调整以下参数：

• MACD部分：SHORT(默认12)、LONG(默认26)、MID(默认9)
• KDJ部分：N(默认9)、M1(默认3)、M2(默认3)
  

mormon

用不了。我想回复你图片呢，结果上传不了图片。你也可以直接给我一个实用简单的组合代码，不要求精准买卖，任何指标都有滞后性，能有一个自己能大概率的就行，我有一个图片的，别人做好的，但我不会弄代码？

mormon

ipc2008 发表于 2026-1-12 08:55
以下是一个将MACD和KDJ指标叠加显示在副图中的文华6语言指标代码：

/*------------------------------- ...

// VERSION: 1.0
// AUTHOR: AUTO-GENERATED BY METALLAMA
// DESCRIPTION: 基于图片解析的焦煤期货主图与副图指标
// 参数设置
INPUT: LEN(14), K(9), D(3), D_SLOW(3);
// 主图：K线与均线
PLOT(CLOSE, "收盘价", COLORDEFAULT, STYLECANDLE);
PLOT(EMA(CLOSE, 10), "EMA10", COLORRED);
PLOT(EMA(CLOSE, 20), "EMA20", COLORGREEN);
// 副图：KDJ指标
VARS: K_VALUE(0), D_VALUE(0), J_VALUE(0);
KDJ(CLOSE, K, D, D_SLOW, K_VALUE, D_VALUE, J_VALUE);
PLOT(K_VALUE, "K值", COLORBLUE);
PLOT(D_VALUE, "D值", COLORRED);
PLOT(J_VALUE, "J值", COLORPURPLE);
// 副图：DEA (MACD) 指标
VARS: MACD_VALUE(0), SIGNAL_VALUE(0), HISTOGRAM_VALUE(0);
MACD(CLOSE, 12, 26, 9, MACD_VALUE, SIGNAL_VALUE, HISTOGRAM_VALUE);
PLOT(MACD_VALUE, "DIFF", COLORBLUE);
PLOT(SIGNAL_VALUE, "DEA", COLORRED);
PLOT(HISTOGRAM_VALUE, "MACD柱状图", COLORGREEN, STYLEHISTOGRAM);
// 关键点：顶背离信号 (假设为红色标记)
IF (ISTOPDIVERGENCE(CLOSE, K_VALUE, D_VALUE)) THEN
    PLOTSHAPE(SHAPETRIANGLEDOWN, "顶背离", COLORRED, LOCATIONABOVEBAR);
ENDIF;
你能帮我修改一下吗？

ipc2008

deepseek弄的，你自己试着让它帮你改

https://www.deepseek.com/

mormon

ipc2008 发表于 2026-1-12 12:48
deepseek弄的，你自己试着让它帮你改

https://www.deepseek.com/

好吧，我还是试着弄个一下