답변완료
전략작성등
수고많으십니다.아래 내용으로 수식을 좀 만들어 주시기 부탁드립니다^^
1,전략내용...BBandsUp(60,2)가 ma(c,200,단순)을 돌파하고 위쪽에 있던 주가는 200일선 아래로 내려들 왔다가 다시 200일선을 상향돌파시 첫봉에 강조표시 수식입니다
2.굉장히 쉬운수식 같은데 잘 안됩니다 제가 해본수식은 이렇습니다
A=Highest(h,30);
B=BBandsUp(60,2);
D=ma(c,200);
조건=
A>D&&VALUEWHEN(1,CrossUp(B,D),C<D);
조건&&!조건(1);
CrossUp(C,D)
3.참고로 레이저옵텍 25.2.27일자 봉에만 강조표시가 돼야는데 25.2.11일에도 표시가 됩니다. 또 코오롱 25.2.13일자에만 뜨야는데 24.12.16에도 뜹니다. 부탁드립니다
2025-03-24
296
글번호 189494
강조
답변완료
수식 검증 부탁드립니다
안녕하세요
늘 도움 주셔서 감사합니다.
아래 수식의 잘못된 점을 수정 부탁드립니다
var : mav1(0), mav2(0), mav3(0), T1(0), T2(0), adx_val(0), atr_val(0), var1(0), var2(0);
// 이동평균선 설정
mav1 = ma(c,6);
mav2 = ma(c,30);
mav3 = ma(c,90);
// ADX(추세 강도) 및 ATR(평균 변동성) 계산
adx_val = adx(14);
atr_val = atr(14);
// 단기 이동평균선의 방향 체크
if mav1 > mav1[1] Then T1 = 1;
if mav1 < mav1[1] Then T1 = -1;
// 매수 조건
if T1 == 1 and T1[1] != 1 Then var1 = 0;
if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav1 > mav2 and adx_val > 20 Then {
var1 = var1 + 1;
if var1 == 1 Then {
buy("5매수");
ExitLong("손절", Stop, C - (atr_val * 1.5));
ExitLong("익절", Limit, C + (atr_val * 3));
}
}
// 매도 조건
if T1 == -1 and T1[1] != -1 Then var2 = 0;
if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav1 < mav2 and adx_val > 20 Then {
var2 = var2 + 1;
if var2 == 1 Then {
sell("5매도");
ExitShort("손절", Stop, C + (atr_val * 1.5));
ExitShort("익절", Limit, C - (atr_val * 3));
}
}
2025-03-24
273
글번호 189490
시스템
답변완료
파라볼릭 전환 폭
Input : af(0.01), maxAF(0.2);
Var : cSarv(0),TL(0),T(0),tx(0);
Var : cSar(0);
var7 = cSar(af,maxAF);
plot1(var7, "CSAR",IFF(c>var7,Red,Green));
cSarv = csar(af,maxAF);
If crossup(c,cSarv) Then
{
var1 = cSarv;
Var2 = var1[1];
Var3 = var2[1];
if var1 <= var2+PriceScale*1 and var1 >= var2-PriceScale*1 and var2 > 0
and var1<= highest(H,2000)-0.8 and var1<= lowest(L,1000)+0.1 Then
{
Tx = Text_New(sDate,sTime,var1-0.1,"●");
Text_SetColor(Tx,Red);
Text_SetStyle(Tx,2,2);
Text_SetSize(Tx,17);
}
if var3 > 0 and max(var1,var2,var3) <= min(var1,var2,var3)+PriceScale*1
and var1<= highest(H,2000)-0.8 and var1<= lowest(L,1000)+0.15 Then
{
Tx = Text_New(sDate,sTime,var1-0.1,"●");
Text_SetColor(Tx,Blue);
Text_SetStyle(Tx,2,2);
Text_SetSize(Tx,17);
}
}
If CrossDown(c,cSarv) Then
{
var4 = csarv;
Var5 = var4[1];
Var6 = var5[1];
if var4 <= var5+PriceScale*1 and var4 >= var5-PriceScale*1 and var5 > 0
and var4>= lowest(L,1200)+0.8 and var4 >= highest(H,600)-0.1 Then
{
Tx = Text_New(sDate,sTime,var4+0.1,"●");
Text_SetColor(Tx,Red);
Text_SetStyle(Tx,2,2);
Text_SetSize(Tx,17);
}
if var6 > 0 and max(var4,var5,var6) <= min(var4,var5,var6)+PriceScale*1
and var4>= lowest(L,1200)+0.8 and var4 >= highest(H,600)-0.1 Then
{
Tx = Text_New(sDate,sTime,var4+0.1,"●");
Text_SetColor(Tx,Blue);
Text_SetStyle(Tx,2,2);
Text_SetSize(Tx,17);
}
}
파라 양음 전환시, 상하 폭이 2틱 이상만 전환. 1틱은 전환 금지.
5틱 차트에서 너무 민감한 전환 방지. 감사합니다.
2025-03-24
380
글번호 189470
지표
답변완료
질문 드리겠습니다
수고가 많으십니다
번거로우시겠지만 부탁드립니다
지난 질문 3번이 답변 어려우시다고 해주셨는데요
그럼 혹시 cc를 ttl[]변수에 추세선으로 넣는것만 알려주실 수 있을까요
plot12 처럼 추세선이 나오게 해주시면 감사하겠습니다
아래 식처럼 해봤는데 조건만족 첫봉에만 cc값이 나오는데 다음 조건만족봉 한봉전까지 추세선이 이어지게 하려는데 방법을 알려주심 감사하겠습니다 (우측연장, ttl[5]번까지만 추세선 표시 하게 부탁드려요)
질문2) cc 배열 값 사이가 10거래일 이상일때만 plot (메인 수식 바깥에서 할때,,) 을 하는 식도 부탁드립니다
var : cnt(0), sum1(0), sumi1(0),tt(0),hh(0),ll(0),tl(0),tl1(0);
var: sum2(0),sumi2(0),sumaa(0);
var : t(0),StartBarIndex(0),dd(0),d1(0),d2(0);
Array : ii[50](0),aa[50](0),bb[50](0),cc[50](0),vv[150](0),ttl[10](0);
if Bdate != Bdate[1] Then
DD = DD+1;
if h>l*1.07 Then
{
d1 = dd;
d2 = d1[1];
if d2 == 0 or (d2 > 0 and d1 >= d2+3) Then
{
var1 = Index;
Var2 = var1[1];
Var3= Var2[1];
sum1=0;
sumi1=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+h[cnt];
sumi1=sumi1+1;
}
value1=sum1/sumi1;
For cnt = 49 DownTo 1
{
aa[cnt] = aa[cnt-1];
}
aa[0] = value1;
Var20=Money/100000000;
if Var20>30 Then
{
For cnt = 49 DownTo 1
{
cc[cnt]= cc[cnt-1];
}
cc[0]=value1*0.9;
}
For cnt = 9 DownTo 1
{
ttl[cnt] =ttl[cnt-1];
}
ttl[0]=tl_new(sDate,sTime,cc[0], );
}
}
Plot12(cc[0],"hma",DarkRed,Def,1);
2025-03-24
313
글번호 189457
종목검색