咨詢內容：

請老師將下面引用跨周期部分更改一下，謝謝

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);
標紅:=多空差>=REF(多空差,1);
標綠:=多空差<=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;

?

?來源:程序化99網（ www.tumamayizhan.com ）

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