커뮤니티
문의드립니다.
2014-05-22 11:33:19
142
글번호 75285
1.
Input : Period(12), Period1(5), Period2(5);
var1 = StochasticsK(Period,Period1);
var2 = StochasticsD(Period,Period1,Period2);
if var1> var1[1] Then
Plot1(var1, "StochasticsK",RED);
Else
Plot1(var1, "StochasticsK",BLUE);
if var2> var2[2] Then
Plot2(var2, "StochasticsD",RED);
Else
Plot2(var2, "StochasticsD",BLUE);
Plot1(var1, "StochasticsK");
PlotBaseLine1(20, "기준선1");
PlotBaseLine2(80, "기준선2");
.................................................
상기식에서 스톡케이와 스톡디의 색깔이 변할때 마다 소리를 넣어주세요
경보음이 되어도 좋고 어떤 소리도 괜찮습니다.
2.
var1 = (H+L)/2;
var2 = ma(var1,2);
var3 = ma(H,20);
var4 = ma(L,20);
var5 = (var3+var4)/2;
if countif(C>O,2) == 2 and var2 > var5 Then
buy();
if countif(C<O,2) == 2 and var2 < var5 Then
ExitLong();
상기식을 데이타2 용으로 바꿔 주세요
3.
var1 = (H+L)/2;
var2 = ma(var1,2);
var3 = ma(H,20);
var4 = ma(L,20);
var5 = (var3+var4)/2;
if C > O and var1 > var3 Then
buy();
if C < O and var1 < var4 Then
ExitLong();
상기식을 데이타2 용으로 바꾸어 주세요
4.
input : 기간(7);
var : cnt(0),TL11(0),TL12(0),TL21(0),TL22(0);
Array :HD[10](0),HT[10](0),HH[10](0),LD[10](0),LT[10](0),LL[10](0);
if SwingHigh(1,H,기간,기간,기간*2+1) != -1 Then{
HD[0] = sdate[기간];
HT[0] = sTime[기간];
HH[0] = H[기간];
#plot1(HH[0]);
for cnt = 1 to 2{
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
if HH[cnt] > 0 and HH[0] < HH[cnt] Then{
if cnt == 1 Then{
TL_SetExtRight(TL11,False);
TL11 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]);
TL_SetExtRight(TL11,true);
TL_SetColor(TL11,RGB(0, 191, 255));
TL_SetSize( TL11,3);
}
if cnt == 2 Then{
TL_SetExtRight(TL12,False);
TL12 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]);
TL_SetExtRight(TL12,true);
TL_SetColor(TL12,RGB(0, 191, 255));
TL_SetSize( TL12,2);
}
}
}
}
if SwingLow(1,L,기간,기간,기간*2+1) != -1 Then{
LD[0] = sdate[기간];
LT[0] = sTime[기간];
LL[0] = L[기간];
#plot1(LL[0]);
for cnt = 1 to 2{
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
if LL[cnt] > 0 and LL[0] > LL[cnt] Then{
if cnt == 1 Then{
TL_SetExtRight(TL21,False);
TL21 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]);
TL_SetExtRight(TL21,true);
TL_SetColor(TL21,RGB(255, 20, 147));
TL_SetSize( TL21,3);
}
if cnt == 2 Then{
TL_SetExtRight(TL22,False);
TL22 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]);
TL_SetExtRight(TL22,true);
TL_SetColor(TL22,RGB(255,20, 147));
TL_SetSize( TL22,2); #TL2 추세선을 점선으로 지정
}
}
}
}
if (C > TL_GetValue(TL11,sdate,stime) and C[1] < TL_GetValue(TL11,sdate[1],stime[1])) or
(C > TL_GetValue(TL12,sdate,stime) and C[1] < TL_GetValue(TL12,sdate[1],stime[1])) Then
plot1(H);
if (C < TL_GetValue(TL21,sdate,stime) and C[1] > TL_GetValue(TL21,sdate[1],stime[1])) or
(C < TL_GetValue(TL22,sdate,stime) and C[1] > TL_GetValue(TL22,sdate[1],stime[1])) Then
plot1(L);
상기식을 데이타2 용으로 바꿔 주세요
감사합니다
답변 1
예스스탁 예스스탁 답변
2014-05-22 15:57:42
안녕하세요
예스스탁입니다.
1.
Input : Period(12), Period1(5), Period2(5);
var1 = StochasticsK(Period,Period1);
var2 = StochasticsD(Period,Period1,Period2);
if var1> var1[1] Then
{
Plot1(var1, "StochasticsK",RED);
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
}
Else
{
Plot1(var1, "StochasticsK",BLUE);
PlaySound("C:₩예스트레이더₩data₩Sound₩stop.wav");
}
if var2> var2[2] Then{
Plot2(var2, "StochasticsD",RED);
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
}
Else{
Plot2(var2, "StochasticsD",BLUE);
PlaySound("C:₩예스트레이더₩data₩Sound₩stop.wav");
}
Plot1(var1, "StochasticsK");
PlotBaseLine1(20, "기준선1");
PlotBaseLine2(80, "기준선2");
playsound함수는 사용자분의 컴퓨터 안의
wav파일의 경로와 이름을 지정해서 조건만족시 구동하는 함수입니다.
원하시는 웨이브파일의 경로와 이름을 지정해 주시면 됩니다.
위식에는 웨이브파일은 예스트레이더에 기본으로 제공되는 wav파일을 지정했습니다.
게시판에서 복사하시면 경로명 안의 ₩가 폰트가 깨질수 있으므로
경로안의 ₩를 다시 타이핑 해주시기 바랍니다
또한 playsound는 봉미완성시라도 if조건이 만족하면 계속 울리게 됩니다.
따로 횟수나 시점의 조절이 가능하지 않으므로 이용에 참고하시기 바랍니다.
2.
var : V1(0,data2),V2(0,data2),V3(0,data2),V4(0,data4),v5(0,data2);
v1 = data2((H+L)/2);
v2 = data2(ma(v1,2));
v3 = data2(ma(H,20));
v4 = data2(ma(L,20));
v5 = data2((v3+v4)/2);
if data2(countif(C>O,2) == 2 and v2 > v5) Then
buy();
if data2(countif(C<O,2) == 2 and v2 < v5) Then
ExitLong();
3.
var : V1(0,data2),V2(0,data2),V3(0,data2),V4(0,data4),v5(0,data2);
v1 = data2((H+L)/2);
v2 = data2(ma(v1,2));
v3 = data2(ma(H,20));
v4 = data2(ma(L,20));
v5 = data2((v3+v4)/2);
if data2(C > O and v1 > v3) Then
buy();
if data2(C < O and v1 < v4) Then
ExitLong();
4.
추세선 함수는 참조데이터에는 그려지지 않습니다.
참조데이터 내용으로는 변경할수 없습니다.
즐거운 하루되세요
> 타이거88 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 1.
Input : Period(12), Period1(5), Period2(5);
var1 = StochasticsK(Period,Period1);
var2 = StochasticsD(Period,Period1,Period2);
if var1> var1[1] Then
Plot1(var1, "StochasticsK",RED);
Else
Plot1(var1, "StochasticsK",BLUE);
if var2> var2[2] Then
Plot2(var2, "StochasticsD",RED);
Else
Plot2(var2, "StochasticsD",BLUE);
Plot1(var1, "StochasticsK");
PlotBaseLine1(20, "기준선1");
PlotBaseLine2(80, "기준선2");
.................................................
상기식에서 스톡케이와 스톡디의 색깔이 변할때 마다 소리를 넣어주세요
경보음이 되어도 좋고 어떤 소리도 괜찮습니다.
2.
var1 = (H+L)/2;
var2 = ma(var1,2);
var3 = ma(H,20);
var4 = ma(L,20);
var5 = (var3+var4)/2;
if countif(C>O,2) == 2 and var2 > var5 Then
buy();
if countif(C<O,2) == 2 and var2 < var5 Then
ExitLong();
상기식을 데이타2 용으로 바꿔 주세요
3.
var1 = (H+L)/2;
var2 = ma(var1,2);
var3 = ma(H,20);
var4 = ma(L,20);
var5 = (var3+var4)/2;
if C > O and var1 > var3 Then
buy();
if C < O and var1 < var4 Then
ExitLong();
상기식을 데이타2 용으로 바꾸어 주세요
4.
input : 기간(7);
var : cnt(0),TL11(0),TL12(0),TL21(0),TL22(0);
Array :HD[10](0),HT[10](0),HH[10](0),LD[10](0),LT[10](0),LL[10](0);
if SwingHigh(1,H,기간,기간,기간*2+1) != -1 Then{
HD[0] = sdate[기간];
HT[0] = sTime[기간];
HH[0] = H[기간];
#plot1(HH[0]);
for cnt = 1 to 2{
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
if HH[cnt] > 0 and HH[0] < HH[cnt] Then{
if cnt == 1 Then{
TL_SetExtRight(TL11,False);
TL11 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]);
TL_SetExtRight(TL11,true);
TL_SetColor(TL11,RGB(0, 191, 255));
TL_SetSize( TL11,3);
}
if cnt == 2 Then{
TL_SetExtRight(TL12,False);
TL12 = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]);
TL_SetExtRight(TL12,true);
TL_SetColor(TL12,RGB(0, 191, 255));
TL_SetSize( TL12,2);
}
}
}
}
if SwingLow(1,L,기간,기간,기간*2+1) != -1 Then{
LD[0] = sdate[기간];
LT[0] = sTime[기간];
LL[0] = L[기간];
#plot1(LL[0]);
for cnt = 1 to 2{
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
if LL[cnt] > 0 and LL[0] > LL[cnt] Then{
if cnt == 1 Then{
TL_SetExtRight(TL21,False);
TL21 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]);
TL_SetExtRight(TL21,true);
TL_SetColor(TL21,RGB(255, 20, 147));
TL_SetSize( TL21,3);
}
if cnt == 2 Then{
TL_SetExtRight(TL22,False);
TL22 = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]);
TL_SetExtRight(TL22,true);
TL_SetColor(TL22,RGB(255,20, 147));
TL_SetSize( TL22,2); #TL2 추세선을 점선으로 지정
}
}
}
}
if (C > TL_GetValue(TL11,sdate,stime) and C[1] < TL_GetValue(TL11,sdate[1],stime[1])) or
(C > TL_GetValue(TL12,sdate,stime) and C[1] < TL_GetValue(TL12,sdate[1],stime[1])) Then
plot1(H);
if (C < TL_GetValue(TL21,sdate,stime) and C[1] > TL_GetValue(TL21,sdate[1],stime[1])) or
(C < TL_GetValue(TL22,sdate,stime) and C[1] > TL_GetValue(TL22,sdate[1],stime[1])) Then
plot1(L);
상기식을 데이타2 용으로 바꿔 주세요
감사합니다