커뮤니티
수식 변환 부탁드립니다.
2024-02-14 16:11:32
694
글번호 176620
안녕하십니까? K사에서 쓰는 신호수식인데요 예스로 종목 검색을 하고싶습니다.
S = StochasticsSlow(12, 5);
R = RSi(14);
조건 = 상한가_D() && 거래대금 > 30000 && S >=70 && R >=70;
상C = ValueWhen(1, 조건, C);
M10 = ma(C, 10);
cnt = CountSince(조건, C>o && C<M10);
cnt == 1 && cnt(1) == 0 && 상C * 0.8 > H
감사합니다.
답변 1
예스스탁 예스스탁 답변
2024-02-14 17:03:12
안녕하세요
예스스탁입니다.
상한가_D()
수식에 사용자함수가 있습니다.
상한가 여부 판단하는 내용으로 보고 작성해 드립니다.
var : S(0),R(0),조건(False),상C(0),m10(0),cnt(-1);
var : 상한가(0), UpLimit(0);
var : up1(0), up2(0), up3(0), up4(0), up5(0),up6(0),Up7(0);
if date >= 19981207 then
{
if date < 20050328 && CodeCategory() == 2 then
UpLimit = (BP[0] * 1.12);
Else if date >= 20050328 and date < 20150615 Then
UpLimit = (BP[0] * 1.15);
Else
UpLimit = (BP[0] * 1.30);
if date >= 20230125 Then
{
up1 = int(UpLimit/1000+0.00001)*1000;
up2 = int(UpLimit/500+0.00001)*500;
up3 = int(UpLimit/100+0.00001)*100;
up4 = int(UpLimit/50+0.00001)*50;
up5 = int(UpLimit/10+0.00001)*10;
up6 = int(UpLimit/5+0.00001)*5;
up7 = int(UpLimit/1+0.00001)*1;
}
Else
{
if CodeCategory() == 2 then
{
if date >= 20030721 then
{
up1 = int(UpLimit/100+0.00001)*100;
up2 = int(UpLimit/100+0.00001)*100;
up3 = int(UpLimit/100+0.00001)*100;
up4 = int(UpLimit/50+0.00001)*50;
up5 = int(UpLimit/10+0.00001)*10;
up6 = int(UpLimit/5+0.00001)*5;
up7 = int(UpLimit/1+0.00001)*1;
}
else
{
up1 = int(UpLimit/1000+0.00001)*1000;
up2 = int(UpLimit/500+0.00001)*500;
up3 = int(UpLimit/100+0.00001)*100;
up4 = int(UpLimit/50+0.00001)*50;
up5 = int(UpLimit/10+0.00001)*10;
up6 = int(UpLimit/10+0.00001)*10;
up7 = int(UpLimit/1+0.00001)*1;
}
}
Else
{
up1 = int(UpLimit/1000+0.00001)*1000;
up2 = int(UpLimit/500+0.00001)*500;
up3 = int(UpLimit/100+0.00001)*100;
up4 = int(UpLimit/50+0.00001)*50;
up5 = int(UpLimit/10+0.00001)*10;
up6 = int(UpLimit/5+0.00001)*5;
up7 = int(UpLimit/1+0.00001)*1;
}
}
if CodeCategory() == 1 || CodeCategory() == 2 then
{
if date >= 20230125 Then
{
If BP >= 500000 Then
상한가 = up1;
Else If BP >= 200000 Then
상한가 = iff(up2>=500000, up1, up2);
Else If BP >= 50000 Then
상한가 = iff(up3>=200000, up2, up3);
Else If BP >= 20000 Then
상한가 = iff(up4>=50000, up3, up4);
Else If BP >= 5000 Then
상한가 = iff(up5>=20000, up4, up5);
Else If BP >= 2000 Then
상한가 = iff(up5>=5000, up5, up6);
Else
상한가 = iff(up6>=2000, up6, up7);
}
Else
{
if sdate < 20101004 Then
{
If BP >= 500000 Then
상한가 = up1;
Else If BP >= 100000 Then
상한가 = iff(up2>=500000, up1, up2);
Else If BP >= 50000 Then
상한가 = iff(up3>=100000, up2, up3);
Else If BP >= 10000 Then
상한가 = iff(up4>=50000, up3, up4);
Else If BP >= 5000 Then
상한가 = iff(up5>=10000, up4, up5);
Else If BP >= 1000 Then
상한가 = iff(up5>=5000, up5, up6);
Else
상한가 = iff(up6>=1000, up6, up6);
}
Else
{
If BP >= 500000 Then
상한가 = up1;
Else If BP >= 100000 Then
상한가 = iff(up2>=500000, up1, up2);
Else If BP >= 50000 Then
상한가 = iff(up3>=100000, up2, up3);
Else If BP >= 10000 Then
상한가 = iff(up4>=50000, up3, up4);
Else If BP >= 5000 Then
상한가 = iff(up5>=10000, up4, up5);
Else If BP >= 1000 Then
상한가 = iff(up5>=5000, up5, up6);
Else
상한가 = iff(up6>=1000, up6, up7);
}
}
}
else if CodeCategory() == 8 || CodeCategory() == 9 then { // ETF
상한가 = up6;
}
}
S = StochasticsK(12, 5);
R = RSi(14);
조건 = H == 상한가 && m > 30000000000 && S >=70 && R >=70;
if 조건 Then
{
상C = C;
cnt = 0;
}
M10 = ma(C, 10);
if C>o && C<M10 and cnt >= 0 Then
cnt = cnt+1;
if cnt == 1 && cnt[1] == 0 && 상C * 0.8 > H Then
Find(1);
즐거운 하루되세요
> 매일대박 님이 쓴 글입니다.
> 제목 : 수식 변환 부탁드립니다.
> 안녕하십니까? K사에서 쓰는 신호수식인데요 예스로 종목 검색을 하고싶습니다.
S = StochasticsSlow(12, 5);
R = RSi(14);
조건 = 상한가_D() && 거래대금 > 30000 && S >=70 && R >=70;
상C = ValueWhen(1, 조건, C);
M10 = ma(C, 10);
cnt = CountSince(조건, C>o && C<M10);
cnt == 1 && cnt(1) == 0 && 상C * 0.8 > H
감사합니다.
다음글
이전글