커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
6705
글번호 230811
답변완료
문의
답변 감사드립니다.
1번째 답변에서 수정요청 드리겠습니다.
이런 전략으로 거래를 시뮬레이션해보니.. .
손실을 확정하고 또는 수익을 확정하고 진입을 하려고 하니 문제가 좀 있습니다..
가상 신호가 나오고 그 신호가 발생한 가격을 저장하고..신호가 발생하고 나서 3개 캔들 이내에서 그 신호가 5틱 이상 수익이 되면 진입하고 그렇지 않으면 진입하지 않게끔 수정 부탁드리겠습니다.
====================================================================
1.
아래내용 참고하시기 바랍니다.
문의하신 내용은 가상으로 전략의 수익을 계산해서 사용하셔야 합니다.
실제 신호상 손실에 3번연속 발생하면 다음 가상의 거래중 2번연속 수익이 발생하면
진입합니다. 진입된 신호가 다시 손실이면 다시 가상으로 2번의 연속거래가 수익이어야 다시 진입합니다.
var : T(0),EP(0),PL(0),PL1(0),Xcond(false);
var1=ema(C,5);
var2=ema(C,15);
if MarketPosition == 0 and PositionProfit(1) < 0 and PositionProfit(2) < 0 and PositionProfit(3) < 0 Then
Xcond = true;
else if MarketPosition == 1 and C < EntryPrice and PositionProfit(1) < 0 and PositionProfit(2) < 0 Then
Xcond = true;
else if MarketPosition == -1 and C > EntryPrice and PositionProfit(1) < 0 and PositionProfit(2) < 0 Then
Xcond = true;
Else
Xcond = false;
if crossup(var1,var2) then{
#가상손익 계산
if T == -1 Then{
PL = EP-C;
PL1 = PL[1];
}
EP = C;
T = 1;
if Xcond == false Then
buy("b1");
if Xcond == true and countif(crossup(var1,var2),BarsSinceExit(1)) >= 2 and PL > 0 and PL1 > 0 Then
buy("b2");
if MarketPosition == -1 and Xcond == true Then
ExitShort("sx");
}
if crossdown(var1,var2) then{
#가상손익 계산
if T == 1 Then{
PL = C-EP;
PL1 = PL[1];
}
EP = C;
T = -1;
if Xcond == false Then
sell("s1");
if Xcond == true and countif(CrossDown(var1,var2),BarsSinceExit(1)) >= 2 and PL > 0 and PL1 > 0 Then
sell("s2");
if MarketPosition == 1 and Xcond == true Then
ExitLong("bx");
}
> hjkang철인 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 현재 신호가 나오고 있습니다.
발생하는 매수 매도 신호 중에서 손실이 3번 발생하면 신호가 나오더라도 진입이 되지 않고
손실 3회 발생한 이후 그 이후 진행되는 신호가 연속적으로 수익이 2회 발생하면 그 이후에 신호대로 다시 진입되게 끔 가능할까요?
시스템 신호는 1.매수-> 2.매도-> 3.매수->4.매도->5. 매수 ->6.매도->7.매수->8.매도 이렇게 신호가 발생한다고 할때 1,2,3 신호 손실 진입차단.
4,5 신호 수익이라면.. 6.매도에 재진입 되는 것을 말하는 것입니다.
var1=ema(C,5);
var2=ema(C,15);
if crossup(var1,var2) then
Buy("B");
if crossdown(var1,var2) then
Sell("S");
2014-10-27
157
글번호 79783
답변완료
매개변수로 객체사용 가능?
스팟에서....
function xx(종목객체, 확장 차트객체)
사용자 함수에서도 이런식으로 매개변수에 객체를 넣을 수 있나요??
입력하면 글씨 색깔이 파란색으로 변하지 않습니다.
종목객체를 넣을려고 MarketData라고 입력하면 그냥 일반변수 처럼
검은색으로 표시됩니다.
2014-10-27
152
글번호 79781
답변완료
부탁드립니다
아래의 지표는 선생님께서 만드신 지표입니다.
아래의 지표에서 추세선이 상승각도이면 빨강선으로 ,추세선이 하락각도이면 파랑선으로
표시되도록 부탁합니다..선굵기도 조절이 되면 굵었으면 합니다....
//////////////////////////////////////////////////////////
Input : P(3);
input : Size(1);
Input : R(100),G(0),B(0);
/////////////////////////////////////////////////////////////////////////////
var : cnt(0);
var : H1(0),H2(0),H3(0),H4(0),H5(0),H6(0),H7(0),H8(0),H9(0),H10(0);
var : L1(0),L2(0),L3(0),L4(0),L5(0),L6(0),L7(0),L8(0),L9(0),L10(0);
var : Hv(0),HD(0),HT(0);
var : Lv(0),LD(0),LT(0);
if date != date[1] Then{
HV = H;
HD = sdate;
HT = stime;
LV = L;
LD = sdate;
LT = stime;
}
if H > HV Then{
HV = H;
HD = sdate;
HT = stime;
}
if L < LV Then{
LV = L;
LD = sdate;
LT = stime;
}
var1 = NthHighestBar(1,H,P);
var2 = NthHighestBar(1,H,P*2);
var3 = NthHighestBar(1,H,P*3);
var4 = NthHighestBar(1,H,P*4);
var5 = NthHighestBar(1,H,P*5);
var6 = NthHighestBar(1,H,P*6);
var7 = NthHighestBar(1,H,P*7);
var8 = NthHighestBar(1,H,P*8);
var9 = NthHighestBar(1,H,P*9);
var10 = NthHighestBar(1,H,P*10);
var11 = NthLowestBar(1,L,P);
var12 = NthLowestBar(1,L,P*2);
var13 = NthLowestBar(1,L,P*3);
var14 = NthLowestBar(1,L,P*4);
var15 = NthLowestBar(1,L,P*5);
var16 = NthLowestBar(1,L,P*6);
var17 = NthLowestBar(1,L,P*7);
var18 = NthLowestBar(1,L,P*8);
var19 = NthLowestBar(1,L,P*9);
var20 = NthLowestBar(1,L,P*10);
////////////////////////////////////////////////////////////
TL_Delete(H1);
H1 = TL_New(HD,HT,HV,Sdate[var1],Stime[var1],H[var1]);
TL_SetExtRight(H1,true);
TL_SetColor(H1,RGB(R,G,B));
TL_SetSize(H1,Size);
TL_Delete(L1);
L1 = TL_New(LD,LT,LV,Sdate[var11],Stime[var11],L[var11]);
TL_SetExtRight(L1,true);
TL_SetColor(L1,RGB(B,G,R));
TL_SetSize(L1,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H2);
H2 = TL_New(HD,HT,HV,Sdate[var2],Stime[var2],H[var2]);
TL_SetExtRight(H2,true);
TL_SetColor(H2,RGB(R,G,B));
TL_SetSize(H2,Size);
TL_Delete(L2);
L2 = TL_New(LD,LT,LV,Sdate[var12],Stime[var12],L[var12]);
TL_SetExtRight(L2,true);
TL_SetColor(L2,RGB(B,G,R));
TL_SetSize(L2,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H3);
H3 = TL_New(HD,HT,HV,Sdate[var3],Stime[var3],H[var3]);
TL_SetExtRight(H3,true);
TL_SetColor(H3,RGB(R,G,B));
TL_SetSize(H3,Size);
TL_Delete(L3);
L3 = TL_New(LD,LT,LV,Sdate[var13],Stime[var13],L[var13]);
TL_SetExtRight(L3,true);
TL_SetColor(L3,RGB(B,G,R));
TL_SetSize(L3,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H4);
H4 = TL_New(HD,HT,HV,Sdate[var4],Stime[var4],H[var4]);
TL_SetExtRight(H4,true);
TL_SetColor(H4,RGB(R,G,B));
TL_SetSize(H4,Size);
TL_Delete(L4);
L4 = TL_New(LD,LT,LV,Sdate[var14],Stime[var14],L[var14]);
TL_SetExtRight(L4,true);
TL_SetColor(L4,RGB(B,G,R));
TL_SetSize(L4,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H5);
H5 = TL_New(HD,HT,HV,Sdate[var5],Stime[var5],H[var5]);
TL_SetExtRight(H5,true);
TL_SetColor(H5,RGB(R,G,B));
TL_SetSize(H5,Size);
TL_Delete(L5);
L5 = TL_New(LD,LT,LV,Sdate[var15],Stime[var15],L[var15]);
TL_SetExtRight(L5,true);
TL_SetColor(L5,RGB(B,G,R));
TL_SetSize(L5,Size);
////////////////////////////////////////////////////////////
TL_Delete(H6);
H6 = TL_New(HD,HT,HV,Sdate[var6],Stime[var6],H[var6]);
TL_SetExtRight(H6,true);
TL_SetColor(H6,RGB(R,G,B));
TL_SetSize(H6,Size);
TL_Delete(L6);
L6 = TL_New(LD,LT,LV,Sdate[var16],Stime[var16],L[var16]);
TL_SetExtRight(L6,true);
TL_SetColor(L6,RGB(B,G,R));
TL_SetSize(L6,Size);
////////////////////////////////////////////////////////////
TL_Delete(H7);
H7 = TL_New(HD,HT,HV,Sdate[var7],Stime[var7],H[var7]);
TL_SetExtRight(H7,true);
TL_SetColor(H7,RGB(R,G,B));
TL_SetSize(H7,Size);
TL_Delete(L7);
L7 = TL_New(LD,LT,LV,Sdate[var17],Stime[var17],L[var17]);
TL_SetExtRight(L7,true);
TL_SetColor(L7,RGB(B,G,R));
TL_SetSize(L7,Size);
////////////////////////////////////////////////////////////
TL_Delete(H8);
H8 = TL_New(HD,HT,HV,Sdate[var8],Stime[var8],H[var8]);
TL_SetExtRight(H8,true);
TL_SetColor(H8,RGB(R,G,B));
TL_SetSize(H8,Size);
TL_Delete(L8);
L8 = TL_New(LD,LT,LV,Sdate[var18],Stime[var18],L[var18]);
TL_SetExtRight(L8,true);
TL_SetColor(L8,RGB(B,G,R));
TL_SetSize(L8,Size);
////////////////////////////////////////////////////////////
TL_Delete(H9);
H9 = TL_New(HD,HT,HV,Sdate[var9],Stime[var9],H[var9]);
TL_SetExtRight(H9,true);
TL_SetColor(H9,RGB(R,G,B));
TL_SetSize(H9,Size);
TL_Delete(L9);
L9 = TL_New(LD,LT,LV,Sdate[var19],Stime[var19],L[var19]);
TL_SetExtRight(L9,true);
TL_SetColor(L9,RGB(B,G,R));
TL_SetSize(L9,Size);
////////////////////////////////////////////////////////////
TL_Delete(H10);
H10 = TL_New(HD,HT,HV,Sdate[var10],Stime[var10],H[var10]);
TL_SetExtRight(H10,true);
TL_SetColor(H10,RGB(R,G,B));
TL_SetSize(H10,Size);
TL_Delete(L10);
L10 = TL_New(LD,LT,LV,Sdate[var20],Stime[var20],L[var20]);
TL_SetExtRight(L10,true);
TL_SetColor(L10,RGB(B,G,R));
TL_SetSize(L10,Size);
2014-10-27
188
글번호 79779
richon 님에 의해서 삭제되었습니다.
2014-10-27
0
글번호 79774
답변완료
[오류] 해외선물 봉별 일자 및 dayindex 확인 요청합니다.
해외선물을 준비하고 있는데...
차트의 일자기준을 한국시간으로 설정했습니다.
거래일자가 변경되면 초기 셋팅할 것들이 있어 Data[1] <> date로 일자별 초기화를 하는데
봉의 시작시간이 한국시간을 기준으로 24이내에 있음에도 불구하고 Date 값이 변경됩니다.
Dayindex의 값도 다른 것으로 보입니다.
확인 부탁 드립니다.
2014-10-27
175
글번호 79773
답변완료
지표 문의 드립니다
감사합니다
아래 수식은 예전에 작성해주신 추세선 지표입니다
1, 추세선을 여러개 사용하려 하는데
추세선이 겹치면 선이 보이지 않는데
추세선이 겹쳐도
선이 나타나게 부탁드립니다
2, 추세선을 적용하면 장시작시 차트가 바로 움직이지않고
몇십초 지나서 차트가 움직이는데
차트가 바로 움직이게 할수있으면 부탁드립니다
감사합니다
좋은하루 되세요
//////////////////////////////////////////////////////////
Input : P(3);
input : Size(1);
Input : R(100),G(0),B(0);
/////////////////////////////////////////////////////////////////////////////
var : cnt(0);
var : H1(0),H2(0),H3(0),H4(0),H5(0),H6(0),H7(0),H8(0),H9(0),H10(0);
var : L1(0),L2(0),L3(0),L4(0),L5(0),L6(0),L7(0),L8(0),L9(0),L10(0);
var : Hv(0),HD(0),HT(0);
var : Lv(0),LD(0),LT(0);
if date != date[1] Then{
HV = H;
HD = sdate;
HT = stime;
LV = L;
LD = sdate;
LT = stime;
}
if H > HV Then{
HV = H;
HD = sdate;
HT = stime;
}
if L < LV Then{
LV = L;
LD = sdate;
LT = stime;
}
var1 = NthHighestBar(1,H,P);
var2 = NthHighestBar(1,H,P*2);
var3 = NthHighestBar(1,H,P*3);
var4 = NthHighestBar(1,H,P*4);
var5 = NthHighestBar(1,H,P*5);
var6 = NthHighestBar(1,H,P*6);
var7 = NthHighestBar(1,H,P*7);
var8 = NthHighestBar(1,H,P*8);
var9 = NthHighestBar(1,H,P*9);
var10 = NthHighestBar(1,H,P*10);
var11 = NthLowestBar(1,L,P);
var12 = NthLowestBar(1,L,P*2);
var13 = NthLowestBar(1,L,P*3);
var14 = NthLowestBar(1,L,P*4);
var15 = NthLowestBar(1,L,P*5);
var16 = NthLowestBar(1,L,P*6);
var17 = NthLowestBar(1,L,P*7);
var18 = NthLowestBar(1,L,P*8);
var19 = NthLowestBar(1,L,P*9);
var20 = NthLowestBar(1,L,P*10);
////////////////////////////////////////////////////////////
TL_Delete(H1);
H1 = TL_New(HD,HT,HV,Sdate[var1],Stime[var1],H[var1]);
TL_SetExtRight(H1,true);
TL_SetColor(H1,RGB(R,G,B));
TL_SetSize(H1,Size);
TL_Delete(L1);
L1 = TL_New(LD,LT,LV,Sdate[var11],Stime[var11],L[var11]);
TL_SetExtRight(L1,true);
TL_SetColor(L1,RGB(B,G,R));
TL_SetSize(L1,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H2);
H2 = TL_New(HD,HT,HV,Sdate[var2],Stime[var2],H[var2]);
TL_SetExtRight(H2,true);
TL_SetColor(H2,RGB(R,G,B));
TL_SetSize(H2,Size);
TL_Delete(L2);
L2 = TL_New(LD,LT,LV,Sdate[var12],Stime[var12],L[var12]);
TL_SetExtRight(L2,true);
TL_SetColor(L2,RGB(B,G,R));
TL_SetSize(L2,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H3);
H3 = TL_New(HD,HT,HV,Sdate[var3],Stime[var3],H[var3]);
TL_SetExtRight(H3,true);
TL_SetColor(H3,RGB(R,G,B));
TL_SetSize(H3,Size);
TL_Delete(L3);
L3 = TL_New(LD,LT,LV,Sdate[var13],Stime[var13],L[var13]);
TL_SetExtRight(L3,true);
TL_SetColor(L3,RGB(B,G,R));
TL_SetSize(L3,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H4);
H4 = TL_New(HD,HT,HV,Sdate[var4],Stime[var4],H[var4]);
TL_SetExtRight(H4,true);
TL_SetColor(H4,RGB(R,G,B));
TL_SetSize(H4,Size);
TL_Delete(L4);
L4 = TL_New(LD,LT,LV,Sdate[var14],Stime[var14],L[var14]);
TL_SetExtRight(L4,true);
TL_SetColor(L4,RGB(B,G,R));
TL_SetSize(L4,Size);
////////////////////////////////////////////////////////////////
TL_Delete(H5);
H5 = TL_New(HD,HT,HV,Sdate[var5],Stime[var5],H[var5]);
TL_SetExtRight(H5,true);
TL_SetColor(H5,RGB(R,G,B));
TL_SetSize(H5,Size);
TL_Delete(L5);
L5 = TL_New(LD,LT,LV,Sdate[var15],Stime[var15],L[var15]);
TL_SetExtRight(L5,true);
TL_SetColor(L5,RGB(B,G,R));
TL_SetSize(L5,Size);
////////////////////////////////////////////////////////////
TL_Delete(H6);
H6 = TL_New(HD,HT,HV,Sdate[var6],Stime[var6],H[var6]);
TL_SetExtRight(H6,true);
TL_SetColor(H6,RGB(R,G,B));
TL_SetSize(H6,Size);
TL_Delete(L6);
L6 = TL_New(LD,LT,LV,Sdate[var16],Stime[var16],L[var16]);
TL_SetExtRight(L6,true);
TL_SetColor(L6,RGB(B,G,R));
TL_SetSize(L6,Size);
////////////////////////////////////////////////////////////
TL_Delete(H7);
H7 = TL_New(HD,HT,HV,Sdate[var7],Stime[var7],H[var7]);
TL_SetExtRight(H7,true);
TL_SetColor(H7,RGB(R,G,B));
TL_SetSize(H7,Size);
TL_Delete(L7);
L7 = TL_New(LD,LT,LV,Sdate[var17],Stime[var17],L[var17]);
TL_SetExtRight(L7,true);
TL_SetColor(L7,RGB(B,G,R));
TL_SetSize(L7,Size);
////////////////////////////////////////////////////////////
TL_Delete(H8);
H8 = TL_New(HD,HT,HV,Sdate[var8],Stime[var8],H[var8]);
TL_SetExtRight(H8,true);
TL_SetColor(H8,RGB(R,G,B));
TL_SetSize(H8,Size);
TL_Delete(L8);
L8 = TL_New(LD,LT,LV,Sdate[var18],Stime[var18],L[var18]);
TL_SetExtRight(L8,true);
TL_SetColor(L8,RGB(B,G,R));
TL_SetSize(L8,Size);
////////////////////////////////////////////////////////////
TL_Delete(H9);
H9 = TL_New(HD,HT,HV,Sdate[var9],Stime[var9],H[var9]);
TL_SetExtRight(H9,true);
TL_SetColor(H9,RGB(R,G,B));
TL_SetSize(H9,Size);
TL_Delete(L9);
L9 = TL_New(LD,LT,LV,Sdate[var19],Stime[var19],L[var19]);
TL_SetExtRight(L9,true);
TL_SetColor(L9,RGB(B,G,R));
TL_SetSize(L9,Size);
////////////////////////////////////////////////////////////
TL_Delete(H10);
H10 = TL_New(HD,HT,HV,Sdate[var10],Stime[var10],H[var10]);
TL_SetExtRight(H10,true);
TL_SetColor(H10,RGB(R,G,B));
TL_SetSize(H10,Size);
TL_Delete(L10);
L10 = TL_New(LD,LT,LV,Sdate[var20],Stime[var20],L[var20]);
TL_SetExtRight(L10,true);
TL_SetColor(L10,RGB(B,G,R));
TL_SetSize(L10,Size);
2014-10-27
162
글번호 79768
답변완료
질문드립니다.
관리자님, 수고 많으십니다. 항상 친절하게 답변해주셔서 감사합니다.
아래 매수식에 대한 첫봉 오류를 수정해주시고, 추가사항을 넣어 주시기 바랍니다.
input : P(14);
var1 = RSI(P);
if date != date[1] Then{
Condition1 = false;
Condition2 = false;
Condition3 = false;
}
if crossup(var1,34) Then
Condition1 = true;
if crossup(c,기준조건) Then
Condition2 = true;
Condition3 = Condition1 == true and Condition2 == true and
var1 > 34 and C > 기준조건;
if Condition3 == true and Condition3[1] == false and c>open Then
buy();
* 당일 첫봉 오류를 수정해 주세요.
수정사항: 위의 매수식을 사용했더니, 당일 첫봉에서 오류가 발생합니다. 당일에 RSI 34선과 기준조건 아래인 적이 없었는데도 前일에 이어 계산되어 당일 첫봉에 매수신호가 발생합니다. RSI 34선 돌파(Condition1)와 기준조건 돌파(Condition2)는 당일 첫봉 이후의 기준으로 당일 RSI 34선 아래에서 위로 돌파되어야 하며 기준조건도 당일 기준조건 아래에서 위로 돌파되어야 합니다. 수정해 주세요.
* 위의 매수식에 추가사항을 달아주세요.
추가사항: 위의 RSI 34 상향돌파와 기준조건 상향돌파는 서로 6개봉의 범위 안에서 모두 발생해야함. (한 조건 발생 후, 6개봉이 완성될 때까지 나머지 조건이 발생하지 않으면, 무효)
추가사항: 당일 수익 거래 이후는 신규매수 금지
추가사항: 신규매수는 당일 40번째 봉까지
2014-10-27
164
글번호 79767
답변완료
일봉에서 주봉의 거래량 및 이평선 문의
수고하십니다.
일봉에서 주봉의 거래량 및 5주봉 이평선을 표현하고 싶습니다.
부탁드립니다.
2014-10-27
163
글번호 79766
답변완료
부탁드립니다
아래의 지표를 NDAYAGO를 0,1,2,3,4 를 한꺼번에 나타낼수 있도록 작성할려 하는데
어렵습니다..어찌해야 할지요...부탁드립니다...
다시말해서 당일치와 전일/전전일/전전전일/전전전전일치를 각각 나타내려 합니다..
NDAYAGO의 수치를 바꾸어서 나타내면 되지만 시스템식을 만들려하니
제가 원하는 방식이 필요한듯 합니다...수고스럽지만 부탁드립니다....
input : Length(10); //SwingHigh와 SwingLow의 기간값
input : LengthMult(2); //기본 기간값에 N배수(굵게 표시되는 중요 지지선과 저항선)
input : NdayAgo(0); //N일전(0이면 당일, 1이면 전일, 2이면 전전일...)
var : 저항선(0), 지지선(0), Rcount(0), Scount(0);
var : 저항선2(0), 지지선2(0), Rcount2(0), Scount2(0);
var : R1(0), R2(0), R3(0), R4(0), R5(0), R6(0), R7(0), R8(0), R9(0),R10(0),
R11(0), R12(0), R13(0), R14(0), R15(0), R16(0), R17(0), R18(0), R19(0),R20(0);
var : S1(0), S2(0), S3(0), S4(0), S5(0), S6(0), S7(0), S8(0), S9(0),S10(0),
S11(0), S12(0), S13(0), S14(0), S15(0), S16(0), S17(0), S18(0), S19(0),S20(0);
var : R81(0), R82(0), R83(0), R84(0), R85(0), S91(0), S92(0), S93(0), S94(0), S95(0);
var1 = DateToJulian(currentdate);
var2 = DateToJulian(date);
if var2 >= var1-NdayAgo && dayindex >= Length-1 then {
저항선 = SwingHigh(1, H, Length, Length, Length*2+1);
지지선 = swingLow(1, L, Length, Length, Length*2+1);
if 저항선 == -1 Then 저항선 = 저항선[1];
if 지지선 == -1 Then 지지선 = 지지선[1];
if 저항선 != 저항선[1] then Rcount = Rcount + 1;
if 지지선 != 지지선[1] Then Scount = Scount + 1;
if Rcount == 1 then R1 = 저항선;
if Rcount == 2 Then R2 = 저항선;
if Rcount == 3 then R3 = 저항선;
if Rcount == 4 Then R4 = 저항선;
if Rcount == 5 then R5 = 저항선;
if Rcount == 6 Then R6 = 저항선;
if Rcount == 7 then R7 = 저항선;
if Rcount == 8 Then R8 = 저항선;
if Rcount == 9 then R9 = 저항선;
if Rcount == 10 Then R10 = 저항선;
if Rcount == 11 then R11 = 저항선;
if Rcount == 12 Then R12 = 저항선;
if Rcount == 13 then R13 = 저항선;
if Rcount == 14 Then R14 = 저항선;
if Rcount == 15 then R15 = 저항선;
if Rcount == 16 Then R16 = 저항선;
if Rcount == 17 then R17 = 저항선;
if Rcount == 18 Then R18 = 저항선;
if Rcount == 19 then R19 = 저항선;
if Rcount == 20 Then R20 = 저항선;
if Scount == 1 then S1 = 지지선;
if Scount == 2 Then S2 = 지지선;
if Scount == 3 then S3 = 지지선;
if Scount == 4 Then S4 = 지지선;
if Scount == 5 then S5 = 지지선;
if Scount == 6 Then S6 = 지지선;
if Scount == 7 then S7 = 지지선;
if Scount == 8 Then S8 = 지지선;
if Scount == 9 then S9 = 지지선;
if Scount == 10 Then S10 = 지지선;
if Scount == 11 then S11 = 지지선;
if Scount == 12 Then S12 = 지지선;
if Scount == 13 then S13 = 지지선;
if Scount == 14 Then S14 = 지지선;
if Scount == 15 then S15 = 지지선;
if Scount == 16 Then S16 = 지지선;
if Scount == 17 then S17 = 지지선;
if Scount == 18 Then S18 = 지지선;
if Scount == 19 then S19 = 지지선;
if Scount == 20 Then S20 = 지지선;
if R1 > 0 then plot1(R1, "R1", RED);
if R2 > 0 then plot2(R2, "R2", RED);
if R3 > 0 then plot3(R3, "R3", RED);
if R4 > 0 then plot4(R4, "R4", RED);
if R5 > 0 then plot5(R5, "R5", RED);
if R6 > 0 then plot6(R6, "R6", RED);
if R7 > 0 then plot7(R7, "R7", RED);
if R8 > 0 then plot8(R8, "R8", RED);
if R9 > 0 then plot9(R9, "R9", RED);
if R10 > 0 then plot10(R10, "R10", RED);
if R11 > 0 then plot11(R11, "R11", RED);
if R12 > 0 then plot12(R12, "R12", RED);
if R13 > 0 then plot13(R13, "R13", RED);
if R14 > 0 then plot14(R14, "R14", RED);
if R15 > 0 then plot15(R15, "R15", RED);
if R16 > 0 then plot16(R16, "R16", RED);
if R17 > 0 then plot17(R17, "R17", RED);
if R18 > 0 then plot18(R18, "R18", RED);
if R19 > 0 then plot19(R19, "R19", RED);
if R20 > 0 then plot20(R20, "R20", RED);
if S1 > 0 then plot51(S1, "S1", BLUE);
if S2 > 0 then plot52(S2, "S2", BLUE);
if S3 > 0 then plot53(S3, "S3", BLUE);
if S4 > 0 then plot54(S4, "S4", BLUE);
if S5 > 0 then plot55(S5, "S5", BLUE);
if S6 > 0 then plot56(S6, "S6", BLUE);
if S7 > 0 then plot57(S7, "S7", BLUE);
if S8 > 0 then plot58(S8, "S8", BLUE);
if S9 > 0 then plot59(S9, "S9", BLUE);
if S10 > 0 then plot60(S10, "S10", BLUE);
if S11 > 0 then plot61(S11, "S11", BLUE);
if S12 > 0 then plot62(S12, "S12", BLUE);
if S13 > 0 then plot63(S13, "S13", BLUE);
if S14 > 0 then plot64(S14, "S14", BLUE);
if S15 > 0 then plot65(S15, "S15", BLUE);
if S16 > 0 then plot66(S16, "S16", BLUE);
if S17 > 0 then plot67(S17, "S17", BLUE);
if S18 > 0 then plot68(S18, "S18", BLUE);
if S19 > 0 then plot69(S19, "S19", BLUE);
if S20 > 0 then plot70(S20, "S20", BLUE);
}
# 중요 지지저항선은 굵게 표시
if var2 >= var1-NdayAgo && dayindex >= Length*LengthMult-1 then {
저항선2 = SwingHigh(1, H, Length*LengthMult, Length*LengthMult, Length*LengthMult*2+1);
지지선2 = swingLow(1, L, Length*LengthMult, Length*LengthMult, Length*LengthMult*2+1);
if 저항선2 == -1 Then 저항선2 = 저항선2[1];
if 지지선2 == -1 Then 지지선2 = 지지선2[1];
if 저항선2 != 저항선2[1] then Rcount2 = Rcount2 + 1;
if 지지선2 != 지지선2[1] Then Scount2 = Scount2 + 1;
if Rcount2 == 1 then R81 = 저항선2;
if Rcount2 == 2 Then R82 = 저항선2;
if Rcount2 == 3 then R83 = 저항선2;
if Rcount2 == 4 Then R84 = 저항선2;
if Rcount2 == 5 then R85 = 저항선2;
if Scount2 == 1 then S91 = 지지선2;
if Scount2 == 2 Then S92 = 지지선2;
if Scount2 == 3 then S93 = 지지선2;
if Scount2 == 4 Then S94 = 지지선2;
if Scount2 == 5 then S95 = 지지선2;
//아래 plot들은 속성창에서 굵게 표시해야 함
if R81 > 0 then plot81(R81, "R81", RED);
if R82 > 0 then plot82(R82, "R82", RED);
if R83 > 0 then plot83(R83, "R83", RED);
if R84 > 0 then plot84(R84, "R84", RED);
if R85 > 0 then plot85(R85, "R85", RED);
if S91 > 0 then plot91(S91, "S91", BLUE);
if S92 > 0 then plot92(S92, "S92", BLUE);
if S93 > 0 then plot93(S93, "S93", BLUE);
if S94 > 0 then plot94(S94, "S94", BLUE);
if S95 > 0 then plot95(S95, "S95", BLUE);
}
2014-10-27
175
글번호 79765