커뮤니티
부탁 드립니다.
2020-06-08 07:43:23
2089
글번호 139589
도움주심에 항상 감사 드립니다.
1) 아래 수식1,2)를 타주기 일봉용으로 작성해주신 수식3)입니다.
이것을
질문1) 타주기(주봉용),
질문2) 타주기(월봉용),으로
스스로 작성된것이 정상작동이 되지 않는것으로 보입니다.
검토 부탁 드립니다.
특히 변수 P값을 변경하여도 변화가 없습니다.
미리 감사 드립니다.
수식1)
Input : P(20),sig(5);
var1=(highest(c,p)-L)/(highest(c,p))*100;
var2=ma(var1,sig);
수식2)
Input : P(20),sig(5);
var1=(lowest(c,p)-H)/(lowest(c,p))*100;
var2=ma(var1,sig);
수식3) 타주기(일봉용)_정상 작동됨
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if DayHigh(P+sig-1) > 0 and DayLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and DayClose(i2) > hc) Then
hc = DayClose(i2);
if lc == 0 or (lc > 0 and DayClose(i2) < lc) Then
lc = DayClose(i2);
}
sum1 = sum1 + (hc-DayLow(i1))/hc*100;
sum2 = sum2 + (lc-dayhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-daylow(i1))/hc*100;
value1 = (lc-DayHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문1) 타주기(주봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if weekHigh(P+sig-1) > 0 and weekLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and weekClose(i2) > hc) Then
hc = weekClose(i2);
if lc == 0 or (lc > 0 and weekClose(i2) < lc) Then
lc = weekClose(i2);
}
sum1 = sum1 + (hc-weekLow(i1))/hc*100;
sum2 = sum2 + (lc-weekhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-weeklow(i1))/hc*100;
value1 = (lc-weekHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문2) 타주기(월봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if MONTHHigh(P+sig-1) > 0 and MONTHLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MONTHClose(i2) > hc) Then
hc = MONTHClose(i2);
if lc == 0 or (lc > 0 and MONTHClose(i2) < lc) Then
lc = MONTHClose(i2);
}
sum1 = sum1 + (hc-MONTHLow(i1))/hc*100;
sum2 = sum2 + (lc-MONTHhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-MONTHlow(i1))/hc*100;
value1 = (lc-MONTHHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
답변 3
예스스탁 예스스탁 답변
2020-06-08 11:07:00
안녕하세요
예스스탁입니다.
올려주신 수식은 별도의 사용자함수가 있어 검증해 드릴수 없습니다.
아래식 참고하시기 바랍니다.
1
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : WH[100](0),WL[100](0),WC[100](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then
{
WH[0] = H;
WL[0] = L;
for cnt = 1 to 99
{
WH[cnt-1] = WH[cnt-1][1];
WL[cnt-1] = WL[cnt-1][1];
WC[cnt-1] = WC[cnt-1][1];
}
}
if WH[0] > 0 and H > WH[0] Then
WH[0] = H;
if WL[0] > 0 and L < WL[0] Then
WL[0] = L;
WC[0] = C;
if WH[P+sig-1] > 0 and WL[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and WC[i2] > hc) Then
hc = WC[i2];
if lc == 0 or (lc > 0 and WC[i2] < lc) Then
lc = WC[i2];
}
sum1 = sum1 + (hc-WL[i1])/hc*100;
sum2 = sum2 + (lc-WH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-WL[i1])/hc*100;
value1 = (lc-WH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
2
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : MH[100](0),ML[100](0),MC[100](0);
if bdate > bdate[1]+30 Then
{
MH[0] = H;
ML[0] = L;
for cnt = 1 to 99
{
MH[cnt-1] = MH[cnt-1][1];
ML[cnt-1] = ML[cnt-1][1];
MC[cnt-1] = MC[cnt-1][1];
}
}
if MH[0] > 0 and H > MH[0] Then
MH[0] = H;
if ML[0] > 0 and L < ML[0] Then
ML[0] = L;
MC[0] = C;
if MH[P+sig-1] > 0 and ML[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MC[i2] > hc) Then
hc = MC[i2];
if lc == 0 or (lc > 0 and MC[i2] < lc) Then
lc = MC[i2];
}
sum1 = sum1 + (hc-ML[i1])/hc*100;
sum2 = sum2 + (lc-MH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-ML[i1])/hc*100;
value1 = (lc-MH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움주심에 항상 감사 드립니다.
1) 아래 수식1,2)를 타주기 일봉용으로 작성해주신 수식3)입니다.
이것을
질문1) 타주기(주봉용),
질문2) 타주기(월봉용),으로
스스로 작성된것이 정상작동이 되지 않는것으로 보입니다.
검토 부탁 드립니다.
특히 변수 P값을 변경하여도 변화가 없습니다.
미리 감사 드립니다.
수식1)
Input : P(20),sig(5);
var1=(highest(c,p)-L)/(highest(c,p))*100;
var2=ma(var1,sig);
수식2)
Input : P(20),sig(5);
var1=(lowest(c,p)-H)/(lowest(c,p))*100;
var2=ma(var1,sig);
수식3) 타주기(일봉용)_정상 작동됨
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if DayHigh(P+sig-1) > 0 and DayLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and DayClose(i2) > hc) Then
hc = DayClose(i2);
if lc == 0 or (lc > 0 and DayClose(i2) < lc) Then
lc = DayClose(i2);
}
sum1 = sum1 + (hc-DayLow(i1))/hc*100;
sum2 = sum2 + (lc-dayhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-daylow(i1))/hc*100;
value1 = (lc-DayHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문1) 타주기(주봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if weekHigh(P+sig-1) > 0 and weekLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and weekClose(i2) > hc) Then
hc = weekClose(i2);
if lc == 0 or (lc > 0 and weekClose(i2) < lc) Then
lc = weekClose(i2);
}
sum1 = sum1 + (hc-weekLow(i1))/hc*100;
sum2 = sum2 + (lc-weekhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-weeklow(i1))/hc*100;
value1 = (lc-weekHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문2) 타주기(월봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if MONTHHigh(P+sig-1) > 0 and MONTHLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MONTHClose(i2) > hc) Then
hc = MONTHClose(i2);
if lc == 0 or (lc > 0 and MONTHClose(i2) < lc) Then
lc = MONTHClose(i2);
}
sum1 = sum1 + (hc-MONTHLow(i1))/hc*100;
sum2 = sum2 + (lc-MONTHhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-MONTHlow(i1))/hc*100;
value1 = (lc-MONTHHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
뮬리
2020-06-08 11:43:23
답변 감사 드리오나
실행결과 봉수를 늘려도 실행 결과가 나타 나지 않습니다.
검토 부탁 드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
> 안녕하세요
예스스탁입니다.
올려주신 수식은 별도의 사용자함수가 있어 검증해 드릴수 없습니다.
아래식 참고하시기 바랍니다.
1
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : WH[100](0),WL[100](0),WC[100](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then
{
WH[0] = H;
WL[0] = L;
for cnt = 1 to 99
{
WH[cnt-1] = WH[cnt-1][1];
WL[cnt-1] = WL[cnt-1][1];
WC[cnt-1] = WC[cnt-1][1];
}
}
if WH[0] > 0 and H > WH[0] Then
WH[0] = H;
if WL[0] > 0 and L < WL[0] Then
WL[0] = L;
WC[0] = C;
if WH[P+sig-1] > 0 and WL[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and WC[i2] > hc) Then
hc = WC[i2];
if lc == 0 or (lc > 0 and WC[i2] < lc) Then
lc = WC[i2];
}
sum1 = sum1 + (hc-WL[i1])/hc*100;
sum2 = sum2 + (lc-WH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-WL[i1])/hc*100;
value1 = (lc-WH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
2
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : MH[100](0),ML[100](0),MC[100](0);
if bdate > bdate[1]+30 Then
{
MH[0] = H;
ML[0] = L;
for cnt = 1 to 99
{
MH[cnt-1] = MH[cnt-1][1];
ML[cnt-1] = ML[cnt-1][1];
MC[cnt-1] = MC[cnt-1][1];
}
}
if MH[0] > 0 and H > MH[0] Then
MH[0] = H;
if ML[0] > 0 and L < ML[0] Then
ML[0] = L;
MC[0] = C;
if MH[P+sig-1] > 0 and ML[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MC[i2] > hc) Then
hc = MC[i2];
if lc == 0 or (lc > 0 and MC[i2] < lc) Then
lc = MC[i2];
}
sum1 = sum1 + (hc-ML[i1])/hc*100;
sum2 = sum2 + (lc-MH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-ML[i1])/hc*100;
value1 = (lc-MH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움주심에 항상 감사 드립니다.
1) 아래 수식1,2)를 타주기 일봉용으로 작성해주신 수식3)입니다.
이것을
질문1) 타주기(주봉용),
질문2) 타주기(월봉용),으로
스스로 작성된것이 정상작동이 되지 않는것으로 보입니다.
검토 부탁 드립니다.
특히 변수 P값을 변경하여도 변화가 없습니다.
미리 감사 드립니다.
수식1)
Input : P(20),sig(5);
var1=(highest(c,p)-L)/(highest(c,p))*100;
var2=ma(var1,sig);
수식2)
Input : P(20),sig(5);
var1=(lowest(c,p)-H)/(lowest(c,p))*100;
var2=ma(var1,sig);
수식3) 타주기(일봉용)_정상 작동됨
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if DayHigh(P+sig-1) > 0 and DayLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and DayClose(i2) > hc) Then
hc = DayClose(i2);
if lc == 0 or (lc > 0 and DayClose(i2) < lc) Then
lc = DayClose(i2);
}
sum1 = sum1 + (hc-DayLow(i1))/hc*100;
sum2 = sum2 + (lc-dayhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-daylow(i1))/hc*100;
value1 = (lc-DayHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문1) 타주기(주봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if weekHigh(P+sig-1) > 0 and weekLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and weekClose(i2) > hc) Then
hc = weekClose(i2);
if lc == 0 or (lc > 0 and weekClose(i2) < lc) Then
lc = weekClose(i2);
}
sum1 = sum1 + (hc-weekLow(i1))/hc*100;
sum2 = sum2 + (lc-weekhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-weeklow(i1))/hc*100;
value1 = (lc-weekHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문2) 타주기(월봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if MONTHHigh(P+sig-1) > 0 and MONTHLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MONTHClose(i2) > hc) Then
hc = MONTHClose(i2);
if lc == 0 or (lc > 0 and MONTHClose(i2) < lc) Then
lc = MONTHClose(i2);
}
sum1 = sum1 + (hc-MONTHLow(i1))/hc*100;
sum2 = sum2 + (lc-MONTHhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-MONTHlow(i1))/hc*100;
value1 = (lc-MONTHHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
예스스탁 예스스탁 답변
2020-06-08 13:10:42
안녕하세요
예스스탁입니다.
식을 수정했습니다.
1
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : WH[100](0),WL[100](0),WC[100](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then
{
WH[0] = H;
WL[0] = L;
for cnt = 1 to 99
{
WH[cnt] = WH[cnt-1][1];
WL[cnt] = WL[cnt-1][1];
WC[cnt] = WC[cnt-1][1];
}
}
if WH[0] > 0 and H > WH[0] Then
WH[0] = H;
if WL[0] > 0 and L < WL[0] Then
WL[0] = L;
WC[0] = C;
if WH[P+sig-1] > 0 and WL[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and WC[i2] > hc) Then
hc = WC[i2];
if lc == 0 or (lc > 0 and WC[i2] < lc) Then
lc = WC[i2];
}
sum1 = sum1 + (hc-WL[i1])/hc*100;
sum2 = sum2 + (lc-WH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-WL[i1])/hc*100;
value1 = (lc-WH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
2
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : MH[100](0),ML[100](0),MC[100](0);
if bdate > bdate[1]+30 Then
{
MH[0] = H;
ML[0] = L;
for cnt = 1 to 99
{
MH[cnt] = MH[cnt-1][1];
ML[cnt] = ML[cnt-1][1];
MC[cnt] = MC[cnt-1][1];
}
}
if MH[0] > 0 and H > MH[0] Then
MH[0] = H;
if ML[0] > 0 and L < ML[0] Then
ML[0] = L;
MC[0] = C;
if MH[P+sig-1] > 0 and ML[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MC[i2] > hc) Then
hc = MC[i2];
if lc == 0 or (lc > 0 and MC[i2] < lc) Then
lc = MC[i2];
}
sum1 = sum1 + (hc-ML[i1])/hc*100;
sum2 = sum2 + (lc-MH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-ML[i1])/hc*100;
value1 = (lc-MH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : Re : Re : 부탁 드립니다.
> 답변 감사 드리오나
실행결과 봉수를 늘려도 실행 결과가 나타 나지 않습니다.
검토 부탁 드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 부탁 드립니다.
> 안녕하세요
예스스탁입니다.
올려주신 수식은 별도의 사용자함수가 있어 검증해 드릴수 없습니다.
아래식 참고하시기 바랍니다.
1
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : WH[100](0),WL[100](0),WC[100](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then
{
WH[0] = H;
WL[0] = L;
for cnt = 1 to 99
{
WH[cnt-1] = WH[cnt-1][1];
WL[cnt-1] = WL[cnt-1][1];
WC[cnt-1] = WC[cnt-1][1];
}
}
if WH[0] > 0 and H > WH[0] Then
WH[0] = H;
if WL[0] > 0 and L < WL[0] Then
WL[0] = L;
WC[0] = C;
if WH[P+sig-1] > 0 and WL[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and WC[i2] > hc) Then
hc = WC[i2];
if lc == 0 or (lc > 0 and WC[i2] < lc) Then
lc = WC[i2];
}
sum1 = sum1 + (hc-WL[i1])/hc*100;
sum2 = sum2 + (lc-WH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-WL[i1])/hc*100;
value1 = (lc-WH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
2
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0),cnt(0);
Array : MH[100](0),ML[100](0),MC[100](0);
if bdate > bdate[1]+30 Then
{
MH[0] = H;
ML[0] = L;
for cnt = 1 to 99
{
MH[cnt-1] = MH[cnt-1][1];
ML[cnt-1] = ML[cnt-1][1];
MC[cnt-1] = MC[cnt-1][1];
}
}
if MH[0] > 0 and H > MH[0] Then
MH[0] = H;
if ML[0] > 0 and L < ML[0] Then
ML[0] = L;
MC[0] = C;
if MH[P+sig-1] > 0 and ML[P+sig-1] > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MC[i2] > hc) Then
hc = MC[i2];
if lc == 0 or (lc > 0 and MC[i2] < lc) Then
lc = MC[i2];
}
sum1 = sum1 + (hc-ML[i1])/hc*100;
sum2 = sum2 + (lc-MH[i1])/lc*100;
if i1 == 0 Then
{
var1 = (hc-ML[i1])/hc*100;
value1 = (lc-MH[i1])/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움주심에 항상 감사 드립니다.
1) 아래 수식1,2)를 타주기 일봉용으로 작성해주신 수식3)입니다.
이것을
질문1) 타주기(주봉용),
질문2) 타주기(월봉용),으로
스스로 작성된것이 정상작동이 되지 않는것으로 보입니다.
검토 부탁 드립니다.
특히 변수 P값을 변경하여도 변화가 없습니다.
미리 감사 드립니다.
수식1)
Input : P(20),sig(5);
var1=(highest(c,p)-L)/(highest(c,p))*100;
var2=ma(var1,sig);
수식2)
Input : P(20),sig(5);
var1=(lowest(c,p)-H)/(lowest(c,p))*100;
var2=ma(var1,sig);
수식3) 타주기(일봉용)_정상 작동됨
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if DayHigh(P+sig-1) > 0 and DayLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and DayClose(i2) > hc) Then
hc = DayClose(i2);
if lc == 0 or (lc > 0 and DayClose(i2) < lc) Then
lc = DayClose(i2);
}
sum1 = sum1 + (hc-DayLow(i1))/hc*100;
sum2 = sum2 + (lc-dayhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-daylow(i1))/hc*100;
value1 = (lc-DayHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문1) 타주기(주봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if weekHigh(P+sig-1) > 0 and weekLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and weekClose(i2) > hc) Then
hc = weekClose(i2);
if lc == 0 or (lc > 0 and weekClose(i2) < lc) Then
lc = weekClose(i2);
}
sum1 = sum1 + (hc-weekLow(i1))/hc*100;
sum2 = sum2 + (lc-weekhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-weeklow(i1))/hc*100;
value1 = (lc-weekHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
질문2) 타주기(월봉용)_검토 필요
input : P(20),sig(5);
var : sum1(0),sum2(0),hc(0),lc(0),i1(0),i2(0);
if MONTHHigh(P+sig-1) > 0 and MONTHLow(P+sig-1) > 0 then
{
sum1 = 0;
sum2 = 0;
for i1 = 0 to sig-1
{
hc = 0;
lc = 0;
for i2 = i1+0 to i1+P-1
{
if hc == 0 or (hc > 0 and MONTHClose(i2) > hc) Then
hc = MONTHClose(i2);
if lc == 0 or (lc > 0 and MONTHClose(i2) < lc) Then
lc = MONTHClose(i2);
}
sum1 = sum1 + (hc-MONTHLow(i1))/hc*100;
sum2 = sum2 + (lc-MONTHhigh(i1))/lc*100;
if i1 == 0 Then
{
var1 = (hc-MONTHlow(i1))/hc*100;
value1 = (lc-MONTHHigh(i1))/lc*100;
}
}
var2 = sum1/sig;
value2 = sum2/sig;
plot1(var1);
plot2(var2);
plot3(value1);
plot4(value2);
}
다음글
이전글