커뮤니티
함수변환요청(키움)
2017-02-07 14:04:51
161
글번호 106599
안녕하세요?
아래는 키움에서 사용하였던
전략입니다.
YT언어로 변환 요청드립니다.
감사합니다.
Vars :
TickValue( 0 ),
RSI_value( 0 ),
RSI_period( 14 ),
MACD_OSC_value( 0 ),
MACD_period1( 12 ),
MACD_period2( 26 ),
MACD_signal_period( 9 ),
H_value1( 0 ),
H_bar1( 0 ),
L_value1( 0 ),
L_bar1( 0 ),
H_value2( 0 ),
H_bar2( 0 ),
L_value2( 0 ),
L_bar2( 0 ),
ShortPeriod( 9 ),
LongPeriod( 26 );
TickValue = OneTick * PriceScale;
RSI_value = RSI(C, RSI_period);
v0 = MACD(C, MACD_period1, MACD_period2);
v1 = Ema(v0, MACD_signal_period);
MACD_Osc_value = v0 - v1;
highestlowest(H, L, ShortPeriod, H_value1, H_bar1, L_value1, L_bar1);
highestlowest(H, L, LongPeriod, H_value2, H_bar2, L_value2, L_bar2);
Value1 = (H_value1 + L_value1)/2;
Value2 = (H_value2 + L_value2)/2;
If Value1 > Value2
And MACD_Osc_value > 0
And CrossUp(RSI_value, 70)
Then Buy("매수");
If Value1 < Value2
And MACD_Osc_value < 0
And CrossDown(RSI_value, 30)
Then Sell("매도");
If ContractProfit > TickValue * 10 Then
Begin
If CrossDown(RSI_value, 70) then ExitLong("매수청산");
If CrossUp(RSI_value, 30) Then ExitShort("매도청산");
End;
SetStopLoss(TickValue * 10);
답변 1
예스스탁 예스스탁 답변
2017-02-08 11:08:31
안녕하세요
예스스탁입니다.
죄송하지만 해당 내용은 변경해 드릴수 없습니다.
어떤 내용인지 알수 없는 함수들이 있습니다.
도움을 드리지 못해 죄송합니다.
즐거운 하루되세요
> 통큰베팅 님이 쓴 글입니다.
> 제목 : 함수변환요청(키움)
> 안녕하세요?
아래는 키움에서 사용하였던
전략입니다.
YT언어로 변환 요청드립니다.
감사합니다.
Vars :
TickValue( 0 ),
RSI_value( 0 ),
RSI_period( 14 ),
MACD_OSC_value( 0 ),
MACD_period1( 12 ),
MACD_period2( 26 ),
MACD_signal_period( 9 ),
H_value1( 0 ),
H_bar1( 0 ),
L_value1( 0 ),
L_bar1( 0 ),
H_value2( 0 ),
H_bar2( 0 ),
L_value2( 0 ),
L_bar2( 0 ),
ShortPeriod( 9 ),
LongPeriod( 26 );
TickValue = OneTick * PriceScale;
RSI_value = RSI(C, RSI_period);
v0 = MACD(C, MACD_period1, MACD_period2);
v1 = Ema(v0, MACD_signal_period);
MACD_Osc_value = v0 - v1;
highestlowest(H, L, ShortPeriod, H_value1, H_bar1, L_value1, L_bar1);
highestlowest(H, L, LongPeriod, H_value2, H_bar2, L_value2, L_bar2);
Value1 = (H_value1 + L_value1)/2;
Value2 = (H_value2 + L_value2)/2;
If Value1 > Value2
And MACD_Osc_value > 0
And CrossUp(RSI_value, 70)
Then Buy("매수");
If Value1 < Value2
And MACD_Osc_value < 0
And CrossDown(RSI_value, 30)
Then Sell("매도");
If ContractProfit > TickValue * 10 Then
Begin
If CrossDown(RSI_value, 70) then ExitLong("매수청산");
If CrossUp(RSI_value, 30) Then ExitShort("매도청산");
End;
SetStopLoss(TickValue * 10);
다음글
이전글