답변완료
종목검색식 부탁 합니다.
안녕하세요.
아래 수식 종목검색식으로 변환 부탁 합니다.
green 신호가 발생 했을때 종목 검색 되도록 요청 드립니다.
수고하세요.
input : Periods(10);
input : Multiplier(3.0);
input : changeATR(true);
input : showsignals(true);
input : highlighting(true);
var : src(0),alpha(0),atr1(0),atr2(0),atrv(0);
var : up(0),up1(0),dn(0),dn1(0);
var : trend(0),tx(0);
src = (h+l)/2;
alpha = 1/Periods;
atr1 = iff(IsNan(atr1[1]) == true,ma(TrueRange, Periods), alpha * TrueRange + (1 - alpha) * iff(IsNan(atr1[1])==true,0,atr1[1]));
atr2 = ma(TrueRange, Periods);
atrv = iff(changeATR ==true,atr1, atr2);
up = src-(Multiplier*atrv);
up1 = iff(isnan(up[1])==true,up,up[1]);
up = iff(close[1] > up1 , max(up,up1), up);
dn = src+(Multiplier*atrv);
dn1 = iff(isnan(dn[1])==true,dn,dn[1]);
dn = iff(close[1] < dn1 , min(dn, dn1) , dn);
trend = 1;
trend = iff(isnan(trend[1])==true,trend,trend[1]);
trend = iff(trend == -1 and close > dn1 , 1 , iff(trend == 1 and close < up1 , -1 , trend));
if trend == 1 Then
{
plot1(up,"Up Trend",green);
NoPlot(2);
}
Else
{
NoPlot(1);
plot2(dn,"Down Trend",Red);
}
if trend == 1 and trend[1] == -1 Then
{
tx = Text_New(sDate,sTime,up,"●");
Text_SetColor(tx,Green);
Text_SetStyle(tx,2,2);
}
if trend == -1 and trend[1] == 1 Then
{
tx = Text_New(sDate,sTime,dn,"●");
Text_SetColor(tx,Red);
Text_SetStyle(tx,2,2);
}
2024-08-30
513
글번호 182983
종목검색
답변완료
문의드립니다
input : coeff(1);
input : AP(14);
input : novolumedata(1);#1:true, 0:False
var : atrv(0),src(0),upt(0),downt(0),AlphaTrend(0);
var : buySignalk(False),sellSignalk(False);
ATRv = ma(TrueRange, AP);
src = close;
upT = low - ATRv * coeff;
downT = high + ATRv * coeff;
Condition1 = False;
if novolumedata == 1 and rsi(AP) >= 50 Then
Condition1 = true;
if novolumedata == 0 and MFI(AP) >= 50 Then
Condition1 = true;
AlphaTrend = iff(Condition1 , IFf(upT < iff(isnan(AlphaTrend[1])==true,0,AlphaTrend[1]), iff(isnan(AlphaTrend[1])==true,0,AlphaTrend[1]) , upT),IFf(downT > iff(isnan(AlphaTrend[1])==true,0,AlphaTrend[1]) , iff(isnan(AlphaTrend[1])==true,0,AlphaTrend[1]) , downT));
if CrossUp(AlphaTrend,AlphaTrend[2]) Then
Buy();
if CrossDown(AlphaTrend,AlphaTrend[2]) Then
Sell();
수고 많으십니다
문의드릴 내용은 저번에 만들어 주신 수식인데
여기에 추가로 하루 100틱 손실이면 매매종료
하루100틱 수익이면 매매종료
이걸 추가하고 싶어서 문의드립니다
감사합니다
2024-08-30
1032
글번호 182977
시스템
답변완료
어제 이어서 몇 가지 여쭤보겠습니다
어제 알려주신 내용 검토를 해봤는데 잘 안나오는 부분이 있어서 여쭤봅니다
질문1)
추세선의 HH를 출력했을때
PLOT22(HH,"고가HH라인",YELLOW);
과거는 잘 나오다가 현재로 가까워질 수록 어긋나는 현상이 생기고 있습니다 (스샷 1)
추세선 HH 에 해당되지 않는 부분에도 나오는 경우도 있네요 (스샷2)
질문2) INDEX[LB] 을 확인해보려고 출력해보면 제 위치에 안나오는걸로 보여집니다 (스샷3) 추세선에서 별표시된부분이 LB 맞지 않나요??
질문3)
73번줄에
if VAR5 > 0 Then plot3(VAR5,"구간고가",Tomato);
이 부분을 수평 연장 추세선으로 표현하고 싶습니다
너무 많이 나올경우를 대비해서 150봉 까지만 나오게 하는 방법과 계속 나오는경우 각각 알려주실 수 있을까요??
감사합니다
아래는 수식입니다
input : n(10);
var : cnt(0),hh(0),hb(0),ll(0),lb(0),TL(0),TXn(0),txper(0),nline(0),tl2(0);
var : txx(0),TXper1(0);
if CountIf(H >= L*1.09,n) >= 1 Then
{
#Plot1(1);
#n개봉 최고가/최저가와 최고가/최저가 위치(몇봉전인지) 계산
hh = 0;
hb = 0;
ll = 0;
lb = 0;
For cnt = 0 to n-1
{
if hh == 0 or (hh > 0 and h[cnt] > hh) Then
{
hh = h[cnt];
hb = cnt;
}
if ll == 0 or (ll > 0 and l[cnt] < ll) Then
{
ll = l[cnt];
lb = cnt;
}
// TL2 = TL_New(sDate[n-1],sTime[n-1],hh,sDate[0],sTime[0],hh);
// TL_SetColor(tl2,Yellow);
}
// plot1(hh,"high",Magenta);
#Plot1((HH-ll)/ll*100);
#PLOT2((ll-hh)/hh*100);
if hB < lB AND ll *1.3 >H and (hh != Var3 and ll != Var4) Then
# LL*1.25<H
#
{
Plot1(2);
// TL_Delete(TL);
// Text_Delete(TX);
//TL_Delete(TL1);
VAR3 = hh;
VAR4 = ll;
VAR1 = Index[lb];
PLOT11(VAR1,"IndeX",LightGreeN);
VAR2 = VAR1[1];
if VAR2 > 0 Then
{
VAR5 = 0;
For cnt = Index-var1 to Index-var2
{
if Var5 == 0 or (Var5 > 0 and h[cnt] > Var5) Then
Var5 = h[cnt];
}
if VAR5 > 0 Then plot3(VAR5,"구간고가",TomatO);
# PLOT22(HH,"고가HH라인",YelloW);
# PLOT23(LL,"LLPLOT",LightGreeN);
# TLDHIGH = TL_NEW(SADATE
}
if var1 >= Var2 Then
{
#Plot2(var2);
TL = TL_New(sDate[lb],sTime[lb],ll,sDate[hb],sTime[hb],hh);
TL_SetDrawMode(tl,0);
// TL_SetExtRight(tl,true);
// TL_new(sDate[LB],sTime[LB],0,sDate[lb],sTime[lb],90000000);
# IF H>HH TheN PLOT11(H,"HH&",LightBluE);
TXper= text_new(sDate[lb],sTime[lb],ll,"★");
Text_SetStyle(txper,2,0);
Text_SetSizE(TXPER,15);
Text_SetColor(txper,MagentA);
/*TXper1 = text_new(sDate,sTime,ll,"★");
Text_SetStyle(txper1,2,0);
Text_SetColor(txper1,Pink);*/
}
# plot2(Index);
#nline = TL_New(sDate[n-1],sTime[n-1],hh,sDate[0],sTime[0],hh);
#TL_SetDrawMode(nline,0);
#TL_SetColor(nline,Tomato);
#TL_SetSize(nline,1);
if lb > hb Then
{
TL_SetColor(TL,ReD);
TL_SetStyle(tl,2);
TL_SetDrawMode(tl,1);
}
Else
{
TL_SetColor(TL,LightBlue);
TL_SetStyle(tl,2);
}
2024-08-30
985
글번호 182970
지표