커뮤니티
시스템식
2012-10-07 16:22:48
256
글번호 55358
안녕하세요...
시스템식 전환 부탁드리겠습니다
k1=20(이평변수)
Var1 = slowk(5,3)
Var2 = slowd(5,3,3)
Var3 = mov(close,k1,e,1)
Var4 = mov(close,k1,e)
Var5 = adx(10)
If position = 0 Then
If Var5 > 22 Then
If Var4 > Var3 Then
If crossup(Var1,Var2) Then
Call buy("b",Atmarket)
End If
End If
End If
End If
If position = 0 Then
If Var5 > 22 Then
If Var4 < Var3 Then
If crossdn(Var1,Var2) Then
call sell("s",Atmarket)
End If
End If
End If
End If
If l_position=1 Then
Var13=entryprice*1.01
Var14=hhv(1,high,barnumsinceentry+1)
If Var14 >= Var13 Then
Var15=(((Var14-entryprice)/entryprice)*0.99)
Var16=entryprice*(1+var15)
Call exitlong("매수이익보존", Atstop, Var16)
End If
End If
If i_position= -1 Then
Var13=entryprice*0.99
Var14=llv(1,low,barnumsinceentry+1)
If Var14 <= Var13 Then
Var15=(((entryprice - Var14)/entryprice)*0.99)
Var16=entryprice*(1-Var15)
Call exitshort("매도이익보존", Atstop, Var16)
End If
End If
답변 1
예스스탁 예스스탁 답변
2012-10-08 14:56:01
안녕하세요
예스스탁입니다.
input : k1(20);
Var1 = StochasticsK(5,3);
Var2 = StochasticsD(5,3,3);
Var3 = ema(C,k1)[1];
Var4 = ema(C,k1);
Var5 = adx(10);
If marketposition == 0 then{
If Var5 > 22 then{
If Var4 > Var3 then{
If crossup(Var1,Var2) then{
buy("b",Atmarket);
}
}
}
}
If marketposition == 0 then{
If Var5 > 22 then{
If Var4 < Var3 then{
If crossdown(Var1,Var2) then{
sell("s",Atmarket);
}
}
}
}
If marketposition==1 then{
Var13=entryprice*1.01;
Var14=Highest(high,BarsSinceEntry+1);
If Var14 >= Var13 then{
Var15=(((Var14-entryprice)/entryprice)*0.99);
Var16=entryprice*(1+var15);
exitlong("매수이익보존", Atstop, Var16);
}
}
If marketposition== -1 then{
Var13=entryprice*0.99;
Var14=Lowest(low,BarsSinceEntry+1);
If Var14 <= Var13 then{
Var15=(((entryprice - Var14)/entryprice)*0.99);
Var16=entryprice*(1-Var15);
exitshort("매도이익보존", Atstop, Var16);
}
}
즐거운 하루되세요
> ciao 님이 쓴 글입니다.
> 제목 : 시스템식
> 안녕하세요...
시스템식 전환 부탁드리겠습니다
k1=20(이평변수)
Var1 = slowk(5,3)
Var2 = slowd(5,3,3)
Var3 = mov(close,k1,e,1)
Var4 = mov(close,k1,e)
Var5 = adx(10)
If position = 0 Then
If Var5 > 22 Then
If Var4 > Var3 Then
If crossup(Var1,Var2) Then
Call buy("b",Atmarket)
End If
End If
End If
End If
If position = 0 Then
If Var5 > 22 Then
If Var4 < Var3 Then
If crossdn(Var1,Var2) Then
call sell("s",Atmarket)
End If
End If
End If
End If
If l_position=1 Then
Var13=entryprice*1.01
Var14=hhv(1,high,barnumsinceentry+1)
If Var14 >= Var13 Then
Var15=(((Var14-entryprice)/entryprice)*0.99)
Var16=entryprice*(1+var15)
Call exitlong("매수이익보존", Atstop, Var16)
End If
End If
If i_position= -1 Then
Var13=entryprice*0.99
Var14=llv(1,low,barnumsinceentry+1)
If Var14 <= Var13 Then
Var15=(((entryprice - Var14)/entryprice)*0.99)
Var16=entryprice*(1-Var15)
Call exitshort("매도이익보존", Atstop, Var16)
End If
End If