예스스탁
예스스탁 답변
2024-05-13 11:19:43
안녕하세요
예스스탁입니다.
1
input : N(100);
var : cnt(0),ii(0);
var : sumv(0),sumi(0),mav(0),maxv(Nan),minv(Nan),SumSqrt(0),Stdv(0);
Array : GR[200](0);
if Bdate != Bdate[1] Then
{
For cnt = 199 DownTo 1
{
GR[cnt] = GR[cnt-1];
}
if DayOpen > DayClose(1) Then
{
GR[0] = (DayOpen-DayClose(1))/DayClose(1)*100;
ii = ii +1;
}
sumv = 0;
sumi = 0;
maxv = 0;
minv = 0;
For cnt = 1 to min(ii-1,N)
{
sumv = sumv+GR[cnt];
sumi = sumi+1;
if maxv == 0 or (maxv > 0 and GR[cnt] > maxv) Then
maxv = GR[cnt];
if minv == 0 or (minv > 0 and GR[cnt] < minv) Then
minv = GR[cnt];
}
mav = sumv/sumi;
SumSqrt = 0;
For cnt = 0 To sumi- 1
{
SumSqrt = SumSqrt + (GR[Cnt] - mav)^2;
}
Stdv = SquareRoot(SumSqrt / sumi);
}
Plot1(mav);
plot2(mav+stdv);
plot3(minv+(maxv+minv)*0.9);
plot4(maxv);
2
input : N(100);
var : cnt(0),ii(0);
var : sumv(0),sumi(0),mav(0),maxv(Nan),minv(Nan),SumSqrt(0),Stdv(0);
Array : GR[200](0);
if Bdate != Bdate[1] Then
{
For cnt = 199 DownTo 1
{
GR[cnt] = GR[cnt-1];
}
if DayOpen > DayClose(1) Then
{
GR[0] = (DayOpen-DayClose(1))/DayClose(1)*100;
ii = ii +1;
}
sumv = 0;
sumi = 0;
maxv = 0;
minv = 0;
For cnt = 1 to min(ii-1,N)
{
sumv = sumv+GR[cnt];
sumi = sumi+1;
if maxv == 0 or (maxv > 0 and GR[cnt] > maxv) Then
maxv = GR[cnt];
if minv == 0 or (minv > 0 and GR[cnt] < minv) Then
minv = GR[cnt];
}
mav = sumv/sumi;
SumSqrt = 0;
For cnt = 0 To sumi- 1
{
SumSqrt = SumSqrt + (GR[Cnt] - mav)^2;
}
Stdv = SquareRoot(SumSqrt / sumi);
}
if DayOpen > DayClose(1) and GR[0] > mav Then
Find(1);
3
input : N(100),R(1);
var : cnt(0),ii(0);
var : sumv(0),sumi(0),mav(0),maxv(Nan),minv(Nan),SumSqrt(0),Stdv(0);
Array : GR[200](0);
if Bdate != Bdate[1] Then
{
For cnt = 199 DownTo 1
{
GR[cnt] = GR[cnt-1];
}
if DayOpen > DayClose(1) Then
{
GR[0] = (DayOpen-DayClose(1))/DayClose(1)*100;
ii = ii +1;
}
sumv = 0;
sumi = 0;
maxv = 0;
minv = 0;
For cnt = 1 to min(ii-1,N)
{
sumv = sumv+GR[cnt];
sumi = sumi+1;
if maxv == 0 or (maxv > 0 and GR[cnt] > maxv) Then
maxv = GR[cnt];
if minv == 0 or (minv > 0 and GR[cnt] < minv) Then
minv = GR[cnt];
}
mav = sumv/sumi;
SumSqrt = 0;
For cnt = 0 To sumi- 1
{
SumSqrt = SumSqrt + (GR[Cnt] - mav)^2;
}
Stdv = SquareRoot(SumSqrt / sumi);
}
if DayOpen > DayClose(1) and GR[0] > mav and GR[0] >= R Then
Find(1);
즐거운 하루되세요
> 코퍼 님이 쓴 글입니다.
> 제목 : 갭상승 비율 평균
> 안녕하세요?
종목검색식 도움요청드립니다.
1. 매일 갭상승 캔들(갭 없는 캔들 제외)의 (금일시가-전일종가)/전일종가 비율을 어레이에 100개 저장(당일캔들 제외)하고, 이 100개 값들의 평균, 평균+표준편차, 90%. max 등 4개 값을 구함(혹시 100개가 안나오면 그 상태로 4개 값을 구해주세요)
2. 상기값 중 당일 갭이 평균 이상 발생하는 종목 검색
3. 상기 2식중 갭상승 비율을 인풋으로 종목 검색
고맙습니다~~^^