编写成软件可用的交易系统可以吗？

阿白79204

SJ:=IFELSE(DATE<210831,1,1);

HH1:=IFELSE(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IFELSE(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
HH:=HHV(HIGH,1)*SJ/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;
LL:=LLV(LOW,1)*SJ/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;
H1:=IFELSE(HH<REF(HH,1)&&LL<REF(LL,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0);
L1:=IFELSE(LL>REF(LL,1)&&HH>REF(HH,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LL,2),0);
X:=DATE;
X0:=H1,LINETHICK2;
X00:=L1;
XXX0:=O,LINETHICK2;
XXX00:=C;
XXX000:=H;
XXX0000:=L;
H2:=VALUEWHEN(X0>0,X0),LINETHICK2;
L2:=VALUEWHEN(X00>0,X00),LINETHICK2;
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);
G1:=VALUEWHEN(ISLASTBAR,G);
X000:=K2,LINETHICK2;
TMP:=K2,LINETHICK2;
W1:=X000,LINETHICK2;
X0000:=OPEN-CLOSE,LINETHICK2;
W2:=X0000,LINETHICK2;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE),LINETHICK2;
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE),LINETHICK2;
DRAWLINE(W1=1,XXX000,W1=1,HT,COLORCYAN);
DRAWLINE(W1=1,XXX0000,W1=1,LT,COLORCYAN);
DRAWLINE(W1=-3,XXX000,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,XXX0000,W1=-3,LT,COLORRED);
STICKLINE(W1>0,XXX0,XXX00,COLORCYAN,1);
STICKLINE(W1<=0,XXX0,XXX00,COLORRED,1);
STICKLINE(W2>0&&W1<=0,XXX0,XXX00,COLORRED,0);
STICKLINE(W2>0&&W1>0,XXX0,XXX00,COLORCYAN,0);
DRAWLINE(TMP=1&&REF(TMP,1)=1,G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORCYAN),DOT;//青色折竖线
DRAWLINE(TMP=-3&&REF(TMP,1)=-3,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORRED),DOT;//红色折竖线
DRAWNUMBER(L>0,G1,G1,0,COLORCYAN);
DRAWSL(K2=1,G,0,1,0,COLORCYAN),DOT;
DRAWSL(K2=-3,G,0,1,0,COLORRED),DOT;
DRAWTEXT(CROSS(TMP,0),HH,'空'),COLORGREEN,FONTSIZE10;
DRAWTEXT(CROSS(0,TMP),LL,'多'),FONTSIZE10,VALIGN0;
N3:=BARSLAST(CROSS(W1>0,0.5)),LINETHICK2;
N4:=BARSLAST(CROSS(W1<=0,0.5)),LINETHICK2;
HH3:=IF(W1<=0,REF(HV(H,N4),N3),NULL),COLORYELLOW,DOT;
LL3:=IF(W1>0,REF(LV(L,N3),N4),NULL),COLORGREEN,DOT;
B:=CROSSUP(C,HH3)||REF(ISNULL(HH3),1)&&C>HH3;
S:=CROSSDOWN(C,LL3)||REF(ISNULL(LL3),1)&&C<LL3;
LC:= REF(CLOSE,1),LINETHICK2;
按照他的多空进行平多平空，谢谢

技术008

if CROSS(TMP,0) then
begin
        sell(1,holding,marketr);
        buyshort(1,1,marketr);
END


if CROSS(0,TMP) then
begin
        sellshort(1,holding,marketr);
        buy(1,1,marketr);
END


最后面加上这一段就行了

技术008

if CROSS(TMP,0) then
begin
        sell(1,holding,marketr);
        buyshort(1,1,marketr);
END


if CROSS(0,TMP) then
begin
        sellshort(1,holding,marketr);
        buy(1,1,marketr);
END


最后面加上这一段就行了

阿白79204

HH3:=IF(W1<=0,REF(HV(H,N4),N3),NULL),COLORYELLOW,DOT;
HV,未定义

技术008

改成hhv