커뮤니티
감사합니다
2021-03-31 20:16:14
1143
글번호 147565
첨부 이미지
그림1
안녕하세요.....글번호71719 데이타2 수식이 제의도한대로잘그려집니다.사진에서 처럼
채우기를 할때에 기둥이생기은 문제을 아래방법으로 해결이 안되서
부탁드립니다.
37번타분봉양봉종가고가에 if MH> OThen
38번타분봉음봉종가저가에 if ML> 0Then
그리고요 40번에 고가를 저가로수정부탁드립니다.
수고하세요.....꾸벅
- 1. 148278_수식.PNG (0.03 MB)
답변 1
예스스탁 예스스탁 답변
2021-04-01 11:39:50
안녕하세요
예스스탁입니다.
input : 타주기분1(30),타주기분2(60);
var : S1(0,Data2),D1(0,Data2),TM(0,Data2),TF1(0,Data2),cnt(0,Data2),TF2(0,Data2);
Array : H1[10](0,Data2),L1[10](0,Data2),O1[10](0,Data2),C1[10](0,Data2);
Array : aH1[10](0,Data2),aL1[10](0,Data2),aO1[10](0,Data2),aC1[10](0,Data2);
Array : H2[10](0,Data2),L2[10](0,Data2),O2[10](0,Data2),C2[10](0,Data2);
Array : aH2[10](0,Data2),aL2[10](0,Data2),aO2[10](0,Data2),aC2[10](0,Data2);
Plot1(data2(OpenD(0)),"일봉당일시가");
Plot2(data2(highD(0)),"일봉당일고가");
Plot3(data2(lowD(0)),"일봉당일저가");
Plot4(data2(CloseD(0)),"일봉당일종가");
Plot5(data2((highD(0)+lowD(0))/2),"일봉당일중심");
Plot6(data2(OpenD(1)),"일봉전일시가");
Plot7(data2(highD(1)),"일봉전일고가");
Plot8(data2(lowD(1)),"일봉전일저가");
Plot9(data2(CloseD(1)),"일봉전일종가");
Plot10(data2((highD(1)+lowD(1))/2),"일봉전일중심");
if data2(Bdate != Bdate[1]) Then
{
S1 = data2(TimeToMinutes(stime));
D1 = data2(sdate);
}
if D1 > 0 then
{
if data2(sdate == D1) Then
TM = data2(TimeToMinutes(stime))-S1;
Else
TM = data2(TimeToMinutes(stime))+1440-S1;
TF1 = TM%타주기분1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분1 > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and 타주기분1 > 1 and TM >= TM[1]+타주기분1) or
(Bdate == Bdate[1] and 타주기분1 == 1 and TM > TM[1]) Then
{
O1[0] = data2(O);
H1[0] = data2(H);
L1[0] = data2(L);
aO1[0] = data2(O);
aH1[0] = 0;
aL1[0] = 0;
For cnt = 1 to 9
{
O1[cnt] = O1[cnt-1][1];
H1[cnt] = H1[cnt-1][1];
L1[cnt] = L1[cnt-1][1];
C1[cnt] = C1[cnt-1][1];
aO1[cnt] = aO1[cnt-1][1];
aH1[cnt] = aH1[cnt-1][1];
aL1[cnt] = aL1[cnt-1][1];
aC1[cnt] = aC1[cnt-1][1];
}
}
if data2(H) > H1[0] Then
H1[0] = data2(H);
if data2(L) < L1[0] Then
L1[0] = data2(L);
C1[0] = data2(C);
if data2(C > O and (aH1[0] == 0 or (aH1[0] > 0 and C > aH1[0]))) Then
aH1[0] = data2(C);
if data2(C < O and (aL1[0] == 0 or (aL1[0] > 0 and C < aL1[0]))) Then
aL1[0] = data2(C);
aC1[0] = data2(C);
Plot11(O1[0],"타분봉1시가");
Plot12(H1[0],"타분봉1고가");
Plot13(L1[0],"타분봉1저가");
Plot14(C1[0],"타분봉1종가");
Plot15((H1[0]+L1[0])/2,"타분봉1중심");
Plot16(O1[1],"타분봉1전봉시가");
if Data2(TM >= 타주기분1) Then
{
Plot17(H1[1],"타분봉1전봉고가");
Plot18(L1[1],"타분봉1전봉저가");
}
Else
{
NoPlot(17);
NoPlot(18);
}
Plot19(C1[1],"타분봉1전봉종가");
if Data2(TM >= 타주기분1) Then
{
Plot20((H1[1]+L1[1])/2,"타분봉1전봉중심");
}
Else
{
NoPlot(20);
}
Plot21(C1[2],"타분봉1전전봉종가");
plot22(aH1[0],"타분봉1양봉종가고가");
plot23(aL1[0],"타분봉1양봉종가저가");
if Data2(TM >= 타주기분1) Then
{
plot24(aH1[1],"타분봉1양봉전봉종가고가");
plot25(aL1[1],"타분봉1양봉전봉종가저가");
}
Else
{
NoPlot(24);
NoPlot(25);
}
TF2 = TM%타주기분2;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분2 > 1 and TF2 < TF2[1]) or
(Bdate == Bdate[1] and 타주기분2 > 1 and TM >= TM[1]+타주기분2) or
(Bdate == Bdate[1] and 타주기분2 == 1 and TM > TM[1]) Then
{
O2[0] = data2(O);
H2[0] = data2(H);
L2[0] = data2(L);
aO2[0] = data2(O);
aH2[0] = 0;
aL2[0] = 0;
For cnt = 1 to 9
{
O2[cnt] = O2[cnt-1][1];
H2[cnt] = H2[cnt-1][1];
L2[cnt] = L2[cnt-1][1];
C2[cnt] = C2[cnt-1][1];
aO2[cnt] = aO2[cnt-1][1];
aH2[cnt] = aH2[cnt-1][1];
aL2[cnt] = aL2[cnt-1][1];
aC2[cnt] = aC2[cnt-1][1];
}
}
if data2(H) > H2[0] Then
H2[0] = data2(H);
if data2(L) < L2[0] Then
L2[0] = data2(L);
C2[0] = data2(C);
if data2(C > O and (aH2[0] == 0 or (aH2[0] > 0 and C > aH2[0]))) Then
aH2[0] = data2(C);
if data2(C < O and (aL2[0] == 0 or (aL2[0] > 0 and C < aL2[0]))) Then
aL2[0] = data2(C);
aC2[0] = data2(C);
Plot26(O2[0],"타분봉2시가");
Plot27(H2[0],"타분봉2고가");
Plot28(L2[0],"타분봉2저가");
Plot29(C2[0],"타분봉2종가");
Plot30((H2[0]+L2[0])/2,"타분봉2중심");
Plot31(O2[1],"타분봉2전봉시가");
if Data2(TM >= 타주기분2) Then
{
Plot32(H2[1],"타분봉2전봉고가");
Plot33(L2[1],"타분봉2전봉저가");
}
Else
{
NoPlot(32);
NoPlot(33);
}
Plot34(C2[1],"타분봉2전봉종가");
if Data2(TM >= 타주기분2) Then
{
Plot35((H2[1]+L2[1])/2,"타분봉2전봉중심");
}
Else
{
NoPlot(35);
}
Plot36(C2[2],"타분봉2전전봉종가");
if aH2[0] > 0 Then
plot37(aH2[0],"타분봉2양봉종가고가");
Else
NoPlot(37);
if aL2[0] > 0 Then
plot38(aL2[0],"타분봉2양봉종가저가");
Else
NoPlot(38);
if Data2(TM >= 타주기분2) Then
{
plot39(aH2[1],"타분봉2양봉전봉종가고가");
plot40(aL2[1],"타분봉2양봉전봉종가저가");
}
Else
{
NoPlot(39);
NoPlot(40);
}
}
즐거운 하루되세요
> 보인다 님이 쓴 글입니다.
> 제목 : 감사합니다
> 안녕하세요.....글번호71719 데이타2 수식이 제의도한대로잘그려집니다.사진에서 처럼
채우기를 할때에 기둥이생기은 문제을 아래방법으로 해결이 안되서
부탁드립니다.
37번타분봉양봉종가고가에 if MH> OThen
38번타분봉음봉종가저가에 if ML> 0Then
그리고요 40번에 고가를 저가로수정부탁드립니다.
수고하세요.....꾸벅
다음글
이전글