커뮤니티
확인요청 드립니다. 83933글
2023-12-10 18:55:29
967
글번호 174711
좋은 한주 되십시요.
[ 요청1 ]
Input : Period(15),Upsim(50);
var1 = Simrido(Period);
if var1 >= Upsim Then PlotPaintBar(High, Low, "투자심리선",MAGENTA,Def,7);
else NoPlot(1);
상기 강조 지표에서 첫신호가 발생하고 10개봉(변수)중에 5개(변수) 이상이면
PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav");
소리가 날수 있도록 수식 좀 요청 드립니다.
[ 요청2]
아래글 재 확인 요청 드립니다. 83933글
즉 신호가 발생하면 다음신호에 의해서 수평선이 짧게(점수준) 됨니다.
이 점수준 수평선을 다음신호가 발생 해도
기본으로 Index <= var1 + 5 까지는 수평선이 그어지도록 요청 드립니다.
############################################################
83933글
############################################################
"기본 5봉 까지 수평 추세선을 그리고
5봉 보다 크면 다음신호가 발생할때 까지 계속 추세선을 그린다"
수정 좀 부탁 드립니다.
▶ 아래 수식
var : TX(0);
input : P(5),n(8),틱(3);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);
var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);
TL_SetColor(LTL[0],Black);
TL_Delete(LTL[n]);
TL_SetSize(LTL[0],2);
}
Else
{
TL_SetEnd(LTL[0],sDate,sTime,LL);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);
TL_SetColor(HTL[0],Magenta);
TL_SetSize(HTL[0],2);
TL_Delete(HTL[n]);
}
Else
{
TL_SetEnd(HTL[0],sDate,sTime,HH);
}
#######################################################################33
수고하십시요.
답변 1
예스스탁 예스스탁 답변
2023-12-11 15:37:54
안녕하세요
예스스탁입니다.
1
소리출력함수(playsound)는 함수내에 지정한 경로의 wav파일이 구동됩니다.
아래는 예스트레이더에 기본으로 제공되는 wav파일을 지정했습니다.
원하시는 wav파일의 경로와 이름으로 수정하시기 바랍니다.
게시판에서 식을 복사할 경우 경로명 중 ￦의 폰트가 깨질수 있으므로
￦는 다시 타이핑하시기 바랍니다.
Input : Period(15),Upsim(50);
var1 = Simrido(Period);
if var1 >= Upsim Then
{
PlotPaintBar(High, Low, "투자심리선",MAGENTA,Def,7);
if CountIf(var1 >= Upsim,10) >= 5 Then
PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav");
}
else
NoPlot(1);
2
var : TX(0);
input : P(5),n(8),틱(3);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0),LI[10](0),HI[10](0),Lv[10](0),Hv[10](0);;
var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);
var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
Li[cnt] = Li[cnt-1];
Lv[cnt] = Lv[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);
Lv[0] = LL;
Li[0] = Index;
TL_SetColor(LTL[0],Black);
TL_SetSize(LTL[0],2);
TL_Delete(LTL[n]);
}
Else
{
TL_SetEnd(LTL[0],NextBarSdate,NextBarStime,LL[0]);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
Hi[cnt] = Hi[cnt-1];
Hv[cnt] = Hv[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);
Hv[0] = HH;
Hi[0] = Index;
TL_SetColor(HTL[0],Magenta);
TL_SetSize(HTL[0],2);
TL_Delete(HTL[n]);
}
Else
{
TL_SetEnd(HTL[0],NextBarSdate,NextBarStime,HH);
}
For cnt = 1 to n-1
{
if LL[cnt] > 0 and Index <= Li[cnt]+5 Then
TL_SetEnd(LTL[cnt],NextBarSdate,NextBarStime,Lv[cnt]);
if HH[cnt] > 0 and Index <= Hi[cnt]+5 Then
TL_SetEnd(HTL[cnt],NextBarSdate,NextBarStime,Hv[cnt]);
}
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 확인요청 드립니다. 83933글
> 좋은 한주 되십시요.
[ 요청1 ]
Input : Period(15),Upsim(50);
var1 = Simrido(Period);
if var1 >= Upsim Then PlotPaintBar(High, Low, "투자심리선",MAGENTA,Def,7);
else NoPlot(1);
상기 강조 지표에서 첫신호가 발생하고 10개봉(변수)중에 5개(변수) 이상이면
PlaySound("C:￦예스트레이더￦data￦Sound￦alert.wav");
소리가 날수 있도록 수식 좀 요청 드립니다.
[ 요청2]
아래글 재 확인 요청 드립니다. 83933글
즉 신호가 발생하면 다음신호에 의해서 수평선이 짧게(점수준) 됨니다.
이 점수준 수평선을 다음신호가 발생 해도
기본으로 Index <= var1 + 5 까지는 수평선이 그어지도록 요청 드립니다.
############################################################
83933글
############################################################
"기본 5봉 까지 수평 추세선을 그리고
5봉 보다 크면 다음신호가 발생할때 까지 계속 추세선을 그린다"
수정 좀 부탁 드립니다.
▶ 아래 수식
var : TX(0);
input : P(5),n(8),틱(3);
var : cnt(0),LL(0),HH(0);
Array : LTL[10](0),HTL[10](0);
var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);
var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);
if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then
{
LL = L;
For cnt = 9 DownTo 1
{
LTL[cnt] = LTL[cnt-1];
}
LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);
TL_SetColor(LTL[0],Black);
TL_Delete(LTL[n]);
TL_SetSize(LTL[0],2);
}
Else
{
TL_SetEnd(LTL[0],sDate,sTime,LL);
}
if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then
{
HH = H;
For cnt = 9 DownTo 1
{
HTL[cnt] = HTL[cnt-1];
}
HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);
TL_SetColor(HTL[0],Magenta);
TL_SetSize(HTL[0],2);
TL_Delete(HTL[n]);
}
Else
{
TL_SetEnd(HTL[0],sDate,sTime,HH);
}
#######################################################################33
수고하십시요.
다음글
이전글