咨詢內容：

請老師幫忙把下面三個指標轉為博弈大師的,搬家用博弈啦 !

第一個:DRAWSL1(ISLASTBAR,CLOSE,0,M2,2),LINETHICK1,COLORYELLOW,LINETHICK1;
DRAWSL1(ISLASTBAR,CLOSE,0,M1,2),LINETHICK1,COLORBLUE,LINETHICK1;
MA30:MA(C,M2),COLORRED,LINETHICK2;
IF(C>REF(C,M2),MA30,NULL),COLORRED,LINETHICK3;
IF(C<=REF(C,M2),MA30,NULL),COLORGREEN,LINETHICK3;
MA15:MA(C,M1),COLORRED,LINETHICK2;
IF(C>REF(C,M1),MA15,NULL),COLORRED,LINETHICK2;
IF(C<=REF(C,M1),MA15,NULL),COLORGREEN,LINETHICK2;
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,2,0),COLORGREEN;
STICKLINE(COUD2,O,CLOSE,2,0),COLORRED;

//穿線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:=ZIGZAG(C,6,1) > REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1) <= REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2) <= REF(ZIGZAG(C,6,1),3);
A14:=ZIGZAG(C,6,1) < REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1) >= REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2) >= REF(ZIGZAG(C,6,1),3);
A15:=ZIGZAG(C,22,1) ?> REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1) <= REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2) <= REF(ZIGZAG(C,22,1),3);
A16:=ZIGZAG(C,22,1) < REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1) >= REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2) >= REF(ZIGZAG(C,22,1),3);
A17:=ZIGZAG(C,51,1) > REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1) <= REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2) <= REF(ZIGZAG(C,51,1),3);
A18:=ZIGZAG(C,51,1) < REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1) >= REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2) >= REF(ZIGZAG(C,51,1),3);
A19:=ZIGZAG(C,72,1) > REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1) <= REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2) <= REF(ZIGZAG(C,72,1),3);
A20:=ZIGZAG(C,72,1) < REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1) >= REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2) >= REF(ZIGZAG(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;
第二個

A1:=(REF(O,1) + REF(C,1)) / 2;
A2:=(H + L + C) / 3;
A3:=MAX(MAX(A1,A2),H);
A4:=MIN(MIN(A1,A2),L);
A5:=IF(A1 < A2,A3 - A4 + A2 - A1,A3 - A4);
A6:=IF(A1 > A2,A3 - A4 + A1 - A2,A3 - A4);
A7:=A5 / (A5 + A6) *VOL * MAX(ABS(A1 - A2) / (A3 - A4),0.15) / 10000;
A8:=A6 / (A5 + A6) *VOL * MAX(ABS(A1 - A2) / (A3 - A4),0.15) / 10000;
主力凈買資金:=(A7 - A8) * 2.5;
持倉量:OPI,NODRAW;
MACCL:=MA(持倉量,10);
GAO:=IF(MACCL>REF(MACCL,1),持倉量,REF(持倉量,1));
SHOU:=持倉量;
KAI:=REF(SHOU,1);
DI:=IF(MACCL>REF(MACCL,1),KAI,持倉量);
DRAWKLINE1(GAO,KAI,DI,SHOU),COLORRED;
DZ:(C>=REF(C,1) AND 主力凈買資金>0 AND 持倉量>REF(持倉量,1)) OR (C<REF(C,1) AND 主力凈買資金>=0 AND 持倉量>REF(持倉量,1)),NODRAW;
KZ:(主力凈買資金<0 AND 持倉量>REF(持倉量,1) AND C<REF(C,1)) OR ( C>=REF(C,1) AND 主力凈買資金<=0 AND 持倉量>REF(持倉量,1) ),NODRAW;
KJ:(C>=REF(C,1) AND 主力凈買資金>=0 AND 持倉量<=REF(持倉量,1)) OR (C>REF(C,1) AND 主力凈買資金<=0 AND 持倉量<REF(持倉量,1)),NODRAW;
DJ:(C<=REF(C,1) AND 主力凈買資金<=0 AND 持倉量<=REF(持倉量,1)) OR ( C<=REF(C,1) AND 主力凈買資金>=0 AND 持倉量<=REF(持倉量,1) ),NODRAW;
CC:=持倉量-REF(持倉量,1);
STICKLINE(DZ,KAI,SHOU,3,0),COLORRED;
STICKLINE(KZ,SHOU,KAI,3,0),COLORBLUE;
STICKLINE(DJ,KAI,SHOU,3,0),COLORYELLOW;
STICKLINE(KJ,SHOU,KAI,3,0),COLORYELLOW;
MA10:MA(SHOU,M1),COLORRED,LINETHICK1;
IF(SHOU>REF(SHOU,M1),MA10,NULL),COLORRED,LINETHICK1;
IF(SHOU<=REF(SHOU,M1),MA10,NULL),COLORGREEN,LINETHICK1;
MA22:MA(SHOU,M2),COLORRED,LINETHICK2;
IF(SHOU>REF(SHOU,M2),MA22,NULL),COLORRED,LINETHICK2;
IF(SHOU<=REF(SHOU,M2),MA22,NULL),COLORGREEN,LINETHICK2;
MID :=MA(SHOU,26);
UPPER:= MID + 2*STD(SHOU,26),COLORGREEN,LINETHICK1;
LOWER:= MID - 2*STD(SHOU,26),COLORRED,LINETHICK1;
?
第三個:
做多力度:=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);


STICKLINE(標紅,多空差,0,寬度,1),COLORRED;
STICKLINE(標綠,0,多空差,寬度,0),COLORGREEN;
0,RGB(0,43,43);

?

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

博易技術人員： DRAWSL(ISLASTBAR,CLOSE,0,M2,2),LINETHICK1,COLORYELLOW,LINETHICK1;
DRAWSL(ISLASTBAR,CLOSE,0,M1,2),LINETHICK1,COLORBLUE,LINETHICK1;
MA30:MA(C,M2),COLORRED,LINETHICK2;
IF(C>REF(C,M2),MA30,DRAWNULL),COLORRED,LINETHICK3;
IF(C<=REF(C,M2),MA30,DRAWNULL),COLORGREEN,LINETHICK3;
MA15:MA(C,M1),COLORRED,LINETHICK2;
IF(C>REF(C,M1),MA15,DRAWNULL),COLORRED,LINETHICK2;
IF(C<=REF(C,M1),MA15,DRAWNULL),COLORGREEN,LINETHICK2;
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,2,0),COLORGREEN;
STICKLINE(COUD2,O,CLOSE,2,0),COLORRED;

