커뮤니티
수식수정바랍니다
2025-06-13 11:49:24
207
글번호 191695
안녕하세요
아래3가지 수식은 선물옵션에서 사용중인데 주간장용입니다
복합장에서 주간장으로 사용하게끔 수정바랍니다
1.
input : 타주기분(30);
var : cnt(0),S1(0),D1(0),TM(0),TF(0);
Array : HH[100](0),LL[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;
TF = TM%타주기분;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99
{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
if HH[1] > 0 and LL[1] > 0 then
{
plot1(iff(stime>=091500,HH[1],0));
plot2(iff(stime>=091500,LL[1],0));
plot3(iff(stime>=091500,(HH[1]+LL[1])/2,0));
plot4((HH[1]-(HH[1]-LL[1])*0.382));
plot5((HH[1]-(HH[1]-LL[1])*0.618));
}
}
2.
input : 타주기분(30);
var : cnt(0),S1(0),D1(0),TM(0),TF(0);
Array : HH[100](0),LL[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;
TF = TM%타주기분;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
HH[0] =data2(H);
LL[0] =data2(L);
for cnt = 1 to 99
{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if data2(H) > HH[0] Then
HH[0] = data2(H);
if data2(L) < LL[0] Then
LL[0] = data2(L);
if HH[1] > 0 and LL[1] > 0 then
{
plot1(iff(stime>=091500,HH[1],0));
plot2(iff(stime>=091500,LL[1],0));
plot3(iff(stime>=091500,(HH[1]+LL[1])/2,0));
plot4((HH[1]-(HH[1]-LL[1])*0.382));
plot5((HH[1]-(HH[1]-LL[1])*0.618));
}
}
3.
Plot1(dayHigh(),"당고가");
Plot2(dayLow(), "당저가");
Plot3(dayHigh(1),"고가");
Plot4(dayLow(1), "저가");
Plot5(data2(HighD(1)), "전고가2");
Plot6(data2(Lowd(1)), "전저가2");
Plot7(data2(HighD(0)), "고가2");
Plot8(data2(Lowd(0)), "저가2");
Plot9(DayOpen(),"당시가");
Plot10(data2(OpenD(0)), "시가2");
수고하십시요.
답변 1
예스스탁 예스스탁 답변
2025-06-13 14:12:08
안녕하세요
예스스탁입니다.
1
input : 타주기분(30);
var : cnt(0),S1(0),D1(0),TM(0),TF(0);
Array : HH[100](0),LL[100](0);
if (sDate != sDate[1] and sTime >= 084500) or
(sDate == sDate[1] and sTime >= 084500 and sTime[1] < 084500) Then
{
S1 = TimeToMinutes(084500);
D1 = sdate;
}
if Bdate != Bdate[1] Then
D1 = 0;
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%타주기분;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99
{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
if HH[1] > 0 and LL[1] > 0 then
{
if sTime >= 91500 then
{
plot1(HH[1]);
plot2(LL[1]);
plot3((HH[1]+LL[1])/2);
}
Else
{
NoPlot(1);
NoPlot(2);
NoPlot(3);
}
plot4((HH[1]-(HH[1]-LL[1])*0.382));
plot5((HH[1]-(HH[1]-LL[1])*0.618));
}
}
Else
{
NoPlot(1);
NoPlot(2);
NoPlot(3);
NoPlot(4);
NoPlot(5);
}
2
input : 타주기분(30);
var : cnt(0,Data2),S1(0,Data2),D1(0,Data2),TM(0,Data2),TF(0,Data2);
Array : HH[100](0,Data2),LL[100](0,Data2);
if Data2((sDate != sDate[1] and sTime >= 084500) or
(sDate == sDate[1] and sTime >= 084500 and sTime[1] < 084500)) Then
{
S1 = data2(TimeToMinutes(084500));
D1 = data2(sdate);
}
if data2(Bdate != Bdate[1]) Then
D1 = 0;
if D1 > 0 then
{
if data2(sdate) == D1 Then
TM = data2(TimeToMinutes(stime))-S1;
Else
TM = data2(TimeToMinutes(stime))+1440-S1;
TF = TM%타주기분;
if data2(Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1])) Then
{
HH[0] = data2(H);
LL[0] = data2(L);
for cnt = 1 to 99
{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if data2(H) > HH[0] Then
HH[0] = data2(H);
if data2(L) < LL[0] Then
LL[0] = Data2(L);
if HH[1] > 0 and LL[1] > 0 then
{
if sTime >= 91500 then
{
plot1(HH[1]);
plot2(LL[1]);
plot3((HH[1]+LL[1])/2);
}
Else
{
NoPlot(1);
NoPlot(2);
NoPlot(3);
}
plot4((HH[1]-(HH[1]-LL[1])*0.382));
plot5((HH[1]-(HH[1]-LL[1])*0.618));
}
}
Else
{
NoPlot(1);
NoPlot(2);
NoPlot(3);
NoPlot(4);
NoPlot(5);
}
3
var : i(0);
Array : DO1[50](0,Data1),DH1[50](0,Data1),DL1[50](0,Data1),DC1[50](0,Data1);
Array : DO2[50](0,Data2),DH2[50](0,Data2),DL2[50](0,Data2),DC2[50](0,Data2);
if Data1((sDate != sDate[1] and sTime >= 84500) or
(sDate == sDate[1] and sTime >= 84500 and sTime[1] < 84500)) Then
{
For i = 49 DownTo 1
{
DO1[i] = DO1[i-1];
DH1[i] = DH1[i-1];
DL1[i] = DL1[i-1];
DC1[i] = DC1[i-1];
}
DO1[0] = data1(O);
DH1[0] = data1(H);
DL1[0] = data1(L);
}
if data1(sTime >= 84500 and sTime <= 154500) Then
{
if DH1[0] > 0 and data1(H) > DH1[0] Then
DH1[0] = data1(H);
if DL1[0] > 0 and data1(L) < DL1[0] Then
DL1[0] = data1(L);
DC1[0] = data1(C);
}
if Data2((sDate != sDate[1] and sTime >= 84500) or
(sDate == sDate[1] and sTime >= 84500 and sTime[1] < 84500)) Then
{
For i = 49 DownTo 1
{
DO2[i] = DO2[i-1];
DH2[i] = DH2[i-1];
DL2[i] = DL2[i-1];
DC2[i] = DC2[i-1];
}
DO2[0] = data2(O);
DH2[0] = data2(H);
DL2[0] = data2(L);
}
if data2(sTime >= 84500 and sTime <= 154500) Then
{
if DH2[0] > 0 and data2(H) > DH2[0] Then
DH2[0] = data2(H);
if DL2[0] > 0 and data2(L) < DL2[0] Then
DL2[0] = data2(L);
DC2[0] = data2(C);
}
Plot1(DH1[0],"당고가");
Plot2(DL1[0], "당저가");
Plot3(DH1[1],"고가");
Plot4(DL1[1], "저가");
Plot5(DH2[1], "전고가2");
Plot6(DL2[1], "전저가2");
Plot7(DH2[0], "고가2");
Plot8(DL2[0], "저가2");
Plot9(DO1[0],"당시가");
Plot10(DO2[0], "시가2");
즐거운 하루되세요
> 바닥차기 님이 쓴 글입니다.
> 제목 : 수식수정바랍니다
> 안녕하세요
아래3가지 수식은 선물옵션에서 사용중인데 주간장용입니다
복합장에서 주간장으로 사용하게끔 수정바랍니다
1.
input : 타주기분(30);
var : cnt(0),S1(0),D1(0),TM(0),TF(0);
Array : HH[100](0),LL[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;
TF = TM%타주기분;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99
{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
if HH[1] > 0 and LL[1] > 0 then
{
plot1(iff(stime>=091500,HH[1],0));
plot2(iff(stime>=091500,LL[1],0));
plot3(iff(stime>=091500,(HH[1]+LL[1])/2,0));
plot4((HH[1]-(HH[1]-LL[1])*0.382));
plot5((HH[1]-(HH[1]-LL[1])*0.618));
}
}
2.
input : 타주기분(30);
var : cnt(0),S1(0),D1(0),TM(0),TF(0);
Array : HH[100](0),LL[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;
TF = TM%타주기분;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
HH[0] =data2(H);
LL[0] =data2(L);
for cnt = 1 to 99
{
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
if data2(H) > HH[0] Then
HH[0] = data2(H);
if data2(L) < LL[0] Then
LL[0] = data2(L);
if HH[1] > 0 and LL[1] > 0 then
{
plot1(iff(stime>=091500,HH[1],0));
plot2(iff(stime>=091500,LL[1],0));
plot3(iff(stime>=091500,(HH[1]+LL[1])/2,0));
plot4((HH[1]-(HH[1]-LL[1])*0.382));
plot5((HH[1]-(HH[1]-LL[1])*0.618));
}
}
3.
Plot1(dayHigh(),"당고가");
Plot2(dayLow(), "당저가");
Plot3(dayHigh(1),"고가");
Plot4(dayLow(1), "저가");
Plot5(data2(HighD(1)), "전고가2");
Plot6(data2(Lowd(1)), "전저가2");
Plot7(data2(HighD(0)), "고가2");
Plot8(data2(Lowd(0)), "저가2");
Plot9(DayOpen(),"당시가");
Plot10(data2(OpenD(0)), "시가2");
수고하십시요.