烦请老师修改一下公式

蒙太奇

以下为文华财经的一个公式，烦请论坛老师修改成金字塔格式的，谢谢！
N: =1;
N1: =1;
N2: =1;
HH:=HHV(HIGH,1)/5+HHV(HIGH,2)/5+HHV(HIGH,2)/5+HHV(HIGH,5)/5+HHV   (HIGH,8)/5;
LL:=LLV(LOW,1)/5+LLV(LOW,2)/5+LLV(LOW,2)/5+LLV(LOW,5)/5+LLV(LOW,8)/5;
H1:= IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);
L1:= IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
GG:=IFELSE(K2=1,H2,L2);
GG1:=VALUEWHEN(ISLASTBAR,GG);
DRAWNUMBER(LL>0,GG1,GG1,0,COLORCYAN);
TMP1:=K2;
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(TMP1=1&&REF(TMP1,1)=1,GG,TMP1=1&&REF(TMP1,1)=1,REF   (GG,1),COLORCYAN);
DRAWLINE(TMP1=-3&&REF(TMP1,1)=-3,GG,TMP1=-3&&REF(TMP1,1)=-3,REF   (GG,1),COLORRED);
DRAWSL(K2=1,GG,0,1,0,COLORCYAN);
DRAWSL(K2=-3,GG,0,1,0,COLORRED);
STICKLINE(K2=1&&ISDOWN,CLOSE,OPEN,COLORCYAN,0);
STICKLINE(K2=-3,CLOSE,OPEN,COLORYELLOW,1);
STICKLINE(K2=1&&ISUP,CLOSE,OPEN,COLORCYAN,1);
STICKLINE(K2=1&&ISDOWN,CLOSE,OPEN,COLORCYAN,0);
STICKLINE(K2=1&&ISUP,CLOSE,OPEN,COLORCYAN,1);
STICKLINE(K2=-3&&ISDOWN,CLOSE,OPEN,COLORRED,0);
STICKLINE(K2=-3&&ISUP,CLOSE,OPEN,COLORRED,1);
OCH:=MAX(OPEN,CLOSE);
OCL:=MIN(OPEN,CLOSE);
DRAWLINE(K2=1,HIGH,K2=1,OCH,COLORCYAN);
DRAWLINE(K2=1,LOW,K2=1,OCL,COLORCYAN);
DRAWLINE(K2=-3,HIGH,K2=-3,OCH,COLORRED);
DRAWLINE(K2=-3,LOW,K2=-3,OCL,COLORRED);
MID:=MA(CLOSE,10),POINTDOT,RGB(0,150,0);
TMP2:=STD(CLOSE,10);
TOP:MID+2*TMP2,POINTDOT,RGB(128,255,128);
BOTTOM:MID-2*TMP2,POINTDOT,RGB(128,255,128);
MB1:EMA(CLOSE,13),COLORYELLOW,DOT;
MB2:EMA(MB1,3),RGB(140,140,255),DOT;
MB3:EMA(MB2,3),RGB(140,140,255),DOT;
MB4:EMA(MB3,3),RGB(140,140,255),DOT;
MB5:EMA(MB4,3),RGB(140,140,255),DOT;
差值:MB1-MB5,COLORYELLOW,NODRAW;
DRAWTEXT(CROSS(TMP1,0),HH,'卖↓'),COLORGREEN;
DRAWTEXT(CROSS(0,TMP1),LL,'买↑'),COLORYELLOW;
PBM:(EMA(CLOSE,26)+MA(CLOSE,52)+MA(CLOSE,104))/3,COLORRED,LINETHICK2;
CROSS(0,TMP1)&&LL>PBM||(BARSLAST(CROSS(0,TMP1)&&LL<PBM)>0&&CROSS(C,PBM)),BK;
CROSS(TMP1,0)&&BKVOL>0,SP;
CROSS(TMP1,0)&&HH<PBM||(BARSLAST(CROSS(TMP1,0)&&HH>PBM)<0&&CROSSDOWN(C,PBM)),SK;
CROSS(0,TMP1)&&SKVOL>0,BP;
AUTOFILTER;
[此问答已经被作者于2023/5/18 17:10:02编辑过]

