커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4481
글번호 230811
답변완료
수식 변형부탁드립니다
안녕하세요
아래 수식을 고저점 수치가 나타나도록 수정 부탁드립니다
감사합니다
Input:length(2),Period1(2);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),처리구분(""),
TL_Val1(0),TL_Val2(0),ADXv1(0),Text2(0);
var : T(0),LTL1(0),ltl2(0),ltl3(0);
var : HTL1(0),htl2(0),htl3(0);
Array:고점[10,2](0),저점[10,2](0);
ADXv1 = ADX(Period1);
var1 = MedianPrice;
처리구분 = "";
If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then
{ If 저점[1,1] > L Then 처리구분 = "저점처리";
If 고점[1,1] < H Then 처리구분 = "고점처리";
}
Else If Highest(H,length) == H and lastHiVal <> H Then 처리구분 = "고점처리";
Else If Lowest(L,length) == L and lastLoVal <> L Then 처리구분 = "저점처리";
If 처리구분 == "고점처리" Then
{
T = 1;
lastHiVal = H;
If 고점[1,2] < 저점[1,2] Then
{
For j = 10 DownTo 2
{
고점[j,1] = 고점[j-1,1];
고점[j,2] = 고점[j-1,2];
}
}
If 고점[1,2] < 저점[1,2] or 고점[1,1] < H Then
{
고점[1,1] = H;
고점[1,2] = Index;
sBar = Index - 저점[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]);
if T[1] != 1 Then{
LTL1 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],저점[2,1],sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1]);
LTL2 = LTL1[1];
LTL3 = LTL2[1];
TL_SetExtRight(LTL1,true);
TL_SetExtRight(LTL3,False);
}
If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then
{
sBar = Index - 저점[2,2];
eBar = Index - 저점[1,2];
}
}
}
If 처리구분 == "저점처리" Then
{
T = -1;
lastLoVal = L;
If 저점[1,2] < 고점[1,2] Then
{
For j = 10 DownTo 2
{
저점[j,1] = 저점[j-1,1];
저점[j,2] = 저점[j-1,2];
}
}
If 저점[1,2] < 고점[1,2] or 저점[1,1] > L Then
{
저점[1,1] = L;
저점[1,2] = Index;
sBar = Index - 고점[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]);
if T[1] != -1 then{
HTL1 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],고점[2,1],sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1]);
HTL2 = HTL1[1];
HTL3 = HTL2[1];
TL_SetExtRight(HTL1,true);
TL_SetExtRight(HTL3,false);
}
If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then
{
sBar = Index - 고점[2,2];
eBar = Index - 고점[1,2];
}
}
}
TL_SetColor(LTL1,RED);
TL_SetColor(HTL1,BLUE);
TL_SetColor(LTL2,RGB(129,129,129));
TL_SetColor(HTL2,RGB(129,129,129));
TL_SetColor(TL1,BLACK);
TL_SetSize(LTL1,4);
TL_SetSize(HTL1,4);
TL_SetSize(LTL2,0);
TL_SetSize(HTL2,0);
TL_SetSize(TL1,1);
2019-01-15
175
글번호 125295
답변완료
부탁 드립니다.
수식1)의 지정된 일시 이후 에서 선을 긋도록 작성 하였지만
그림과 같이 그이전 일시의 저점에서부터 긋고 있습니다.
지정된 일시 이후에 긋도록
수정 부탁 드립니다.
아울러 선의 색상도 green으로 부탁 드립니다.
수식2)의 선이 그어지는 기준점이 현재주 월요일이 아닌
1주전 월요일에서 부터 긋도록 부탁 드립니다.
수식1)
Input:length(10),기준일(20190110),기준시간(100000),파동선두께(2);
Var:j(0),jj(0),jjj(0),최종고가(0),최종저가(0),최종변곡점(""),처리구분(""),
TL1(0);
Array:고[5,4](0),저[5,4](0), // 1:가격, 2:Index, 3:sDate, 4:sTime
역사적고점[5](0),역사적저점[5](0); // 1:가격, 2:Index, 3:sDate, 4:sTime
var : Tcond(false);
if sdate >= 기준일 and stime >= 기준시간 Then
Tcond = true;
#==========================================#
If Index == 0 Then
{
고[1,1] = H;
저[1,1] = L;
}
Condition1 = Highest(H,length) == H and 최종고가 <> H;
Condition2 = Lowest (L,length) == L and 최종저가 <> L;
처리구분 = "";
If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생
{
If 최종변곡점 == "저점" Then 처리구분 = "고점처리"; // 저 - 고 순으로 처리
Else 처리구분 = "저점처리"; // 고 - 저 순으로 처리
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
#==========================================#
If 처리구분 == "고점처리" Then
{
최종고가 = H; // 신규고점을 체크하기 위해 저장
If 최종변곡점 == "저점" Then
{
For j = 5 DownTo 2
{
For jj = 1 To 4
{
고[j,jj] = 고[j-1,jj];
}
}
고[1,1] = H;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
//TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,GREEN);
}
Else If 고[1,1] < H Then // 1번 고점보다 높은 고가 출현
{
고[1,1] = H;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
}
If Tcond == true and 역사적고점[1] < 고[1,1] Then
{
For jjj = 1 To 4 // 1:가격, 2:Index, 3:sDate, 4:sTime
{
역사적고점[jjj] = 고[1,jjj];
//역사적저점[jjj] = 0; // 역사적 고점 초기화
}
}
최종변곡점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then
{
최종저가 = L;
If 최종변곡점 == "고점" then
{
For j = 5 DownTo 2
{
For jj = 1 To 4
{
저[j,jj] = 저[j-1,jj];
}
}
저[1,1] = L;
저[1,2] = Index;
저[1,3] = sDate;
저[1,4] = sTime;
//TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,GREEN);
}
Else If 저[1,1] > L then
{
저[1,1] = L;
저[1,3] = sDate;
저[1,4] = sTime;
저[1,2] = Index;
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
}
If ( 역사적저점[1] > 저[1,1] or 역사적저점[1] == 0 ) Then
{
For jjj = 1 To 4
{
역사적저점[jjj] = 저[1,jjj];
역사적고점[jjj] = 0;
}
}
최종변곡점 = "저점";
}
#==========================================#
Var:기울기(0);
Array:fr[7,4](0); // 1:비율, 2:값, 3:라인번호, 4:텍스트번호
If Index == 0 Then
{
fr[1,1] = 0;
fr[2,1] = 0.236;
fr[3,1] = 0.382;
fr[4,1] = 0.50;
fr[5,1] = 0.618;
fr[6,1] = 0.764;
fr[7,1] = 1;
}
If 역사적고점[1] > 0 and 역사적저점[1] > 0 Then
{
If 역사적고점[1][1] != 역사적고점[1] or 역사적저점[1][1] != 역사적저점[1] Then
{
기울기 = (역사적고점[1] - 역사적저점[1]) / (역사적고점[2] - 역사적저점[2]);
for j = 1 to 7
{
If fr[j,3] > 0 Then TL_Delete(fr[j,3]); // 기존의 라인은 지우고
fr[j,2] = 기울기 * fr[j,1] * (index - 역사적저점[2]) + 역사적저점[1]; // 피보나치 비율을 곱해서 계산
fr[j,3] = TL_New(역사적저점[3],역사적저점[4],역사적저점[1],sDate,sTime,fr[j,2]); // 라인을 생성
}
}
Else
{
for j = 1 to 7
{
fr[j,2] = 기울기 * fr[j,1] * (index - 역사적저점[2]) + 역사적저점[1];
TL_SetEnd(fr[j,3],sDate,sTime,fr[j,2]);
}
}
}
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
Text_Delete(var5);
Text_Delete(var6);
Text_Delete(var7);
수식2)
Input:length(10),파동선두께(2);
Var:j(0),jj(0),jjj(0),최종고가(0),최종저가(0),최종변곡점(""),처리구분(""),TL1(0);
Array:고[5,4](0),저[5,4](0), // 1:가격, 2:Index, 3:sDate, 4:sTime
역사적고점[5](0),역사적저점[5](0); // 1:가격, 2:Index, 3:sDate, 4:sTime
Var:기울기(0);
Array:fr[7,4](0); // 1:비율, 2:값, 3:라인번호, 4:텍스트번호
If Index == 0 or (DayOfWeek(bdate) < DayOfWeek(bdate[1])) Then
{
고[1,1] = H;
저[1,1] = L;
역사적고점[1] = 0;
역사적저점[1] = 0;
for j = 1 to 7
{
If fr[j,3] > 0 Then TL_Delete(fr[j,3]);
}
}
Condition1 = Highest(H,length) == H and 최종고가 <> H;
Condition2 = Lowest (L,length) == L and 최종저가 <> L;
처리구분 = "";
If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생
{
If 최종변곡점 == "저점" Then
처리구분 = "고점처리"; // 저 - 고 순으로 처리
Else
처리구분 = "저점처리"; // 고 - 저 순으로 처리
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
If 처리구분 == "고점처리" Then
{
최종고가 = H; // 신규고점을 체크하기 위해 저장
If 최종변곡점 == "저점" Then
{
For j = 5 DownTo 2
{
For jj = 1 To 4
{
고[j,jj] = 고[j-1,jj];
}
}
고[1,1] = H;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
//TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,GREEN);
}
Else If 고[1,1] < H Then // 1번 고점보다 높은 고가 출현
{
고[1,1] = H;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
}
If 역사적고점[1] < 고[1,1] Then
{
For jjj = 1 To 4 // 1:가격, 2:Index, 3:sDate, 4:sTime
{
역사적고점[jjj] = 고[1,jjj];
역사적저점[jjj] = 0; // 역사적 고점 초기화
}
}
최종변곡점 = "고점";
}
If 처리구분 == "저점처리" Then
{
최종저가 = L;
If 최종변곡점 == "고점" then
{
For j = 5 DownTo 2
{
For jj = 1 To 4
{
저[j,jj] = 저[j-1,jj];
}
}
저[1,1] = L;
저[1,2] = Index;
저[1,3] = sDate;
저[1,4] = sTime;
//TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,GREEN);
}
Else If 저[1,1] > L then
{
저[1,1] = L;
저[1,3] = sDate;
저[1,4] = sTime;
저[1,2] = Index;
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
}
If ( 역사적저점[1] > 저[1,1] or 역사적저점[1] == 0 ) Then
{
For jjj = 1 To 4
{
역사적저점[jjj] = 저[1,jjj];
}
}
최종변곡점 = "저점";
}
If Index == 0 Then
{
fr[1,1] = 0;
fr[2,1] = 0.236;
fr[3,1] = 0.382;
fr[4,1] = 0.50;
fr[5,1] = 0.618;
fr[6,1] = 0.764;
fr[7,1] = 1;
}
If 역사적고점[1] > 0 and 역사적저점[1] > 0 Then
{
If 역사적고점[1][1] != 역사적고점[1] or 역사적저점[1][1] != 역사적저점[1] Then
{
기울기 = (역사적고점[1] - 역사적저점[1]) / (역사적고점[2] - 역사적저점[2]);
for j = 1 to 7
{
If fr[j,3] > 0 Then TL_Delete(fr[j,3]); // 기존의 라인은 지우고
fr[j,2] = 역사적고점[1] + 기울기 * fr[j,1] * (index - 역사적고점[2]) ; // 피보나치 비율을 곱해서 계산
fr[j,3] = TL_New(역사적고점[3],역사적고점[4],역사적고점[1],sDate,sTime,fr[j,2]); // 라인을 생성
}
}
Else
{
for j = 1 to 7
{
fr[j,2] = 역사적고점[1] + 기울기 * fr[j,1] * (index - 역사적고점[2]);
TL_SetEnd(fr[j,3],sDate,sTime,fr[j,2]);
}
}
}
2019-01-16
313
글번호 125290
답변완료
수식 부탁드립니다.
두 가지 수식 부탁드립니다. 감사합니다.
1.
매수 : 당일시가+1틱을 돌파 시 매수
매도 : 당일시가-1틱을 이탈 시 매도
기타변수 : 당일 위 신호값 중 1,2번째 신호는 무시하고 3번째부터 적용.
2.
기준선 두 개(옵션가격 1.2 2.5)를 외부입력으로 설정하고
매수 : 각 기준선 + 1틱 값을 돌파 시 매수
매도 : 각 기준선 - 1틱 값을 이탈 시 매도
2019-01-15
151
글번호 125289
답변완료
판매시스템 질문요
1. 판매시스템에 올려지면 판매를 하는건데요. 그럼 구매자가 판매자의 상품을 구매하면 작동은 어디서 되는건가요? 판매자의 개인PC에서 돌아가요? 아니면 이곳 서버에서 돌아가요? (서버에서는 구동하지 않는다고 하신거 같아요...)
2. 판매시스템에 올려지면 자신만의 로직이 오픈되고 다 알려지게 되는건가요?
3. 예스랭귀지말고 저는 예스스팟으로 할건데요. 예스스탁은 판매시스템, 공개테스트 모두 적용 안되나요?
4. 판매시스템의 상품들을보면 수익 그래프가 보여지는데요.
과거 데이타로 돌린 시뮬레이션이 보여지는건가요? 아니면 실제 매매한 결과의 그래프를 보여주나요?
5. 예스스탁으로 로직 만들고 시뮬레이션돌릴때, 현재가로 매수 매도 모두 하기때문에, 이건 사실 정확한 시뮬레이션이 될수 없다고 보는데요.. 호가창의 매도(또는 매수)가격이 중요한데 이건 제공안하므로 시뮬레이션이 신빙성이 없다고 생각되는데요. 어떠신지요.
2019-01-15
155
글번호 125288
답변완료
매매선 요청
* 매수선 빨강 매도선 파랑 으로 매매된 가격 을 수평으로 부탁드립니다.
보유가 없으면 선은 없습니다.
고맙습니다.
2019-01-15
189
글번호 125287
답변완료
수식 부탁드립니다.
간단한 지표 수식 부탁드립니다.
옵션가격 1.2 2.5 3.5 4.5 가격선(외부입력)을 만들어주시면 감사하겠습니다.
수고하십시오~~
2019-01-15
176
글번호 125286
답변완료
질문드립니다.
If MarketPosition() == 1 and BarsSinceEntry() == 540 Then
ExitLong("청",AtStop,Close,DEF);
위의 조건은 45분 경과할시 청산하라는 식입니다.
5초봉에서 1분(60초)간 12개의 5초봉캔들이 생성되니, 12*45=540이니 540개캔들이후 청산하라고 명령하였으나 어떤건 45맞춰서 청산되나, 어떤건 48분, 50분있다 청산되고하네요. 무엇이 문제인지요?
초봉에서 캔들카운트 오차가있는것인지요? 시간이 지나면 무조건적으로 한개가 생성되어야하는데 그렇지않다면, 초봉에서는 시간이 지나도 거래가없으면 캔들생성이 안되는 것인가요?
위와같은 문제라면 진입이후 data2에서 캔들이 n개봉경과시 청산식 부탁드립니다.
2. 스톱프로핏타겟과 유사한 청산식이 있는지요? 2% 수익시 매입종목의 50%를 청산나가게 하고싶습니다.
2019-01-15
154
글번호 125285
답변완료
함수요청
안녕하세요?
아래는 하나금융투자에서 크루드오일 5분봉을 천연가스 5분봉을 참조하여 매매했던 전략입니다.
예스트레이더에서 사용할 수 있도록 함수 변환 요청드립니다.
Var : ii( 0 ), st( 0 ), et( 0),Summercond(False),CMEStartTime(0) ;
Var : Sp(0),TickValue(0);
Sp = SignalPosition;
TickValue = OneTick * PriceScale;
Value1 = (10000 * Year(D)) + (100 * 3) + 1;
Value2 = 15 - dayofweek(value1); // 3월 두번째 일요일 날짜
value3 = (10000 * Year(D)) + (100 * 11) + 1;
value4 = 8 - dayofweek(value3); // 11월 첫번째 일요일 날짜
Summercond = date > (10000 * Year(D)) + (100 * 3) + value2
And date < (10000 * Year(D)) + (100 * 11) + value4;
If Summercond = true
Then
Begin
CMEStartTime = 223000; // 써머타임 적용 시, 장시작 시간
et = 0305500; // 써머타임 적용 시, 장종료 시간
End
Else
Begin
CMEStartTime = 233000; // 장 시작 시간
et = 040500; // 장 종료 시간
End;
//장 시각후 첫봉에서 참조종목의 시가를 저장
if time >= CMEStartTime And time[1] < CMEStartTime Then
value14 = Data2(O);
//참조종목의 시가와 종가를 저장
value11 = Data2(C);
value12 = Data2(O);
//DATA2의 일봉상 양봉인지 음봉인지 계산
value13 = value11 - value14;
//22시 30분에 참조종목이 일봉상 양봉이면 매수
//음봉이면 매도
if time >= 223000 And time[1] < 223000 Then
Begin
if value13 > 0 Then
Buy("Buy",Atmarket)
Else if value13 < 0 Then
Sell("Sell",Atmarket);
End;
//매수 진입이후 참조종목이 일봉상 음(양)봉이 되면 청산
if SignalPosition = 1 And value11 < value14 Then
ExitLong("EL",Atmarket)
Else if SignalPosition = -1 And value11 > value14 Then
ExitShort("ES",Atmarket);
Params : EXTtime(030000);
SetStopEndofday(et);
//SetStopEndofday(EXTtime);
2019-01-15
190
글번호 125284
답변완료
문의드립니다
Input:length(5);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),TL2(0),TL3(0),Text1(0),처리구분(""),
TL_Val1(0),TL_Val2(0);
Var:TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0),TL19(0),TL20(0),tx(0);
Var:TL21(0),TL22(0),TL23(0),TL24(0),TL25(0),TL26(0),TL27(0),TL28(0),TL29(0),TL30(0),mav(0),T(0);
Array:고점[10,2](0),저점[10,2](0);
처리구분 = "";
If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then
{ If 저점[1,1] > L Then 처리구분 = "저점처리";
If 고점[1,1] < H Then 처리구분 = "고점처리";
}
Else If Highest(H,length) == H and lastHiVal <> H Then 처리구분 = "고점처리";
Else If Lowest(L,length) == L and lastLoVal <> L Then 처리구분 = "저점처리";
If 처리구분 == "고점처리" Then
{
lastHiVal = H;
If 고점[1,2] < 저점[1,2] Then
{
For j = 10 DownTo 2
{
고점[j,1] = 고점[j-1,1];
고점[j,2] = 고점[j-1,2];
}
}
If 고점[1,2] < 저점[1,2] or 고점[1,1] < H Then
{
고점[1,1] = H;
고점[1,2] = Index;
sBar = Index - 저점[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
TL_Delete(TL11);
Text_Delete(Text1);
If 고점[3,1][1] < 고점[2,1][1] and 고점[2,1][1] > 고점[1,1][1] and 저점[2,1][1] < 저점[1,1][1] Then
TL_Delete(TL2);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]);
// TL11 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],c[index-고점[2,2]],sDate[1],sTime[1],c[index-고점[2,2]]);
//Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],NumToStr(고점[1,1],2));
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
TL_SetColor(TL1,BLACK);
//TL_SetColor(TL11,BLACK);
TL_SetSize(TL1,1);
//TL_SetSize(TL11,1);
If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then
{
sBar = Index - 저점[2,2];
eBar = Index - 저점[1,2];
}
}
}
If 처리구분 == "저점처리" Then
{
lastLoVal = L;
If 저점[1,2] < 고점[1,2] Then
{
For j = 10 DownTo 2
{
저점[j,1] = 저점[j-1,1];
저점[j,2] = 저점[j-1,2];
}
}
If 저점[1,2] < 고점[1,2] or 저점[1,1] > L Then
{
저점[1,1] = L;
저점[1,2] = Index;
sBar = Index - 고점[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
TL_Delete(TL11);
Text_Delete(Text1);
If 저점[2,1][1] < 저점[1,1][1] and 저점[2,1][1] < 저점[3,1][1] and 고점[2,1][1] > 고점[1,1][1] Then
TL_Delete(TL3);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]);
//TL11 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],c[index-저점[2,2]],sDate[1],sTime[1],c[index-저점[2,2]]);
//Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],NumToStr(저점[1,1],2));
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
TL_SetColor(TL1,BLACK);
//TL_SetColor(TL11,BLACK);
TL_SetSize(TL1,1);
//TL_SetSize(TL11,1);
If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then
{
sBar = Index - 고점[2,2];
eBar = Index - 고점[1,2];
}
}
}
mav = ma(C,20);
TL_Delete(TL13);
TL_Delete(TL14);
if 고점[1,2] > 저점[1,2] then{
TL13 = TL_New(sDate[index-고점[1,2]],sTime[index-고점[1,2]],H[index-고점[1,2]],sDate,sTime,H[index-고점[1,2]]);
TL_SetColor(TL13,RED);
TL_SetSize(TL13,3);
TL_SetExtRight(TL13,true);
}
if 고점[1,2] < 저점[1,2] then{
TL14 = TL_New(sDate[index-저점[1,2]],sTime[index-저점[1,2]],L[index-저점[1,2]],sDate,sTime,L[index-저점[1,2]]);
TL_SetColor(TL14,PINK);
TL_SetSize(TL14,3);
TL_SetExtRight(TL14,true);
}
plot1(index-고점[1,2]);
plot2(index-저점[1,2]);
수평선을 틱수로5틱이상 5틱이하로 나오게 하고십습니다 ~부탁드립니다
2019-01-15
160
글번호 125277