답변완료
수식추가 부탁드립니다.
안녕하세요. 아래의 수식에서 수식추가를 부탁드립니다.
2가지 시스템으로 해주시면 감사하겠습니다.
[1] 하루 매매횟수(외부변수)
[2] 하루 매매횟수(외부변수)
이평선 2개 추가 (외부변수), 이평선을 이용하여 정배열에서 매도, 역배열에서 매수
감사합니다.
input : N(1);
var : t1(0),t2(0),t3(0),diff(0);
diff = abs(C-O);
if C > O Then
T1 = 1;
else if C < O Then
T1 = -1;
Else
T1 = 0;
if T1 != T1[1] Then
{
T2 = T1[1];
T3 = T2[1];
}
if MarketPosition == 0 and
T1 == 1 and
T2 == 0 and
T3 == -1 and
T1[N+1] == -1 and
countif(T1 == 0,N)[1] == N and
diff > diff[N+1] Then
buy();
if MarketPosition == 0 and
T1 == -1 and
T2 == 0 and
T3 == 1 and
T1[N+1] == 1 and
countif(T1 == 0,N)[1] == N and
diff > diff[N+1] Then
sell();
input : 익절틱수(50),손절틱수(50);
SetStopProfittarget(PriceScale*익절틱수,PointStop);
SetStopLoss(PriceScale*손절틱수,PointStop);
2020-06-10
2268
글번호 139708
시스템
답변완료
문의드립니다.
아래수식을 예스로 부탁합니다.
//Mode
src = input(title = "Source", type = source, defval = close)
atrLen = input(title = "ATR", type = integer, defval = 12, minval = 1, maxval = 1000)
m1 = input(title = "ATR Multiplier - ADX Rising", type = float, defval = 4.0, minval = 1, step = 0.1, maxval = 1000)
m2 = input(title = "ATR Multiplier - ADX Falling", type = float, defval = 1.5, minval = 1, step = 0.1, maxval = 1000)
adxLen = input(title = "ADX", type = integer, defval = 14, minval = 1, maxval = 1000)
// DI-Pos, DI-Neg, ADX
hR = high - nz(high[1])
lR = nz(low[1]) - low
dmPos = hR > lR ? abs(hR) : 0
dmNeg = lR > hR ? abs(lR) : 0
sTR = nz(sTR[1]) - nz(sTR[1]) / adxLen + tr
sDMPos = nz(sDMPos[1]) - nz(sDMPos[1]) / adxLen + dmPos
sDMNeg = nz(sDMNeg[1]) - nz(sDMNeg[1]) / adxLen + dmNeg
DIP = sDMPos / sTR * 100
DIN = sDMNeg / sTR * 100
DX = abs(DIP - DIN) / (DIP + DIN) * 100
adx = sma(DX, adxLen)
// Trailing ATR
m = rising(adx, 1) ? m1 : falling(adx, 1) ? m2 : nz(m[1])
up = hl2 - m * atr(atrLen)
dn = hl2 + m * atr(atrLen)
TUp = src[1] > TUp[1] ? max(up, TUp[1]) : up
TDown = src[1] < TDown[1] ? min(dn, TDown[1]) : dn
trend = src > TDown[1] ? 1 : src < TUp[1]? -1 : nz(trend[1], 1)
stop = trend == 1 ? TUp : TDown
trendChange = change(trend)
// Plot
lineColor = not(trendChange) ? trend > 0 ? #00FF00DD : #FF0000DD : #00000000
shapeColor = trendChange ? trendChange > 0 ? #00FF00F8 : #FF0000F8 : #00000000
plot(stop, color = lineColor, style = line, linewidth = 1, title = "ATR Trend")
plotshape(trendChange ? stop : na, style = shape.circle, size = size.tiny, location = location.absolute, color = shapeColor, title = "Change")
// end
2020-06-10
2215
글번호 139693
지표