编写一个面积公式

技术008

电话说

sniper

你看看，  我公司是不是放错地方了。
马上打你电话

sniper

// MACD指标
DIFF :EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  :EMA(DIFF,9);                  
MACD :2 * (DIFF - DEA),COLORSTICK;

//中间变量
n1:=SUMBARS(MACD>0 AND REF(MACD<0,1),1);
n2:=SUMBARS(MACD<0 AND REF(MACD>0,1),1);
sum_red_areas:REF(SUM(MACD,n1),n2),LINETHICK0;//红柱面积
sum_green_areas:REF(SUM(MACD,n2),n1),LINETHICK0;//绿柱面积

n3:=SUMBARS(MACD>0 AND REF(MACD<0,1),2);
n4:=SUMBARS(MACD<0 AND REF(MACD>0,1),2);
sum_red_areas2:REF(SUM(MACD,n1),n4),LINETHICK0;//红柱面积
sum_green_areas2:REF(SUM(MACD,n2),n3),LINETHICK0;//绿柱面积

  //红柱
IF CROSS(0,MACD) and sum_red_areas<sum_red_areas2*1.5 THEN BEGIN
        DRAWTEXT(1,0,'涨',COLORRED);
   END

  //绿柱
IF CROSS(MACD,0) and abs(sum_green_areas)<abs(sum_green_areas2)*1.5 THEN BEGIN
        DRAWTEXT(1,0,'跌',COLORYELLOW);
   END
   
  cond:CROSS(0,MACD) and sum_red_areas<sum_red_areas2*1.5;
  cond1:CROSS(MACD,0) and abs(sum_green_areas)<abs(sum_green_areas2)*1.5;



————————————————————————————————
(相邻的红柱面积，后面红柱面积比上前一个红柱面积大于1.5&#160;&#160;，提示涨
相邻的绿柱面积，后面绿柱面积比上前一个绿柱面积大于1.5&#160;&#160;，提示跌
主要是红柱面积比红柱面积。。 不是红柱和绿柱面积比)
以上是这断写的公式需要加一个参数。
后面一段连续红柱子的最高点低于前面一段连续的红柱子最高点高，再结合上面的条件才提示涨。
后面一段连续绿柱子的最低点高于前面一段连续的绿柱子最低点低，再结合上面的条件才提示跌
这段和上面的结合起来。
1、相邻的红柱面积，后面红柱面积比上前一个红柱面积大于1.5&#160;&#160;并且后面一段连续红柱子的最高点低于前面一段连续的红柱子最高点高，再结合上面的条件才提示涨。
2、相邻的绿柱面积，后面绿柱面积比上前一个绿柱面积大于1.5&#160;&#160;并且后面一段连续绿柱子的最低点高于前面一段连续的绿柱子最低点低，再结合上面的条件才提示跌。
看看这样结合起来，写一个看看

sniper

你好， 这种两个条件一起的。。  写看看。。  
经过你的指点，  我分时提示会了。
不顾多一个条件，不会~

admin

第20行到23行时计算最大最小值的，条件组合需要你自行完成。

[PEL] 复制代码

// MACD指标
DIFF :EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  :EMA(DIFF,9);                  
MACD :2 * (DIFF - DEA),COLORSTICK;

//中间变量
n1:=SUMBARS(MACD>0 AND REF(MACD<0,1),1);
n2:=SUMBARS(MACD<0 AND REF(MACD>0,1),1);
sum_red_areas:=REF(SUM(MACD,n1),n2),LINETHICK0;//红柱面积
sum_green_areas:=REF(SUM(MACD,n2),n1),LINETHICK0;//绿柱面积



n3:=SUMBARS(MACD>0 AND REF(MACD<0,1),2);
n4:=SUMBARS(MACD<0 AND REF(MACD>0,1),2);
sum_red_areas2:=REF(SUM(MACD,n1),n4),LINETHICK0;//红柱面积
sum_green_areas2:=REF(SUM(MACD,n2),n3),LINETHICK0;//绿柱面积


sum_red_HH:REF(HHV(MACD,n1),n2),LINETHICK0;//红柱最大
sum_green_LL:REF(llv(MACD,n2),n1),LINETHICK0;//绿柱最小
sum_red_HH2:REF(HHV(MACD,n1),n4),LINETHICK0;
sum_green_LL2:REF(llv(MACD,n2),n3),LINETHICK0;

  //红柱
IF CROSS(0,MACD) and sum_red_areas<sum_red_areas2*1.5 THEN BEGIN
        DRAWTEXT(1,0,'涨',COLORRED);
   END

  //绿柱
IF CROSS(MACD,0) and abs(sum_green_areas)<abs(sum_green_areas2)*1.5 THEN BEGIN
        DRAWTEXT(1,0,'跌',COLORYELLOW);
   END
   
  cond:CROSS(0,MACD) and sum_red_areas<sum_red_areas2*1.5;
  cond1:CROSS(MACD,0) and abs(sum_green_areas)<abs(sum_green_areas2)*1.5;

sniper

1、sum_red_HH:REF(HHV(MACD,n1),n2),LINETHICK0;//红柱最大
红柱和？还是对于的K线值和？还是对应的K线值最大？



sum_red_HH2:REF(HHV(MACD,n1),n4),LINETHICK0;
这个HH2是值得钱一段还是最近的一段？

admin

sniper 发表于 2025-6-27 13:44
1、sum_red_HH:REF(HHV(MACD,n1),n2),LINETHICK0;//红柱最大
红柱和？还是对于的K线值和？还是对应的K线值 ...

单根柱子，这种建议加载到图中，自己对照结果分析下，这样有助于反向理解代码函数的特性和逻辑。

sniper

//红柱
IF CROSS(0,MACD) and  sum_red_HH THEN BEGIN
        DRAWTEXT(1,0,'HH',COLORRED);
加了这段，，无法把最大值显示出来呢。。
如何把最大值变量列出来？并显示在柱子中间上方。。 因为交叉地方显示其他字了

技术009

你要输出数值，你这样是输出字符串了。

改为： DRAWTEXT(1,0,NUMTOSTR(HH,3),COLORRED);

sniper

提示未定义变量HH