답변완료
수식 질문드립니다.
아래는 이상없이 잘 되고 있습니다.
혹시 30분봉의 (20,2)를 1분봉에 그릴수있는지 궁금합니다.
부탁드립니다.
감사합니다!!
## 분봉에서 일봉 볼린져밴드 계산 시작
input : dayPeriod(20),dayDv(2);
Input : Period7(1000);
var : daysum(0),daycnt(0),dayma(0),daySumSqrt(0),dayStdv(0);
var : dayBBup(0),dayBBdn(0),dayCounter(0);
var1 = ma(C,Period7);
#일봉 이동평균 계산
daysum = 0;
for daycnt = 0 to dayPeriod-1{
daysum = daysum + DayClose(daycnt);
}
dayma = daysum/dayPeriod;
#표준편차 계산
If DayClose(dayPeriod) != 0 Then {
daySumSqrt = 0;
For dayCounter = 0 To dayPeriod - 1 {
daySumSqrt = daySumSqrt + (DayClose(dayCounter) - dayma)^2;
}
dayStdv = SquareRoot(daySumSqrt / dayPeriod);
}
Else
dayStdv = 0;
# 일봉 볼린져밴드 계산
dayBBup = dayma + (dayDv * dayStdv);
dayBBdn = dayma - (dayDv * dayStdv);
plot1(dayBBup ,"상단");
plot2(dayma,"중단");
plot3(dayBBdn,"하단");
Plot4(var1, "777");
2021-05-04
1045
글번호 148655
지표
답변완료
검토좀 부탁합니다
안녕하세요
게시글 72215 와 기존 식을 추가 했습니다
이렇게 해도 저렇게 작동이 되지 않습니다
검토좀 해주시고요
문제점 1 틱차트 사용합니다
시간제한에 문제가 있습니다
문제점 2 문제점1의 문제를 해결하고자 게시글 72215 를 추가했는데도
역시 문제점이 해결되지 않습니다
참고로 봉갯수도 변경해보아도 같네요
이미지를 보시면 특정 이평선 위에 아래를 기준은 준것입니다
갯수제한 때문인지 작동이 되지 않습니다
수정좀 부탁합니다
input : 완전청산 (260);
input : 손절가 (65);
var : T1(0),T2(0);
#var : tX(0),BH(0),SH(0); #수익 틱수조건
var : T21(0),T26(0),T23(0),T24(0),T25(0); #수익틱수
var : T11(0),T22(0),T33(0),T44(0),T55(0); #수익틱수
var : Tcond(false); # 시간제한
var : mav1(0),mav2(0),Lcnt(0),Hcnt(0),BH(0),SL(0); #손절식 조건
var : T(0),S(0),idx(0),entry2(False); # 딱 한번 매매
var1 = ma(c,0);
var2 = ma(C,0);
var3 = ma(C,0);
var4 = ma(c,0);
//시간타이머식
if (sdate != sdate[1] and stime >= 101600) or
(sdate == sdate[1] and stime >= 101600 and stime[1] < 101600) Then
Tcond = true;
if (sdate != sdate[1] and stime >= 1720000) or
(sdate == sdate[1] and stime >= 1720000 and stime[1] < 1720000) Then
{
Tcond = false;
if MarketPosition == 1 Then
ExitLong();
if MarketPosition == -1 Then
ExitShort();
}
if Tcond == true then
{
if var1 > var2 and var1 > var3 and var1 > var4 and var4 > var2 Then
T1 = 1;
if var1 < var2 and var1 < var3 and var1 < var4 and var4 < var2 Then
T1 = -1;
if T1 == 1 and T1[1] == -1 Then
buy("매수");
if T1 == -1 and T1[1] == 1 Then
sell("매도");
####################################################
#딱 한번 매매
if Bdate != Bdate[1] Then
{
idx = 0;
entry2 = true;
}
idx = idx+1;
if idx <= 10 then
{
if MarketPosition != 0 and MarketPosition != MarketPosition[1] and
(IsEntryName("매수1") == true or IsEntryName("매도1") == true) Then
entry2 = False;
}
var5 = ma(C,100);
if CrossUp(C,var5) Then
{
T = 1;
S = 0;
}
if CrossDown(C,var5) Then
{
T = -1;
S = 0;
}
if T == 1 Then
{
S = S+1;
if idx >= 10 and entry2 == true and S == 10 Then
{
Entry2 = False;
Buy("매수2");
}
}
if T == -1 Then
{
S = S+1;
if idx >= 10 and entry2 == true and S == 10 Then
{
entry2 = False;
Sell("매도2");
}
}
}
#매수 손절식
if MarketPosition == 1 Then
{
ExitLong("bx5",AtLimit,EntryPrice+PriceScale*완전청산,"",5,1);
ExitLong("bx6",AtStop,EntryPrice-PriceScale*손절가,"",5,1);
}
Else
Lcnt = 0;
#매도 손절식
if MarketPosition == -1 Then
{
ExitShort("sx5",AtLimit,EntryPrice-PriceScale*완전청산,"",5,1);
ExitShort("sx6",AtStop,EntryPrice+PriceScale*손절가,"",5,1);
}
Else
Hcnt = 0;
2021-05-04
870
글번호 148652
시스템
답변완료
색상 좀 요청 드립니다.
* 항상 많은 도움에 고맙습니다.
*
아래 지표 스톡에서 "StoD" 지표가 80 이상이면 "RED"
80~ 20 이면 무색
20 이하면 GREEN 색상으로 부탁 좀 드립니다.
Input : Period(12), Period1(5), Period2(5);
var : StoK(0),StoD(0);
StoK = StochasticsK(Period,Period1);
StoD = StochasticsD(Period,Period1,Period2);
Plot1(StoK, "StochasticsK");
Plot2(StoD, "StochasticsD");
PlotBaseLine1(20, "기준선20");
PlotBaseLine2(80, "기준선80");
고맙습니다.
2021-05-03
864
글번호 148651
지표
답변완료
산식검토 72242번 계속입니다
작성해주신 산식이
그림에서 보듯이 일부는 수평을 보이고 일부는 변화를 하고 있습니다
그리고 N값이 0이거나 0이상이든지 변화가 전혀 없습니다
재검토 및 주석 부탁드립니다
Input : P(5),N(2);
Var : Gap(0),SumGap(0),DGO(0), DGH(0), DGL(0),DGC(0),DGC1(0);
var : cnt(0),DTH(0),DTL(0),Sum(0),DGatr(0);
Array : DTR[100](0);
If Date != Date[1] Then
{
#Gap = Open-Close[1];
#sumGap = sumGap+gap;
DGC1 = DGC[1];
DGO = O-sumGap;
DGH = H-sumGap;
DGL = L-sumGap;
For cnt=1 to 99
{
DTR[cnt]=DTR[cnt-1][1];
}
}
If H-sumGap>DGH Then
DGH=H-sumGap;
If L-sumGap<DGL Then
DGL=L-sumGap;
DGC = C-sumGap;
If DGC1>DGH Then
DTH=DGC1;
Else
DTH=DGH;
If DGC1<DGL Then
DTL=DGC1;
Else
DTL=DGL;
DTR[0]=DTH-DTL;
If DTR[P]>0 Then
{
sum=0;
For cnt=N To P+N-1
{
sum=sum+DTR[cnt];
}
DGatr=sum / P;
}
Plot1(DGatr);
2021-05-03
781
글번호 148648
지표
답변완료
시스템 문의 좀부탁드리겠습니다.
안녕하세요
제가 테스트중인 시스템수식인데요
1.
if CrossUp(DP,ADXV) Then
Buy("ADX UP");
이부분이 DM선보다 밑에있을때는무시
DM선보다 위에있을때 매수신호
2. ADX 지표에서 DP가 DM보다 위에있을때
MACD가 골든크로스일때 매수신호
3. ADX 지표에서 DP가 DM보다 위에있을때
이동평균(10->20 돌파) 일때 매수신호
로하고싶은데 어떻게 하면될까요?
각각좀부탁드리겠습니다.
*--------------------------------
input : Period1(14);
Input : Period2(9);
Input : short(12), long(26), signal(9);
var : ADXv(0),DP(0),DM(0);
Var : MACDV(0) , MACDS(0), RSIV(0) ;
ADXv = ADX(Period1);
DP = DiPlus(Period1);
DM = DiMinus(Period1);
MACDV = MACD(short, long);
MACDS = ema(MACDV,signal);
RSIV = RSI(Period2);
if CrossUp(DP,DM) Then
Buy("ADV Up");
if CrossUp(rsiv,30) Then
Buy("Rsi Up");
if CrossUp(DP,ADXV) Then
Buy("ADX UP");
if MarketPosition == 1 Then
{
if CrossDown(DP,DM) Then
ExitLong("bx1");
if CrossDown(DP,ADXV) Then
ExitLong("bx2");
if CrossDown(MACDV,MACDS) Then
ExitLong("bx3");
}
2021-05-03
872
글번호 148645
시스템