커뮤니티
안녕하세요(price channel포함)
2019-09-20 05:04:36
347
글번호 131065
price channel지표식
INPUT : LENGTH(10),N(1);
VAR : TCHAN(0), BCHAN(0);
TCHAN = HIGHEST(HIGH, LENGTH)[0];
BCHAN = LOWEST(LOW, LENGTH)[0];
PLOT1(TCHAN+PriceScale*N, "TOP+");
PLOT2(TCHAN-PriceScale*N, "TOP-");
PLOT3(BCHAN+PriceScale*N, "BOT+");
PLOT4(BCHAN-PriceScale*N, "BOT-");
반갑습니다
아래식을 수정의뢰 합니다.
1.사용중 추세선그린후 보조도구 삭제하면 지표가 작제됩니다
2.평행일때 앞의값을 계속 따라감(주기변경때 상.하단지표 간격이 너무 좁아요)
............
input : 타주기분1(15),타주기분2(30),폭(5);
var : S1(0),D1(0),TM(0),TF1(0),TF2(0),cnt(0);
var : tx1(0),tx2(0),tx3(0),tx4(0);
Array : O1[100](0),H1[100](0),L1[100](0);
Array : O2[100](0),H2[100](0),L2[100](0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
//15분
TF1 = TM%타주기분1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then
{
O1[0] = O;
H1[0] = H;
L1[0] = L;
for cnt = 1 to 99
{
O1[cnt] = O1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
}
if H > H1[0] Then
H1[0] = H;
if L < L1[0] Then
L1[0] = L;
plot1(O1[0],"시가1");
plot2(H1[0],"고가1");
plot21(H1[0]+PriceScale*폭,"고가1+");
plot22(H1[0]-PriceScale*폭,"고가1-");
plot3(L1[0],"저가1");
plot31(L1[0]+PriceScale*폭,"저가1+");
plot32(L1[0]-PriceScale*폭,"저가1-");
Text_Delete(tx1);
Text_Delete(tx2);
tx1 = Text_New(sdate,stime,H1[0],NumToStr(H1[0],2));
tx2 = Text_New(sdate,stime,L1[0],NumToStr(L1[0],2));
Text_SetStyle(tx1,0,1);
Text_SetStyle(tx2,0,0);
//30분
TF2 = TM%타주기분2;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF2 < TF2[1]) Then
{
O2[0] = O;
H2[0] = H;
L2[0] = L;
for cnt = 1 to 99
{
O2[cnt] = O2[cnt-1][1];
H2[cnt] = H2[cnt-1][1];
L2[cnt] = L2[cnt-1][1];
}
}
if H > H2[0] Then
H2[0] = H;
if L < L2[0] Then
L2[0] = L;
plot4(O2[0],"시가2");
plot5(H2[0],"고가2");
plot51(H2[0]+PriceScale*폭,"고가2+");
plot52(H2[0]-PriceScale*폭,"고가2-");
plot6(L2[0],"저가2");
plot61(L2[0]+PriceScale*폭,"저가2+");
plot62(L2[0]-PriceScale*폭,"저가2-");
Text_Delete(tx3);
Text_Delete(tx4);
tx3 = Text_New(sdate,stime,H2[0],NumToStr(H2[0],2));
tx4 = Text_New(sdate,stime,L2[0],NumToStr(L2[0],2));
Text_SetStyle(tx3,0,1);
Text_SetStyle(tx4,0,0);
}
감사합니다.
답변 1
예스스탁 예스스탁 답변
2019-08-12 11:28:35
안녕하세요
예스스탁입니다.
1
해당 수식에 텍스트함수로 값을 표시하는 내용이 있습니다.
텍스트 함수는 차트보조도구 중 글상자를 이용하므로
차트에서 보조도구 모두 삭제를 하시면 해당 지표도 적용해제 됩니다.
2
올려주신 내용만으로 수식의 어느부분을 수정해 드릴지 알수가 없습니다.
해당수식은 타주기인 15분봉, 30분봉의 직전봉의 ㅅ시고저를 계산해 그리게 됩니다.
수식의 계산에 의해 지표가 그려지므로 간격부분을 임의로 지정할수가 없습니다.
즐거운 하루되세요
> byeongup 님이 쓴 글입니다.
> 제목 : 안녕하세요
> 반갑습니다
아래식을 수정의뢰 합니다.
1.사용중 추세선그린후 보조도구 삭제하면 지표가 작제됩니다
2.평행일때 앞의값을 계속 따라감(주기변경때 상.하단지표 간격이 너무 좁아요)
............
input : 타주기분1(15),타주기분2(30),폭(5);
var : S1(0),D1(0),TM(0),TF1(0),TF2(0),cnt(0);
var : tx1(0),tx2(0),tx3(0),tx4(0);
Array : O1[100](0),H1[100](0),L1[100](0);
Array : O2[100](0),H2[100](0),L2[100](0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
//15분
TF1 = TM%타주기분1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then
{
O1[0] = O;
H1[0] = H;
L1[0] = L;
for cnt = 1 to 99
{
O1[cnt] = O1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
}
}
if H > H1[0] Then
H1[0] = H;
if L < L1[0] Then
L1[0] = L;
plot1(O1[0],"시가1");
plot2(H1[0],"고가1");
plot21(H1[0]+PriceScale*폭,"고가1+");
plot22(H1[0]-PriceScale*폭,"고가1-");
plot3(L1[0],"저가1");
plot31(L1[0]+PriceScale*폭,"저가1+");
plot32(L1[0]-PriceScale*폭,"저가1-");
Text_Delete(tx1);
Text_Delete(tx2);
tx1 = Text_New(sdate,stime,H1[0],NumToStr(H1[0],2));
tx2 = Text_New(sdate,stime,L1[0],NumToStr(L1[0],2));
Text_SetStyle(tx1,0,1);
Text_SetStyle(tx2,0,0);
//30분
TF2 = TM%타주기분2;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF2 < TF2[1]) Then
{
O2[0] = O;
H2[0] = H;
L2[0] = L;
for cnt = 1 to 99
{
O2[cnt] = O2[cnt-1][1];
H2[cnt] = H2[cnt-1][1];
L2[cnt] = L2[cnt-1][1];
}
}
if H > H2[0] Then
H2[0] = H;
if L < L2[0] Then
L2[0] = L;
plot4(O2[0],"시가2");
plot5(H2[0],"고가2");
plot51(H2[0]+PriceScale*폭,"고가2+");
plot52(H2[0]-PriceScale*폭,"고가2-");
plot6(L2[0],"저가2");
plot61(L2[0]+PriceScale*폭,"저가2+");
plot62(L2[0]-PriceScale*폭,"저가2-");
Text_Delete(tx3);
Text_Delete(tx4);
tx3 = Text_New(sdate,stime,H2[0],NumToStr(H2[0],2));
tx4 = Text_New(sdate,stime,L2[0],NumToStr(L2[0],2));
Text_SetStyle(tx3,0,1);
Text_SetStyle(tx4,0,0);
}
감사합니다.
다음글
이전글