커뮤니티
안녕하세요?
2017-12-15 09:01:22
230
글번호 114990
안녕하세요?
아래 수식좀 부탁드립니다.
1. 첨부한 그림참고 바랍니다.
*. 매수
저점 L1이 L2보다 저점이 높을 경우 H1보다 +1틱일때 매수.
손절은 L1 보다 -1틱일때
*. 매도
고점 H1이 H2보다 고점이 낮을 경우 L1보다 -1틱일때 매도.
손절은 H1 보다 +1틱일때
※ 손절지점이 진입시점기준으로 매수는 L1,매도는 H1입니다.
파동이 한파동 진행되면 그지점은 매수는 L2,매도는 H2로 변경됨니다.
2. 피보나치 조정일때 분할진입 수식 부탁드립니다.
*.매수(진입시점은 L1파동이 진행될때 입니다.)
-. L2와 H1의 진폭이 50틱 이상일때(외부변수로 부탁드립니다.)
-. 0.382 조정시(하락) 1계약 매수
-. 0.5 조정시(하락) 2계약 추가매수
-. 0.618 조정시(하락) 4계약 추가매수
손절은 L2 보다 -1틱일때
*.매도 (진입시점은 H1파동이 진행될때 입니다.)
-. H2와 L1의 진폭이 -50틱 이상일때(외부변수로 부탁드립니다.)
-. 0.382 조정시(상승) 1계약 매도
-. 0.5 조정시(상승) 2계약 추가매도
-. 0.618 조정시(상승) 4계약 추가매도
손절은 H2 보다 +1틱일때
※ 손절지점이 진입시점기준으로 매수는 L2,매도는 H2입니다.
파동이 한파동 진행되면 그지점은 매수는 L3,매도는 H3로 변경됨니다.
추운 날씨에 감기 조심하시구요.
수식작성 미리 감사드립니다.
답변 1
예스스탁 예스스탁 답변
2017-12-15 11:29:04
안녕하세요
예스스탁입니다.
고점저점에 대한 특별한 언급이 없으셔서
게시판에 자주 올라오는 수식지왕님의 지그재그를 기준으로 했습니다.
1
Input: length(10);
Var : j(0),jj(0),T(0);
var : 최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""),TL1(0);
Array:HH[10,4](0),LL[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime
If Index == 0 Then
{
HH[1,1] = H;
LL[1,1] = L;
}
Condition1 = Highest(H,length) == H and 최종고가 <> H;
Condition2 = Lowest (L,length) == L and 최종저가 <> L;
처리구분 = "";
If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생
{
If 최종꼭지점 == "저점" Then
{
If LL[1,1] > L Then 처리구분 = "저점처리";
Else 처리구분 = "고점처리";
}
Else If 최종꼭지점 == "고점" Then
{
If HH[1,1] < H Then 처리구분 = "고점처리";
Else 처리구분 = "저점처리";
}
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
#==========================================#
If 처리구분 == "고점처리" Then
{
T = 1;
최종고가 = H; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
HH[j,jj] = HH[j-1,jj];
}
}
HH[1,1] = H;
HH[1,2] = Index;
HH[1,3] = sDate;
HH[1,4] = sTime;
TL1 = TL_New(LL[1,3],LL[1,4],LL[1,1],HH[1,3],HH[1,4],HH[1,1]);
TL_SetSize(TL1,1);
TL_SetColor(TL1,RED);
}
Else If HH[1,1] < H Then // 1번 고점보다 높은 고가 출현
{
HH[1,1] = H;
HH[1,2] = Index;
HH[1,3] = sDate;
HH[1,4] = sTime;
TL_SetEnd(TL1,HH[1,3],HH[1,4],HH[1,1]);
// 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임
}
최종꼭지점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then
{
T = -1;
최종저가 = L;
If 최종꼭지점 == "고점" then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
LL[j,jj] = LL[j-1,jj];
}
}
LL[1,1] = L;
LL[1,2] = Index;
LL[1,3] = sDate;
LL[1,4] = sTime;
TL1 = TL_New(HH[1,3],HH[1,4],HH[1,1],LL[1,3],LL[1,4],LL[1,1]);
TL_SetSize(TL1,1);
TL_SetColor(TL1,BLUE);
}
Else If LL[1,1] > L then
{
LL[1,1] = L;
LL[1,2] = Index;
LL[1,3] = sDate;
LL[1,4] = sTime;
TL_SetEnd(TL1,LL[1,3],LL[1,4],LL[1,1]);
}
최종꼭지점 = "저점";
}
if T == 1 and LL[1,1] > LL[2,1] Then
buy("b",AtStop,HH[2,1]+PriceScale*1);
if T == -1 and HH[1,1] > HH[2,1] Then
sell("s",AtStop,LL[2,1]-PriceScale*1);
if MarketPosition == 1 Then
ExitLong("bx",AtStop,LL[1,1][BarsSinceEntry]);
if MarketPosition == -1 Then
ExitShort("sx",AtStop,HH[1,1][BarsSinceEntry]);
2
Input: length(10),z(50);
Var : j(0),jj(0),T(0);
var : 최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""),TL1(0);
Array:HH[10,4](0),LL[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime
If Index == 0 Then
{
HH[1,1] = H;
LL[1,1] = L;
}
Condition1 = Highest(H,length) == H and 최종고가 <> H;
Condition2 = Lowest (L,length) == L and 최종저가 <> L;
처리구분 = "";
If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생
{
If 최종꼭지점 == "저점" Then
{
If LL[1,1] > L Then 처리구분 = "저점처리";
Else 처리구분 = "고점처리";
}
Else If 최종꼭지점 == "고점" Then
{
If HH[1,1] < H Then 처리구분 = "고점처리";
Else 처리구분 = "저점처리";
}
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
#==========================================#
If 처리구분 == "고점처리" Then
{
T = 1;
최종고가 = H; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
HH[j,jj] = HH[j-1,jj];
}
}
HH[1,1] = H;
HH[1,2] = Index;
HH[1,3] = sDate;
HH[1,4] = sTime;
TL1 = TL_New(LL[1,3],LL[1,4],LL[1,1],HH[1,3],HH[1,4],HH[1,1]);
TL_SetSize(TL1,1);
TL_SetColor(TL1,RED);
}
Else If HH[1,1] < H Then // 1번 고점보다 높은 고가 출현
{
HH[1,1] = H;
HH[1,2] = Index;
HH[1,3] = sDate;
HH[1,4] = sTime;
TL_SetEnd(TL1,HH[1,3],HH[1,4],HH[1,1]);
// 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임
}
최종꼭지점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then
{
T = -1;
최종저가 = L;
If 최종꼭지점 == "고점" then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
LL[j,jj] = LL[j-1,jj];
}
}
LL[1,1] = L;
LL[1,2] = Index;
LL[1,3] = sDate;
LL[1,4] = sTime;
TL1 = TL_New(HH[1,3],HH[1,4],HH[1,1],LL[1,3],LL[1,4],LL[1,1]);
TL_SetSize(TL1,1);
TL_SetColor(TL1,BLUE);
}
Else If LL[1,1] > L then
{
LL[1,1] = L;
LL[1,2] = Index;
LL[1,3] = sDate;
LL[1,4] = sTime;
TL_SetEnd(TL1,LL[1,3],LL[1,4],LL[1,1]);
}
최종꼭지점 = "저점";
}
if T == -1 and HH[1,1] >= LL[2,1]+PriceScale*Z Then{
if LL[1,1] > HH[1,1]-(HH[1,1]-LL[2,1])*0.382 Then
buy("b1",AtLimit,HH[1,1]-(HH[1,1]-LL[2,1])*0.382, 1);
if LL[1,1] > HH[1,1]-(HH[1,1]-LL[2,1])*0.500 Then
buy("b2",AtLimit,HH[1,1]-(HH[1,1]-LL[2,1])*0.500, 2);
if LL[1,1] > HH[1,1]-(HH[1,1]-LL[2,1])*0.618 Then
buy("b3",AtLimit,HH[1,1]-(HH[1,1]-LL[2,1])*0.618, 4);
}
if T == 1 and LL[1,1] <= HH[2,1]-PriceScale*Z Then{
if HH[1,1] < LL[1,1]+(HH[2,1]-LL[1,1])*0.382 Then
sell("s1",AtLimit,LL[1,1]+(HH[2,1]-LL[1,1])*0.382, 1);
if HH[1,1] < LL[1,1]+(HH[2,1]-LL[1,1])*0.500 Then
sell("s2",AtLimit,LL[1,1]+(HH[2,1]-LL[1,1])*0.500, 2);
if HH[1,1] < LL[1,1]+(HH[2,1]-LL[1,1])*0.618 Then
sell("s3",AtLimit,LL[1,1]+(HH[2,1]-LL[1,1])*0.618, 4);
}
if MarketPosition == 1 Then
ExitLong("bx",AtStop,LL[2,1][BarsSinceEntry]);
if MarketPosition == -1 Then
ExitShort("sx",AtStop,HH[2,1][BarsSinceEntry]);
즐거운 하루되세요
> 상중하 님이 쓴 글입니다.
> 제목 : 안녕하세요?
> 안녕하세요?
아래 수식좀 부탁드립니다.
1. 첨부한 그림참고 바랍니다.
*. 매수
저점 L1이 L2보다 저점이 높을 경우 H1보다 +1틱일때 매수.
손절은 L1 보다 -1틱일때
*. 매도
고점 H1이 H2보다 고점이 낮을 경우 L1보다 -1틱일때 매도.
손절은 H1 보다 +1틱일때
※ 손절지점이 진입시점기준으로 매수는 L1,매도는 H1입니다.
파동이 한파동 진행되면 그지점은 매수는 L2,매도는 H2로 변경됨니다.
2. 피보나치 조정일때 분할진입 수식 부탁드립니다.
*.매수(진입시점은 L1파동이 진행될때 입니다.)
-. L2와 H1의 진폭이 50틱 이상일때(외부변수로 부탁드립니다.)
-. 0.382 조정시(하락) 1계약 매수
-. 0.5 조정시(하락) 2계약 추가매수
-. 0.618 조정시(하락) 4계약 추가매수
손절은 L2 보다 -1틱일때
*.매도 (진입시점은 H1파동이 진행될때 입니다.)
-. H2와 L1의 진폭이 -50틱 이상일때(외부변수로 부탁드립니다.)
-. 0.382 조정시(상승) 1계약 매도
-. 0.5 조정시(상승) 2계약 추가매도
-. 0.618 조정시(상승) 4계약 추가매도
손절은 H2 보다 +1틱일때
※ 손절지점이 진입시점기준으로 매수는 L2,매도는 H2입니다.
파동이 한파동 진행되면 그지점은 매수는 L3,매도는 H3로 변경됨니다.
추운 날씨에 감기 조심하시구요.
수식작성 미리 감사드립니다.