求一个指标编写

技术008

这不是对的吗，5月份呢和09一样

技术008

你多重的话要用if then
begin

end

要用begin和end括起来

孔艺涵

FirstTradeDay:=WEEKDAY<ref(WEEKDAY,1) or DATEDIFF(ref(date,1),date)>=8;   
bars:=barslast(month<>ref(month,1));
//这个就是第几周
num:=count(FirstTradeDay,bars+1);
if (month=4 and num>3) OR (month>4 and month<8)  then  BEGIN tempopen:=callstock('jd09',vtopen,6,0) ;temphigh:=callstock('jd09',vtHIGH,6,0);tempclose:=callstock('jd09',vtCLOSE,6,0);templow:=callstock('jd09',vtLOW,6,0); END;

if (month=8 and num>3) OR (month>8 and month<12)  then BEGIN tempopen:=callstock('jd01',vtopen,6,0) ;temphigh:=callstock('jd01',vtHIGH,6,0);tempclose:=callstock('jd01',vtCLOSE,6,0);templow:=callstock('jd01',vtLOW,6,0);END;
if (month=12 and num>3) OR (month>=1 and month<4)  then BEGIN tempopen:=callstock('jd05',vtopen,6,0) ;temphigh:=callstock('jd05',vtHIGH,6,0);tempclose:=callstock('jd05',vtCLOSE,6,0);templow:=callstock('jd05',vtLOW,6,0);END;
cd1:=tempclose>=tempopen;//区分阴阳线的，与上面条件无关
STICKLINE(1 ,tempclose,tempopen,8,if(cd1,1,0),COLORYELLOW);//绘制柱体
//绘制上下影线
STICKLINE(1,if(not(cd1),tempopen,tempclose),temphigh,0,if(cd1,1,0),COLORYELLOW);
STICKLINE(1,if(cd1,tempopen,tempclose),templow,0,if(cd1,1,0),COLORYELLOW);

孔艺涵

技术008 发表于 2024-9-13 13:45
用逐k模式不要用序列模式

画出来的K线 每到 换品种的月份后边就会出现异常

孔艺涵

画出来的K线 每到 换品种的月份后边就会出现异常

孔艺涵

画出来K线 每到 换品种的月份后几天就不正常

技术008

FirstTradeDay:=WEEKDAY<ref(WEEKDAY,1) or DATEDIFF(ref(date,1),date)>=8;   
bars:=barslast(month<>ref(month,1));
//这个就是第几周
num:=count(FirstTradeDay,bars+1);
if (month=4 and num>=3) OR (month>4 and month<8) or (month=8 and num<3)  then  BEGIN tempopen:=callstock('jd09',vtopen,6,0) ;temphigh:=callstock('jd09',vtHIGH,6,0);tempclose:=callstock('jd09',vtCLOSE,6,0);templow:=callstock('jd09',vtLOW,6,0); END;

if (month=8 and num>=3) OR (month>8 and month<12) or (month=12 and num<3) then BEGIN tempopen:=callstock('jd01',vtopen,6,0) ;temphigh:=callstock('jd01',vtHIGH,6,0);tempclose:=callstock('jd01',vtCLOSE,6,0);templow:=callstock('jd01',vtLOW,6,0);END;
if (month=12 and num>=3) OR (month>=1 and month<4) or (month=4 and num<3) then BEGIN tempopen:=callstock('jd05',vtopen,6,0) ;temphigh:=callstock('jd05',vtHIGH,6,0);tempclose:=callstock('jd05',vtCLOSE,6,0);templow:=callstock('jd05',vtLOW,6,0);END;

cd1:=tempclose>=tempopen;//区分阴阳线的，与上面条件无关
STICKLINE(1 ,tempclose,tempopen,8,if(cd1,1,0),COLORYELLOW);//绘制柱体
//绘制上下影线
STICKLINE(1,if(not(cd1),tempopen,tempclose),temphigh,0,if(cd1,1,0),COLORYELLOW);
STICKLINE(1,if(cd1,tempopen,tempclose),templow,0,if(cd1,1,0),COLORYELLOW);

技术008

应该是时间上没控制好，你再看看
或者自己去是这调整那几个时间点

孔艺涵

技术008 发表于 2024-9-13 14:35
FirstTradeDay:=WEEKDAY=8;   
bars:=barslast(monthref(month,1));
//这个就是第几周

可以了 还有一点小需求 在切换品种的时候 在横坐标相对位置显示品种名称

技术008

FirstTradeDay:=WEEKDAY<ref(WEEKDAY,1) or DATEDIFF(ref(date,1),date)>=8;   
bars:=barslast(month<>ref(month,1));
//这个就是第几周
num:=count(FirstTradeDay,bars+1);
if (month=4 and num>=3) OR (month>4 and month<8) or (month=8 and num<3)  then  BEGIN name:='jd09';tempopen:=callstock('jd09',vtopen,6,0) ;temphigh:=callstock('jd09',vtHIGH,6,0);tempclose:=callstock('jd09',vtCLOSE,6,0);templow:=callstock('jd09',vtLOW,6,0); END;

if (month=8 and num>=3) OR (month>8 and month<12) or (month=12 and num<3) then BEGIN name:='jd01';tempopen:=callstock('jd01',vtopen,6,0) ;temphigh:=callstock('jd01',vtHIGH,6,0);tempclose:=callstock('jd01',vtCLOSE,6,0);templow:=callstock('jd01',vtLOW,6,0);END;
if (month=12 and num>=3) OR (month>=1 and month<4) or (month=4 and num<3) then BEGIN name:='jd05';tempopen:=callstock('jd05',vtopen,6,0) ;temphigh:=callstock('jd05',vtHIGH,6,0);tempclose:=callstock('jd05',vtCLOSE,6,0);templow:=callstock('jd05',vtLOW,6,0);END;

cd1:=tempclose>=tempopen;//区分阴阳线的，与上面条件无关
STICKLINE(1 ,tempclose,tempopen,8,if(cd1,1,0),COLORYELLOW);//绘制柱体
//绘制上下影线
STICKLINE(1,if(not(cd1),tempopen,tempclose),temphigh,0,if(cd1,1,0),COLORYELLOW);
STICKLINE(1,if(cd1,tempopen,tempclose),templow,0,if(cd1,1,0),COLORYELLOW);

DRAWTEXT(1 ,low ,name);