커뮤니티
수식재문의
2018-07-02 13:00:31
163
글번호 120208
아래 요청드렸던것인데 원하는대로 전달이 안되서요..
지금 매수식 매도식 2개있는데 이걸 1개의 식으로 합칠 수 있게 부탁드립니다.
input : p1(55),P2(20),atrp(10),n(2);
var : cnt(0),h1(0),l1(0),h2(0),l2(0),atrv(0),T(0);
var : entry(true);
atrv = atr(atrp);
if TotalTrades > TotalTrades[1] and IsExitName("atrbl",1) == false and PositionProfit(1) < 0 Then
{
entry = false;
T = 0;
}
if entry == false Then
{
if crossup(H,h1) Then
{
T = 1;
var1 = c;
}
if T == 1 Then
{
if L <= var1-atrv[1]*n Then
{
T = 0;
entry = true;
}
if CrossDown(L,L2) Then
{
T = 0;
entry = true;
}
}
}
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if MarketPosition == 0 and crossup(h,h1) and entry == true Then
{
buy("매수");
}
if MarketPosition == 1 Then
{
ExitLong("atrbl",AtStop,EntryPrice-atrv*n);
if CrossDown(l,l2) Then
{
ExitLong("청산");
}
}
2
input : p1(55),P2(20),atrp(10),n(2);
var : cnt(0),h1(0),l1(0),h2(0),l2(0),atrv(0),T(0);
var : entry(true);
atrv = atr(atrp);
if TotalTrades > TotalTrades[1] and IsExitName("atrsl",1) == false and PositionProfit(1) < 0 Then
{
entry = false;
T = 0;
}
if entry == false Then
{
if CrossDown(L,L1) Then
{
T = 1;
var1 = c;
}
if T == 1 Then
{
if H >= var1+atrv[1]*n Then
{
T = 0;
entry = true;
}
if CrossUp(h,H2) Then
{
T = 0;
entry = true;
}
}
}
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if MarketPosition == 0 and CrossDown(L,L1) and entry == true Then
{
sell("매도");
}
if MarketPosition == -1 Then
{
ExitShort("atrsl",AtStop,EntryPrice+atrv*n);
if CrossUp(h,h2) Then
{
ExitShort("청산");
}
}
답변 1
예스스탁 예스스탁 답변
2018-07-02 16:09:35
안녕하세요
예스스탁입니다.
input : p1(55),P2(20),atrp(10),n(2);
var : cnt(0),h1(0),l1(0),h2(0),l2(0),atrv(0),T(0);
var : entry(true);
atrv = atr(atrp);
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if TotalTrades > TotalTrades[1] and IsExitName("atrbl",1) == false and PositionProfit(1) < 0 Then
{
entry = false;
T = 0;
}
if TotalTrades > TotalTrades[1] and IsExitName("atrsl",1) == false and PositionProfit(1) < 0 Then
{
entry = false;
T = 0;
}
if entry == false Then
{
if crossup(H,h1) Then
{
T = 1;
var1 = c;
}
if crossup(L,L1) Then
{
T = -1;
var1 = c;
}
if T == 1 Then
{
if L <= var1-atrv[1]*n Then
{
T = 0;
entry = true;
}
if CrossDown(L,L2) Then
{
T = 0;
entry = true;
}
}
if T == -1 Then
{
if H >= var1+atrv[1]*n Then
{
T = 0;
entry = true;
}
if CrossUp(h,H2) Then
{
T = 0;
entry = true;
}
}
}
if MarketPosition == 0 and crossup(h,h1) and entry == true Then
{
buy("매수");
}
if MarketPosition == 1 Then
{
ExitLong("atrbl",AtStop,EntryPrice-atrv*n);
if CrossDown(l,l2) Then
{
ExitLong("매수청산");
}
}
if MarketPosition == 0 and CrossDown(L,L1) and entry == true Then
{
sell("매도");
}
if MarketPosition == -1 Then
{
ExitShort("atrsl",AtStop,EntryPrice+atrv*n);
if CrossUp(h,h2) Then
{
ExitShort("매도청산");
}
}
즐거운 하루되세요
> 렉쳐 님이 쓴 글입니다.
> 제목 : 수식재문의
> 아래 요청드렸던것인데 원하는대로 전달이 안되서요..
지금 매수식 매도식 2개있는데 이걸 1개의 식으로 합칠 수 있게 부탁드립니다.
input : p1(55),P2(20),atrp(10),n(2);
var : cnt(0),h1(0),l1(0),h2(0),l2(0),atrv(0),T(0);
var : entry(true);
atrv = atr(atrp);
if TotalTrades > TotalTrades[1] and IsExitName("atrbl",1) == false and PositionProfit(1) < 0 Then
{
entry = false;
T = 0;
}
if entry == false Then
{
if crossup(H,h1) Then
{
T = 1;
var1 = c;
}
if T == 1 Then
{
if L <= var1-atrv[1]*n Then
{
T = 0;
entry = true;
}
if CrossDown(L,L2) Then
{
T = 0;
entry = true;
}
}
}
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if MarketPosition == 0 and crossup(h,h1) and entry == true Then
{
buy("매수");
}
if MarketPosition == 1 Then
{
ExitLong("atrbl",AtStop,EntryPrice-atrv*n);
if CrossDown(l,l2) Then
{
ExitLong("청산");
}
}
2
input : p1(55),P2(20),atrp(10),n(2);
var : cnt(0),h1(0),l1(0),h2(0),l2(0),atrv(0),T(0);
var : entry(true);
atrv = atr(atrp);
if TotalTrades > TotalTrades[1] and IsExitName("atrsl",1) == false and PositionProfit(1) < 0 Then
{
entry = false;
T = 0;
}
if entry == false Then
{
if CrossDown(L,L1) Then
{
T = 1;
var1 = c;
}
if T == 1 Then
{
if H >= var1+atrv[1]*n Then
{
T = 0;
entry = true;
}
if CrossUp(h,H2) Then
{
T = 0;
entry = true;
}
}
}
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if MarketPosition == 0 and CrossDown(L,L1) and entry == true Then
{
sell("매도");
}
if MarketPosition == -1 Then
{
ExitShort("atrsl",AtStop,EntryPrice+atrv*n);
if CrossUp(h,h2) Then
{
ExitShort("청산");
}
}