求助帮改个

求助我是用金之塔的 能帮我改个TB 的程序我试下吗 下面是简单策略 多空分离 2套的策略 简单的价格上穿120日线开多 固定止损1% 下穿平仓 最好能也设置开仓播报语音功能多策略：VARIABLE:DCB=0;VARIABLE:KCB=0;MA1:MA(CLOSE,120);C1S: =CALLSTOCK('',vtCLOSE,6,-1);pVal: =C1S*0.01;//开多IF (HOLDING=0) AND C>MA1 THEN BEGIN //开仓 BUY(1,1,MARKETR,C); DCB:=CLOSE; //初始多单价 SPEAK(1,'PTA，5分钟开多'); EXPLAIN(1,'PTA，5分钟开多',COLORMAGENTA);END//固定止损IF HOLDING>0 AND (DCB-LOW)>=pVal THEN BEGIN //初始多单止损条件 初始多单止损:SELL(1,0,MARKETR,C); DCB:=0; SPEAK(1,'PTA，5分钟多单固定止损'); EXPLAIN(1,'PTA，5分钟多单固定止损',COLORMAGENTA);END//总止损IF HOLDING > 0 AND C<MA1 AND C-DCB>=pVal THEN BEGIN 多平1:SELL (1,0,MARKETR);//平仓 DCB:=0; SPEAK(1,'PTA，5分钟多单破线'); EXPLAIN(1,'PTA，5分钟多单破线',COLORMAGENTA);END空策略VARIABLE:DCB=0;VARIABLE:KCB=0;MA1:MA(CLOSE,120);C1S: =CALLSTOCK('',vtCLOSE,6,-1);pVal: =C1S*0.01;IF (HOLDING=0) AND C<MA1 THEN BEGIN //开仓 BUYSHORT(1,1,MARKETR,C); KCB:=CLOSE; SPEAK(1,'PTA，5分钟开空'); EXPLAIN(1,'PTA，5分钟开空',COLORMAGENTA); END//固定止损IF HOLDING<0 AND (HIGH-KCB)>=pVal THEN BEGIN 初始空单止损:SELLSHORT(1,0,MARKETR,C); KCB:=0; SPEAK(1,'PTA，5分钟空单固定止损'); EXPLAIN(1,'PTA，5分钟空单固定止损',COLORMAGENTA);END//总止损IF HOLDING < 0 AND C>MA1 AND KCB-C>=pVal THEN BEGIN 空平1:SELLSHORT (1,0,MARKETR);//平仓 KCB:=0; SPEAK(1,'PTA，5分钟空单破线'); EXPLAIN(1,'PTA，5分钟空单破线',COLORMAGENTA);END