커뮤니티
예스랭귀지 Q&A
답변완료
수식 문의드립니다.
30분봉에 적용할 시스템이고
N-10일부터 N일까지 매물대를 누적하여
가장 큰 매물대를 데드크로스할때 매수하도록 수식작성이 가능한가요?
2023-03-30
1011
글번호 167733
답변완료
TypeError: SetColData: 지정한셀을 찾을 수 없습니다
YesSpot에서 클래스 등록 에러는 없어졌는데, 스크립트를 적용하면
"TypeError: SetColData: 지정한셀("ANaN")을 찾을 수 없습니다."라고 뜹니다.
지금 같은 스크립트를 두 개의 다른 컴퓨터에서 돌리고 있는데,
하나는 정상적으로 작동이 되는데, 다른 하나는 이걸로 작동이 되지 않고 있습니다.
이 에러가 무슨 뜻이고 어떻게 해결해야 하나요?
2023-03-30
774
글번호 167732
답변완료
수식 문의드립니다.
신호가 발생한 봉 다음 시가에 바로 매수가 될 수 있도록 설정하고싶은데 가능한가요?
Onclose, Atmarket
신호발생봉, 다음봉에 의미부여를 한다고 되어있는데
그렇다면 onclose는 신호발생 다음봉 종가
atmarket은 신호발생 다다음봉 종가에 매수가 되는 지 궁금하네요
2023-03-30
879
글번호 167731
답변완료
시스템식 부탁드립니다.
항상 도움 주셔서 감사합니다.
금일 답변해 주셨는데 추가 질문사항이 있어서 재질문 드립니다.
var : 이평(0),간격(0),매수가격(0);
이평 = ma(C,20) ;
간격 = PriceScale*10;
if marketposition == 0 and C > 이평 then
{
buy("b1",OnClose,Def,1) ;
매수가격 = C;
buy("b2.",atlimit,매수가격+간격*1,1) ;
buy("b3.",atlimit,매수가격+간격*2,1) ;
buy("b4.",atlimit,매수가격+간격*3,1) ;
buy("b5.",atlimit,매수가격+간격*4,1) ;
buy("b6.",atlimit,매수가격+간격*5,1) ;
}
if marketposition == 1 then
{
if lowest(L,BarsSinceEntry) > 매수가격+간격*1 Then
buy("b2",atlimit,매수가격+간격*1,1) ;
if lowest(L,BarsSinceEntry) > 매수가격+간격*2 Then
buy("b3",atlimit,매수가격+간격*2,1) ;
if lowest(L,BarsSinceEntry) > 매수가격+간격*3 Then
buy("b4",atlimit,매수가격+간격*3,1) ;
if lowest(L,BarsSinceEntry) > 매수가격+간격*4 Then
buy("b5",atlimit,매수가격+간격*4,1) ;
if lowest(L,BarsSinceEntry) > 매수가격+간격*5 Then
buy("b6",atlimit,매수가격+간격*5,1) ;
if CurrentContracts < 3 Then
SetStopProfittarget(PriceScale*10,PointStop);
Else
{
SetStopProfittarget(0);
ExitLong("bx",AtLimit,EntryPrice+PriceScale*10);
}
}
Else
SetStopProfittarget(0);
위와 같이 코딩해 주셨는데요.
질문사항 1 :
위의 시스템식을 적용해보면
b1.
b2.
b3.
b4.
b5.
b6.
진입가격이 모두 동일합니다.
왜 그런건가요?
질문사항2 :
if marketposition == 0 and C > 이평 then
{
buy("b1",OnClose,Def,1) ;
매수가격 = C;
buy("b2.",atlimit,매수가격+간격*1,1) ;
buy("b3.",atlimit,매수가격+간격*2,1) ;
buy("b4.",atlimit,매수가격+간격*3,1) ;
buy("b5.",atlimit,매수가격+간격*4,1) ;
buy("b6.",atlimit,매수가격+간격*5,1) ;
}
위의 경우 처음 매수하면 marketposition == 0 이 아닌데
왜 b2. b3 b4. b5. b6. 모두 같은 가격으로 매수가 되는건가요?
질문사항 3.
if CurrentContracts < 3 Then
SetStopProfittarget(PriceScale*10,PointStop);
Else
{
SetStopProfittarget(0);
ExitLong("bx",AtLimit,EntryPrice+PriceScale*10);
}
위 코딩에서 3계약 이내는 개별청산을 하고
나머지 계약은 일괄 청산하려면
남아있는 계약의 평균 진입가격 대비 10틱 위에서 청산해야 하는거 아닌가요?
즉
ExitLong("bx",AtLimit,EntryPrice+PriceScale*10);
아니라
ExitLong("bx",AtLimit,avgEntryPrice+PriceScale*10);
이게 맞는게 아닌가요?
질문사항 4.
SetStopProfittarget(0);
위 함수를 2번 해제 하셨는데
위에서 조건문으로 해제 했는데
왜 마지막에 또 해제 하는건가요?
질문사항 5.
위에 코딩은 가격이 상승한 경우
즉 매수 불타기 코딩인거죠?
물타기 코딩을 하려면
아래와 같이 (-) 마이너스 하면 되는 건가요?
buy("b2.",atlimit,매수가격-간격*1,1) ;
질문사항 6.
위 시스템식을 차트에 적용해보면
marketposition == 0 일때만 6계약 모두 매수가 되고
marketposition == 1 일때는 매수가 하나도 안됩니다.
왜 그런거죠?
가격이 하락해서 물타기 하는 경우
marketposition == 0 일때는 1계약만 들어가고
나머지 계약은 marketposition == 1 일때만 들어가야 하는거 아닌가요?
죄송하지만 코딩의 내용이 이해가 안됩니다.
설명좀 부탁드립니다.
그리고 마지막으로 수고스럽겠지만
첫 진입이후 가격이 상승하면 10틱 단위로 매수 불타기 하고
첫 진입이후 가격이 하락하면 10틱 단위로 매수 물타기 하고
그리고
총 계약이 3틱 이내에는 10틱 수익이 발생하면 개별 청산하고
총 계약이 3틱 이상일 경우에는 총 진입계약의 평균가격보다 10틱 이상
수익 발생시 모두 일괄청산하는 시스템식 부탁드립니다.
마지막으로 포지션 진입은 marketposition == 0 일 경우에만
매수, 매도 하고 싶습니다.
감사합니다.
2023-03-30
985
글번호 167730
답변완료
81470 재문의
수식 감사합니다.
설명이 부족한부분이 있었습니다.
81470 수식
주,월간의 고가가 아닙니다.
혼선을 드려 죄송합니다.
아래 수식은 일간 영업종료 시간 (06:00)의 고가를 선으로 표시 한것입니다.
주간,월간의 영업종료 시간에 고가로 표시한 수식을 요청 드립니다.
부탁드리겠습니다.
감사합니다.
Input:종가시간(60000),종가시간2(60000);
if stime <= 종가시간 Then
var1 = DayHigh;
if date != date[1] Then{
var1 = DayHigh;
Condition1 = true;
}
if stime >= 종가시간 and stime <= 종가시간2 Then{
plot1(var1);
}
}
2023-03-30
830
글번호 167728
답변완료
함수요청
안녕하세요?
아래 글번호 81442번 작성주신 지표함수를 응용해 매매를 하고 싶습니다.
input : P(20),dv(2);
var : bbmd(0),bbup(0),bbdn(0),bwidth(0);
bbmd = ma(v,P);
bbup = bbmd+std(V,P)*dv;
bbdn = bbmd-std(V,P)*dv;
Bwidth = (bbup-bbdn)/bbmd;
Plot1(Bwidth);
거래량 기준 Bwidth가 진입을 하고 두번 깨지면(하향되면) 청산하고자 합니다.
가령 진입당시 Bwidth 값이 0.05 인데 0.05-> 0.06-> 0.07-> 0.06-> 0.05 익봉시가 청산
진입당시 Bwidth 값이 0.05 인데 0.05-> 0.04-> 0.05-> 0.04 익봉시가 청산
진입당시 Bwidth 값이 0.05 인데 0.05-> 0.06-> 0.07-> 0.06-> 0.05 익봉시가 청산
진입당시 Bwidth 값이 0.05 인데 0.05-> 0.04-> 0.03 익봉시가 청산
샘플 부탁드립니다.
2023-03-30
643
글번호 167727
답변완료
문의드립니다.
변곡점 상하 +/- 5% 위치에 점표시를 하고 싶습니다.
Input:length(30);
   Var:최종고가(0),최종저가(0),최종변곡점(""),처리구분(""),sBar(0),TL1(0),
        고추세기울기(0),고추세봉개수(0),고추세시작(0),고추세시작IDX(0),고추세최종(0),
        저추세기울기(0),저추세봉개수(0),저추세시작(0),저추세시작IDX(0),저추세최종(0);
    Var:고1(0),고2(0),고3(0),고4(0),고5(0),고6(0),고7(0),고8(0),고9(0),고10(0),
        저1(0),저2(0),저3(0),저4(0),저5(0),저6(0),저7(0),저8(0),저9(0),저10(0),
        고1IDX(0),고2IDX(0),고3IDX(0),고4IDX(0),고5IDX(0),
        고6IDX(0),고7IDX(0),고8IDX(0),고9IDX(0),고10IDX(0),
        저1IDX(0),저2IDX(0),저3IDX(0),저4IDX(0),저5IDX(0),
        저6IDX(0),저7IDX(0),저8IDX(0),저9IDX(0),저10IDX(0);
   var : t(0),ii(0),tx1(0);
