咨詢內(nèi)容：

請(qǐng)老師將下面引用跨周期部分更改一下，謝謝

MA30:=MA(C,M2),COLORRED,LINETHICK2;
MA15:=MA(C,M1),COLORRED,LINETHICK2;
PARTLINE2(MA30,C>REF(C,M2),COLORRED,C<=REF(C,M2),COLORGREEN),LINETHICK2;
PARTLINE2(MA15,C>REF(C,M1),COLORRED,C<=REF(C,M1),COLORGREEN),LINETHICK1;
MA120:MA(C,120);

N:=BARSLAST(DATE<>REF(DATE,1))+1;
JZ1:=HHV(H,N);
HZ1:=REF(HHV(H,N),N);
QZ1:=REF(REF(HHV(H,N),N),N);
HH:=HHV(H,N-1);
JZ2:=LLV(L,N);
HZ2:=REF(LLV(L,N),N);
QZ2:=REF(REF(LLV(L,N),N),N);
LL:=LLV(L,N-1);
綠一:=HZ1=MAX(JZ1,HZ1);
綠二:=REF(C,N)>REF(O,N)&&C>MAX(HH,HZ1)&&C<HZ2;
綠三:=C<REF(L,BARSLAST(C<O)+1);
綠四:=C<HZ2;
VV:=((REF(C,1)>REF(O,1) AND H>REF(H,1) AND C<REF(L,1))) OR (REF(H,1)=HHV(H,3) AND C<REF(L,1)) OR C<REF(L,BARSLAST(C>O)) ;
紅一:=HZ2=MIN(JZ2,HZ2);
紅二:=REF(C,N)<REF(O,N)&&C<MIN(LL,HZ2)&&C>HZ1;
紅三:=C>REF(H,BARSLAST(C<O)+1);
紅四:=C>HZ1;
OO:=(REF(L,1)=LLV(L,3) AND C>REF(H,1)) OR ((REF(O,1)>REF(C,1) AND L<REF(L,1) AND C>REF(H,1))) OR C>REF(H,BARSLAST(C<O));
COUD1:=CROSS(COUNT(VV,BARSLAST(OO))=1,0.5);
COUD2:=CROSS(COUNT(OO,BARSLAST(VV))=1,0.5);
STICKLINE(COUD1,O,CLOSE,12,0),COLORBLUE;
STICKLINE(COUD2,O,CLOSE,12,0),COLORMAGENTA;

//穿線K
FF:=CROSS(C,MA30);
FF1:=CROSS(C,MA15);
HHH:=CROSS(FF,FF1);
AA:=MA(C,M1);
BB:=MA(C,M2);
EE:=L<=BB;
FF2:=H>=BB;
CC1:=AA>BB AND C<=BB;
DD1:=AA<BB AND C>=BB;
CC:=AA>BB AND C>=AA AND C>=BB AND EE;
DD:=AA<BB AND C<=AA AND C<=BB AND FF2;
A1:=L > REF(H,1);
A2:=H < REF(L,1);
A5:=LLV(H,240);
A6:=100 * (C - A5) / A5;
A7:=(C - LLV(L,528)) / (HHV(H,528) - LLV(L,528)) * 100;
A8:=(C - LLV(C,530)) / (HHV(C,530) - LLV(C,530)) * 100;
A9:=(0);
A10:=SMA(MAX(C - REF(C,1),0),34,1) / SMA(ABS(C - REF(C,1)),7,1) * 100;
A11:=SMA(MAX(C - REF(C,1),0),13,1) / SMA(ABS(C - REF(C,1)),13,1) * 100;
A12:=IF(TROUGHBARS(L,2,10,1) = 0 AND H > L + 0.04,4,0);
A13:=ZIG(C,6,1) > REF(ZIG(C,6,1),1) AND REF(ZIG(C,6,1),1) <= REF(ZIG(C,6,1),2) AND REF(ZIG(C,6,1),2) <= REF(ZIG(C,6,1),3);
A14:=ZIG(C,6,1) < REF(ZIG(C,6,1),1) AND REF(ZIG(C,6,1),1) >= REF(ZIG(C,6,1),2) AND REF(ZIG(C,6,1),2) >= REF(ZIG(C,6,1),3);
A15:=ZIG(C,22,1) > REF(ZIG(C,22,1),1) AND REF(ZIG(C,22,1),1) <= REF(ZIG(C,22,1),2) AND REF(ZIG(C,22,1),2) <= REF(ZIG(C,22,1),3);
A16:=ZIG(C,22,1) < REF(ZIG(C,22,1),1) AND REF(ZIG(C,22,1),1) >= REF(ZIG(C,22,1),2) AND REF(ZIG(C,22,1),2) >= REF(ZIG(C,22,1),3);
A17:=ZIG(C,51,1) > REF(ZIG(C,51,1),1) AND REF(ZIG(C,51,1),1) <= REF(ZIG(C,51,1),2) AND REF(ZIG(C,51,1),2) <= REF(ZIG(C,51,1),3);
A18:=ZIG(C,51,1) < REF(ZIG(C,51,1),1) AND REF(ZIG(C,51,1),1) >= REF(ZIG(C,51,1),2) AND REF(ZIG(C,51,1),2) >= REF(ZIG(C,51,1),3);
A19:=ZIG(C,72,1) > REF(ZIG(C,72,1),1) AND REF(ZIG(C,72,1),1) <= REF(ZIG(C,72,1),2) AND REF(ZIG(C,72,1),2) <= REF(ZIG(C,72,1),3);
A20:=ZIG(C,72,1) < REF(ZIG(C,72,1),1) AND REF(ZIG(C,72,1),1) >= REF(ZIG(C,72,1),2) AND REF(ZIG(C,72,1),2) >= REF(ZIG(C,72,1),3);
A21:=EMA(C,2) - EMA(C,150);
A22:=(A12);
A23:=A13 + A15 + A17 + A19;
A24:=A14 + A16 + A18 + A20;
A80:=(10);
A81:=REF(H,A80) = HHV(H,2 * A80 + 1);
A82:=BACKSET(A81,A80 + 1);
A83:=FILTER(A82,A80) AND H = HHV(H,A80 + 10);
A84:=FILTER(A82,A80) AND L = LLV(L,A80 - 10);
做多力度:=SMA((CLOSE - LLV(LOW,M1)) / (HHV(HIGH,M1) - LLV(LOW,M1)) * 100,M1,1)-8 ;
做空力度:=SMA((HHV(HIGH,M2) - CLOSE) / (HHV(HIGH,M2) - LLV(LOW,M2)) * 100,M2,1);
多空差:=做多力度-做空力度,NODRAW;
多空差1:=REF(多空差,1);
標(biāo)紅:=多空差>=REF(多空差,1);
標(biāo)綠:=多空差<=REF(多空差,1);
AA1:=(REF(O,1) + REF(C,1)) / 2;
AA2:=(H + L + C) / 3;
AA3:=MAX(MAX(AA1,AA2),H);
AA4:=MIN(MIN(AA1,AA2),L);
AA5:=IF(AA1 < AA2,AA3 - AA4 + AA2 - AA1,AA3 - AA4);
AA6:=IF(AA1 > AA2,AA3 - AA4 + AA1 - AA2,AA3 - AA4);
AA7:=AA5 / (AA5 + AA6) * VOL * MAX(ABS(AA1 - AA2) / (AA3 - AA4),0.15) / 10000;
AA8:=AA6 / (AA5 + AA6) * VOL * MAX(ABS(AA1 - AA2) / (AA3 - AA4),0.15) / 10000;
主力:=(AA7 - AA8) * 25000,NODRAW;
MID:=MA(CLOSE,MM);
UPPER:MID + 2*STD(C,MM),COLOR333333;
LOWER:MID - 2*STD(C,MM),COLOR333333;
多空:=STKINDI('','多空差柱.多空差',0,P1);
多空1:=STKINDI('','多空差柱.多空差',0,B1);
IF 多空>0 THEN BJ:=1;
IF 多空<0 THEN BJ:=-1;
IF 多空1>0 THEN BJ:=1;
IF 多空1<0 THEN BJ:=-1;
PARTLINE(多空>0,UPPER，COLORRED),LINETHICK2;
PARTLINE(多空<0,UPPER，COLORGREEN),LINETHICK2;
PARTLINE(多空=0,UPPER，COLORBLUE),LINETHICK2;
PARTLINE(多空1>0,LOWER，COLORRED),LINETHICK1;
PARTLINE(多空1<0,LOWER，COLORGREEN),LINETHICK1;
PARTLINE(多空1=0,LOWER，COLORBLUE),LINETHICK1;