//穿線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; A1:=(REF(O,1)+REF(C,1))/2;
A2:=(H+L+C)/3;
A3:=MAX(MAX(A1,A2),H);
A4:=MIN(MIN(A1,A2),L);
A5:=IF(A1<A2,A3-A4+A2-A1,A3-A4);
A6:=IF(A1>A2,A3-A4+A1-A2,A3-A4);
A7:=A5/(A5+A6)*VOL*MAX(ABS(A1-A2)/(A3-A4),0.15)/10000;
A8:=A6/(A5+A6)*VOL*MAX(ABS(A1-A2)/(A3-A4),0.15)/10000;
主力凈買資金:=(A7-A8)*2.5;
持倉量:AMOUNT,NODRAW;
MACCL:=MA(持倉量,10);
GAO:=IF(MACCL>REF(MACCL,1),持倉量,REF(持倉量,1));
SHOU:=持倉量;
KAI:=REF(SHOU,1);
DI:=IF(MACCL>REF(MACCL,1),KAI,持倉量);
DRAWKLINE(GAO,KAI,DI,SHOU),COLORRED;
DZ:(C>=REF(C,1)AND主力凈買資金>0AND持倉量>REF(持倉量,1))OR(C<REF(C,1)AND主力凈買資金>=0AND持倉量>REF(持倉量,1)),NODRAW;
KZ:(主力凈買資金<0AND持倉量>REF(持倉量,1)ANDC<REF(C,1))OR(C>=REF(C,1)AND主力凈買資金<=0AND持倉量>REF(持倉量,1)),NODRAW;
KJ:(C>=REF(C,1)AND主力凈買資金>=0AND持倉量<=REF(持倉量,1))OR(C>REF(C,1)AND主力凈買資金<=0AND持倉量<REF(持倉量,1)),NODRAW;
DJ:(C<=REF(C,1)AND主力凈買資金<=0AND持倉量<=REF(持倉量,1))OR(C<=REF(C,1)AND主力凈買資金>=0AND持倉量<=REF(持倉量,1)),NODRAW;
CC:=持倉量-REF(持倉量,1);
STICKLINE(DZ,KAI,SHOU,3,0),COLORRED;
STICKLINE(KZ,SHOU,KAI,3,0),COLORBLUE;
STICKLINE(DJ,KAI,SHOU,3,0),COLORYELLOW;
STICKLINE(KJ,SHOU,KAI,3,0),COLORYELLOW;
MA10:MA(SHOU,M1),COLORRED,LINETHICK1;
IF(SHOU>REF(SHOU,M1),MA10,DRAWNULL),COLORRED,LINETHICK1;
IF(SHOU<=REF(SHOU,M1),MA10,DRAWNULL),COLORGREEN,LINETHICK1;
MA22:MA(SHOU,M2),COLORRED,LINETHICK2;
IF(SHOU>REF(SHOU,M2),MA22,DRAWNULL),COLORRED,LINETHICK2;
IF(SHOU<=REF(SHOU,M2),MA22,DRAWNULL),COLORGREEN,LINETHICK2;
MID:=MA(SHOU,26);
UPPER:=MID+2*STD(SHOU,26),COLORGREEN,LINETHICK1;
LOWER:=MID-2*STD(SHOU,26),COLORRED,LINETHICK1; 來源 程序化久久網