커뮤니티
중심선 및 하단표시 요청 드립니다.(2건)
2018-11-21 12:53:45
236
글번호 123748
* 항상 많은 도움에 정말 고맙습니다.
<요청1>
①아래 수식에서 표시가 상단만 나오는데 중심선 및 하단선 표시도 부탁 드립니다.
②상단선이 이전 3개 상단선 보더 크면 매수, 작으면 매도 로직 좀 부탁 드립니다.
③선 완성시 소리로 나오게 표현좀 부탁 드립니다.
PlaySound("C:￦예스트레이더￦data￦Sound￦stop"); 소리문장어디에 삽입하죠?
### ①번이래 수식
input : N(5);
var : idx(0),hh(0),d1(0),t1(0),TL(0),TF(0);
if bdate != bdate[1] Then
idx = 0;
Else
idx = idx+1;
TF = idx%N;
if bdate != bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then
{
hh = h;
d1 = sdate;
t1 = stime;
TL = TL_New(d1,t1,hh,sdate,stime,hh);
TL_SetColor(TL,RED);
}
else
{
if H > hh Then
hh = h;
TL_SetBegin(TL,d1,t1,hh);
TL_SetEnd(TL,sdate,stime,hh);
}
<요청2> 아래 수식에서 직선이 그어지면(완료)되면 매매 로직 부탁 드립니다.
1. 고가에서 저가로 선이 완료되면 바로 매수
2. 저가에서 고가로 선이 완료되면 바로 매도
3. 직전 고점 이나 저점 깨지면 스위칭
▶매수 했는데 직전 완성된 선의 저점 보다 하락 하면 매도청산 새로 매도진입)
▶매도 했는데 직전 완성된 선의 고점 보다 상승 하면 매수청산 새로 매수진입)
4. 아래수식에서 글짜가 매우 크게 나오는데 글자크기 조정 항목이 어느것인가요?
## 아래수식 ##################
Input:barCnt(10);
Var:j(0),turnPntBit(""),TL1(0),TL33(0),TL44(0),HD(0),HT(0),LD(0),LT(0),HH(0),LL(0);
var : TL121(0),TL122(0),tx121(0),tx122(0);
Array:valArr[10](0),barArr[10](0),turnPntArr[10]("");
For j = 0 To 9 { barArr[j] = barArr[j] + 1; }
Condition1 = Highest(H,barCnt)[barCnt+1] <= H[barCnt] and H[barCnt] > Highest(H,barCnt);
Condition2 = Lowest(L,barCnt)[barCnt+1] >= L[barCnt] and L[barCnt] < Lowest(L,barCnt);
turnPntBit = "";
If Condition1 and Condition2 Then {
If Max(valArr[1],valArr[2]) < H[barCnt] and Min(valArr[1],valArr[2]) > L[barCnt] Then
turnPntBit = "HiLo";
Else If Max(valArr[1],valArr[2]) < H[barCnt] Then turnPntBit = "Hi";
Else If Min(valArr[1],valArr[2]) > L[barCnt] Then turnPntBit = "Lo";
Else If turnPntArr[1] == "Hi" Then turnPntBit = "Lo";
Else If turnPntArr[1] == "Lo" Then turnPntBit = "Hi";
}
Else If Condition1 Then turnPntBit = "Hi";
Else If Condition2 Then turnPntBit = "Lo";
If turnPntBit <> "" Then
{
If turnPntBit == "HiLo" Then
{
valArr[1] = IFF(turnPntArr[1] == "Hi",H[barCnt],L[barCnt]);
barArr[1] = barCnt;
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
If turnPntArr[1] == "Hi" Then
turnPntBit = "Lo";
Else
turnPntBit = "Hi";
}
If turnPntBit <> turnPntArr[1] Then
{
for j = 8 downto 1
{
valArr[j+1] = valArr[j];
barArr[j+1] = barArr[j];
turnPntArr[j+1] = turnPntArr[j];
}
}
If turnPntBit <> turnPntArr[1] or
(turnPntBit == turnPntArr[1] and
((turnPntBit == "Hi" and valArr[1] < H[barCnt]) or
(turnPntBit == "Lo" and valArr[1] > L[barCnt]))) Then {
valArr[1] = IFF(turnPntBit == "Hi",H[barCnt],L[barCnt]);
barArr[1] = barCnt;
turnPntArr[1] = turnPntBit;
If turnPntArr[1][1] <> turnPntArr[1][0] Then
TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],
sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
Else
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
}
}
TL_SetSize(TL1,2);
TL_SetColor(TL1,RED);
* 고맙습니다.
답변 1
예스스탁 예스스탁 답변
2018-11-22 10:08:10
안녕하세요? 예스스탁입니다.
수식담당자 휴가중이라 대신 답변 가능한 1번 내용(중심선 및 하단선)만 작성했습니다.
나머지 내용은 다음주 수요일 이후 다시 요청 부탁드립니다.
input : N(5);
var : idx(0),hh(0),d1(0),t1(0),TL(0),TF(0);
var : LL(0),TL2(0), mid(0), TL3(0);
if bdate != bdate[1] Then
idx = 0;
Else
idx = idx+1;
TF = idx%N;
if bdate != bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then
{
hh = h;
LL = L;
mid = (hh+LL)/2;
d1 = sdate;
t1 = stime;
TL = TL_New(d1,t1,hh,sdate,stime,hh);
TL_SetColor(TL,RED);
TL2 = TL_New(d1,t1,LL,sdate,stime,LL);
TL_SetColor(TL2,blue);
TL3 = TL_New(d1,t1,mid,sdate,stime,mid);
TL_SetColor(TL3,gray);
}
else
{
if H > hh Then
hh = h;
if L < LL Then
LL = L;
mid = (hh+LL)/2;
TL_SetBegin(TL,d1,t1,hh);
TL_SetEnd(TL,sdate,stime,hh);
TL_SetBegin(TL2,d1,t1,LL);
TL_SetEnd(TL2,sdate,stime,LL);
TL_SetBegin(TL3,d1,t1,mid);
TL_SetEnd(TL3,sdate,stime,mid);
}
감사합니다.
> 요타 님이 쓴 글입니다.
> 제목 : 중심선 및 하단표시 요청 드립니다.(2건)
> * 항상 많은 도움에 정말 고맙습니다.
<요청1>
①아래 수식에서 표시가 상단만 나오는데 중심선 및 하단선 표시도 부탁 드립니다.
②상단선이 이전 3개 상단선 보더 크면 매수, 작으면 매도 로직 좀 부탁 드립니다.
③선 완성시 소리로 나오게 표현좀 부탁 드립니다.
PlaySound("C:￦예스트레이더￦data￦Sound￦stop"); 소리문장어디에 삽입하죠?
### ①번이래 수식
input : N(5);
var : idx(0),hh(0),d1(0),t1(0),TL(0),TF(0);
if bdate != bdate[1] Then
idx = 0;
Else
idx = idx+1;
TF = idx%N;
if bdate != bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then
{
hh = h;
d1 = sdate;
t1 = stime;
TL = TL_New(d1,t1,hh,sdate,stime,hh);
TL_SetColor(TL,RED);
}
else
{
if H > hh Then
hh = h;
TL_SetBegin(TL,d1,t1,hh);
TL_SetEnd(TL,sdate,stime,hh);
}
<요청2> 아래 수식에서 직선이 그어지면(완료)되면 매매 로직 부탁 드립니다.
1. 고가에서 저가로 선이 완료되면 바로 매수
2. 저가에서 고가로 선이 완료되면 바로 매도
3. 직전 고점 이나 저점 깨지면 스위칭
▶매수 했는데 직전 완성된 선의 저점 보다 하락 하면 매도청산 새로 매도진입)
▶매도 했는데 직전 완성된 선의 고점 보다 상승 하면 매수청산 새로 매수진입)
4. 아래수식에서 글짜가 매우 크게 나오는데 글자크기 조정 항목이 어느것인가요?
## 아래수식 ##################
Input:barCnt(10);
Var:j(0),turnPntBit(""),TL1(0),TL33(0),TL44(0),HD(0),HT(0),LD(0),LT(0),HH(0),LL(0);
var : TL121(0),TL122(0),tx121(0),tx122(0);
Array:valArr[10](0),barArr[10](0),turnPntArr[10]("");
For j = 0 To 9 { barArr[j] = barArr[j] + 1; }
Condition1 = Highest(H,barCnt)[barCnt+1] <= H[barCnt] and H[barCnt] > Highest(H,barCnt);
Condition2 = Lowest(L,barCnt)[barCnt+1] >= L[barCnt] and L[barCnt] < Lowest(L,barCnt);
turnPntBit = "";
If Condition1 and Condition2 Then {
If Max(valArr[1],valArr[2]) < H[barCnt] and Min(valArr[1],valArr[2]) > L[barCnt] Then
turnPntBit = "HiLo";
Else If Max(valArr[1],valArr[2]) < H[barCnt] Then turnPntBit = "Hi";
Else If Min(valArr[1],valArr[2]) > L[barCnt] Then turnPntBit = "Lo";
Else If turnPntArr[1] == "Hi" Then turnPntBit = "Lo";
Else If turnPntArr[1] == "Lo" Then turnPntBit = "Hi";
}
Else If Condition1 Then turnPntBit = "Hi";
Else If Condition2 Then turnPntBit = "Lo";
If turnPntBit <> "" Then
{
If turnPntBit == "HiLo" Then
{
valArr[1] = IFF(turnPntArr[1] == "Hi",H[barCnt],L[barCnt]);
barArr[1] = barCnt;
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
If turnPntArr[1] == "Hi" Then
turnPntBit = "Lo";
Else
turnPntBit = "Hi";
}
If turnPntBit <> turnPntArr[1] Then
{
for j = 8 downto 1
{
valArr[j+1] = valArr[j];
barArr[j+1] = barArr[j];
turnPntArr[j+1] = turnPntArr[j];
}
}
If turnPntBit <> turnPntArr[1] or
(turnPntBit == turnPntArr[1] and
((turnPntBit == "Hi" and valArr[1] < H[barCnt]) or
(turnPntBit == "Lo" and valArr[1] > L[barCnt]))) Then {
valArr[1] = IFF(turnPntBit == "Hi",H[barCnt],L[barCnt]);
barArr[1] = barCnt;
turnPntArr[1] = turnPntBit;
If turnPntArr[1][1] <> turnPntArr[1][0] Then
TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],
sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
Else
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
}
}
TL_SetSize(TL1,2);
TL_SetColor(TL1,RED);
* 고맙습니다.