답변완료
Re : Re : 수식 재검토 부탁드립니다.
항상 도와주셔서 감사 드립니다.
에제 수정해주신 수식을 적용하니 새벽 6시에 거래가 종료되고 나서 거래 시작 시간인 오전 8시3분부터 밤 12시까지는 일절 진입이 안되고 있습니다. 검토 부탁 드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식 검토 부탁합니다.
>
안녕하세요
예스스탁입니다.
input : starttime(080300),Endtime(055700);
input : 타주기분(30),P(5),Period(5),period1(10),Period2(20);
input : 익절포인트수1(200),익절포인트수2(120),익절포인트수3(60),익절포인트수4(160),손절포인트수1(80),손절포인트수2(60),손절포인트수3(375),당일수익포인트수(950),당일손실포인트수(500);
Input : shortPeriod(12), longPeriod(26);
Input : af(0.02), maxAF(0.2);
INPUT : LENGTH(20);
VAR : TCHAN(0), BCHAN(0);
Var : value(0),value1(0);
Var : N1(0),dayPl(0),당일수익(0),당일손실(0),Xcond(false);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),entry(0),bbup(0),bbdn(0),avgv1(0),avgv2(0);
var : sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0),avgv(0),Tcond(False),t(30),PROc(0);
Array : CC[100](0);
value = sar(af,maxAF);
value1 = MACD(shortPeriod, longPeriod);
TCHAN = HIGHEST(HIGH, LENGTH)[1];
BCHAN = LOWEST(LOW, LENGTH)[1];
PROC = PROC(Period1);
avgv = ma(c,Period);
avgv1 =ma(c,Period1);
avgv2 =ma(c,Period2);
bbup = BollBandUp(20,2);
bbdn = BollBandDown(20,2);
if sdate != sDate[1] Then
{
if StartTime < EndTime Then
SetStopEndofday(Endtime);
}
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
Tcond = False;
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
if StartTime < EndTime Then
SetStopEndofday(0);
Else
SetStopEndofday(EndTime);
S1 = TimeToMinutes(stime);
D1 = sdate;
entry = 0;
Condition3 = False;
Tcond = true;
Xcond = false;
N1 = NetProfit;
}
당일수익 = PriceScale*당일수익포인트수;
당일손실 = PriceScale*당일손실포인트수;
daypl = NetProfit-N1;
if TotalTrades > TotalTrades[1] then
{
if daypl >= 당일수익 or daypl <= -당일손실 Then
Xcond = true;
if (IsExitName("dbp",1) == true or IsExitName("dbl",1) == true or
IsExitName("dsp",1) == true or IsExitName("dsl",1) == true) then
Xcond = true;
}
if D1 > 0 then
{
if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or
(MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then
entry = entry+1;
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P+2] > 0 then
{
sum1 = 0;
sum2 = 0;
sum3 = 0;
for cnt = 0 to P-1
{
sum1 = sum1 + CC[cnt];
sum2 = sum2 + CC[cnt+1];
sum3 = sum3 + CC[cnt+2];
}
mav1 = sum1/P;
mav2 = sum2/P;
mav3 = sum3/P;
}
if Xcond == false and Tcond == true then
{
if MarketPosition >= 0 and mav1<mav2-2 and c>=avgv and !(avgv1[1]<avgv1 and avgv2[1]<avgv2 and avgv[1]<avgv)
and !(avgv>avgv1 and avgv1>avgv2)Then
{
#진입청산식1.
#진입청산식2
#진입청산식3
#
#
#진입청산식6
}
}
}
if MarketPosition == 1 then
{
ExitLong("dbp",atlimit,EntryPrice+((당일수익-daypl)/CurrentContracts));
ExitLong("dbl",AtStop,EntryPrice-((당일손실+daypl)/CurrentContracts));
}
if MarketPosition == -1 then
{
ExitShort("dsp",atlimit,EntryPrice-((당일수익-daypl)/CurrentContracts));
ExitShort("dsl",AtStop,EntryPrice+((당일손실+daypl)/CurrentContracts));
}
if sTime >= 080300 and sTime < 160000 Then
{
SetStopProfittarget(PriceScale*익절포인트수3,PointStop);
SetStopLoss(PriceScale*손절포인트수3,PointStop);
}
Else if sTime >= 200000 or sTime < 060000 Then
{
SetStopProfittarget(PriceScale*익절포인트수1,PointStop);
SetStopLoss(PriceScale*손절포인트수3,PointStop);
}
Else
{
SetStopProfittarget(PriceScale*익절포인트수2,PointStop);
SetStopLoss(PriceScale*손절포인트수3,PointStop);
}
즐거운 하루되세요
2024-04-16
1087
글번호 178611
시스템
답변완료
종목검색식 요청합니다
AA=HighestSince(1,Date(1)!=Date,if(C>O,V,0));캔들이 양봉이면서 당일 최고 거래량
BB=ValueWhen(1,AA==V,V);
CC=HighestSince(1,Date(1)!=Date,if(C>O*1.019,C,0)); 시가대비 2%이상 종가이면서 당일 최고 종가
DD=ValueWhen(1,CC==C,C);
BB==V && DD==C && (거래대금>3000 or v(1)*5<v)
이베스트에서 사용중인 신호 수식입니다
종목검색식을 좀 부탁합니다(신호수식 아니고 종목검색식이요)
2024-04-16
1150
글번호 178609
종목검색
답변완료
수식 문의드립니다.
안녕하세요.
몇가지 수식 문의드립니다.
아래와 같은 식에서
Input : shortPeriod(5), longPeriod(20);
Input : Y(3.4),N2(0.3),A(3.44),N3(0.77);
value1 = ma(C, shortPeriod);
value2 = ma(C, longPeriod);
# 매수/매도청산
If CrossUP(value1, value2) Then
{
Buy("b1");
}
# 매도/매수청산
If CrossDown(value1, value2) Then
{
Sell("s1");
}
#진입이후 Y이상 상승후 최고가에서 N2포인트 하락하면 청산
if MarketPosition == 1 Then{
if highest(h,BarsSinceEntry) >= EntryPrice+Y Then
ExitLong("매수익절",AtStop,highest(H,BarsSinceEntry)-N2);
}
#진입이후 A이상 하락후 최저가에서 N3포인트 상승하면 청산
if MarketPosition == -1 Then{
if Lowest(L,BarsSinceEntry) <= EntryPrice-A Then
ExitShort("매도익절",AtStop,Lowest(L,BarsSinceEntry)+N3);
}
##########################################
위 수식에 오류가 없는지 검토 부탁 드립니다.
그리고 위 수식에 추가 하고 싶은 것들이 있습니다.
1. b1(매수) 진입가에서 몇 포인트 하락하면 추가로 1계약 진입하는식(외부변수)
2. s1(매도) 도 마찬가지로 얼마이상 오르면(포인트) 1계약 추가하는식.
3. 그리고 매수/매도 각각 setstoppoint 손절을 넣고 싶은데요
방법은 예를들어
"b1" 진입후에 추가 "b2" 가 진입해서 2계약일때 AvgEntryPrice 가 아니고
"b1" 의 지정손절가에 "b2" 도 같이 청산되는 방법좀 부탁드립니다.
2계약의 평균가가 기준이 아니라 첫 진입가를 기준으로 조건만족 되면 나머지 "b2"는
같이 손절하는식으로 부탁드립니다.
2024-04-16
766
글번호 178599
시스템
답변완료
검색식 확인 부탁드립니다.
항상 도와주심에 감사드립니다. _(_ _)_
기 만들어진 아래검색식 4개가 기준봉 발생후 10봉이내 음봉 최고시가돌파시 검색종목식인데요... 1,2,3번은 검색이 안돼거나 음봉시에도 발생이 자주 나오고 4번은 검색은 잘돼는데 누락현상이 나옵니다. 예시차트를 첨부하니 재확인 요청드립니다.
1
var : ii(0),HO(0);
var : MM(0),KK(0),MO(0),mx(0);
var : M1(0),M2(0),M3(0),M4(0),M5(0),M6(0);
var : M7(0),M8(0),M9(0),M10(0),M11(0),M12(0);
MM = floor(date/100);
if MM != MM[1] Then
{
MO = O;
M1 = KK[1];
M2 = M1[1];
M3 = M2[1];
M4 = M3[1];
M5 = M4[1];
M6 = M5[1];
M7 = M6[1];
M8 = M7[1];
M9 = M8[1];
M10 = M9[1];
M11 = M10[1];
M12 = M11[1];
mx = Max(M1, M2, M3, M4, M5,M6, M7, M8, M9, M10, M11, M12);
}
KK = iff(MO > C, MO, 0);
if mx > 0 and CrossUp(C,mx) Then
{
ii = Index;
if C < O Then
HO = O;
Else
HO = 0;
}
Else
{
if ii > 0 and Index <= ii+10 Then
{
if C < O and (HO == 0 or (HO > 0 and O > HO)) Then
HO = O;
if HO[1] > 0 and CrossUp(c,HO[1]) Then
Find(1);
}
}
2
var : ii(0),HO(0);
var : Month(0), MOpen(0), 중심(0),PreMC(0), PreMO(0);
Month = Floor(date/100);
if Month != Month[1] Then
{
PreMC = C[1];
PreMO = MOpen;
MOpen = O ;
}
중심 = ((PreMC + PreMO)/2 + MOpen)/2;
if CrossUp(C, 중심) Then
{
ii = Index;
if C < O Then
HO = O;
Else
HO = 0;
}
Else
{
if ii > 0 and Index <= ii+10 Then
{
if C < O and (HO == 0 or (HO > 0 and O > HO)) Then
HO = O;
if HO[1] > 0 and CrossUp(c,HO[1]) Then
Find(1);
}
}
3
var : ii(0),HO(0);
var1 = macd(12,26);
var2 = Sar(0.02,0.2);
if var1 >= 0 and CrossUp(c,Var2) and C >= C[1]*1.03 and C > O Then
value1 = (C+O)/2;
if value1 > 0 and CrossUp(c,value1) Then
{
ii = Index;
if C < O Then
HO = O;
Else
HO = 0;
}
Else
{
if ii > 0 and Index <= ii+10 Then
{
if C < O and (HO == 0 or (HO > 0 and O > HO)) Then
HO = O;
if HO[1] > 0 and CrossUp(c,HO[1]) Then
Find(1);
}
}
4
var : ii(0),HO(0);
var1 = macd(12,26);
var2 = Sar(0.02,0.2);
if var1 >= 0 and CrossUp(c,Var2) and C >= C[1]*1.03 and C > O Then
{
ii = Index;
if C < O Then
HO = O;
Else
HO = 0;
}
Else
{
if ii > 0 and Index <= ii+10 Then
{
if C < O and (HO == 0 or (HO > 0 and O > HO)) Then
HO = O;
if HO[1] > 0 and CrossUp(c,HO[1]) Then
Find(1);
}
}
2024-04-16
819
글번호 178598
종목검색
답변완료
피봇선 시작시간 변경 검증
항상 감사드립니다
아래 피봇지지저항선을 시작시간을 22시30분으로 변경하여 작성했습니다
var : 전일고가(1),전일저가(0) 부분을 오류가 없는지 검토 부탁드립니다
/****************************************************/
input : 기준시간(223000);
var : cnt(0);
var : 전일종가(0),전일고가(1),전일저가(0),전일시가(0),당일시가(0);
Array : DO[20](0),DH[20](0),DL[20](0),DC[20](0);
if (sdate != sdate[1] and stime >= 기준시간) or
(sdate == sdate[1] and stime >= 기준시간 and stime[1] < 기준시간) Then
{
DO[0] = O;
DH[0] = H;
DL[0] = L;
for cnt = 1 to 19
{
DO[cnt] = DO[cnt-1][1];
DH[cnt] = DH[cnt-1][1];
DL[cnt] = DL[cnt-1][1];
DC[cnt] = DC[cnt-1][1];
}
}
if DO[0] > 0 Then
{
DC[0] = C;
if H > DH[0] Then
DH[0] = H;
if L < DL[0] Then
DL[0] = L;
}
if DO[1] > 0 Then
{
전일종가 = DC[1];
전일고가 = DH[1];
전일저가 = DL[1];
전일시가 = DO[1]; <============= 이부분만 추가
당일시가 = DO[0];
###### 피봇 3단계 라인 ######
// 저항선_피봇1차저항
var1 = (((전일시가+전일고가+전일저가+전일종가)/4)*2)-전일저가;
//라인2_피봇1차지지
var2 = (((전일시가+전일고가+전일저가+전일종가)/4)*2)- 전일고가;
//라인3_피봇기준
var3 = (전일시가 +전일고가+전일저가+3*전일종가)/6;
//라인4_피봇기준
var4 = (전일시가 +전일고가+전일저가+3*전일종가)/6-0.0003;
plot1(var1,"피봇1차저항",blue,def,4);
plot2(var2,"피봇1차지지",blue,def,4);
plot3(var3,"피봇기준0",blue,def,4);
2024-04-16
738
글번호 178597
지표