커뮤니티
부탁 드립니다.
2016-02-22 00:35:02
167
글번호 95593
첨부 이미지
그림1
만족한 수식 답변에 감사 드립니다.
질문1)
위치1을 수치로 입력하지 않고 수평선을 긋고자 합니다.
차트에서 생성되는 가격(전봉의 종가 or etc)이 자동으로 입력되는 방법이 있겠는지요?
input:위치1(31.96);
VAR:간격2(0),간격3(0);
간격2=위치1*0.00312;
간격3=위치1*0.005;
plot1(위치1+간격2)
plot2(위치1+간격3)
plot30(위치1)
질문2)
첨부한 그림과 같이 지표를 부탁 드립니다.
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then
cnt1 = 0;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
}
if cnt1 == 1 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 2 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 3 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 4 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 5 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 6 Then
plot11(오일위치1,"수평1",yellow,def,3);
- 1. 9999.jpg (0.23 MB)
답변 3
예스스탁 예스스탁 답변
2016-02-22 10:39:54
안녕하세요
예스스탁입니다.
1.
#차트 최종완성봉의 종가기준
var : TL1(0),TL2(0),TL3(0);
var : Tx1(0),Tx2(0),Tx3(0);
var1 = C;
var2 = var1*0.00312;
var3 = var1*0.005;
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL1 = TL_New(sdate[1],stime[1],var1,sdate,stime,var1);
TL2 = TL_New(sdate[1],stime[1],var2,sdate,stime,var2);
TL3 = TL_New(sdate[1],stime[1],var3,sdate,stime,var3);
TL_SetExtLeft(TL1,true);
TL_SetExtLeft(TL2,true);
TL_SetExtLeft(TL3,true);
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
tx1 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx2 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx3 = Text_New(sdate,stime,var1,NumToStr(var1,2));
2-1 최근구간봉갯수/당일 봉갯수
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0),idx(0),ii(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
idx = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II = 0;
}
idx = idx+1;
II = II+1;
plot1(II/idx);
2.2 최근구간봉갯수/최근6개구간봉갯수
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0),cnt(0),sum(0);
Array : II[10](0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II[0] = 0;
for cnt = 1 to 9{
II[cnt] = II[cnt-1][1];
}
}
II[0] = II[0]+1;
sum = 0;
for cnt = 0 to 5{
sum = sum+II[cnt];
}
plot1(II[0]/sum);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 만족한 수식 답변에 감사 드립니다.
질문1)
위치1을 수치로 입력하지 않고 수평선을 긋고자 합니다.
차트에서 생성되는 가격(전봉의 종가 or etc)이 자동으로 입력되는 방법이 있겠는지요?
input:위치1(31.96);
VAR:간격2(0),간격3(0);
간격2=위치1*0.00312;
간격3=위치1*0.005;
plot1(위치1+간격2)
plot2(위치1+간격3)
plot30(위치1)
질문2)
첨부한 그림과 같이 지표를 부탁 드립니다.
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then
cnt1 = 0;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
}
if cnt1 == 1 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 2 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 3 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 4 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 5 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 6 Then
plot11(오일위치1,"수평1",yellow,def,3);
yes
2016-02-22 17:42:02
경이롭고도 만족한 수식 답변에 경배로 감사의 인사를 드립니다.
질문1)
답변수식 2_2에서
그림과 같이 추가로 부탁 드리고자 합니다.
질문2)
답변 수식 2_2) 중에서 N1값을 60으로 변경하면
추가로 어떤 값을 변경 해야 하는 지요?
미리 감사 드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
>
안녕하세요
예스스탁입니다.
1.
#차트 최종완성봉의 종가기준
var : TL1(0),TL2(0),TL3(0);
var : Tx1(0),Tx2(0),Tx3(0);
var1 = C;
var2 = var1*0.00312;
var3 = var1*0.005;
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL1 = TL_New(sdate[1],stime[1],var1,sdate,stime,var1);
TL2 = TL_New(sdate[1],stime[1],var2,sdate,stime,var2);
TL3 = TL_New(sdate[1],stime[1],var3,sdate,stime,var3);
TL_SetExtLeft(TL1,true);
TL_SetExtLeft(TL2,true);
TL_SetExtLeft(TL3,true);
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
tx1 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx2 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx3 = Text_New(sdate,stime,var1,NumToStr(var1,2));
2-1 최근구간봉갯수/당일 봉갯수
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0),idx(0),ii(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
idx = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II = 0;
}
idx = idx+1;
II = II+1;
plot1(II/idx);
2.2 최근구간봉갯수/최근6개구간봉갯수
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0),cnt(0),sum(0);
Array : II[10](0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II[0] = 0;
for cnt = 1 to 9{
II[cnt] = II[cnt-1][1];
}
}
II[0] = II[0]+1;
sum = 0;
for cnt = 0 to 5{
sum = sum+II[cnt];
}
plot1(II[0]/sum);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 만족한 수식 답변에 감사 드립니다.
질문1)
위치1을 수치로 입력하지 않고 수평선을 긋고자 합니다.
차트에서 생성되는 가격(전봉의 종가 or etc)이 자동으로 입력되는 방법이 있겠는지요?
input:위치1(31.96);
VAR:간격2(0),간격3(0);
간격2=위치1*0.00312;
간격3=위치1*0.005;
plot1(위치1+간격2)
plot2(위치1+간격3)
plot30(위치1)
질문2)
첨부한 그림과 같이 지표를 부탁 드립니다.
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then
cnt1 = 0;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
}
if cnt1 == 1 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 2 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 3 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 4 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 5 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 6 Then
plot11(오일위치1,"수평1",yellow,def,3);
예스스탁 예스스탁 답변
2016-02-23 08:51:34
안녕하세요
예스스탁입니다.
직전구간 마지막값에서 시간의경과 비율말큼 차감해서
하방으로 그리게 작성했습니다.
N1만 변경하시면 되게 수식에서 처리했습니다.
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0),pre(0),NN(0);
var:TF1(0),cnt1(0),cnt(0),sum(0),value(0),remain(0);
Array : II[50](0);
NN = 1440/N1;
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II[0] = 0;
for cnt = 1 to 49{
II[cnt] = II[cnt-1][1];
}
Pre = value[1];
}
II[0] = II[0]+1;
sum = 0;
for cnt = 0 to NN-1{
sum = sum+II[cnt];
}
value = II[0]/sum;
remain = pre-Pre*(TF1/N1);
plot1(value);
plot2(remain);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : Re : Re : 부탁 드립니다.
> 경이롭고도 만족한 수식 답변에 경배로 감사의 인사를 드립니다.
질문1)
답변수식 2_2에서
그림과 같이 추가로 부탁 드리고자 합니다.
질문2)
답변 수식 2_2) 중에서 N1값을 60으로 변경하면
추가로 어떤 값을 변경 해야 하는 지요?
미리 감사 드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
>
안녕하세요
예스스탁입니다.
1.
#차트 최종완성봉의 종가기준
var : TL1(0),TL2(0),TL3(0);
var : Tx1(0),Tx2(0),Tx3(0);
var1 = C;
var2 = var1*0.00312;
var3 = var1*0.005;
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL1 = TL_New(sdate[1],stime[1],var1,sdate,stime,var1);
TL2 = TL_New(sdate[1],stime[1],var2,sdate,stime,var2);
TL3 = TL_New(sdate[1],stime[1],var3,sdate,stime,var3);
TL_SetExtLeft(TL1,true);
TL_SetExtLeft(TL2,true);
TL_SetExtLeft(TL3,true);
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
tx1 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx2 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx3 = Text_New(sdate,stime,var1,NumToStr(var1,2));
2-1 최근구간봉갯수/당일 봉갯수
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0),idx(0),ii(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
idx = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II = 0;
}
idx = idx+1;
II = II+1;
plot1(II/idx);
2.2 최근구간봉갯수/최근6개구간봉갯수
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0),cnt(0),sum(0);
Array : II[10](0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then{
cnt1 = 0;
}
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
II[0] = 0;
for cnt = 1 to 9{
II[cnt] = II[cnt-1][1];
}
}
II[0] = II[0]+1;
sum = 0;
for cnt = 0 to 5{
sum = sum+II[cnt];
}
plot1(II[0]/sum);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 만족한 수식 답변에 감사 드립니다.
질문1)
위치1을 수치로 입력하지 않고 수평선을 긋고자 합니다.
차트에서 생성되는 가격(전봉의 종가 or etc)이 자동으로 입력되는 방법이 있겠는지요?
input:위치1(31.96);
VAR:간격2(0),간격3(0);
간격2=위치1*0.00312;
간격3=위치1*0.005;
plot1(위치1+간격2)
plot2(위치1+간격3)
plot30(위치1)
질문2)
첨부한 그림과 같이 지표를 부탁 드립니다.
input:오일위치1(34.22);
Input: N1(240);
var : S1(0),S2(0),T(0),TM(0);
var:TF1(0),cnt1(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF1 = TM%N1;
if Bdate != Bdate[1] Then
cnt1 = 0;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then{
cnt1 = cnt1+1;
}
if cnt1 == 1 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 2 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 3 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 4 Then
plot11(오일위치1,"수평1",yellow,def,3);
if cnt1 == 5 Then
plot11(오일위치1,"수평1",black,def,3);
if cnt1 == 6 Then
plot11(오일위치1,"수평1",yellow,def,3);