金字塔 请老师帮助改为文华平台使用，谢谢！　[赢顺期货]

请老师帮助改为文化平台使用，谢谢！

INPUT:LENGTH(20),PREV(4),ENTRYADD(10 POINTS);

VAR:HH(0),LL(0),NEWH(999),NEWL(999),Z(0),LEN(0),CD AYS(0),MP(0),
TSSELL(0),TSBUY(99999),LGO(FALSE),SGO(FALSE),
REBUY(99999),REBUYLIFE(0),RESELL(0),RESELLLIFE(0);
ARRAY:HI[40](0),LO[40](99999);

MP=MARKETPOSITION;

IF DATACOMPRESSION=1 THEN BEGIN

IF CURRENTBAR=1 THEN BEGIN
LEN=MINLIST(LENGTH,39);
IF LEN<1 THEN LEN=1;
END;
if D>D[1] then begin
for value1=LEN downto 1 begin
HI[value1]=HI[value1-1];
LO[value1]=LO[value1-1];
end;
end;
HI[0]=idhigh;
LO[0]=idlow;
IF D>D[1] THEN BEGIN
CDAYS=CDAYS 1;
NEWH=NEWH 1;
NEWL=NEWL 1;
LGO=TRUE;
SGO=TRUE;
REBUYLIFE=REBUYLIFE-1;
RESELLLIFE=RESELLLIFE-1;
HH=HI[LEN];LL=LO[LEN];
FOR Z=1 TO LEN-1 BEGIN
IF HI[Z]>HH THEN HH=HI[Z];
IF LO[Z]<LL THEN LL=LO[Z];
END;
IF HI[1]=HH THEN NEWH=1;
IF LO[1]=LL THEN NEWL=1;
END;

IF H>=TSBUY[1] THEN BEGIN
TSBUY=99999;
REBUY=TSBUY[1];
REBUYLIFE=2;
END;
IF (H>=REBUY[1] AND MP[1]=0) OR REBUYLIFE<=0 THEN BEGIN
REBUY=99999;
REBUYLIFE=0;
END;
IF REBUYLIFE>0 AND MP=0 AND MP[1]=0 THEN Buy("TS-ReBuy") Next Bar REBUY STOP;
IF L<=TSSELL[1] THEN BEGIN
TSSELL=0;
RESELL=TSSELL[1];
RESELLLIFE=2;
END;
IF (L<=RESELL[1] AND MP[1]=0) OR RESELLLIFE<=0 THEN BEGIN
RESELL=0;
RESELLLIFE=0;
END;
IF RESELLLIFE>0 AND MP=0 AND MP[1]=0 THEN Sell Short("TS-ReSell") Next Bar RESELL STOP;

IF CDAYS>LEN THEN BEGIN
IF HH>0 AND NEWH>=PREV AND IDHIGH>HH AND SGO THEN BEGIN
TSSELL=HH-ENTRYADD;
Sell Short("TS-Sell") Next Bar TSSELL STOP;
SGO=FALSE;
END;
IF LL>0 AND NEWL>=PREV AND IDLOW<LL AND LGO THEN BEGIN
TSBUY=LL ENTRYADD;
Buy("TS-Buy") Next Bar TSBUY STOP;
LGO=FALSE;
END;
END;
END;

Sell("Initial LX") Next Bar IDLOW STOP;
Buy to Cover("Initial SX") Next Bar IDHIGH STOP;

以上源码思路：

   *今天市场创20天以来的新低；

   *前一个20天新低必须出现在至少4个交易日以前；（需要考虑barnumber时的情况）

    *在市场创20天以来新低以后，在前期低点以上5-10点放置停损买入单（当天有效）；

    博主按：这里必明确创新低多少距离才放停损买入单，否则创新低距离很小（比如一个最小波动点）就放置停损单的话，很容易被触发。

   *如果买入停损成交，马上放置在当天日低以下放置GTC止损卖单；

   *当头寸开始获利，使用追踪停损Trail保护利润，其中一些交易可能持续2-3小时，一些可能持续几天；

    *如果当天或者第二天被止损，你可以在之前入场位置重新设置买入止损单（当天有效），这样可以小幅增加胜算。

您好！

您模型中MARKETPOSITION、MINLIST、D函数并非系统函数，能否具体说明含义

由于模型中含有FOR循环语句，只能进行部分改写；另外，请具体说明模型加载的周期。