커뮤니티

문의드립니다.

프로필 이미지
회원
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 용으로 바꿔 주세요 감사합니다