커뮤니티
함수변환요청(SK)
2016-02-19 16:24:53
129
글번호 95575
안녕하세요?
아래는 SK증권에서 사용했던 함수입니다.
예스랭귀지로 변환 부탁드립니다.
감사합니다.
---------------------------------------------------------------------------------------
Input :
MarketStart_Time( 9 ),
MarketClose_Time( 11 );
Vars :
Today_Profit( 0 ),
MedianPrice_( 0 ),
Highest_Value( 0 ),
Lowest_Value( 0 );
value1 = OneTick * PriceScale; // Tick value
value2 = IntPortion(time/10000);
If value2 = MarketStart_Time And value2[1] <> MarketStart_Time Then Value3 = NetProfit[1];
Today_profit = NetProfit - Value3;
condition1 = Today_profit <= value1 * -40;
HighestLowest(H, L, 6, Highest_Value, v1, Lowest_Value, v2);
MedianPrice_ = (Highest_Value + Lowest_Value)/2;
Value4 = FracPortion(Time/10000) * 100;
If condition1 = False And Fracportion(Value4/100) = 0.0
Then
Begin
If MedianPrice_ < NextBarOpen Then Buy("매수", Atmarket);
If MedianPrice_ > NextBarOpen Then Sell("매도", Atmarket);
End;
SetStopProfittarget(value1 * 2);
SetStopLoss(value1 * 20);
SetStopEndofday(MarketClose_Time * 10000 - 1000);
답변 1
예스스탁 예스스탁 답변
2016-02-19 18:16:56
안녕하세요
예스스탁입니다.
수식의 내용을 글로 올려주시기 바랍니다.
사용하지 않는 타사의 제품이라
해당식이 내용안에 어떤 값을 리턴하는지 모르는 함수가 있습니다.
즐거운 하루되세요
> 통큰베팅 님이 쓴 글입니다.
> 제목 : 함수변환요청(SK)
> 안녕하세요?
아래는 SK증권에서 사용했던 함수입니다.
예스랭귀지로 변환 부탁드립니다.
감사합니다.
---------------------------------------------------------------------------------------
Input :
MarketStart_Time( 9 ),
MarketClose_Time( 11 );
Vars :
Today_Profit( 0 ),
MedianPrice_( 0 ),
Highest_Value( 0 ),
Lowest_Value( 0 );
value1 = OneTick * PriceScale; // Tick value
value2 = IntPortion(time/10000);
If value2 = MarketStart_Time And value2[1] <> MarketStart_Time Then Value3 = NetProfit[1];
Today_profit = NetProfit - Value3;
condition1 = Today_profit <= value1 * -40;
HighestLowest(H, L, 6, Highest_Value, v1, Lowest_Value, v2);
MedianPrice_ = (Highest_Value + Lowest_Value)/2;
Value4 = FracPortion(Time/10000) * 100;
If condition1 = False And Fracportion(Value4/100) = 0.0
Then
Begin
If MedianPrice_ < NextBarOpen Then Buy("매수", Atmarket);
If MedianPrice_ > NextBarOpen Then Sell("매도", Atmarket);
End;
SetStopProfittarget(value1 * 2);
SetStopLoss(value1 * 20);
SetStopEndofday(MarketClose_Time * 10000 - 1000);