#==========================================#
    Condition1 = Highest(C,length) == C and 최종고가 <> C;
    Condition2 = Lowest (C,length) == C and 최종저가 <> C;
처리구분 = "";
If Condition1 and Condition2 Then                // 기간고점과 기간저점 동시 발생
{   
       If 최종변곡점 == "저점" Then 처리구분 = "고점처리";  // 저 - 고 순으로 처리
   Else                         처리구분 = "저점처리";  // 고 - 저 순으로 처리
}   
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
    #==========================================#
If 처리구분 == "고점처리" Then 
   {
       최종고가 = C;                                 // 신규고점을 체크하기 위해 저장
   If 최종변곡점 == "저점" Then
       {
          고9 = 고8;    고9IDX = 고8IDX;
          고8 = 고7;    고8IDX = 고7IDX;
          고7 = 고6;    고7IDX = 고6IDX;
          고6 = 고5;    고6IDX = 고5IDX;
          고5 = 고4;    고5IDX = 고4IDX;
          고4 = 고3;    고4IDX = 고3IDX;
          고3 = 고2;    고3IDX = 고2IDX;
          고2 = 고1;    고2IDX = 고1IDX;
          고1 = C;      고1IDX = Index;
          sBar = Index - 저1IDX;  // 추세선 시작점의 위치, n봉전으로 표시
      TL1  = TL_New(sDate[sBar],sTime[sBar],저1,sDate[0],sTime[0],고1); 
          TL_SetSize(TL1,1);
          TL_SetColor(TL1,ReD);
              tx1 = text_new(sDate[0],sTime[0],고1+0.5,"●");
              Text_SetStyle(tx1,2,1);
              Text_SetColor(tx1,Red);
       }
       Else If 고1 < C Then                    // 1번 고점보다 높은 고가 출현
   {
          고1 = C;  고1IDX = Index;
          TL_SetEnd(TL1,sDate[0],sTime[0],고1);
          // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 
              Text_SetLocation(tx1,sDate[0],sTime[0],고1+0.5);
       }
    /* 고점추세선 */   
       If 고2IDX[1] <> 고2IDX Then  // 고2의 Index값이 변동 없음 즉, 새로운 고점이 생기지 않았음
   {
          고추세최종 = 0; 고추세기울기 = 0; 고추세시작 = 0; 고추세봉개수 = 0;
          If 고2 < 고3 Then 
          {
             고추세기울기  = (고2 - 고3)/(고2IDX - 고3IDX);
             고추세시작    = 고3;
             고추세시작IDX = 고3IDX;
          }
          Else If 고2 < 고4 Then 
          {
             고추세기울기  = (고2 - 고4)/(고2IDX - 고4IDX);
             고추세시작    = 고4;
             고추세시작IDX = 고4IDX;
          }
          Else If 고2 < 고5 Then 
          {
             고추세기울기  = (고2 - 고5)/(고2IDX - 고5IDX);
             고추세시작    = 고5;
             고추세시작IDX = 고5IDX;
          }
          Else If 고2 < 고6 Then 
          {
             고추세기울기  = (고2 - 고6)/(고2IDX - 고6IDX);
             고추세시작    = 고6;
             고추세시작IDX = 고6IDX;
          }
          Else If 고2 < 고7 Then 
          {
             고추세기울기  = (고2 - 고7)/(고2IDX - 고7IDX);
             고추세시작    = 고7;
             고추세시작IDX = 고7IDX;
          }
          Else If 고2 < 고8 Then 
          {
             고추세기울기  = (고2 - 고8)/(고2IDX - 고8IDX);
             고추세시작    = 고8;
             고추세시작IDX = 고8IDX;
          }
          Else If 고2 < 고9 Then 
          {
             고추세기울기  = (고2 - 고9)/(고2IDX - 고9IDX);
             고추세시작    = 고9;
             고추세시작IDX = 고9IDX;
          }
          고추세봉개수 = Index - 고추세시작IDX;
          고추세최종   = 고추세기울기 * 고추세봉개수 + 고추세시작;
       }
       Else If 고추세최종[1] > 0 Then
       {
          고추세최종 = 고추세기울기 * (Index - 고추세시작IDX) + 고추세시작;
    
       }
       If 저추세최종[1] > 0 Then
       {
          저추세최종 = 저추세기울기 * (Index - 저추세시작IDX) + 저추세시작;
    
       }
       최종변곡점 = "고점";
    }
    #==========================================#
