답변완료
키움 예스로부탁드립니다
> shortPeriod 9
midPeriod 26
longPeriod 52
가=(highest(high,shortPeriod)+lowest(low,shortPeriod))/2;
나=(highest(high,midPeriod)+lowest(low,midPeriod))/2;
CrossUP(가, 나) //1일봉전이고
//day 5분봉으로29신고가종목
H > Highest(H(1), 기간) //기간29일신고가
부탁드립니다
2024-03-28
809
글번호 177920
종목검색
답변완료
문의드립니다
안녕하세요
만들어주신 수식및 설명 감사합니다
박스의 중간값 판단값에 의한 신호발생이 아닌
단순히
색상이 바뀌는 첫봉에 조그만 박스가 만들어진다면 무조건 신호가 발생되기를 원합니다
저의 의도는 색상이 변하거나? 변할려 했다는 것을 인식하기 위함입니다
항시 부족하지만 저의 의도가 전달되었기를 바라며 다시한번 부탁드립니다
만약첫봉에 안된다면 두번째봉에 신호발생토록 부탁드립니다
감사합니다
-------------------------------------------------------------
수식작성 Q&A 홈아이콘 이미지 커뮤니티 | 수식작성 Q&A
작성자 : 예스스탁 작성일 : 2024-03-25 오후 2:43:48 조회수 : 7
시스템 Re : 문의드립니다
안녕하세요
예스스탁입니다.
올리신 그림과 같이 박스의 첫봉에 신호는 가능하지 않습니다.
봉을 N개로 구분해서 마지막봉까지 진행되어야
박스의 최종 중간값이 이평보다 큰지 작은지 판단이 됩니다.
색상이 바뀌는 N개봉 구간의 마지막봉에 신호가 표시되게 작성해 드립니다.
input : N(10);
var : ii(0),TF(0),TL(0),Box1(0),Box2(0),cnt(0);
var : h5(0),l5(0),m5(0),clr(0),clr1(0);
Array : HH[10](0),LL[10](0);
if Bdate != Bdate[1] Then
ii = 0;
Else
ii = ii +1;
TF = ii%N;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and TF < TF[1] and TF > -1) Then
{
var1 = O;
Var2 = H;
Var3 = L;
var11 = var1[1];
Var4 = (Var2+Var3)/2;
Var41 = Var4[1];
For cnt = 9 downto 1
{
HH[cnt] = HH[cnt-1];
LL[cnt] = LL[cnt-1];
}
hh[0] = Var2;
ll[0] = Var3;
h5 = 0;
l5 = 0;
For cnt = 1 to 5
{
if h5 == 0 or (h5 > 0 and hh[cnt] > h5) Then
h5 = hh[cnt];
if l5 == 0 or (l5 > 0 and ll[cnt] < l5) Then
l5 = ll[cnt];
}
m5 = (h5+l5)/2;
value1 = sDate;
Value2 = sTime;
TL = TL_new(sDate,sTime,var4,NextBarSdate,NextBarStime,var4);
TL_SetColor(TL,Green);
TL_SetSize(TL,1);
clr1 = clr[1];
Box1 = Box_New(sDate,sTime,var2,NextBarSdate,NextBarStime,Var3);
if var4 > m5 Then
Box_SetColor(Box1,Red);
Else
Box_SetColor(Box1,Blue);
Box_SetFill(Box1,true);
}
Else
{
if H > Var2 Then
Var2 = H;
if L < var3 Then
Var3 = L;
Var4 = (Var2+Var3)/2;
TL_SetBegin(TL,value1,Value2,var4);
TL_SetEnd(TL,NextBarSdate,NextBarStime,var4);
Box_SetBegin(Box1,value1,Value2,Var2);
Box_SetEnd(Box1,NextBarSdate,NextBarStime,Var3);
if var4 > m5 Then
clr = Red;
Else
clr = Blue;
Box_SetColor(Box1,clr);
hh[0] = Var2;
ll[0] = Var3;
}
if TF == N-1 and clr == Red and clr != clr1 Then
Buy();
if TF == N-1 and clr == Blue and clr != clr1 Then
Sell();
2024-03-26
807
글번호 177917
시스템
답변완료
키움지표 변환 재검토
항상 감사드립니다
아래 키움지표식을 변환했으나 키움지표와 달라 재검토 부탁드립니다
/**************************************/
*** 키움 수식
a=(sum(if(C>C(1),C-min(C(1),L),0))+
sum(if(C<C(1),C-max(C(1),H),0)))-((Sum(((C>(C(1))) && (V>(V(1)))) - ((C<(C(1))) && (V<(V(1))))))-
(sum(if(C>C(1),C-min(C(1),L),0))+sum(if(C<C(1),C-max(C(1),H),0)))*12);
d=eavg(eavg(a,8), 8);
***변환수식
var : a(0),b1(0),b2(0);
a=(Accum(iff(C>C[1],C-min(C[1],L),0))+
Accum(iff(C<C[1],C-max(C[1],H),0)))-
(((Accum(IFF(C>C[1] && V>V[1],1,0) - IFf(C<C[1] && V<V[1],1,0))))-
(Accum(iff(C>C[1],C-min(C[1],L),0))+Accum(iff(C<C[1],C-max(C[1],H),0)))*12);
b2=Ema(Ema(a,8), 8);
plot2(b2);
**막대그래프로 표시(비교기준: 이전값 / 상승:red/ 하락:blue)
2024-03-25
793
글번호 177911
지표
답변완료
검색이 안되여..
안녕하세요
예스스탁입니다.
input : multiple(10),gap(0.1),기간(20),몇배(3);
var : AA(0);
AA=abs((H-L)/H*100);
var1 = Ema(V,기간);
Condition1 = AA > multiple and C<O and O>C[1]*(1+gap/100) and V>var1[1]*몇배;
if Condition1 == true Then
var1 = h;
if var1 > 0 and CrossUp(c,var1) and m >= 50000000000 Then
Find(1);
즐거운 하루되세요
> wkri 님이 쓴 글입니다.
> 제목 : 문의 드립니다....
> 아래 수식 라인을 일봉상 금일 돌파한 종목 (거래대금 500억이상)
AA=abs((H-L)/H*100);
Condition=
AA > multiple and
C<O and
O>C(1)*(1+gap/100) and
V>eavg(V(1), 기간)*몇배;
valuewhen(1, Condition, H)
multiple : 10
gap : 0.1
기간 : 20
몇배 : 3
2024-03-25
980
글번호 177888
종목검색