咨詢內容：

麻煩老師幫忙改成博易能用的指標

CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
PT? := REF(HIGH,1)-REF(LOW,1);
重心:(HIGH + LOW + CLOSE)/3,NODRAW;
壓力Ⅰ: 2*重心-LOW,NODRAW;
壓力Ⅱ:重心 + PT,NODRAW;
支撐Ⅰ:2*重心-HIGH,NODRAW;
支撐Ⅱ: 重心 - PT,NODRAW;
AAA:=REFX1(HHV(H,90),10000);
R1:=MA(CLOSE,1);
R2:=MA(CLOSE,3);
R3:=(MA(R2,1)*1);
R4:=(MA(R2,3)*1);

X1:=(C+L+H)/3;
DD:=GETPRICE1('總股本');
SS:=GETPRICE1('流通股本');
GG:=GETPRICE1('投資收益');
TH:=GETPRICE1('季每股收益');
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);

雙線做空:HHV(MA(HIGH,(3)),2),LINETHICK2,COLORLIGHTGREEN;
單線做多:LLV(MA(HIGH,(3)),1),LINETHICK2,COLORRED;


MA4:=EMA(CLOSE,10);
HH:=HHV(HIGH,5);
LL:=LLV(LOW,5);
H1:=IF(CLOSE>REF(HH,1),1,0);
L1:=IF(CLOSE<REF(LL,1),-1,0);
H0:=REF(HIGH,1);
L0:=REF(LOW,1);
P7:=H1+L1;
P8:=IF(P7=0,REF(P7,1),P7);
P9:=IF(P8=0,REF(P8,1),P8);
P10:=IF(P9=0,REF(P9,1),P9);
P11:=IF(P10=0,REF(P10,1),P10);
P12:=IF(P11=0,REF(P11,1),P11);
P13:=IF(P12=0,REF(P12,1),P12);
P14:=IF(P13=0,REF(P13,1),P13);
P15:=IF(P14=0,REF(P14,1),P14);
P16:=IF(P15=0,REF(P15,1),P15);
P17:=IF(P16=0,REF(P16,1),P16);
P18:=IF(P17=0,REF(P17,1),P17);
P19:=IF(P18=0,REF(P18,1),P18);
P20:=IF(P19=0,REF(P19,1),P19);
P21:=IF(P20=0,REF(P20,1),P20);
P22:=IF(P21=0,REF(P21,1),P21);
P23:=IF(P22=0,REF(P22,1),P22);
P24:=IF(P23=0,REF(P23,1),P23);
P25:=IF(P24=0,REF(P24,1),P24);
P26:=IF(P25=0,REF(P25,1),P25);
P27:=IF(P26=0,REF(P26,1),P26);
P28:=IF(P27=0,REF(P27,1),P27);
P29:=IF(P28=0,REF(P28,1),P28);
P30:=IF(P29=0,REF(P29,1),P29);
T:=IF(P30=0,REF(P30,1),P30);

DRAWTEXT(CROSS(T,0),L,'做多'),COLORWHITE;
DRAWTEXT(CROSS(0,T),H,'開空'),COLORWHITE;
PLAYSOUND(CROSS(T,0),'A');
PLAYSOUND(CROSS(0,T),'B');

上軌線:MA(REF(HHV(C,30),1),2),COLORMAGENTA;
下軌線:MA(REF(LLV(C,30),1),2),COLORBLUE;?
AMOUNT:=AVPRICE*V;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;

?

?來源:程序化99網（ m.kzuj.com.cn ）

博易技術人員： CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
PT? := REF(HIGH,1)-REF(LOW,1);
重心:(HIGH + LOW + CLOSE)/3,NODRAW;
壓力Ⅰ: 2*重心-LOW,NODRAW;
壓力Ⅱ:重心 + PT,NODRAW;
支撐Ⅰ:2*重心-HIGH,NODRAW;
支撐Ⅱ: 重心 - PT,NODRAW;
AAA:=REFX(HHV(H,90),DATACOUNT-BARPOS-1);
R1:=MA(CLOSE,1);
R2:=MA(CLOSE,3);
R3:=(MA(R2,1)*1);
R4:=(MA(R2,3)*1);

X1:=(C+L+H)/3;

A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);

雙線做空:HHV(MA(HIGH,(3)),2),LINETHICK2,COLORGREEN;
單線做多:LLV(MA(HIGH,(3)),1),LINETHICK2,COLORRED;


MA4:=EMA(CLOSE,10);
HH:=HHV(HIGH,5);
LL:=LLV(LOW,5);
H1:=IF(CLOSE>REF(HH,1),1,0);
L1:=IF(CLOSE<REF(LL,1),-1,0);
H0:=REF(HIGH,1);
L0:=REF(LOW,1);
P7:=H1+L1;
P8:=IF(P7=0,REF(P7,1),P7);
P9:=IF(P8=0,REF(P8,1),P8);
P10:=IF(P9=0,REF(P9,1),P9);
P11:=IF(P10=0,REF(P10,1),P10);
P12:=IF(P11=0,REF(P11,1),P11);
P13:=IF(P12=0,REF(P12,1),P12);
P14:=IF(P13=0,REF(P13,1),P13);
P15:=IF(P14=0,REF(P14,1),P14);
P16:=IF(P15=0,REF(P15,1),P15);
P17:=IF(P16=0,REF(P16,1),P16);
P18:=IF(P17=0,REF(P17,1),P17);
P19:=IF(P18=0,REF(P18,1),P18);
P20:=IF(P19=0,REF(P19,1),P19);
P21:=IF(P20=0,REF(P20,1),P20);
P22:=IF(P21=0,REF(P21,1),P21);
P23:=IF(P22=0,REF(P22,1),P22);
P24:=IF(P23=0,REF(P23,1),P23);
P25:=IF(P24=0,REF(P24,1),P24);
P26:=IF(P25=0,REF(P25,1),P25);
P27:=IF(P26=0,REF(P26,1),P26);
P28:=IF(P27=0,REF(P27,1),P27);
P29:=IF(P28=0,REF(P28,1),P28);
P30:=IF(P29=0,REF(P29,1),P29);
T:=IF(P30=0,REF(P30,1),P30);

DRAWTEXT(CROSS(T,0),L,'做多'),COLORWHITE;
DRAWTEXT(CROSS(0,T),H,'開空'),COLORWHITE;

上軌線:MA(REF(HHV(C,30),1),2),COLORMAGENTA;
下軌線:MA(REF(LLV(C,30),1),2),COLORBLUE;? 來源 程序化久久網