커뮤니티
시스템 수정 부탁드립니다.
2018-04-06 14:20:49
205
글번호 118016
안녕하세요.
아래 수식을 예스랭귀지로 변환 부탁드립니다.
Input : gapTick(30);
Input : dCNT(6);
Vars : SP(0), TickValue(0);
Vars : TT(0), dTT(0);
SP = MarketPosition;
If Date[2] <> Date Then
Begin
Cond99 == True;
TT = TotalTrades;
End;
If IsExitName("ProfitTarget", 2) And ExitDate(2) == Date Then Cond99 == False;
IF IsExitName("StopTrailing", 2) And ExitDate(2) == Date Then Cond99 == False;
v99 == TotalTrades;
dTT = v99 - TT;
TickValue = PriceScale;
Value1 = DayOpen(0);
Value2 = DayLow(2);
Value3 = DayHigh(2);
Value4 = DayClose(2);
Input : blockGAP(200);
Vars : entryCOND(False);
If value1 > Value4 + (blockGAP * TickValue) Then entryCOND = True
Else If value1 < Value4 - (blockGAP * TickValue) Then entryCOND = True
Else entryCOND = False;
Condition1 = C <= Value1 - 5 * TickValue;
Condition11 = C >= Value1 + 5 * TickValue;
Condition2 = CrossDown(C, Value1);
Condition22 = CrossUP(C, value1);
Condition3 = C > Value1;
Condition33 = C < Value1;
Value10 = ma(c, 20);
Value20 = Value10 - Value10[2];
Condition4 = Value20 > Value20[2] and Value20[2] > Value20[3] and Value20 > Value20[3];
Condition44 = Value20 < Value20[2] And Value20[2] < Value20[3] And Value20 < Value20[3];
If ENTRYCOND == False And SP == 0 And Cond99 And ((dTT > dCNT And MarketPosition == 0) Or (dTT > (dCNT - 1) And MarketPosition <> 0))
And CurrentBar < 1
And Value1 < 1 And Value2 < 1
And BarStatus == 2 Then
Begin
If condition3 And C > (value1 + (gapTick * TickValue)) Then
Begin
If Condition1 and Condition2 Then Buy("B1", AtLimit, C);
End
감사합니다.
답변 1
예스스탁 예스스탁 답변
2018-04-09 13:50:03
안녕하세요
예스스탁입니다.
Input : gapTick(30);
Input : dCNT(6);
Vars : SP(0), TickValue(0);
Vars : TT(0), dTT(0),v99(0);
SP = MarketPosition;
If Date[2] <> Date Then
{
condition99 = True;
TT = TotalTrades;
}
If IsExitName("StopProfitTarget", 2) And ExitDate(2) == Date Then
condition99 = False;
IF IsExitName("StopTrailing", 2) And ExitDate(2) == Date Then
condition99 = False;
v99 = TotalTrades;
dTT = v99 - TT;
TickValue = PriceScale;
Value1 = DayOpen(0);
Value2 = DayLow(2);
Value3 = DayHigh(2);
Value4 = DayClose(2);
Input : blockGAP(200);
Vars : entryCOND(False);
If value1 > Value4 + (blockGAP * TickValue) Then
entryCOND = True;
Else If value1 < Value4 - (blockGAP * TickValue) Then
entryCOND = True;
Else
entryCOND = False;
Condition1 = C <= Value1 - 5 * TickValue;
Condition11 = C >= Value1 + 5 * TickValue;
Condition2 = CrossDown(C, Value1);
Condition22 = CrossUP(C, value1);
Condition3 = C > Value1;
Condition33 = C < Value1;
Value10 = ma(c, 20);
Value20 = Value10 - Value10[2];
Condition4 = Value20 > Value20[2] and Value20[2] > Value20[3] and Value20 > Value20[3];
Condition44 = Value20 < Value20[2] And Value20[2] < Value20[3] And Value20 < Value20[3];
If ENTRYCOND == False And SP == 0 And condition99 And
((dTT > dCNT And MarketPosition == 0) Or (dTT > (dCNT - 1) And MarketPosition <> 0))
And CurrentBar < 1
And Value1 < 1 And Value2 < 1
And DataCompress == 2 Then
{
If condition3 And C > (value1 + (gapTick * TickValue)) Then
{
If Condition1 and Condition2 Then
Buy("B1", AtLimit, C);
}
}
즐거운 하루되세요
> 바둑이 님이 쓴 글입니다.
> 제목 : 시스템 수정 부탁드립니다.
> 안녕하세요.
아래 수식을 예스랭귀지로 변환 부탁드립니다.
Input : gapTick(30);
Input : dCNT(6);
Vars : SP(0), TickValue(0);
Vars : TT(0), dTT(0);
SP = MarketPosition;
If Date[2] <> Date Then
Begin
Cond99 == True;
TT = TotalTrades;
End;
If IsExitName("ProfitTarget", 2) And ExitDate(2) == Date Then Cond99 == False;
IF IsExitName("StopTrailing", 2) And ExitDate(2) == Date Then Cond99 == False;
v99 == TotalTrades;
dTT = v99 - TT;
TickValue = PriceScale;
Value1 = DayOpen(0);
Value2 = DayLow(2);
Value3 = DayHigh(2);
Value4 = DayClose(2);
Input : blockGAP(200);
Vars : entryCOND(False);
If value1 > Value4 + (blockGAP * TickValue) Then entryCOND = True
Else If value1 < Value4 - (blockGAP * TickValue) Then entryCOND = True
Else entryCOND = False;
Condition1 = C <= Value1 - 5 * TickValue;
Condition11 = C >= Value1 + 5 * TickValue;
Condition2 = CrossDown(C, Value1);
Condition22 = CrossUP(C, value1);
Condition3 = C > Value1;
Condition33 = C < Value1;
Value10 = ma(c, 20);
Value20 = Value10 - Value10[2];
Condition4 = Value20 > Value20[2] and Value20[2] > Value20[3] and Value20 > Value20[3];
Condition44 = Value20 < Value20[2] And Value20[2] < Value20[3] And Value20 < Value20[3];
If ENTRYCOND == False And SP == 0 And Cond99 And ((dTT > dCNT And MarketPosition == 0) Or (dTT > (dCNT - 1) And MarketPosition <> 0))
And CurrentBar < 1
And Value1 < 1 And Value2 < 1
And BarStatus == 2 Then
Begin
If condition3 And C > (value1 + (gapTick * TickValue)) Then
Begin
If Condition1 and Condition2 Then Buy("B1", AtLimit, C);
End
감사합니다.