커뮤니티
수식요청드립니다.
2016-01-04 18:43:26
141
글번호 94030
안녕하세요.
새해복많이 받으세요.
1. stime >= 090100 && stime <= 100330 을, 장시작 후 1분 부터 1시간3분30초 까지 수식
으로 변경 요청 드립니다.
2. 아래 당일진입횟수제한, 피라미딩진입 진입적용 수식에서, 매도 매수 당일손실제한으로
손절될 경우, 1회 추가 진입 청산 수식으로 수정 보안 변경 요청 드립니다.
=> 매도, 매수, 당일손실제한 손절 청산시 손절 방향 무관하게, 1회 재진입
=> 10 이평이 20 이평 하향돌파시 매도 재진입 / 상향돌파시 매수 재진입
=> 1회 재진입시 손절 0.5 PT 청산, 익절 1.0 PT 청산,
( 제가 수정 추가한 아래 추가진입 수식으로 적용시 오류로 진입 청산이 잘 안되네요.)
------------------------------------------------------------------------------
input : N(1),PN(2),당일손실(1.0),i증감(0.3),진입수량(1);
var : cnt(0),BCount(0),SCount(0);
var : NP(0),PreNP(0),DayPL(0),loss(0),v1(0);
var : mav1(0),mav2(0),mav3(0),mav4(0),mav5(0),mav6(0);
var : Bxcond(false),SxCond(false);
var : TT(0),KK(0),DD(0);
NP = NetProfit;
if date != date[1] Then{
preNP = NP[1];
Condition1 = false;
v1 = 0;
}
dayPL = NP-PreNP;
BCount = 0 ;
SCount = 0 ;
for cnt = 0 to 10 {
if EntryDate(cnt) == sdate and MarketPosition(cnt) == 1 then
BCount = BCount + 1;
if EntryDate(cnt) == sdate and MarketPosition(cnt) == -1 then
SCount = SCount + 1;
}
if Condition1 == false and TotalTrades > TotalTrades[1] Then{
Condition1 = true;
if PositionProfit(1) > 0 Then
v1 = PositionProfit(1);
}
//-------------------------------------------------------------------------
if MarketPosition == 1 Then{
ExitLong("당일손실제한bx3",AtStop,avgEntryPrice-(당일손실+(dayPL-v1))/CurrentContracts);
}
if MarketPosition == -1 Then{
ExitShort("당일손실제한sx3",AtStop,avgEntryPrice+(당일손실+(dayPL-v1))/CurrentContracts);
}
//------------------------------------------------------------------------------------------------------
if MarketPosition == 1 and Bxcond == false Then
Buy("PBB",atlimit,LatestEntryPrice(0)+i증감,진입수량);
if MarketPosition == -1 and SxCond == false Then
sell("PSS",atlimit,LatestEntryPrice(0)-i증감,진입수량);
//-----------------------------------------------------------------------------------------------------
#추가진입
if MarketPosition == 0 and TotalTrades > TotalTrades[1] and BCount+SCount < PN and
IsExitName("당일손실제한sx3",2) == true or
IsExitName("당일손실제한bx3",2) == true Then{
if Crossup(ma(c,10),ma(C,20)) Then
Buy("BB",AtMarket);
if CrossDown(ma(C,10),ma(C,20)) Then
Sell("SS",AtMarket);
if MarketPosition == 1 and IsEntryName("BB") == true Then
ExitLong("BL1",AtStop,avgEntryPrice-0.5);
ExitLong("BP1",AtLimit,avgEntryPrice+1.0);
if MarketPosition == -1 and IsEntryName("SS") == true Then
ExitShort("SL1",AtStop,avgEntryPrice+0.5
ExitShort("SP1",AtLimit,avgEntryPrice-1.0);
}
//------------------------------------------------------------------------------------------------------
답변 1
예스스탁 예스스탁 답변
2016-01-05 14:19:04
안녕하세요
예스스탁입니다.
1.
var : TM(0),SS(0),TS(0),T1(0);
TM = TimeToMinutes(stime);
SS = FracPortion(stime/100);
TS = TM+SS;
if Bdate != Bdate[1] Then
T1 = TS;
if TS >= T1+1 and TS <= T1+63.30 Then
2.
input : N(1),PN(2),당일손실(1.0),i증감(0.3),진입수량(1);
var : cnt(0),BCount(0),SCount(0);
var : NP(0),PreNP(0),DayPL(0),loss(0),v1(0);
var : mav1(0),mav2(0),mav3(0),mav4(0),mav5(0),mav6(0);
var : Bxcond(false),SxCond(false);
var : Xcond(false);
var : TT(0),KK(0),DD(0);
NP = NetProfit;
if date != date[1] Then{
preNP = NP[1];
Condition1 = false;
v1 = 0;
Xcond = false;
}
dayPL = NP-PreNP;
BCount = 0 ;
SCount = 0 ;
for cnt = 0 to 10 {
if EntryDate(cnt) == sdate and MarketPosition(cnt) == 1 then
BCount = BCount + 1;
if EntryDate(cnt) == sdate and MarketPosition(cnt) == -1 then
SCount = SCount + 1;
}
if Condition1 == false and TotalTrades > TotalTrades[1] Then{
Condition1 = true;
if PositionProfit(1) > 0 Then
v1 = PositionProfit(1);
}
//-------------------------------------------------------------------------
//추가진입인 BB가 아닐때만 발동
if MarketPosition == 1 and IsEntryName("BB") == false Then{
ExitLong("당일손실제한bx3",AtStop,avgEntryPrice-(당일손실+(dayPL-v1))/CurrentContracts);
}
//추가진입인 SS가 아닐때만 발동
if MarketPosition == -1 and IsEntryName("SS") == false Then{
ExitShort("당일손실제한sx3",AtStop,avgEntryPrice+(당일손실+(dayPL-v1))/CurrentContracts);
}
//------------------------------------------------------------------------------------------------------
if MarketPosition == 1 and Bxcond == false and Xcond == false Then
Buy("PBB",atlimit,LatestEntryPrice(0)+i증감,진입수량);
if MarketPosition == -1 and Sxcond == false and XCond == false Then
sell("PSS",atlimit,LatestEntryPrice(0)-i증감,진입수량);
//-----------------------------------------------------------------------------------------------------
#당일손실제한 청산이 발생하면 Xcond는 true로 변경
if MarketPosition == 0 and
TotalTrades > TotalTrades[1] and
(IsExitName("당일손실제한sx3",1) == true or IsExitName("당일손실제한bx3",1) == true) Then
Xcond = true;
#추가진입
#무포지션이고 Xcond가 true이고
#직전청산이 당일손실제한일때만 발생
if MarketPosition == 0 and Xcond == true and
(IsExitName("당일손실제한sx3",1) == true or IsExitName("당일손실제한bx3",1) == true) Then{
if Crossup(ma(c,10),ma(C,20)) Then
Buy("BB",AtMarket);
if CrossDown(ma(C,10),ma(C,20)) Then
Sell("SS",AtMarket);
}
#BB진입에 대한 청산
if MarketPosition == 1 and IsEntryName("BB") == true Then{
ExitLong("BL1",AtStop,avgEntryPrice-0.5);
ExitLong("BP1",AtLimit,avgEntryPrice+1.0);
}
#SS진입에 대한 청산
if MarketPosition == -1 and IsEntryName("SS") == true Then{
ExitShort("SL1",AtStop,avgEntryPrice+0.5);
ExitShort("SP1",AtLimit,avgEntryPrice-1.0);
}
//------------------------------------------------------------------------------------------------------
즐거운 하루되세요
> dandy 님이 쓴 글입니다.
> 제목 : 수식요청드립니다.
> 안녕하세요.
새해복많이 받으세요.
1. stime >= 090100 && stime <= 100330 을, 장시작 후 1분 부터 1시간3분30초 까지 수식
으로 변경 요청 드립니다.
2. 아래 당일진입횟수제한, 피라미딩진입 진입적용 수식에서, 매도 매수 당일손실제한으로
손절될 경우, 1회 추가 진입 청산 수식으로 수정 보안 변경 요청 드립니다.
=> 매도, 매수, 당일손실제한 손절 청산시 손절 방향 무관하게, 1회 재진입
=> 10 이평이 20 이평 하향돌파시 매도 재진입 / 상향돌파시 매수 재진입
=> 1회 재진입시 손절 0.5 PT 청산, 익절 1.0 PT 청산,
( 제가 수정 추가한 아래 추가진입 수식으로 적용시 오류로 진입 청산이 잘 안되네요.)
------------------------------------------------------------------------------
input : N(1),PN(2),당일손실(1.0),i증감(0.3),진입수량(1);
var : cnt(0),BCount(0),SCount(0);
var : NP(0),PreNP(0),DayPL(0),loss(0),v1(0);
var : mav1(0),mav2(0),mav3(0),mav4(0),mav5(0),mav6(0);
var : Bxcond(false),SxCond(false);
var : TT(0),KK(0),DD(0);
NP = NetProfit;
if date != date[1] Then{
preNP = NP[1];
Condition1 = false;
v1 = 0;
}
dayPL = NP-PreNP;
BCount = 0 ;
SCount = 0 ;
for cnt = 0 to 10 {
if EntryDate(cnt) == sdate and MarketPosition(cnt) == 1 then
BCount = BCount + 1;
if EntryDate(cnt) == sdate and MarketPosition(cnt) == -1 then
SCount = SCount + 1;
}
if Condition1 == false and TotalTrades > TotalTrades[1] Then{
Condition1 = true;
if PositionProfit(1) > 0 Then
v1 = PositionProfit(1);
}
//-------------------------------------------------------------------------
if MarketPosition == 1 Then{
ExitLong("당일손실제한bx3",AtStop,avgEntryPrice-(당일손실+(dayPL-v1))/CurrentContracts);
}
if MarketPosition == -1 Then{
ExitShort("당일손실제한sx3",AtStop,avgEntryPrice+(당일손실+(dayPL-v1))/CurrentContracts);
}
//------------------------------------------------------------------------------------------------------
if MarketPosition == 1 and Bxcond == false Then
Buy("PBB",atlimit,LatestEntryPrice(0)+i증감,진입수량);
if MarketPosition == -1 and SxCond == false Then
sell("PSS",atlimit,LatestEntryPrice(0)-i증감,진입수량);
//-----------------------------------------------------------------------------------------------------
#추가진입
if MarketPosition == 0 and TotalTrades > TotalTrades[1] and BCount+SCount < PN and
IsExitName("당일손실제한sx3",2) == true or
IsExitName("당일손실제한bx3",2) == true Then{
if Crossup(ma(c,10),ma(C,20)) Then
Buy("BB",AtMarket);
if CrossDown(ma(C,10),ma(C,20)) Then
Sell("SS",AtMarket);
if MarketPosition == 1 and IsEntryName("BB") == true Then
ExitLong("BL1",AtStop,avgEntryPrice-0.5);
ExitLong("BP1",AtLimit,avgEntryPrice+1.0);
if MarketPosition == -1 and IsEntryName("SS") == true Then
ExitShort("SL1",AtStop,avgEntryPrice+0.5
ExitShort("SP1",AtLimit,avgEntryPrice-1.0);
}
//------------------------------------------------------------------------------------------------------