커뮤니티
6402 재질문입니다.
2007-08-20 15:17:50
1012
글번호 13364
식을 잘못올렸네요...지송^^;
8줄과 16줄에 3.1에서 오류가 나네요... 다시한번 수정부탁드립니다...
input:좌(6),우(5);
var:j(0),예비고(0),예비저(0),예비고bar(0),예비저bar(0),고점표시(0),저점표시(0);
array:고[10](0),저[10](0),고bar[10](0),저bar[10](0);
#==============================================================================#
# 변곡점
#==============================================================================#
if highest(h,좌)==h and iff(예비고bar<우,예비고<h,1) then
{
예비고=h;
예비고bar=0;
}
else
예비고bar=예비고bar+1;
if lowest(l,좌)==l and iff(예비저bar<우,예비저>l,1) then
{
예비저=l;
예비저bar=0;
}
else
예비저bar=예비저bar+1;
고점표시=(o[우]+c[우])/2;
저점표시=(o[우]+c[우])/2;
for j=0 to 9 begin
고bar[j]=고bar[j]+1;
저bar[j]=저bar[j]+1;
end;
if 예비고bar==우 then
{
if 저bar[0]>고bar[0] then
{
if 고[0]<예비고 then
{
고점표시=예비고*1.0005;
고[0]=예비고;
고bar[0]=예비고bar;
}
}
else
{
for j=9 downto 1 begin
고[j]=고[j-1];
고bar[j]=고bar[j-1];
end;
고점표시=예비고*1.0005;
고[0]=예비고;
고bar[0]=예비고bar;
}
}
if 예비저bar==우 then
{
if 고bar[0]>저bar[0] then
{
if 저[0]>예비저 then
{
저점표시=예비저*0.9995;
저[0]=예비저;
저bar[0]=예비저bar;
}
}
else
{
for j=9 downto 1 begin
저[j]=저[j-1];
저bar[j]=저bar[j-1];
end;
저점표시=예비저*0.9995;
저[0]=예비저;
저bar[0]=예비저bar;
}
}
if 고점표시 > h[우] then plot1(고점표시,"전고점",red);
if 저점표시 < l[우] then plot2(저점표시,"전저점",blue);
if 고bar[0]==우 then plot3(고[0],"연결선",green);
if 저bar[0]==우 then plot3(저[0],"연결선",green);
답변 1
예스스탁 예스스탁 답변
2007-08-21 13:35:20
안녕하세요..예스스탁입니다.
수정내용 답변드립니다.
8줄
if highest(h,좌)==h and iff(예비고bar<우,iff(예비고<h,1,0),1) then
16줄
if lowest(l,좌)==l and iff(예비저bar<우,iff(예비저>l,1,0),1) then
감사합니다.
> CJ_MINSUNG 님이 쓴 글입니다.
> 제목 : 6402 재질문입니다.
> 식을 잘못올렸네요...지송^^;
8줄과 16줄에 3.1에서 오류가 나네요... 다시한번 수정부탁드립니다...
input:좌(6),우(5);
var:j(0),예비고(0),예비저(0),예비고bar(0),예비저bar(0),고점표시(0),저점표시(0);
array:고[10](0),저[10](0),고bar[10](0),저bar[10](0);
#==============================================================================#
# 변곡점
#==============================================================================#
if highest(h,좌)==h and iff(예비고bar<우,예비고<h,1) then
{
예비고=h;
예비고bar=0;
}
else
예비고bar=예비고bar+1;
if lowest(l,좌)==l and iff(예비저bar<우,예비저>l,1) then
{
예비저=l;
예비저bar=0;
}
else
예비저bar=예비저bar+1;
고점표시=(o[우]+c[우])/2;
저점표시=(o[우]+c[우])/2;
for j=0 to 9 begin
고bar[j]=고bar[j]+1;
저bar[j]=저bar[j]+1;
end;
if 예비고bar==우 then
{
if 저bar[0]>고bar[0] then
{
if 고[0]<예비고 then
{
고점표시=예비고*1.0005;
고[0]=예비고;
고bar[0]=예비고bar;
}
}
else
{
for j=9 downto 1 begin
고[j]=고[j-1];
고bar[j]=고bar[j-1];
end;
고점표시=예비고*1.0005;
고[0]=예비고;
고bar[0]=예비고bar;
}
}
if 예비저bar==우 then
{
if 고bar[0]>저bar[0] then
{
if 저[0]>예비저 then
{
저점표시=예비저*0.9995;
저[0]=예비저;
저bar[0]=예비저bar;
}
}
else
{
for j=9 downto 1 begin
저[j]=저[j-1];
저bar[j]=저bar[j-1];
end;
저점표시=예비저*0.9995;
저[0]=예비저;
저bar[0]=예비저bar;
}
}
if 고점표시 > h[우] then plot1(고점표시,"전고점",red);
if 저점표시 < l[우] then plot2(저점표시,"전저점",blue);
if 고bar[0]==우 then plot3(고[0],"연결선",green);
if 저bar[0]==우 then plot3(저[0],"연결선",green);
다음글
이전글