If 처리구분 == "저점처리" Then 
    {
       최종저가 = C;
       If 최종변곡점 == "고점" then 
       {
          저9 = 저8;    저9IDX = 저8IDX;
          저8 = 저7;    저8IDX = 저7IDX;
          저7 = 저6;    저7IDX = 저6IDX;
          저6 = 저5;    저6IDX = 저5IDX;
          저5 = 저4;    저5IDX = 저4IDX;
          저4 = 저3;    저4IDX = 저3IDX;
          저3 = 저2;    저3IDX = 저2IDX;
          저2 = 저1;    저2IDX = 저1IDX;
          저1 = C;      저1IDX = Index;
          sBar = Index - 고1IDX;
          TL1  = TL_New(sDate[sBar],sTime[sBar],고1,sDate[0],sTime[0],저1); 
          TL_SetSize(TL1,1);
          TL_SetColor(TL1,BluE);
              tx1 = text_new(sDate[0],sTime[0],저1-0.5,"●");
              Text_SetStyle(tx1,2,0);
              Text_SetColor(tx1,Blue);
       }
       Else If 저1 > C then 
       {
          저1 = C;      저1IDX = Index;
          TL_SetEnd(TL1,sDate[0],sTime[0],저1);
              Text_SetLocation(TL1,sDate[0],sTime[0],저1-0.5);
       }
    /* 저점추세선 */   
       If 저2IDX[1] <> 저2IDX Then
       {
          저추세최종 = 0; 저추세기울기 = 0; 저추세시작 = 0; 저추세봉개수 = 0;
     If 저2 > 저3 and 저3 > 0 Then  
          { 
             저추세기울기  = (저2 - 저3)/(저2IDX - 저3IDX); 
             저추세시작    = 저3; 
             저추세시작IDX = 저3IDX; 
          } 
          Else If 저2 > 저4 and 저4 > 0 Then  
          { 
             저추세기울기  = (저2 - 저4)/(저2IDX - 저4IDX); 
             저추세시작    = 저4; 
             저추세시작IDX = 저4IDX; 
          } 
          Else If 저2 > 저5 and 저5 > 0 Then  
          { 
             저추세기울기  = (저2 - 저5)/(저2IDX - 저5IDX); 
             저추세시작    = 저5; 
             저추세시작IDX = 저5IDX; 
          } 
          Else If 저2 > 저6 and 저6 > 0 Then  
          { 
             저추세기울기  = (저2 - 저6)/(저2IDX - 저6IDX); 
             저추세시작    = 저6; 
             저추세시작IDX = 저6IDX; 
          } 
          Else If 저2 > 저7 and 저7 > 0 Then  
          { 
             저추세기울기  = (저2 - 저7)/(저2IDX - 저7IDX); 
             저추세시작    = 저7; 
             저추세시작IDX = 저7IDX; 
          } 
          Else If 저2 > 저8 and 저8 > 0 Then  
          { 
             저추세기울기  = (저2 - 저8)/(저2IDX - 저8IDX); 
             저추세시작    = 저8; 
             저추세시작IDX = 저8IDX; 
          } 
          Else If 저2 > 저9 and 저9 > 0 Then  
          { 
             저추세기울기  = (저2 - 저9)/(저2IDX - 저9IDX); 
             저추세시작    = 저9; 
             저추세시작IDX = 저9IDX; 
          } 
          저추세봉개수 = Index - 저추세시작IDX; 
          저추세최종   = 저추세기울기 * 저추세봉개수 + 저추세시작;
       }
       Else If 저추세최종[1] > 0 Then
       {
          저추세최종 = 저추세기울기 * (Index - 저추세시작IDX) + 저추세시작; 
    
       }
       If 고추세최종[1] > 0 Then
       {
          고추세최종 = 고추세기울기 * (Index - 고추세시작IDX) + 고추세시작;
   
       }   
       최종변곡점 = "저점";
        
    }
