请问可以一根K线上平空再开多么？ - 金字塔软件问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

INPUT : T20(20,15,60,1) ; INPUT : T10(10,10,30,1); INPUT : ATRLEN(20,15,30,1) ; NT := 1 ; //μ÷ê?D??￠′?ê±??′á BUYORDERTHISBAR := 0 ; //μ±?°BARóD1y??ò× VARIABLE : _DEBUG = 1 ; //ê?·?ê?3??°ì¨??ò×??á? VARIABLE : _TDEBUG = 1 ; //ê?·?ê?3?oóì¨??ò×??á? VARIABLE : _DEBUGOUT = 0 ; //ê?·?ê?3?oóì¨??ò×μ?μ÷ê?D??￠ VARIABLE : MYENTRYPRICE =0 ; //?a2????? VARIABLE : MYEXITPRICE =0 ; //??2????? VARIABLE : TURTLEUNITS=0 ; //??ò×μ￥?? VARIABLE : POSITION=0 ; //2???×′ì? //0±íê???óD2???￡?1±íê?3?óD?àí·￡? -1±íê?3?óD??í· VARIABLE : T20HI=CLOSE ; //20?ü?úμ???μ? VARIABLE : T20LO=CLOSE ; //20?ü?úμ?μíμ? VARIABLE : T10HI=CLOSE ; //10?ü?úμ???μ? VARIABLE : T10LO=CLOSE ; //10?ü?úμ?μíμ? ATR:=REF(MA(TR,20),1); MTC:=((1000*10000*0.01)/(MULTIPLIER*ATR*12))*4; TC1:=INTPART(MTC/4+0.5); TC:=IFELSE(TC1<1,1,TC1); POSNUM:=TC; //×?±?Dèòa????μ?±?á? T20HI := REF(HHV(H,T20),1) ; T20LO := REF(LLV(L,T20),1) ; T10HI := REF(HHV(H,T10),1) ; T10LO := REF(LLV(L,T10),1) ; AVGTR := REF(MA(TR,ATRLEN),1) ; //?aê??′DDê± 3?ê??ˉêy?Y IF barpos="1" THEN="THEN" BEGIN //POSITION := 0="0" ; END //IF //è?1?μ±?°ê???óD3?2?μ?×′ì? IF position="0" AND="AND" BARPOS="BARPOS" >T20 AND H>L THEN BEGIN //?¨á￠?àí·??3?ì??t LONG := H > T20HI ; //?àí·??3? IF LONG THEN BEGIN MYENTRYPRICE := IF(OPEN>T20HI+MINDIFF ,OPEN ,T20HI+MINDIFF ) ; BUY( _DEBUG,POSNUM,LIMITR,MYENTRYPRICE); POSITION := 1 ; TURTLEUNITS := 1 ; N := AVGTR ; BUYORDERTHISBAR := 1; END //IF //?¨á￠??í·??3?ì??t SHORT := L < T20LO ; //??í·??3? IF SHORT AND POSITION=0 THEN BEGIN MYENTRYPRICE := IF(OPENT20 AND H>L THEN BEGIN //?àí·?ó2?ì??t WHILE (HIGH>MYENTRYPRICE+0.5*N) AND TURTLEUNITS<4 DO="DO" BEGIN MYENTRYPRICE := IF(OPEN>MYENTRYPRICE+0.5*N ,OPEN ,MYENTRYPRICE+0.5*N ) ; MYENTRYPRICE := CEILING(MYENTRYPRICE/MINDIFF)*MINDIFF ; BUY( _DEBUG, POSNUM, LIMITR, MYENTRYPRICE); TURTLEUNITS := TURTLEUNITS+1 ; BUYORDERTHISBAR := 1; END //WHILE //?¨á￠?àí·à?3?ì??t LONGX1 := (LOW < T10LO) ; IF LONGX1 AND BUYORDERTHISBAR=0 THEN BEGIN MYEXITPRICE := IF(OPENT20 AND H>L THEN BEGIN //??í·?ó2?ì??t WHILE (LOW T10HI ; IF SHORTX1 AND BUYORDERTHISBAR=0 THEN BEGIN MYEXITPRICE := IF(OPEN>T10HI+MINDIFF ,OPEN ,T10HI+MINDIFF ) ; SELLSHORT( _DEBUG,0,LIMITR,MYEXITPRICE); POSITION := 0 ; TURTLEUNITS := 0 ; END //?¨á￠??í·?1?eì??t SHORTX2 := HIGH > MYENTRYPRICE + 2*N ; IF SHORTX2 AND POSITION = -1 AND BUYORDERTHISBAR=0 THEN BEGIN MYEXITPRICE := IF(OPEN>MYENTRYPRICE+2*N ,OPEN ,MYENTRYPRICE+2*N ) ; MYEXITPRICE := CEILING(MYEXITPRICE/MINDIFF)*MINDIFF ; SELLSHORT( _DEBUG,0,LIMITR,MYEXITPRICE); POSITION := 0 ; TURTLEUNITS := 0 ; END END //IF //??ê????§×′ì? CONTINUELINE@ ×ê2ú:ASSET,LINETHICK0; ?éó????e:CASH(0),LINETHICK0; POS:HOLDING,LINETHICK0; ??ò×′?êy:TOTALDAYTRADE, LINETHICK0 ; IF _DEBUGOUT>0 THEN BEGIN DEBUGFILE2('C:\DEBUGFILE.TXT','BARPOS=%.0F' ,BARPOS,NT ) ; DEBUGFILE2('C:\DEBUGFILE.TXT','T20HI=%.2F' ,T20HI ,NT) ; DEBUGFILE2('C:\DEBUGFILE.TXT','N=%.2F' ,N ,NT) ; DEBUGFILE2('C:\DEBUGFILE.TXT','CLOSE=%.2F' ,C ,NT) ; DEBUGFILE2('C:\DEBUGFILE.TXT','POSITION=%.0F' ,POSITION,NT ) ; DEBUGFILE2('C:\DEBUGFILE.TXT','TURTLEUNITS=%.0F' ,TURTLEUNITS,NT ) ; DEBUGFILE2('C:\DEBUGFILE.TXT','MYENTRYPRICE=%.0F' ,MYENTRYPRICE ,NT) ; DEBUGFILE2('C:\DEBUGFILE.TXT','MYEXITPRICE=%.0F' ,MYEXITPRICE ,NT) ; END //IF μ±?°3?2?:HOLDING,COLORGRAY,LINETHICK0; μ±?°×ê2ú:ASSET,NOAXIS,COLORGRAY;

主题：请问可以一根K线上平空再开多么？