답변완료
질문 부탁드립니다
수고가 많으십니다
번거로우시겠지만 질문 2가지 부탁드리겠습니다
질문1)
기존의 배열값을 다른 값으로 대체하는게 가능한지 여쭤보고 싶습니다
아래 조건에서 만약
현재 aa값이 이전 만족봉 aa값 대비 20% 이상 하락했다면
현재 aa[0] 값을 aa[0]*0.80 값으로 대체하고
현재 aa값이 이전 aa보다 15% 이상 상승했다면
현 aa값을 aa*1.15 로 대체하는 수식을 작성하고자 합니다
만약 크거나 작지 않다면 원래 aa값을 그대로 유지합니다
즉 크기를 비교해서 기존aa 값대신 새로운 aa값 ( aa*0.80 혹은 aa*1.15) 로 대체 (혹은 유지) 하려고 합니다.
**그리고 "추세선"으로 이전 aa 값과 현재 aa값을 연결하고자 합니다. (시작점 : 이전 조건만족봉 시점 , 끝점: 현 만족봉 시점)
예시로 현재값이 1000, 이전값이 1300 이라면 이전값 대비 20% 이상 하락했으므로
aa[0] 값을 1000에서 800으로 교체 (배열값 재구성) 하고 다음 aa값과 다시 비교를 하려고 합니다.
var : cnt(0), sum1(0), sumi1(0),summ(0),tt(0),hh(0),ll(0),tl(0),tl1(0),n(0);
var: sum2(0),sumi2(0);
var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0),e1(0),e2(0);
Array : ii[50](0),aa[50](0);
var : count(0)
if (h>l*1.08) and (d1 == 0 or (d1 > 0 and dd >= d1+5)) Then
{
d1 = dd;
hh = h;
var1 = Index;
Var2 = var1[1];
Var3 = Var2[1];
sum1=0; sumi1=0; sum2=0; sumi2=0;
tl=TL_NEW(sDate,sTime,100,sDate,sTime,999999);
TL_SetSize(tl,0);
TL_SetColor(tl,Black);
For cnt = 1 to (var1-Var2)
{
sum1=sum1+l[cnt];
sumi1=sumi1+1;
}
value1=sum1/sumi1;
For cnt = 49 DownTo 1
{
aa[cnt] = aa[cnt-1];
#ee[cnt]= ee[cnt-1];
}
aa[0] = value1;
}
질문2)
추세선 작성에 관련된 질문인데요,
아래와 같은 식처럼
조건 A 와 B 모두 추세선을 나타내고 싶은데 동일한 추세선 (tttl) 로 나타낼 수 있을까요?
시작점, 끝점은 같은데 조건 b에서 추세선의 값만 (시작:aa[3]*1.05, 끝:aa[1]*1.05) 달라지게 하려고 합니다
조건 A 는 그대로 두고 조건 B 일때는
tl_setbegin(tttl[0],sd[3],st[3],aa[3]*1.05);
tl_setend(tttl[0],sd[1],st[1],aa[1]*1.05);
이런식으로 작성해도 될까요? 조건B 에서도 For 문이 들어가야하는지 궁금합니다(틀린부분은 수정부탁드립니다)
아니면 조건 B에 해당하는 추세선을 아예 따로 (예를들어 tttl1) 만드는게 맞나요?
이런 경우처럼 조건이 나눠질때 동일 추세선에서 값만 바꿔서 추세선을 나타내고 싶을때는 어떻게 해야하는지 알고싶습니다
감사합니다
if (h>l*1.08) Then
{
var1 = Index;
Var2 = var1[1];
For cnt = 1 to (var1-Var2)
{
sum1=sum1+l[cnt];
sumi1=sumi1+1;
}
value1=sum1/sumi1;
For cnt = 49 DownTo 1
{
aa[cnt] = aa[cnt-1];
#ee[cnt]= ee[cnt-1];
}
aa[0] = value1;
if 조건 A Then
{
For cnt = 50 DownTo 1
{
tttl[cnt] = tttl[cnt-1];
sd[cnt] =sd[cnt-1];
st[cnt] =st[cnt-1];
}
sd[0] = sDate;
st[0] = sTime;
TL_SetExtRight(tttl[10],False);
tttl[0]=tl_new(sd[3],st[3],aa[3],sd[1],st[1],aa[1]);
TL_SetSize(tttl[0],0);
TL_SetExtRight(tttl[0],true);
}
if 조건 B Then
{
For cnt = 50 DownTo 1
{
tttl[cnt] = tttl[cnt-1];
sd[cnt] =sd[cnt-1];
st[cnt] =st[cnt-1];
}
sd[0] = sDate;
st[0] = sTime;
tl_setbegin(tttl[0],sd[3],st[3],aa[3]*1.05);
tl_setend(tttl[0],sd[1],st[1],aa[1]*1.05);
}
}
2025-05-16
236
글번호 190816
지표
답변완료
문의 드립니다.
안녕하세요
현재 가격이
1. 240일선 돌파한 후에
2. 아래의 atr 볼밴돌파선,
A=avg(c,17);
ATR=avg(max(max(h-L,abs(c(1)-h)),abs(c(1)-L)),17);
B=ATR*2;
D=A+B;
E=Bbandsup(17,2);
e1=crossup(E,D);
e2=crossdown(E,D);
e3=crossdown(c,E);
valuewhen(1,e1 or e2 or e3,o)
을 돌파하는 종목의 검색식 부탁 드립니다.
감사합니다.
2025-05-14
194
글번호 190815
검색
답변완료
문의드립니다.
안녕하세요 더운 날씨에 노고가 많으십니다.
항상 감사하게 생각하고 있습니다.
---------------------------------------------
input : period(14),multiplier(3);
var : src(0), AtrV(0),upperBand(0),lowerBand(0), prevLowerBand(0), prevUpperBand(0);
var : prevSuperTrend(0), direction(0),alpha(0),source(0),SuperTrend(C);
if CurrentBar > 1 Then
{
src = (H+L)/2;
alpha = 1 / period ;
source = max(high - low, abs(high - close[1]), abs(low - close[1]));
ATrV = alpha * source + (1 - alpha) * ATrV[1]; //지수가중이평방식
//ATrV = ma(source,AtrPeriod); //단순이평방식
upperBand = src + multiplier * AtrV;
lowerBand = src - multiplier * AtrV;
prevLowerBand = lowerBand[1];
prevUpperBand = upperBand[1];
if lowerBand > prevLowerBand or close[1] < prevLowerBand Then
lowerBand = lowerBand;
Else
lowerBand = prevLowerBand;
if upperBand < prevUpperBand or close[1] > prevUpperBand Then
upperBand = upperBand;
Else
upperBand = prevUpperBand;
if C > UpperBand Then
direction = 1;
if C < LowerBand Then
direction = -1;
if direction == 1 Then
SuperTrend = lowerband;
Else
SuperTrend = upperband;
Plot1(SuperTrend,"SuperTrend",IFF(direction==1,Red,Blue));
}
-------------------------------------------------------------------
위의 지표를 통하여 종목검색을 하고 싶습니다.
당일 "0봉의 종가"로 슈퍼트렌드를 돌파한 종목만 검색하고 싶습니다
감사합니다.
2025-05-15
221
글번호 190809
종목검색
답변완료
로직 문의
안녕하세요 몇가지 질문이 있습니다
질문 #1
제가 봤을때는 동일한 논리인 아래 두 코드가 백테스트에는 다른 결과를 보여주는데요
제가 잘못 이해하고 있는게 있을까요? 감사합니다
코드 #1
var : hh(0),ll(0);
input:X1(5); // 1~10, 직전 XX봉 횟수
ll = lowest(L,X1);
hh = highest(H,X1);
Condition1 = CrossUp(C,hh[1]) and MarketPosition == 0;
Condition2 = CrossDown(C,ll[1]) and MarketPosition == 0;
If Condition1 == True and CrossUp(C,hh[1]) then Buy("B1",AtMarket,DEf,1);
If Condition2 == True and CrossDown(C,ll[1]) then Sell("B2",AtMarket,DEf,1);
코드 #2
var : hh(0),ll(0);
input:X1(5); // 1~10, 직전 XX봉 횟수
ll = lowest(L,X1);
hh = highest(H,X1);
If CrossUp(C,hh[1]) then Buy("B1",AtMarket,DEf,1);
If CrossDown(C,ll[1]) then Sell("B2",AtMarket,DEf,1);
질문 #2
아래 코드의 논리를 제가 이렇게 이해하고 있는데, 맞는지 검증 부탁드립니다
현재봉에서 직전 XX봉 고가/저가 돌파가 나오면 매수/매도
포지션이 있을때 entryprice가 진입봉의 저가/고가를 벗어나면 청산
var : hh(0),ll(0);
input:X1(5); // 1~10, 직전 XX봉 횟수
ll = lowest(L,X1);
hh = highest(H,X1);
Condition1 = CrossUp(C,hh[1]) and MarketPosition == 0;
Condition2 = CrossDown(C,ll[1]) and MarketPosition == 0;
If Condition1 == True then Buy("B1",AtMarket,DEf,1);
If Condition2 == True then Sell("B2",AtMarket,DEf,1);
// 손절: 진입신호 봉의 저가 손절
input:FF(8); // 1~10, 진입 후 XX봉 경과
If MarketPosition == 1 and EntryPrice < L[BarsSinceEntry] Then ExitLong("C1");
If MarketPosition == -1 and EntryPrice > H[BarsSinceEntry] Then ExitShort("C2");
2025-05-14
202
글번호 190804
시스템