커뮤니티

수식작성

프로필 이미지
푸른
2021-06-15 22:50:52
1671
글번호 149950
답변완료
input : StartTime(080000),EndTime(55000),Xtime(55500); var : Tcond(false),B1(0),B2(0),X1(0),X2(0),entry(0); if sdate != sDate[1] Then SetStopEndofday(Xtime); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; SetStopEndofday(0); entry = 0; } if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then entry = entry+1; B1 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.246; B2 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.382; X1 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.900; X2 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.950; if Tcond == true and DayOpen > DayLow(1)+(DayHigh(1)-DayLow(1))*0.618 and DayOpen <= DayLow(1)+(DayHigh(1)-DayLow(1))*0.982 Then if Tcond == true Then { if (MarketPosition == 0 or (MarketPosition == 1 and MaxEntries == 1)) Then { if entry < 5 and L > B1 Then Buy("b1",AtLimit,B1); if entry < 5 and L > B2 Then Buy("b2",AtLimit,B2); } if MarketPosition == 1 Then { ExitLong("bx1",AtLimit,X1); } } SetStopProfittarget(PriceScale*300,PointStop); SetStopLoss(PriceScale*20,PointStop); -------------------------------- b1 x1 , b2 x2 의 각각을 진입1회후 청산으로 수식어를 부탁드립니다. 늘 감사합니다.
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2021-06-16 14:14:29

안녕하세요 예스스탁입니다. input : StartTime(080000),EndTime(55000),Xtime(55500); var : Tcond(false),B1(0),B2(0),X1(0),X2(0),entry(0); if sdate != sDate[1] Then SetStopEndofday(Xtime); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; SetStopEndofday(0); entry = 0; } if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then entry = entry+1; B1 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.246; B2 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.382; X1 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.900; X2 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.950; if Tcond == true and DayOpen > DayLow(1)+(DayHigh(1)-DayLow(1))*0.618 and DayOpen <= DayLow(1)+(DayHigh(1)-DayLow(1))*0.982 Then if Tcond == true Then { if (MarketPosition == 0 or (MarketPosition == 1 and MaxEntries == 1)) Then { if entry < 5 and L > B1 Then Buy("b1",AtLimit,B1); if entry < 5 and L > B2 Then Buy("b2",AtLimit,B2); } if MarketPosition == 1 Then { ExitLong("bx1",AtLimit,X1); ExitLong("bx2",AtLimit,X2); } } SetStopProfittarget(PriceScale*300,PointStop); SetStopLoss(PriceScale*20,PointStop); 즐거운 하루되세요 > 푸른 님이 쓴 글입니다. > 제목 : 수식작성 > input : StartTime(080000),EndTime(55000),Xtime(55500); var : Tcond(false),B1(0),B2(0),X1(0),X2(0),entry(0); if sdate != sDate[1] Then SetStopEndofday(Xtime); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; SetStopEndofday(0); entry = 0; } if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then entry = entry+1; B1 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.246; B2 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.382; X1 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.900; X2 = DayLow(1)+(DayHigh(1)-DayLow(1))*0.950; if Tcond == true and DayOpen > DayLow(1)+(DayHigh(1)-DayLow(1))*0.618 and DayOpen <= DayLow(1)+(DayHigh(1)-DayLow(1))*0.982 Then if Tcond == true Then { if (MarketPosition == 0 or (MarketPosition == 1 and MaxEntries == 1)) Then { if entry < 5 and L > B1 Then Buy("b1",AtLimit,B1); if entry < 5 and L > B2 Then Buy("b2",AtLimit,B2); } if MarketPosition == 1 Then { ExitLong("bx1",AtLimit,X1); } } SetStopProfittarget(PriceScale*300,PointStop); SetStopLoss(PriceScale*20,PointStop); -------------------------------- b1 x1 , b2 x2 의 각각을 진입1회후 청산으로 수식어를 부탁드립니다. 늘 감사합니다.