안녕하세요.
예스스탁입니다.
1
input : 전환선기간(9);
var : cnt(0),wH1(0),wL1(0), w전환선(0);
Array : wH[100](0),wL[100](0);
if sdate > sdate[1]+30 Then
{
for cnt = 99 downto 1
{
wH[cnt] = wH[cnt-1];
wL[cnt] = wL[cnt-1];
}
wH[0] = H;
wL[0] = L;
}
if H > wH[0] Then
wH[0] = H;
if L < wL[0] Then
wL[0] = L;
if wH[전환선기간-1] > 0 and wL[전환선기간-1] > 0 then
{
wH1 = wH[0];
wL1 = wL[0];
for cnt = 0 to 전환선기간-1
{
if wH[cnt] > wH1 Then
wH1 = wH[cnt];
if wL[cnt] < wL1 Then
wL1 = wL[cnt];
}
w전환선 = (wH1 + wL1)/2;
if CrossUp(C,w전환선) and C > O Then
Find(1);
}
2
input : 기간(20);
var : cnt(0),sum(0),mav(0);
Array : wc[100](0);
if sdate > sdate[1]+30 Then
{
for cnt = 99 downto 1
{
wc[cnt] = wc[cnt-1];
}
}
wc[0] = c;
if Wc[기간-1] > 0 then
{
sum = 0;
for cnt = 0 to 기간-1
{
sum = sum + wc[cnt];
}
mav = sum/기간;
if CrossUp(C,mav) and C > O Then
Find(1);
}
즐거운 하루되세요