?

?來(lái)源:程序化99網(wǎng)（ m.weiqiv.net.cn ）

博易技術(shù)人員： 老師，有點(diǎn)迷糊，搞不懂啊，請(qǐng)您幫我改一下，引用15分鐘多空差柱指標(biāo)的多空差，顯示在布林的上軌，如果多空差大于0軸用紅色標(biāo)示，小于0軸用綠色表示。引用5分鐘多空差柱的多空差，顯示在布林下軌，如果多空差大于0軸用紅色標(biāo)示，小于0軸用綠色表示。謝謝，不勝感激！ 多空:=STKINDI('',6,'多空差柱.多空差',0,P1);
多空1:=STKINDI('',6,'多空差柱.多空差',0,B1);
?
數(shù)字6為需要調(diào)用的周期，數(shù)字6代表取的是日線，您可以自行調(diào)節(jié)，調(diào)節(jié)方法參數(shù)以下函數(shù)
DATAPERIOD
取當(dāng)前計(jì)算的周期類型。
1-1分鐘線，2-5分鐘線，3-15分鐘線，4-30分鐘線，5-60分鐘線，6-日線，7-周線，8-月線，9-年線，10-多日線，11-多分鐘線，12-季線，13-3分鐘線，14-走勢(shì)線，15-120分鐘線，16-240分鐘線。
?
P1,B1需要您自設(shè)參數(shù)，STKINDI使用方法參照以下說(shuō)明
STKINDI(Code,Period,'IDX.LINE',P1,P2,…)?
引用指定品種的IDX指標(biāo)的LINE輸出結(jié)果。?
Code為品種代碼，當(dāng)代碼為常量時(shí)，可以動(dòng)態(tài)更新該品種數(shù)據(jù)，否則只能使用本地最近保存的數(shù)據(jù)。
Period為周期類型，取值參考DATAPERIOD；
IDX為指標(biāo)名稱，LINE為指定輸出，可以省略，默認(rèn)引用第一條輸出；
P1之后為指標(biāo)參數(shù)，最多16個(gè)，可以省略，默認(rèn)使用指標(biāo)公式對(duì)應(yīng)周期的參數(shù)。
當(dāng)Code=''時(shí)引用當(dāng)前品種，Period=0時(shí)引用當(dāng)前周期類型。?
例如：
?STKINDI('',0,'MACD')，表示引用當(dāng)前品種當(dāng)前周期MACD指標(biāo)的DIF輸出。
?STKINDI('600000.SH',6,'MA.MA1',5,20,40)，表示引用浦發(fā)銀行的日線MA指標(biāo)的MA1輸出，指標(biāo)前三個(gè)參數(shù)分別為5、20、40，其余參數(shù)使用系統(tǒng)設(shè)置值。
? 來(lái)源 程序化久久網(wǎng)