답변완료
시스템식 요청드립니다.
질문이 있어 이렇게 글을 남깁니다.
아래의 수식에서 해당 날짜에 종가에 매수되었을때,
그 해당 종가를 '기준가' 라는 내부변수에 넣고 싶은데 아래와 같이 하면
잘 안되는것 같습니다. 어디가 문제인지 확인 부탁드리겠습니다.
input : 금액(1000000),ndate(20240801);
var : b(0),기준가(0);
if sDate == ndate Then
{
Buy("1타점",OnClose,Def,Floor((금액*0.4)/c));
기준가 = DayClose(0);
}
2024-08-27
696
글번호 182852
시스템
답변완료
표시가 안되네요 부탁드려요
표시가 안되네요 수정 부탁드려요
Input :N일(9);
VAR : A(0),A1(0),eq(0),VL(0),tx(0);
A=LRL(C,9);
A1=LRS(A,9);
eq=A-A1;
VL=A+eq;
if CrossDown(C,VL) Then
{
tx = Text_New_Self(sDate,stime,VL,"▼▼▼▼▼");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,red);
}
2024-08-26
767
글번호 182851
지표
답변완료
두 조건에 만족하는 검색식 부탁드립니다. 감사합니다.
1
var : AA(0),대금(0),A(0),B(0),DD(0),양대금(0),A1(0),B1(0),D1(0),음대금(0);
대금 = (H+O+L+C)/4*V/100000000;
A=IfF(C>O,대금,0);
B=Accum(A);
A1=IfF(C<O,대금,0);
B1=Accum(A1);
if sDate != sDate[1] Then
{
DD = B[1];
D1 = B1[1];
}
양대금=B-DD;
음대금=B1-D1;
if CROSSUP(양대금,음대금) Then
Find(1);
2
var : A(0),A1(0),A2(0),A3(0),A4(0),B(0);
A=OBV();
B=Ema(A, 9);
A1=accum(V*(Pow(C-L,2)-Pow(H-C, 2))/(H-L));
A2=ADX(11);
A3=100*Ema(C,10)/Ema(C[20],10);
A4=100*Ema(Ema(C,10)/Ema(C[20],10),9);
if A3[1]<=100 && (Crossup(A3,A4) OR Crossup(A,B)) &&
A[1]<A && A1[1]<A1 && A2[1]<A2 && A3[1]<A3 Then
Find(1);
항상 고맙습니다.
2024-08-26
746
글번호 182850
종목검색
답변완료
키움 함수 예스트레이더용으로 변환 부탁드립니다
DMA_VALUE = myDma(nPeriod);
(DMA_VALUE
+
(
Sqrt(
(
if ( nPeriod >=1, Pow(c-DMA_VALUE,2), 0)
+myVariance2( nPeriod, DMA_VALUE, 2)
+myVariance2( nPeriod, DMA_VALUE, 3)
+myVariance2( nPeriod, DMA_VALUE, 4)
+myVariance2( nPeriod, DMA_VALUE, 5)
+myVariance2( nPeriod, DMA_VALUE, 6)
+myVariance2( nPeriod, DMA_VALUE, 7)
+myVariance2( nPeriod, DMA_VALUE, 8)
+myVariance2( nPeriod, DMA_VALUE, 9)
+myVariance2( nPeriod, DMA_VALUE, 10)
+myVariance2( nPeriod, DMA_VALUE, 11)
+myVariance2( nPeriod, DMA_VALUE, 12)
+myVariance2( nPeriod, DMA_VALUE, 13)
+myVariance2( nPeriod, DMA_VALUE, 14)
+myVariance2( nPeriod, DMA_VALUE, 15)
+myVariance2( nPeriod, DMA_VALUE, 16)
+myVariance2( nPeriod, DMA_VALUE, 17)
+myVariance2( nPeriod, DMA_VALUE, 18)
+myVariance2( nPeriod, DMA_VALUE, 19)
+myVariance2( nPeriod, DMA_VALUE, 20)
)/nPeriod)
*nMultiply
)
);
키움 함수 예스트레이더용으로 변환 부탁드립니다
2024-08-26
765
글번호 182848
사용자 함수
답변완료
안녕하세요 수식 검토 부탁드립니다~
안녕하세요
아래의 조건으로 만들어주신 수식이 종목 검색이 안되어 재검토 부탁드립니다.
신호검색은 잡히는데, 종목이 검출이 안됩니다.
1. 현재봉기준 N(13)봉 이내에,
스토캐스틱슬로우(12,5) %K가 20선을 상향 돌파한 후에,
MACD(12,26,9)가 signal선을 상향 돌파하고,
RSI(14)가 50선을 상향 돌파하는 세 가지를
모두 만족하는 종목을 검색하고 싶습니다.
세 가지를 만족하기 전에
스토캐스틱 %K가 80선을 돌파하면 제외하는 조건입니다.
(스토캐스틱 신호 후, MACD와 RSI는 순서 상관없음)
키움 신호수식은 다음과 같습니다.
이것을 예스 종목검색식으로 바꾸고 싶습니다.
S = Stochasticsslow(sto1,sto2);
M = Macd(short,long);
Ms = eavg(M,sig);
R = RSI(R기간);
Bs_Sto = BarsSince(CrossUp(S,20));
cnt_Sto = CountSince(CrossUp(S,20), S<80);
Bs_Macd = BarsSince(CrossUp(M,Ms));
Bs_Rsi = BarsSince(CrossUp(R,50));
조건 = Bs_Sto > Bs_Macd && Bs_Sto > Bs_Rsi;
//Max(Bs_Sto, Bs_Macd, Bs_Rsi) == Bs_Sto
조건 && !조건(1) && (Bs_Sto+1)==cnt_Sto
**************************************************
input : sto1(10),sto2(5),short(12),long(26),sig(9),R기간(10),N(13);
var : S(0),md(0),ms(0),R(0);
var : Bs_Sto(-1),cnt_sto(-1),Bs_macd(-1),Bs_Rsi(-1),조건(False);
S = StochasticsK(sto1,sto2);
Md = Macd(short,long);
Ms = Ema(Md,sig);
R = RSI(R기간);
if CrossUp(S,20) Then
{
Bs_Sto = 0;
cnt_Sto = 0;
}
Else
{
if Bs_Sto >= 0 Then
Bs_Sto = Bs_Sto+1;
if cnt_Sto >= 0 and S < 80 Then
cnt_Sto = cnt_Sto+1;
}
if CrossUp(Md,Ms) Then
Bs_Macd = 0;
Else
{
if Bs_Macd >= 0 Then
Bs_Macd = Bs_Macd+1;
}
if CrossUp(R,50) Then
Bs_Rsi = 0;
Else
{
if Bs_Rsi >= 0 Then
Bs_Rsi = Bs_Rsi+1;
}
조건 = Bs_Sto >= 0 and Bs_Macd >= 0 and Bs_Rsi >= 0 and Bs_Sto <= N and
Bs_Sto > Bs_Macd and Bs_Sto > Bs_Rsi;
if 조건 && 조건[1] == False && (Bs_Sto+1)==cnt_Sto Then
Find(1);
도움주셔서 감사드립니다.
늘 고맙습니다!!
2024-08-26
775
글번호 182844
종목검색
답변완료
문의드립니다
a기간 동안에는 adx(10)
b기간 동안에는 adx(20)
c기간 동안에는 adx(30)
이런식으로 기간에 따라 값이 달라지게 하려고 합니다
아래의 식을 활용해서 메세지로그를 체크하여서
실제로 기간이 바뀜에 따라 값이 잘 바뀌는지를 확인해봤습니다
기간이 바뀜에 따라 leng값, 이동평균선, atr 모두 잘 바뀌었습니다.
그런데 rsi와 adx는 기간에 상관없이 값이 0이 나옵니다.
어떻게 해결할 수 있을까요?
나스닥 분봉 차트입니다.
vars: leng(80), check(0);
if date >= 20240819 and date < 20240821 then
begin
leng = 60;
end;
if date >= 20240821 and date < 20240823 then
begin
leng = 40;
end;
if date >= 20240823 then
begin
leng = 20;
end;
//------------------------------------
//check = leng;
//MessageLog("leng 값 %.2f", check );
//check = ma(c, leng);
//MessageLog("ma 값 %.2f", check );
//check = ATr(leng);
//MessageLog("atr 값 %.2f", check );
//check = rsi(leng);
//MessageLog("rsi 값 %.2f", check );
check = ADX(leng);
MessageLog("adx 값 %.2f", check );
//------------------------------------
if ( MarketPosition <> 1 ) then buy ("롱진입",Atmarket);
if (MarketPosition == 1) then ExitLong ("TimeExitL", Atmarket);
2024-08-26
826
글번호 182842
시스템