技术009

[PEL] 复制代码

n: =1;
n1: =1;
n2: =1;
hh:=hhv(high,1)/5+hhv(high,2)/5+hhv(high,2)/5+hhv(high,5)/5+hhv   (high,8)/5;
ll:=llv(low,1)/5+llv(low,2)/5+llv(low,2)/5+llv(low,5)/5+llv(low,8)/5;
h1:= ifelse(h<ref(h,2)&&ref(h,1)<ref(h,2),ref(h,2),0);
l1:= ifelse(l>ref(l,2)&&ref(l,1)>ref(l,2),ref(l,2),0);
h2:=valuewhen(h1>0,h1);
l2:=valuewhen(l1>0,l1);
k1:=ifelse(close>h2,-3,ifelse(close<l2,1,0));
k2:=valuewhen(k1<>0,k1);
gg:=ifelse(k2=1,h2,l2);
gg1:=valuewhen(islastbar,gg);
drawnumber(ll>0,gg1,gg1,0,colorcyan);
tmp1:=k2;
w1:=k2;
w2:=open-close;
ht:=ifelse(open>close,open,close);
lt:=ifelse(open<close,open,close);
drawline(tmp1=1&&ref(tmp1,1)=1,gg,tmp1=1&&ref(tmp1,1)=1,ref   (gg,1),colorcyan);
drawline(tmp1=-3&&ref(tmp1,1)=-3,gg,tmp1=-3&&ref(tmp1,1)=-3,ref   (gg,1),colorred);
drawsl(k2=1,gg,0,1,0,colorcyan);
drawsl(k2=-3,gg,0,1,0,colorred);
stickline(k2=1&&isdown,close,open,colorcyan,0);
stickline(k2=-3,close,open,coloryellow,1);
stickline(k2=1&&isup,close,open,colorcyan,1);
stickline(k2=1&&isdown,close,open,colorcyan,0);
stickline(k2=1&&isup,close,open,colorcyan,1);
stickline(k2=-3&&isdown,close,open,colorred,0);
stickline(k2=-3&&isup,close,open,colorred,1);
och:=max(open,close);
ocl:=min(open,close);
drawline(k2=1,high,k2=1,och,colorcyan);
drawline(k2=1,low,k2=1,ocl,colorcyan);
drawline(k2=-3,high,k2=-3,och,colorred);
drawline(k2=-3,low,k2=-3,ocl,colorred);
mid:=ma(close,10);
tmp2:=std(close,10);
top:mid+2*tmp2;
bottom:mid-2*tmp2;
mb1:ema(close,13),coloryellow;
mb2:ema(mb1,3);
mb3:ema(mb2,3);
mb4:ema(mb3,3);
mb5:ema(mb4,3);
差值:mb1-mb5,coloryellow,nodraw;
drawtext(cross(tmp1,0),hh,'卖↓'),colorgreen;
drawtext(cross(0,tmp1),ll,'买↑'),coloryellow;
pbm:(ema(close,26)+ma(close,52)+ma(close,104))/3,colorred,linethick2;

kd:cross(0,tmp1)&&ll>pbm||(barslast(cross(0,tmp1)&&ll<pbm)>0&&cross(c,pbm));
pd:cross(tmp1,0);
kk:cross(tmp1,0)&&hh<pbm||(barslast(cross(tmp1,0)&&hh>pbm)<0&&cross(pbm,c));
pk:cross(0,tmp1);


buy(kd and holding=0,1,market);
sell(pd,holding,market);
buyshort(kk and holding=0,1,market);
sellshort(pk,holding,market);

主要是交易逻辑这块，其他绘图效果上的如颜色这种 就随意了，没怎么调整了。我建议你可以注释掉部分绘图效果，看上去线条太多了。

蒙太奇

好的，谢谢！我先看一下