커뮤니티
수식문의드립니다
2021-07-18 12:32:37
1258
글번호 150839
첨부 이미지
그림1
글번호 73127 아래내용으로 문의드렸었는데, 추가내용이 있어서 부탁드립니다.
매수:
붉은구름대로 전환한 이후 첫 음봉이 나온후 최근 5개봉중 최고점을 진입선으로 잡고(음봉포함),
음봉이후 최저가격을 저가선으로 잡습니다.(음봉포함)
청산선가격 = 진입선가격 + (진입선가격 - 저가)
atstop,atlimit를 이용해서 실시간진입 또는 청산합니다.
매도는 반대로 부탁드립니다.
★★★추가내용★★★
1. 그림에 보이는 저가선을 손절선으로 합니다.
2. 오전10시~오후10시 까지만 작동후 청산합니다.
- 1. 151567_제목_없음01.png (0.01 MB)
답변 1
예스스탁 예스스탁 답변
2021-07-20 11:20:56
안녕하세요
예스스탁입니다.
var : 전환선(0),기준선(0),선행스팬1(0),선행스팬2(0);
var : T(0);
var : Bcond(false),BE(0),BL(0),BX(0);
var : Scond(false),SE(0),SH(0),SX(0);
전환선 = (highest(H,9)+lowest(L,9))/2;
기준선 = (highest(H,26)+lowest(L,26))/2;
선행스팬1 = (전환선[25]+기준선[25])/2;
선행스팬2 = (highest(H,52)[25]+lowest(L,52)[25])/2;
if CrossUp(선행스팬1,선행스팬2) Then
T = 1;
if CrossDown(선행스팬1,선행스팬2) Then
T = -1;
if T == 1 and C < O Then
{
T = 2;
Bcond = true;
BE = Highest(H,5);
BL = L;
}
if T == 2 Then
{
if L < BL Then
BL = L;
BX = BE+abs(BE-BL);
if MarketPosition <= 0 and Bcond == true Then
Buy("b",AtStop,BE);
}
if MarketPosition == 1 Then
{
Bcond = False;
ExitLong("bp",AtLimit,BX[BarsSinceEntry]);
ExitLong("bl",AtStop,BL[BarsSinceEntry]);
}
if T == -1 and C > O Then
{
T = -2;
Scond = true;
SE = lowest(L,5);
SH = H;
}
if T == -2 Then
{
if H > SH Then
SH = H;
SX = SE-abs(SE-SH);
if MarketPosition >= 0 and Scond == true Then
Sell("s",AtStop,SE);
}
if MarketPosition == -1 Then
{
Scond = False;
ExitShort("sp",AtLimit,SX[BarsSinceEntry]);
ExitShort("sl",AtStop,SH[BarsSinceEntry]);
}
즐거운 하루되세요
> 고나리자 님이 쓴 글입니다.
> 제목 : 수식문의드립니다
> 글번호 73127 아래내용으로 문의드렸었는데, 추가내용이 있어서 부탁드립니다.
매수:
붉은구름대로 전환한 이후 첫 음봉이 나온후 최근 5개봉중 최고점을 진입선으로 잡고(음봉포함),
음봉이후 최저가격을 저가선으로 잡습니다.(음봉포함)
청산선가격 = 진입선가격 + (진입선가격 - 저가)
atstop,atlimit를 이용해서 실시간진입 또는 청산합니다.
매도는 반대로 부탁드립니다.
★★★추가내용★★★
1. 그림에 보이는 저가선을 손절선으로 합니다.
2. 오전10시~오후10시 까지만 작동후 청산합니다.
다음글
이전글