完整附图指标 很好用 直观方便 分享了 有需要的拿去就是
INPUT:M1(1,0,12,4),M2(1,0,12,4);//月份参数
ZERO:0,LINETHICK1,COLORGRAY;
STR:=STRTRIMRIGHT( STKLABEL, '0123456789');
//双年份合约,豆一和白糖虽然取消双年份,但是金字塔为保证老用户策略的正常操作,所以保持不变。因此依旧需要区分。
if STRCMP(STR,'AY')=0 or STRCMP(STR,'BUY')=0 OR STRCMP(STR,'SRY') THEN BEGIN
STR:=STRREPLACE(STR , 'Y','X' );
END
//注意 不支持原油合约。因为原油合约的代码规则不一样,不能直接拼接出来。
Mcode1:=STRCAT(STR ,STRRIGHT(NUMTOSTR(M1/100,2),2) );//拼接品种名称+月份 品种代码1。
Mcode2:=STRCAT(STR ,STRRIGHT(NUMTOSTR(M2/100,2),2) );//拼接品种名称+月份 品种代码2。
JC1:c-CALLSTOCK(Mcode1,vtCLOSE,-1,0),COLORWHITE;//Mcode1 是你指定月份的当前品种的合约。不支持对原油品种的处理。
JC2:c-CALLSTOCK(Mcode2,vtCLOSE,-1,0),COLORRED;
DRAWTEXTEX(ISLASTBAR,0 ,0 ,0 ,Mcode1),COLORWHITE;
DRAWTEXTEX(ISLASTBAR,0 ,37,0 ,Mcode2),COLORRED;