2023-03-30
987
글번호 167723
답변완료
문의드립니다
상장일을 나타낼 수 있는 수식이 존재하나요?
2023-03-30
836
글번호 167722
답변완료
안녕하세요?
안녕하세요?
아래 수식은 일간종가라인인데요
주간수식,월간수식 부탁 드립니다.
감사합니다.
Input:종가시간(70000),종가시간2(70000);
if stime <= 종가시간 Then
var1 = DayHigh;
if date != date[1] Then{
var1 = DayHigh;
Condition1 = true;
}
if stime >= 종가시간 and stime <= 종가시간2 Then{
plot1(var1);
}
2023-03-30
677
글번호 167719
답변완료
수식변환문의드립니다~
<키움기준>을 예스랭귀지 검색식으로 부탁드립니다.
1
----------------------------------------------------
AA=(O+H+L+C)/4;
AA1=(C(1)+O(1))/2;
A=LinearRegressionValue(C,50,0);
A1=LinearRegressionValue(A,50,0);
eq= A-A1;
Z=A+eq;
SD=Lowest(L,22)+atr(22)*3;
ap = (HIGH+LOW+CLOSE)/3;
esa = eavg(ap, 10);
d = eavg(abs(ap - esa), 10);
ci = (ap - esa) / (0.015 * d);
wt1 = eavg(ci, 21);
wt2 = avg(wt1,4);
WT=(wt1-wt2)*2;
AA>AA1 && (CROSSUP(AA,SD) OR CROSSUP(AA,Z)) && WT>=0;
=====================================================
2.키움에 아래 라인을 돌파하는 캔들을
검색식으로 부탁드립니다.
----------------------------------------
S=(O-avg(L,20))/stdev(L,20);
valuewhen(1,crossup(s,0),c)
----------------------------------------
2023-03-30
913
글번호 167711