답변완료
73025 글 수식 응용
73025 글 작성해주신 halftrend 수식을 응용하여
==================
input : amplitude(2),channelDeviation(2);
var : trend(0),nextTrend(0),maxLowPrice(0),minHighPrice(0);
var : up(0),down(0),atrHigh(0),atrLow(0),arrowUp(0),arrowDown(0);
var : atr2(0),dev(0),highPrice(0),lowPrice(0),highma(0),lowma(0),ht(0);
atr2 = atr(100) / 2;
dev = channelDeviation * atr2;
highPrice = Highest(H,amplitude);
lowPrice = Lowest(L,amplitude);
highma = ma(high, amplitude);
lowma = ma(low, amplitude);
if nextTrend == 1 Then
{
maxLowPrice = max(lowPrice, maxLowPrice);
if highma < maxLowPrice and close < iff(isnan(low[1])==true,low,Low[1]) Then
{
trend = 1;
nextTrend = 0;
minHighPrice = highPrice;
}
}
else
{
minHighPrice = min(highPrice, minHighPrice);
if lowma > minHighPrice and close > iff(isnan(high[1])==true,high,high[1]) Then
{
trend = 0;
nextTrend = 1;
maxLowPrice = lowPrice;
}
}
if trend == 0 Then
{
if IsNaN(trend[1]) == False and trend[1] != 0 Then
{
up = iff(IsNaN(down[1]) == true,down,down[1]);
arrowUp = up - atr2;
}
else
{
up = iff(IsNan(up[1]) == true, maxLowPrice , max(maxLowPrice, up[1]));
}
atrHigh = up + dev;
atrLow = up - dev;
}
else
{
if isnan(trend[1]) == False and trend[1] != 1 Then
{
down = iff(IsNan(up[1]) == true, up , up[1]);
arrowDown = down + atr2;
}
else
{
down = iff(IsNan(down[1]) == true, minHighPrice ,min(minHighPrice, down[1]));
}
atrHigh = down + dev;
atrLow = down - dev;
}
ht = iff(trend == 0 , up , down);
plot1(ht, "HalfTrend",iff(trend == 0 ,BLUE,RED));
plot2(atrHigh,"ATR High",RED);
plot3(atrLow, "ATR Low", BLUE);
==================
1.<<종목검색>>halftrend 가 강세 uptrend 일 때 rsi 가 30을 돌파하는 종목을 검색하는 수식을 부탁드립니다.
2.<<시스템식>>halftrend 가 강세 uptrend 일 때 rsi 가 30을 상향돌파할때 매수
halftrend 가 약세 down trend 일 때 rsi가 70을 하향돌파할때 매도 하는 시스템 식을 부탁드립니다..
감사합니다
2022-03-25
1360
글번호 157446
종목검색
답변완료
소리좀 부탁드립니다.
* 좋은 주말 되십시요.
* 아래 수식에서 소리좀 나게 부탁 드립니다.
즉 BLUE 에서 BLACK 으로 바꾸면 신호음 (PlaySound("C:KiwoomHero4soundsound11.wav"); )
MAGENTA에서 RED으로 바꾸면 신호음 (PlaySound("C:KiwoomHero4soundsound12.wav"); )
## 아래 수식
Var : TL1(0),TL2(0);
TL_Delete(TL1);
TL_Delete(TL2);
if value21 < value22 then
{
var1 = NthHighestBar(1,value21,60)[1];
var2 = nthlowestbar(1,l,30)[1];
TL1 = TL_New_Self(sdate[var1],stime[var1],value21[var1],sdate,stime,value21);
TL2 = TL_New (sdate[var2],stime[var2],L[var2],sdate,stime,L);
TL_SetColor(TL1,BLACK);
TL_SetColor(TL2,MAGENTA);
TL_SetSize(TL1,5);
TL_SetSize(TL2,5);
}
if value21 > value22 then
{
var1 = NthHighestBar(1,value21,60)[1];
var2 = nthlowestbar(1,l,30)[1];
TL1 = TL_New_Self(sdate[var1],stime[var1],value21[var1],sdate,stime,value21);
TL2 = TL_New (sdate[var2],stime[var2],H[var2],sdate,stime,H);
TL_SetColor(TL1,BLUE);
TL_SetColor(TL2,RED);
TL_SetSize(TL1,5);
TL_SetSize(TL2,5);
}
매번 고맙습니다. 좋은 주말 되십시요.
2022-03-25
1281
글번호 157445
강조
답변완료
문의 드립니다!
안녕하세요!
아래수식은 며칠전 문의에 답변해주신것인데요
세로선이 뭔가 좀 다르게 발생하는듯해서 재문의 드립니다
우선 저의 챠트구성을 말씀드리면...
data1이 풋봉이며 dfata2가 콜봉으로 설정되어있습니다
이 챠트의 data1(풋봉)에 이 수식을 적용해보니...
(* data2(콜봉) 에 수식을 적용시는 세로선이 전혀 발생되지않습니다)
상하단선의 경우 data2(콜봉)이 data1(풋봉)의 상하단선과 만날때 세로선이 나오고있습니다
막상 나와야할 data1(풋봉)이 상하단선을 만날때는 아무런 선도 나오지않습니다
혹시 data1이 풋봉으로 지정이되어서 그런것은 아닌가요?
만약 그렇다면 이조건에 맞게 수식을 정정부탁드리고 그게 아니라면 수고스럽겠지만 아래 수식을 한번만 더
검토주시면 감사하겠습니다
매번 도와주심에 정말로 감사드립니다!!!
-----------------------------------------------------------------------------------------
input : 색1(RED),굵기1(3);
input : 색2(BLUE),굵기2(3);
input : 색3(GREEN),굵기3(3);
input : 색4(YELLOw),굵기4(3);
input : 색5(CYAN),굵기5(3);
input : 색6(MAGENTA),굵기6(3);
var : d1month(0,Data1),d1nday(0,Data1),d1week(0,Data1);
var : d1EX(false,Data1),d1cond1(False,Data1),d1HH(0,Data1),d1LL(0,Data1);
var : d1var1(0,data1),d1var2(0,data1),d1var3(0,data1);
var : d1plot2(0,Data1),d1plot3(0,Data1),d1plot4(0,Data1);
var : TL1(0,Data1),TL2(0,Data1),TL3(0,Data1),TL4(0,Data1),TL5(0,Data1),TL6(0,Data1);
#Data1
d1month = data1(int(date/100)-int(date/10000)*100);
d1nday = data1(date - int(date/100)*100);
d1week = data1(DayOfWeek(date));
#선물만기
#if d1Month%3 == 0 and d1nday >= 8 and d1nday <= 14 and d1week == 4 then
if d1nday >= 8 and d1nday <= 14 and d1week == 4 then#옵션만기
d1EX = true;
Else
d1EX = false;
if d1EX == false and d1EX[1] == true Then
{
d1Cond1 = true;
d1HH = data1(H);
d1LL = data1(L);
}
if d1Cond1 == true then
{
if data1(H) > d1HH Then
d1HH = data1(H);
if data1(L) < d1LL Then
d1LL = data1(L);
d1var1 = d1HH;
d1var2 = d1LL;
d1var3 = d1var1-d1var2;
d1plot2 = d1var2+d1var3*0.500;
d1plot3 = d1var2+d1var3*1.000;
d1plot4 = d1var2+d1var3*0.000;
plot2(d1plot2,"중심");
plot3(d1plot3,"상단");
plot4(d1plot4,"하단");
}
if Data1(CrossUp(h,d1plot2) or CrossDown(l,d1plot2)) Then
{
tl1 = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(tl1,색1);
TL_SetSize(Tl1,굵기1);
PlaySound("C:₩예스트레이더₩data₩Sound₩.wav");
}
if Data2(CrossUp(h,d1plot2) or CrossDown(l,d1plot2)) Then
{
tl2 = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(tl2,색2);
TL_SetSize(Tl2,굵기2);
PlaySound("C:₩예스트레이더₩data₩Sound₩.wav");
}
if Data1(CrossUp(h,d1plot3) or CrossDown(l,d1plot3)) Then
{
tl3 = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(tl3,색3);
TL_SetSize(Tl3,굵기3);
PlaySound("C:₩예스트레이더₩data₩Sound₩.wav");
}
if Data2(CrossUp(h,d1plot3) or CrossDown(l,d1plot3)) Then
{
tl4 = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(tl4,색4);
TL_SetSize(Tl4,굵기4);
PlaySound("C:₩예스트레이더₩data₩Sound₩.wav");
}
if Data1(CrossUp(h,d1plot4) or CrossDown(l,d1plot4)) Then
{
tl5 = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(tl5,색5);
TL_SetSize(Tl5,굵기5);
PlaySound("C:₩예스트레이더₩data₩Sound₩.wav");
}
if Data2(CrossUp(h,d1plot4) or CrossDown(l,d1plot4)) Then
{
tl6 = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(tl6,색6);
TL_SetSize(Tl6,굵기6);
PlaySound("C:₩예스트레이더₩data₩Sound₩.wav");
}
2022-03-24
1197
글번호 157441
지표
답변완료
수식 문의드립니다.
1. 선물 틱챠트에서 캔들 양봉 고가저가 진폭이 0.3p면 매수신호
캔들 음봉 고가저가 진폭이 0.3p면 매도신호 시스템 신호수식
2. 선물 틱챠트에서 캔들 양봉 시가종가 진폭이 0.3p면 매수신호
캔들 음봉 시가종가 진폭이 0.3p면 매도신호 시스템 신호수식
3. 문의번호 76487관련입니다.
아래의 수식을 챠트에 적용해보니
1번 수식은 수직선이 가늘어 굵게 볼 수 있는 조정수식
2번 수식은 수평선 가격이 작게 보여 가격이 크게 보이는 조정수식 부탁드립니다.
감사합니다.
1
input : ntime(30);
var : S1(0),D1(0),TM(0),TF(0),TL(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or
(Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then
{
TL = TL_New(sdate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,GREEN);
}
}
2
input : diff(2.5),굵기(3);
var : cnt(0),ii(0);
Array : TL[101](0), TX[101](0), VV[101](0);
if Bdate != Bdate[1] Then
{
ii = 0;
var1 = Floor(DayOpen/diff)*diff;
For cnt = -5 to 5
{
ii = ii+1;
TL_Delete(TL[ii]);
var2 = var1+(diff*cnt);
VV[ii] = Var2;
TL[ii] = TL_New(sDate,sTime,VV[ii],NextBarSdate,NextBarStime,VV[ii]);
TL_SetExtRight(TL[ii],true);
TL_SetExtLeft(TL[ii],true);
TL_SetColor(TL[ii],BLACK);
TL_SetSize(TL[ii],굵기);
Text_Delete(TX[ii]);
TX[ii] = Text_New(sDate,sTime,VV[ii],NumToStr(VV[ii],2));
Text_SetStyle(TX[ii],0,1);
}
}
Else
{
ii = 0;
var1 = Floor(DayOpen/diff)*diff;
For cnt = -5 to 5
{
ii = ii +1;
Text_SetLocation(TX[ii],NextBarSdate,NextBarStime,VV[ii]);
}
}
2022-03-24
979
글번호 157439
지표
답변완료
수식변환 부탁드리겠습니다
트레이딩뷰의 지표인데 변환가능할까요 ?
////Input Parameters////
length=input(14)
////OH92's FAVORITE COLORS////
g = #8cffe5
r = #ff848a
////f(x)////
barchange(o,c) =>
x = o-c/avg(o,c)
z = x>0 ? x : x*(-1)
avgchange(o,c,l) =>
x = o-c/avg(o,c)
y = x>0 ? x : x*(-1)
z = sma(y,l)
avghigh(src,lb, lp) =>
x = highest(src,lb)
y = sma(x,lp)
avglow(src,lb, lp) =>
x = lowest(src,lb)
y = sma(x,lp)
////Volume Extension Values////
vol = volume
cvol=(barchange(vol[0],vol))
avgv = avgchange(vol[0],vol,length)
tv = (cvol/avgv)
////Range Calculation////
ah = (avghigh(tv,25,200))
al = (avglow(tv,25,200))
percent = (tv-al)/(ah-al)
//Calcs for Signal Colors///
bc=vol*(barchange(open,close))
ac = vol*avgchange(open,close,length)
cc = (bc/ac)
vah = (avghigh(cc,25,200))
val = (avglow(cc,25,200))
volprice = (cc-val)/(vah-val)
bclr = volprice>.5?r:g
ppclr = volprice>.9 ? percent : volprice<.1?percent : na
Xp = percent>1?percent:na
plot(percent, style=columns, color=gray, transp=75, title="ve")
plot(Xp, style=columns, color=gray, transp=25, title="voe")
plot(ppclr, style=columns, color=bclr, transp=15, title="oes")
hline(1, title="")
hline(0, title="")
2022-03-24
1257
글번호 157438
지표