답변완료
부탁드립니다,
input : Periods(10),Multiplier(3.0),changeATR(true),showsignals(true),highlighting(true);
var : src(0),ATr2(0),ATrv(0),upv(0),up1(0),dnv(0),dn1(0);
var : trend(0),tx(0);
src = (h+l)/2;
atr2 = ma(TrueRange, Periods);
atrv = iff(changeATR , atr(Periods) , atr2);
upv = src-(Multiplier*atrv);
up1 = iff(IsNaN(upv[1]) == False,upv[1],upv);
upv = iff(close[1] > up1 , max(upv,up1) , upv);
dnv =src+(Multiplier*atrv);
dn1 = iff(isnan(dnv[1]) == False,dnv[1], dnv);
dnv = iff(close[1] < dn1 , min(dnv, dn1) , dnv);
trend = 1;
trend = iff(IsNaN(trend[1]) == False,trend[1], trend);
trend = iff(trend == -1 and close > dn1 , 1 , IFf( trend == 1 and close < up1 , -1 , trend));
if trend == 1 Then
{
plot1(upv,"UpTrend",green);
NoPlot(2);
if trend == 1 and trend[1] == -1 Then
{
tx = Text_New(sDate,sTime,upv,"▲");
Text_SetStyle(tx,2,0);
Text_SetColor(tx,Red);
}
}
Else
{
NoPlot(1);
plot2(dnv, "Down Trend",red);
if trend == -1 and trend[1] == 1 Then
{
tx = Text_New(sDate,sTime,dnv,"▼");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,Blue);
}
}
1. 해당지표수식에서 빨간화살표가 발생할때 종목검색 하고 싶습니다.
2024-01-04
1119
글번호 175413
검색
답변완료
안녕하세요 수식문의 부탁드립니다^^
안녕하세요 항상 고생이 많으신데요
아래의 첫번째 신호검색수식이 단순이동평균선 20일선을 crossup 하는 수식에 대하여 문의 드리고 싶습니다.
두번째는 기간내에 단순이동평균선20일선을 crossup 했던적이있는 종목을 검색하고싶습니다.
잘부탁 드리겠습니다.^^
=============================================================================
input : 단기(5),중기(20),장기(120);
var : p(0),k(0),q(0),x(0),y(0),z(0),a(False),b(0);
p = (highest(high,단기)+lowest(low,단기))/2;
k = (highest(high,중기)+lowest(low,중기))/2;
q = (p+k)/2;
x = (highest(high,장기)+lowest(low,장기))/2;
y = (highest(high,장기)+lowest(low,장기))/2;
z = (x+y)/2;
a = Crossdown((q-z)/q*100, 0);
if a == true Then
b = c;
if b > 0 and CrossUp(C,b) Then
Find(1);
=============================================================================
input : 단기(5),중기(20),장기(120);
input : Multiple(1000),N(120);
var : p(0),k(0),q(0),x(0),y(0),z(0),a(False),b(0);
p = (highest(high,단기)+lowest(low,단기))/2;
k = (highest(high,중기)+lowest(low,중기))/2;
q = (p+k)/2;
x = (highest(high,장기)+lowest(low,장기))/2;
y = (highest(high,장기)+lowest(low,장기))/2;
z = (x+y)/2;
a = Crossdown((q-z)/q*100, 0);
if a == true Then
b = c;
var1 = (q-z)/q*100;
Condition1 = (CrossUp(var1,0) and V[1] * (Multiple/100) <= V)
or (CrossUp(var1,0) and V[1] * (Multiple/100) <= V and (b > 0 and CrossUp(C,b)));
if CountIf(Condition1,N) >= 1 Then
find(1);
=============================================================================
2024-01-04
941
글번호 175412
검색
답변완료
data2 인식 시간
input : N(50),N1(5),per(10);
var : TX1(0),TX2(0),cnt(0),box(0),box1(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0),TL8(0);
Plot1(Data2(c));
For cnt = 0 to 49
{
TL_Delete(TL1[cnt]);
TL_Delete(TL2[cnt]);
TL_Delete(TL3[cnt]);
TL_Delete(TL4[cnt]);
TL_Delete(TL5[cnt]);
TL_Delete(TL6[cnt]);
TL_Delete(TL7[cnt]);
TL_Delete(TL8[cnt]);
Text_Delete(TX1[cnt]);
Text_Delete(TX2[cnt]);
TL_Delete(Box[cnt]);
TL_Delete(Box1[cnt]);
}
TL1 = TL_New_Self(sDate,sTime,data2(highest(H,N)),NextBarSdate,NextBarStime,data2(highest(H,N)));
TL2 = TL_New_Self(sDate,sTime,data2(lowest(L,N)),NextBarSdate,NextBarStime,data2(lowest(L,N)));
TL_SetColor(TL1,Red);
TL_SetColor(TL2,Blue);
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
TL_SetExtLeft(TL1,true);
TL_SetExtLeft(TL2,true);
TL3 = TL_New_Self(Data2(sDate[NthHighestBar(1,H,N)]),Data2(stime[NthhighestBar(1,H,N)]),-9999,Data2(sDate[NthHighestBar(1,H,N)]),Data2(stime[NthhighestBar(1,H,N)]),9999);
TL4 = TL_New_Self(Data2(sDate[NthlowestBar(1,L,N)]),Data2(stime[NthlowestBar(1,L,N)]),-9999,Data2(sDate[NthlowestBar(1,L,N)]),Data2(stime[NthlowestBar(1,L,N)]),9999);
TL_SetColor(TL3,Pink);
TL_SetColor(TL4,Gold);
TL_SetSize(TL3,5);
TL_SetSize(TL4,2);
TL5 = TL_New(Data2(sDate[NthHighestBar(1,H,N)]),Data2(stime[NthhighestBar(1,H,N)]),-9999,Data2(sDate[NthHighestBar(1,H,N)]),Data2(stime[NthhighestBar(1,H,N)]),9999);
TL6 = TL_New(Data2(sDate[NthlowestBar(1,L,N)]),Data2(stime[NthlowestBar(1,L,N)]),-9999,Data2(sDate[NthlowestBar(1,L,N)]),Data2(stime[NthlowestBar(1,L,N)]),9999);
TL_SetColor(TL5,Pink);
TL_SetColor(TL6,Gold);
TL_SetSize(TL5,5);
TL_SetSize(TL6,2);
TL7 = TL_New_Self(sDate,sTime,data2(lowest(L*1.1,N)),NextBarSdate,NextBarStime,data2(lowest(L*1.1,N)));
TL_SetColor(TL7,Orange);
TL_SetSize(TL7,1);
TL_SetExtLeft(TL7,true);
TL8 = TL_New_Self(sDate,sTime,data2(lowest(L*1.2,N)),NextBarSdate,NextBarStime,data2(lowest(L*1.2,N)));
TL_SetColor(TL8,Green);
TL_SetSize(TL8,1);
TL_SetExtLeft(TL8,true);
TX1 = Text_New_Self(Data2(sDate[NthHighestBar(1,H,N)]),Data2(stime[NthhighestBar(1,H,N)]),Data2(highest(H+PriceScale*1,N)),"■");
TX2 = Text_New_Self(Data2(sDate[NthLowestBar(1,L,N)]),Data2(stime[NthLowestBar(1,L,N)]),Data2(Lowest(L-PriceScale*1,N)),"■");
Text_SetStyle(TX1,2,1);
Text_SetStyle(TX2,2,0);
Text_SetColor(TX1,Blue);
Text_SetColor(TX2,Magenta);
Text_SetSize(tx1,40);
Text_SetSize(tx2,40);
box1 = Box_New(Data2(sDate[NthlowestBar(1,L,N)+N1]),Data2(stime[NthlowestBar(1,L,N)+N1]),9999,
Data2(sDate[NthlowestBar(1,L,N)]),Data2(stime[NthlowestBar(1,L,N)]),-9999);
Box_SetColor(box1,Blue);
Box_SetFill(box1,true,30);
box = Box_New_Self(Data2(sDate[NthlowestBar(1,L,N)+N1]),Data2(stime[NthlowestBar(1,L,N)+N1]),9999,
Data2(sDate[NthlowestBar(1,L,N)]),Data2(stime[NthlowestBar(1,L,N)]),-9999);
Box_SetColor(box,Blue);
Box_SetFill(box,true,25);
var : box3(0),cond(False),H2(0),L2(0);
if data2(CrossUp(L,Lowest(L,N)*(1+per/100))) Then
{
Box_Delete(box3);
cond = true;
H2 = Data2(H);
L2 = Data2(lowest(L,N)*(1+per/100));
box3 = Box_New_Self(sDate[100],sTime[100],L2,Sdate,Stime,H2);
Box_SetColor(box3,Lime);
Box_SetFill(box3,true,60);
}
Else
{
if cond == true Then
{
if data2(H) > H2 Then
H2 =Data2(H);
Box_SetEnd(box3,sDate,sTime,H2);
if Data2(l < lowest(L,N)*(1+per/100)) Then
Box_Delete(box3);
}
}
당일 시초부터 인식하는 data를,이전 봉은 없는 것으로 무시하고 8시50분 data부터 인식.
시초에 너무 낮게 출발하므로 무조건 상승하여, 무조건 들어오는 상승 신호 차단 목적.
선물 시작 시간이 45분이 아니고 8시50분이라고 간주하고, data를 읽기 시작하는 시간임.(5분간 봉 삭제 형식)
(시작 시간을 설정해보니 시작은 50분에 하나 data는 이전까지 인식됨). 감사합니다.
2024-01-04
1447
글번호 175411
지표