예스스탁
예스스탁 답변
2020-01-07 16:55:37
안녕하세요
예스스탁입니다.
소리출력함수(playsound)는 함수내에 지정한 경로의 wav파일이 구동됩니다.
아래는 예스트레이더에 기본으로 제공되는 wav파일을 지정했습니다.
원하시는 wav파일의 경로와 이름으로 수정하시기 바랍니다.
게시판에서 식을 복사할 경우 경로명 중 ₩의 폰트가 깨질수 있으므로
₩는 다시 타이핑하시기 바랍니다.
iNPUT : p21(10), per(0.3),텍스트크기(10),세로선굵기(1), 매수세로선색상(red),매도세로선색상(blue);
var : hh(0), ll(0), hd(0), ld(0), hsa(0), lsa(0), hs(0), ls(0);
var : tx(0),t(0),tl(0);
HH = Highest(H, P21);
ll = lowest(l, p21);
if h==hh then hd=index;
if l==ll then ld=index;
if crossup(index-hd, 1) then
{
hsa = h;
hs = h[1];
t = 1;
}
if index-hd>=2 then hsa=hsa + ma(abs(c-o), 10)*per;
if crossup(index-ld, 1) then {
lsa = l;
ls = l[1];
t = -1;
}
if index-ld>=2 then lsa=lsa - ma(abs(c-o), 10)*per;
var1 = iff(h>hs, 0, hsa);
var2 = iff(l<ls, 0, lsa);
if var1 > 0 then
{
if T == 1 then
{
T = 2;
tx = Text_New(sdate,stime,H+PriceScale*2,"매도");
Text_SetColor(tx,white);
Text_SetStyle(tx,2,1);
Text_SetSize(tx,텍스트크기);
TL = TL_New(sdate,stime,9999999,sdate,stime,0);
TL_SetColor(TL,매도세로선색상);
TL_SetSize(TL,세로선굵기);
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
}
plot1(var1, "psar H");
}
if var2 > 0 then
{
if T == -1 then
{
T = -2;
tx = Text_New(sdate,stime,L-PriceScale*2,"매수");
Text_SetColor(tx,white);
Text_SetStyle(tx,0,2);
Text_SetSize(tx,텍스트크기);
TL = TL_New(sdate,stime,9999999,sdate,stime,0);
TL_SetColor(TL,매수세로선색상);
TL_SetSize(TL,세로선굵기);
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
}
plot2(var2, "psar L");
}
새해 복 많이 받으시고 즐거운 하루되시기 바랍니다.
> 유로파54 님이 쓴 글입니다.
> 제목 : 문의드립니다
> 안녕하세요
새해엔 건강과함께 모든일들이 잘되시는 한해가 되기를 기원합니다
아래수식은 얼마전에 모회원님의 질문에 답변주신 수식인데요
이 수식에서 매수 매도 텍스트가 나오는 시점에 세로선이 발생되도록 부탁드립니다
(* 선의 두께와 색상은 조정이 가능하도록 부탁드립니다)
또 가능하다면 이때 음성신호도 동시에 발생이 될수있다면 금상첨화이겠습니다
항상 감사드립니다 ^^*
------------------------------------------------------------------------------------
iNPUT : p21(10), per(0.3),텍스트크기(10);
var : hh(0), ll(0), hd(0), ld(0), hsa(0), lsa(0), hs(0), ls(0);
var : tx(0),t(0);
HH = Highest(H, P21);
ll = lowest(l, p21);
if h==hh then hd=index;
if l==ll then ld=index;
if crossup(index-hd, 1) then
{
hsa = h;
hs = h[1];
t = 1;
}
if index-hd>=2 then hsa=hsa + ma(abs(c-o), 10)*per;
if crossup(index-ld, 1) then {
lsa = l;
ls = l[1];
t = -1;
}
if index-ld>=2 then lsa=lsa - ma(abs(c-o), 10)*per;
var1 = iff(h>hs, 0, hsa);
var2 = iff(l<ls, 0, lsa);
if var1 > 0 then
{
if T == 1 then
{
T = 2;
tx = Text_New(sdate,stime,H+PriceScale*2,"매도");
Text_SetColor(tx,white);
Text_SetStyle(tx,2,1);
Text_SetSize(tx,텍스트크기);
}
plot1(var1, "psar H");
}
if var2 > 0 then
{
if T == -1 then
{
T = -2;
tx = Text_New(sdate,stime,L-PriceScale*2,"매수");
Text_SetColor(tx,white);
Text_SetStyle(tx,0,2);
Text_SetSize(tx,텍스트크기);
}
plot2(var2, "psar L");
}