커뮤니티
부탁드립니다.
2020-09-19 17:08:32
1015
글번호 142535
1. 현재 종가 기준으로 전 파라볼릭 상승구간 중 최고가와 그 전전 최고가를, 또 전 파라볼릭 상승구간 중 최고가와 그 전전전 최고가를 선으로 연결한 추세선을 우측으로 계속하여 구현해 주시기 바랍니다.
2. 또 전 파라볼릭 하락구간 중 최저가와 그 전전 하락구간 최저가를, 또 전 파락볼릭 하락구간 중 최저가와 그 전전전 최저가를 선으로 연결한 추세선을 우측으로 계속하여 구현해 주시기 바랍니다.
감사합니다.
답변 1
예스스탁 예스스탁 답변
2020-09-23 17:06:51
안녕하세요
예스스탁입니다.
Input : af(0.02), maxAF(0.2);
var : T(0),cnt(0);
var : TL1(0),TL2(0),TL3(0),TL4(0);
Array : HH[10](0),HD[10](0),HT[10](0);
Array : LL[10](0),LD[10](0),LT[10](0);
var1 = SAR(af,maxAF);
if var1 > C Then
Plot1(var1,"파라볼릭",BLUE);
Else
Plot1(var1,"파라볼릭",RED);
if CrossUp(C,var1) Then
{
T = 1;
LL[0] = var1;
LD[0] = sDate;
LT[0] = sTime;
For cnt = 1 to 9
{
LL[cnt] = LL[cnt-1][1];
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
}
if LL[2] > 0 Then
{
TL_Delete(TL1);
TL_Delete(TL2);
TL1 = TL_New(LD[1],LT[1],LL[1],LD[0],LT[0],LL[0]);
TL2 = TL_New(LD[2],LT[2],LL[2],LD[0],LT[0],LL[0]);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
}
}
if T == 1 and var1 < LL[0] Then
{
LL[0] = var1;
LD[0] = sDate;
LT[0] = sTime;
TL_SetEnd(TL1,LD[0],LT[0],LL[0]);
}
if CrossDown(C,var1) Then
{
T = -1;
HH[0] = var1;
HD[0] = sDate;
HT[0] = sTime;
For cnt = 1 to 9
{
HH[cnt] = HH[cnt-1][1];
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
}
if HH[2] > 0 Then
{
TL_Delete(TL3);
TL_Delete(TL4);
TL3 = TL_New(HD[1],HT[1],HH[1],HD[0],HT[0],HH[0]);
TL4 = TL_New(HD[2],HT[2],HH[2],HD[0],HT[0],HH[0]);
TL_SetExtRight(TL3,true);
TL_SetExtRight(TL4,true);
}
}
if T == -1 and var1 > HH[0] Then
{
HH[0] = var1;
HD[0] = sDate;
HT[0] = sTime;
TL_SetEnd(TL3,HD[0],HT[0],HH[0]);
TL_SetEnd(TL4,HD[0],HT[0],HH[0]);
}
즐거운 하루되세요
> 서태공 님이 쓴 글입니다.
> 제목 : 부탁드립니다.
>
1. 현재 종가 기준으로 전 파라볼릭 상승구간 중 최고가와 그 전전 최고가를, 또 전 파라볼릭 상승구간 중 최고가와 그 전전전 최고가를 선으로 연결한 추세선을 우측으로 계속하여 구현해 주시기 바랍니다.
2. 또 전 파라볼릭 하락구간 중 최저가와 그 전전 하락구간 최저가를, 또 전 파락볼릭 하락구간 중 최저가와 그 전전전 최저가를 선으로 연결한 추세선을 우측으로 계속하여 구현해 주시기 바랍니다.
감사합니다.