커뮤니티
문의드립니다
2016-10-12 23:43:13
99
글번호 102868
input : Left(10),Right(10),틱가치(0.01),소수점아래자리수(2),숫자표시이격(0),눌림(382),가격진폭표시(0),진폭만표시(1),가격만표시(0),선긋기(1);
var : T(0),TL(0),tx(0),tx1(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
var : cnt(0);
if T == 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
LL = HH;
T = 1;
}
if T == 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
LD = sDate[Right];
T = sTime[Right];
LL = L[Right];
LC = C[right];
HH = LL;
T = -1;
}
if T == -1 Then{
if SwingHigh(1,H,Left,Right,Left+Right+1) != -1 and H[right] > HH Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
}
if HH > LL and L <= HH-(HH-LL)*눌림/1000 Then{
T = 1;
if 선긋기 ==1 then {
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
}
if 진폭만표시 == 1 then {
tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(abs(HH-LL)/PriceScale,0)); }
if 가격만표시 == 1 then {
tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(HH,소수점아래자리수)); }
//tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(HC,소수점아래자리수)); }
if 가격진폭표시 == 1 then {
tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HH,소수점아래자리수)); }
Text_SetStyle(tx,2,2);
LL = HH;
}
}
if T == 1 Then{
if SwingLow(1,L,Left,Right,Left+Right+1) != -1 and L[right] < LL Then{
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[Right];
}
if LL < HH and H >= LL+(HH-LL)*눌림/1000 Then{
T = -1;
if 선긋기 ==1 then {
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
}
if 진폭만표시 == 1 then {
tx = Text_New(LD,LT,LL-숫자표시이격*틱가치,NumToStr(abs(HH-LL)/PriceScale,0)); }
if 가격만표시 == 1 then {
tx = Text_New(LD,LT,LL-숫자표시이격*틱가치,NumToStr(LL,소수점아래자리수)); }
//tx = Text_New(LD,LT,LL,NumToStr(LC,소수점아래자리수)); }
if 가격진폭표시 == 1 then {
tx = Text_New(LD,LT,LL-숫자표시이격*틱가치,NumToStr(LL,소수점아래자리수)+NewLine+NumToStr(abs(HH-LL)/PriceScale,0)); }
// tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,소수점아래자리수));
Text_SetStyle(tx,2,2);
HH = LL;
}
}
###############
Text_Delete(tx1);
#최근 고점 발생
if T == 1 then{
Tx1 = Text_New(sdate,stime,L-숫자표시이격*틱가치,NumToStr((HH-l)/틱가치,0));
Text_SetColor(tx1,blue);
Text_SetStyle(tx1,0,1);
}
#최근 저점 발생
if T == -1 then{
tx1 = Text_New(sdate,stime,H+숫자표시이격*틱가치,NumToStr((h-LL)/틱가치,0));
Text_SetColor(tx1,red);
Text_SetStyle(tx1,0,1);
}
위 수식의 정확한 뜻을 알고싶습니다
1. 위 수식 을 외부수정 가능하게좀 변경부탁드립니다
답변 1
예스스탁 예스스탁 답변
2016-10-13 11:27:52
안녕하세요
예스스탁입니다.
해당식은 추세선으로 고점과 저점을 연결하는 선을 그리는 식입니다.
고점과 저점은 swinghigh,swinglow함수로 판단하고
일정봉수(Left) 이상 상승후 일정봉수(right) 하락하면 고점인정
일정봉수(Left) 이상 하락후 일정봉수(right) 상승하면 저점인정입니다.
위 조건에 부합하는 모든 고점과 저점은 인정하는 것은 아니고
고점발생후에 저점은 해당고점과 이전의 저점 폭의 38.2%(눌림)이상 하락후 나오는 고점만 인정
저점발생후에 고점은 해당저점과 이전의 고점 폭의 38.2%(눌림)이상 상승후 나오는 저점만 인정합니다.
고점발생 후 저점발생전까지 더높은 값의 고점이 발생하면 해당값을 새로운 고점으로 갱신하고
저점발생 후 고점발생전까지 더낮은 값의 저점이 발생하면 해당값을 새로운 저점으로 갱신합니다.
나머지 표시부분은 고점과 저점사이의 특수등을 표시하게 하는 내용이고
해당 수식에 필요한 변수는 이미 외부변수(input)으로 처리가 되어 있습니다.
추가로 처리할 내용은 없습니다.
즐거운 하루되세요
> 곽민수 님이 쓴 글입니다.
> 제목 : 문의드립니다
> input : Left(10),Right(10),틱가치(0.01),소수점아래자리수(2),숫자표시이격(0),눌림(382),가격진폭표시(0),진폭만표시(1),가격만표시(0),선긋기(1);
var : T(0),TL(0),tx(0),tx1(0),HD(0),HT(0),HH(0),HC(0),LD(0),LT(0),LL(0),LC(0);
var : cnt(0);
if T == 0 and SwingHigh(1,H,Left,Right,Left+Right+1) != -1 Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
LL = HH;
T = 1;
}
if T == 0 and SwingLow(1,L,Left,Right,Left+Right+1) != -1 Then{
LD = sDate[Right];
T = sTime[Right];
LL = L[Right];
LC = C[right];
HH = LL;
T = -1;
}
if T == -1 Then{
if SwingHigh(1,H,Left,Right,Left+Right+1) != -1 and H[right] > HH Then{
HD = sDate[Right];
HT = sTime[Right];
HH = H[Right];
HC = C[Right];
}
if HH > LL and L <= HH-(HH-LL)*눌림/1000 Then{
T = 1;
if 선긋기 ==1 then {
TL = TL_New(LD,LT,LL,HD,HT,HH);
TL_SetColor(TL,RED);
}
if 진폭만표시 == 1 then {
tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(abs(HH-LL)/PriceScale,0)); }
if 가격만표시 == 1 then {
tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(HH,소수점아래자리수)); }
//tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(HC,소수점아래자리수)); }
if 가격진폭표시 == 1 then {
tx = Text_New(HD,HT,HH+숫자표시이격*틱가치,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(HH,소수점아래자리수)); }
Text_SetStyle(tx,2,2);
LL = HH;
}
}
if T == 1 Then{
if SwingLow(1,L,Left,Right,Left+Right+1) != -1 and L[right] < LL Then{
LD = sDate[Right];
LT = sTime[Right];
LL = L[Right];
LC = C[Right];
}
if LL < HH and H >= LL+(HH-LL)*눌림/1000 Then{
T = -1;
if 선긋기 ==1 then {
TL= TL_New(HD,HT,HH,LD,LT,LL);
TL_SetColor(TL,blue);
}
if 진폭만표시 == 1 then {
tx = Text_New(LD,LT,LL-숫자표시이격*틱가치,NumToStr(abs(HH-LL)/PriceScale,0)); }
if 가격만표시 == 1 then {
tx = Text_New(LD,LT,LL-숫자표시이격*틱가치,NumToStr(LL,소수점아래자리수)); }
//tx = Text_New(LD,LT,LL,NumToStr(LC,소수점아래자리수)); }
if 가격진폭표시 == 1 then {
tx = Text_New(LD,LT,LL-숫자표시이격*틱가치,NumToStr(LL,소수점아래자리수)+NewLine+NumToStr(abs(HH-LL)/PriceScale,0)); }
// tx = Text_New(LD,LT,LL,NumToStr(abs(HH-LL)/PriceScale,0)+NewLine+NumToStr(LC,소수점아래자리수));
Text_SetStyle(tx,2,2);
HH = LL;
}
}
###############
Text_Delete(tx1);
#최근 고점 발생
if T == 1 then{
Tx1 = Text_New(sdate,stime,L-숫자표시이격*틱가치,NumToStr((HH-l)/틱가치,0));
Text_SetColor(tx1,blue);
Text_SetStyle(tx1,0,1);
}
#최근 저점 발생
if T == -1 then{
tx1 = Text_New(sdate,stime,H+숫자표시이격*틱가치,NumToStr((h-LL)/틱가치,0));
Text_SetColor(tx1,red);
Text_SetStyle(tx1,0,1);
}
위 수식의 정확한 뜻을 알고싶습니다
1. 위 수식 을 외부수정 가능하게좀 변경부탁드립니다