커뮤니티
수정부탁드립니다==================
2016-10-24 19:18:02
78
글번호 103297
plot85,plot86 이표시가안되네요
부탁드립니다
//---------------------------------------------------------------------------------
Input : Period1(1),Period5(1),단기급증(0),단기급감(0),단기급등락(0),
장기급증(0),장기급감(0),장기급등락(0),돌파(0),급변(0),단기급변(0),순매수급증보정(0),
순매수급감보정(0),순매수보정한계(0)/*,고저기간(0)*/
,LENGTH1(0) ,LENGTH2(0
Var : va(0);
Var : va1(0);
Var : va2(0);
Var : va3(0);
Var : va11(0);
Var : va12(0);
Var : va38(0);
Var : va77(0);
Var : va87(0);
Var : va88(0);
Var : value(0);
Var : vp(0),II(0),AA(0),BB(0);
var : N(0),T(0),EP1(0),EP2(0);
var : ema11(0),ema12(0),ema13(0);
var : ema21(0),ema22(0),ema23(0),cnt1(0),cnt2(0);
EP1 = 2/(LENGTH1+1);
EP2 = 2/(LENGTH2+1);
if Bdate != Bdate[1] Then{
II = 0;
BB = 0;
AA = 0;
}
II = II+1;
BB = BB+Bids;
AA = AA+Asks;
if II < Period5 Then{
va = (BB/II)-(AA/II)+8000;
}
else{
va = ma(bids,period5)-ma(asks,period5)+8000;
}
if II < Period1 Then{
va1 = (BB/II)-(AA/II)+8000;
va2 = (BB/II)-(AA/II)+8000;
va3 = (BB/II)-(AA/II)+8000;
}
//순매수에 8000 더해 양의값만들기----------------------------
else{
va1 = ma(bids,period1)-ma(asks,period1)+8000;
va2 = ma(bids,period1)-ma(asks,period1)+8000;
va3 = ma(bids,period1)-ma(asks,period1)+8000;
}
//순매수5이평의 급등락축소시작----------------------------
if ii > 1 and va >va[1]+장기급등락 then va = ((va -va[1])/장기급증)+va[1];
if ii > 1 and va <va[1]-장기급등락 then va = va[1]-((va[1] -va)/장기급감);
If ii >= 2
Then
{
//순매수 일정차 이상의급등락축소시작----------------------------
//if va1 >va1[1]+급등락 then va1 = va1 -급등락;
if va1 >va1[1]+단기급등락 then va1 = ((va1 -va1[1])/단기급증)+va1[1];
//if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-단기급등락 then va1 = va1[1]-((va1[1] -va1)/단기급감);
//if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
//if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
//순매수 일정차 이하의급등락축소시작----------------------------
if va2 >va2[1]+순매수보정한계 then va2 = ((va2 -va2[1])*순매수급증보정)+va2[1];
if va2 <va2[1]-순매수보정한계 then va2 = va2[1]-((va2[1] -va2)*순매수급감보정);
//1이평 막대표시 -----------------------------------------------
If va1 > va1[1] Then
{
Plot10(va1, "매수잔량 우위");
Plot11(0, "매도잔량 우위");
}
Else{
Plot10(0, "매수잔량 우위");
Plot11(va3, "매도잔량 우위");
}
//5이평 막대표시 -----------------------------------------------
If va > va[1] Then
{
Plot3(va, "5매수총잔량 우위");
Plot4(0, "5매도총잔량 우위");
}
Else{
Plot3(0, "5매수총잔량 우위");
Plot4(va, "5매도총잔량 우위");
}
PlotBaseLine5(va,"기준선5");
PlotBaseLine1(va1,"기준선1");
//순매수와 5이평의 중간값으로 선을 부드럽게함--------------------------------------------
if va < va1 then
{vp=((va1-va)/2)+va;}
if va1 < va then
{vp=((va-va1)/2)+va1;}
//Plot20(vp, "반");
//그 위 중간값의 일정 수량차이상의 급등락 표시
if vp > vp[1]+ 급변 Then{plot55(va87-100,"급등");}
if vp < vp[1]- 급변 Then{plot44(va3-100,"급락");}
}
// if Highest(va1,고저기간 )==0 then{
// va11=Lowest(va1,고저기간 );
if ii >= 2 and va2 > va2[1]+ 단기급변 Then{plot66(va2,"단기");}
if ii >= 2 and va2 < va2[1]- 단기급변 Then{plot66(va2,"단기");}
Plot99(va2, "순매수1차보정");
plot20(vp+100, "반",iff(vp>vp[1]+00,red,iff(vp<vp[1]-00,BLUE,BLACK)));
Plot59(va3, "순매수");
if ii == 1 Then
ema11 = va3;
else
ema11 = va3 * EP1 +ema11 * (1-EP1);
if ii <= 2 Then
ema12 = ema11;
else
ema12 = ema11 * EP1 +ema12 * (1-EP1);
if ii <= 3 Then
ema13 = ema12;
else
ema13 = ema12 * EP1 +ema13 * (1-EP1);
//순매수를 테마로
if ii >= 3 then
va77 = (3 * ema11) - (3 * ema12) + (ema13);
Plot58(va77, "테마");
va88 = va77;
if va2 < va77 and va3 > va77 Then
{ va88 = va3;
}
if va2 > va77 and va3 < va77 Then
{ va88 = va3;
}
Plot95(va88, "테마합");
if ii == 1 Then
ema21 = va88;
Else
ema21 = va88 * EP2 +ema21 * (1-EP2);
if ii <= 2 Then
ema22 = ema21;
Else
ema22 = ema21 * EP2 +ema22 * (1-EP2);
if ii <= 3 Then
ema23 = ema22;
else
ema23 = ema22 * EP2 +ema23 * (1-EP2);
if ii >= 3 then
va87 = (3 * ema21) - (3 * ema22) + (ema23);
Plot78(va87, "테마합테마");
if ii >= 2 then{
//테마합테마 막대표시 -----------------------------------------------
If va87 > va87[1]+00 Then
{
Plot45(va87-50, "테마합테마매수잔량 우위");
Plot46(0, "테마합테마매도잔량 우위");
}
If va87 < va87[1]-00 Then{
Plot45(0, "테마합테마매수잔량 우위");
Plot46(va3-50, "테마합테마매도잔량 우위");
}
//매수매도신호-------------------------------------------------------
If va87 < va77-250 Then{
Plot96(va77, "매/수");
}
If va87 > va77+250 Then{
Plot97(va87, "매/도");
}
if va3 > va77 and va3 > va77+550 Then{
plot37(va3,"매도유리");}
if va3 < va77 and va3 < va77-550 Then{
plot38(va3,"매수유리");}
if crossup(va77,va87) Then
cnt1 = 0;
if CrossDown(va77,va87) Then
cnt2 = 0;
if va77 >= va87+100 Then{
cnt1 = cnt1+1;
if cnt1 == 1 then{
PlaySound("C:￦예스트레이더￦data￦Sound￦bubbles.wav");
}
}
if va77 >= va87+100 Then{
cnt1 = cnt1+1;
if cnt1 == 1 then{ plot85(va3,"y매수");}
if va77 <= va87-100 Then{
cnt2 = cnt2+1;
if cnt2 == 2 then{
PlaySound("C:￦예스트레이더￦data￦Sound￦accept.wav");
}
}
if va77 <= va87-100 Then{
cnt2 = cnt2+1;
if cnt2 == 2 then{ plot86(va3,"y매도");}
}
}
}
답변 1
예스스탁 예스스탁 답변
2016-10-25 10:16:12
안녕하세요
예스스탁입니다.
카운트하는 내용이 있을경우 해당식을 두번 사용하시면 안됩니다.
playsound를 위해 나우시면 카운트가 2씩 증가하게 됩니다.
또한 수식에 {}가 잘못 묶어 있습니다.
//---------------------------------------------------------------------------------
Input : Period1(1),Period5(1),단기급증(0),단기급감(0),단기급등락(0),
장기급증(0),장기급감(0),장기급등락(0),돌파(0),급변(0),단기급변(0),순매수급증보정(0),
순매수급감보정(0),순매수보정한계(0)/*,고저기간(0)*/
,LENGTH1(0) ,LENGTH2(0);
Var : va(0);
Var : va1(0);
Var : va2(0);
Var : va3(0);
Var : va11(0);
Var : va12(0);
Var : va38(0);
Var : va77(0);
Var : va87(0);
Var : va88(0);
Var : value(0);
Var : vp(0),II(0),AA(0),BB(0);
var : N(0),T(0),EP1(0),EP2(0);
var : ema11(0),ema12(0),ema13(0);
var : ema21(0),ema22(0),ema23(0),cnt1(0),cnt2(0);
EP1 = 2/(LENGTH1+1);
EP2 = 2/(LENGTH2+1);
if Bdate != Bdate[1] Then{
II = 0;
BB = 0;
AA = 0;
}
II = II+1;
BB = BB+Bids;
AA = AA+Asks;
if II < Period5 Then{
va = (BB/II)-(AA/II)+8000;
}
else{
va = ma(bids,period5)-ma(asks,period5)+8000;
}
if II < Period1 Then{
va1 = (BB/II)-(AA/II)+8000;
va2 = (BB/II)-(AA/II)+8000;
va3 = (BB/II)-(AA/II)+8000;
}
//순매수에 8000 더해 양의값만들기----------------------------
else{
va1 = ma(bids,period1)-ma(asks,period1)+8000;
va2 = ma(bids,period1)-ma(asks,period1)+8000;
va3 = ma(bids,period1)-ma(asks,period1)+8000;
}
//순매수5이평의 급등락축소시작----------------------------
if ii > 1 and va >va[1]+장기급등락 then va = ((va -va[1])/장기급증)+va[1];
if ii > 1 and va <va[1]-장기급등락 then va = va[1]-((va[1] -va)/장기급감);
If ii >= 2 Then{
//순매수 일정차 이상의급등락축소시작----------------------------
//if va1 >va1[1]+급등락 then va1 = va1 -급등락;
if va1 >va1[1]+단기급등락 then va1 = ((va1 -va1[1])/단기급증)+va1[1];
//if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-단기급등락 then va1 = va1[1]-((va1[1] -va1)/단기급감);
//if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
//if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
//순매수 일정차 이하의급등락축소시작----------------------------
if va2 >va2[1]+순매수보정한계 then va2 = ((va2 -va2[1])*순매수급증보정)+va2[1];
if va2 <va2[1]-순매수보정한계 then va2 = va2[1]-((va2[1] -va2)*순매수급감보정);
//순매수와 5이평의 중간값으로 선을 부드럽게함--------------------------------------------
if va < va1 then{
vp=((va1-va)/2)+va;
}
if va1 < va then{
vp=((va-va1)/2)+va1;
}
//Plot20(vp, "반");
//그 위 중간값의 일정 수량차이상의 급등락 표시
if vp > vp[1]+ 급변 Then{
plot55(va87-100,"급등");
}
if vp < vp[1]- 급변 Then{
plot44(va3-100,"급락");
}
}
// if Highest(va1,고저기간 )==0 then{
// va11=Lowest(va1,고저기간 );
if ii >= 2 and va2 > va2[1]+ 단기급변 Then{
plot66(va2,"단기");
}
if ii >= 2 and va2 < va2[1]- 단기급변 Then{
plot66(va2,"단기");
}
Plot99(va2, "순매수1차보정");
plot20(vp+100, "반",iff(vp>vp[1]+00,red,iff(vp<vp[1]-00,BLUE,BLACK)));
Plot59(va3, "순매수");
if ii == 1 Then
ema11 = va3;
else
ema11 = va3 * EP1 +ema11 * (1-EP1);
if ii <= 2 Then
ema12 = ema11;
else
ema12 = ema11 * EP1 +ema12 * (1-EP1);
if ii <= 3 Then
ema13 = ema12;
else
ema13 = ema12 * EP1 +ema13 * (1-EP1);
//순매수를 테마로
if ii >= 3 then
va77 = (3 * ema11) - (3 * ema12) + (ema13);
Plot58(va77, "테마");
va88 = va77;
if va2 < va77 and va3 > va77 Then{
va88 = va3;
}
if va2 > va77 and va3 < va77 Then
{
va88 = va3;
}
Plot95(va88, "테마합");
if ii == 1 Then
ema21 = va88;
Else
ema21 = va88 * EP2 +ema21 * (1-EP2);
if ii <= 2 Then
ema22 = ema21;
Else
ema22 = ema21 * EP2 +ema22 * (1-EP2);
if ii <= 3 Then
ema23 = ema22;
else
ema23 = ema22 * EP2 +ema23 * (1-EP2);
if ii >= 3 then
va87 = (3 * ema21) - (3 * ema22) + (ema23);
Plot78(va87, "테마합테마");
if ii >= 2 then{
//테마합테마 막대표시 -----------------------------------------------
If va87 > va87[1]+00 Then
{
Plot45(va87-50, "테마합테마매수잔량 우위");
Plot46(0, "테마합테마매도잔량 우위");
}
If va87 < va87[1]-00 Then{
Plot45(0, "테마합테마매수잔량 우위");
Plot46(va3-50, "테마합테마매도잔량 우위");
}
}
//매수매도신호-------------------------------------------------------
If va87 < va77-250 Then{
Plot96(va77, "매/수");
}
If va87 > va77+250 Then{
Plot97(va87, "매/도");
}
if va3 > va77 and va3 > va77+550 Then{
plot37(va3,"매도유리");}
if va3 < va77 and va3 < va77-550 Then{
plot38(va3,"매수유리");}
if crossup(va77,va87) Then
cnt1 = 0;
if CrossDown(va77,va87) Then
cnt2 = 0;
if va77 >= va87+100 Then{
cnt1 = cnt1+1;
if cnt1 == 1 then{
plot85(va3,"y매수");
PlaySound("C:￦예스트레이더￦data￦Sound￦bubbles.wav");
}
}
if va77 <= va87-100 Then{
cnt2 = cnt2+1;
if cnt2 == 1 then{
plot86(va3,"y매도");
PlaySound("C:￦예스트레이더￦data￦Sound￦accept.wav");
}
}
즐거운 하루되세요
> leekss1 님이 쓴 글입니다.
> 제목 : 수정부탁드립니다==================
> plot85,plot86 이표시가안되네요
부탁드립니다
//---------------------------------------------------------------------------------
Input : Period1(1),Period5(1),단기급증(0),단기급감(0),단기급등락(0),
장기급증(0),장기급감(0),장기급등락(0),돌파(0),급변(0),단기급변(0),순매수급증보정(0),
순매수급감보정(0),순매수보정한계(0)/*,고저기간(0)*/
,LENGTH1(0) ,LENGTH2(0
Var : va(0);
Var : va1(0);
Var : va2(0);
Var : va3(0);
Var : va11(0);
Var : va12(0);
Var : va38(0);
Var : va77(0);
Var : va87(0);
Var : va88(0);
Var : value(0);
Var : vp(0),II(0),AA(0),BB(0);
var : N(0),T(0),EP1(0),EP2(0);
var : ema11(0),ema12(0),ema13(0);
var : ema21(0),ema22(0),ema23(0),cnt1(0),cnt2(0);
EP1 = 2/(LENGTH1+1);
EP2 = 2/(LENGTH2+1);
if Bdate != Bdate[1] Then{
II = 0;
BB = 0;
AA = 0;
}
II = II+1;
BB = BB+Bids;
AA = AA+Asks;
if II < Period5 Then{
va = (BB/II)-(AA/II)+8000;
}
else{
va = ma(bids,period5)-ma(asks,period5)+8000;
}
if II < Period1 Then{
va1 = (BB/II)-(AA/II)+8000;
va2 = (BB/II)-(AA/II)+8000;
va3 = (BB/II)-(AA/II)+8000;
}
//순매수에 8000 더해 양의값만들기----------------------------
else{
va1 = ma(bids,period1)-ma(asks,period1)+8000;
va2 = ma(bids,period1)-ma(asks,period1)+8000;
va3 = ma(bids,period1)-ma(asks,period1)+8000;
}
//순매수5이평의 급등락축소시작----------------------------
if ii > 1 and va >va[1]+장기급등락 then va = ((va -va[1])/장기급증)+va[1];
if ii > 1 and va <va[1]-장기급등락 then va = va[1]-((va[1] -va)/장기급감);
If ii >= 2
Then
{
//순매수 일정차 이상의급등락축소시작----------------------------
//if va1 >va1[1]+급등락 then va1 = va1 -급등락;
if va1 >va1[1]+단기급등락 then va1 = ((va1 -va1[1])/단기급증)+va1[1];
//if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-단기급등락 then va1 = va1[1]-((va1[1] -va1)/단기급감);
//if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
//if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
//순매수 일정차 이하의급등락축소시작----------------------------
if va2 >va2[1]+순매수보정한계 then va2 = ((va2 -va2[1])*순매수급증보정)+va2[1];
if va2 <va2[1]-순매수보정한계 then va2 = va2[1]-((va2[1] -va2)*순매수급감보정);
//1이평 막대표시 -----------------------------------------------
If va1 > va1[1] Then
{
Plot10(va1, "매수잔량 우위");
Plot11(0, "매도잔량 우위");
}
Else{
Plot10(0, "매수잔량 우위");
Plot11(va3, "매도잔량 우위");
}
//5이평 막대표시 -----------------------------------------------
If va > va[1] Then
{
Plot3(va, "5매수총잔량 우위");
Plot4(0, "5매도총잔량 우위");
}
Else{
Plot3(0, "5매수총잔량 우위");
Plot4(va, "5매도총잔량 우위");
}
PlotBaseLine5(va,"기준선5");
PlotBaseLine1(va1,"기준선1");
//순매수와 5이평의 중간값으로 선을 부드럽게함--------------------------------------------
if va < va1 then
{vp=((va1-va)/2)+va;}
if va1 < va then
{vp=((va-va1)/2)+va1;}
//Plot20(vp, "반");
//그 위 중간값의 일정 수량차이상의 급등락 표시
if vp > vp[1]+ 급변 Then{plot55(va87-100,"급등");}
if vp < vp[1]- 급변 Then{plot44(va3-100,"급락");}
}
// if Highest(va1,고저기간 )==0 then{
// va11=Lowest(va1,고저기간 );
if ii >= 2 and va2 > va2[1]+ 단기급변 Then{plot66(va2,"단기");}
if ii >= 2 and va2 < va2[1]- 단기급변 Then{plot66(va2,"단기");}
Plot99(va2, "순매수1차보정");
plot20(vp+100, "반",iff(vp>vp[1]+00,red,iff(vp<vp[1]-00,BLUE,BLACK)));
Plot59(va3, "순매수");
if ii == 1 Then
ema11 = va3;
else
ema11 = va3 * EP1 +ema11 * (1-EP1);
if ii <= 2 Then
ema12 = ema11;
else
ema12 = ema11 * EP1 +ema12 * (1-EP1);
if ii <= 3 Then
ema13 = ema12;
else
ema13 = ema12 * EP1 +ema13 * (1-EP1);
//순매수를 테마로
if ii >= 3 then
va77 = (3 * ema11) - (3 * ema12) + (ema13);
Plot58(va77, "테마");
va88 = va77;
if va2 < va77 and va3 > va77 Then
{ va88 = va3;
}
if va2 > va77 and va3 < va77 Then
{ va88 = va3;
}
Plot95(va88, "테마합");
if ii == 1 Then
ema21 = va88;
Else
ema21 = va88 * EP2 +ema21 * (1-EP2);
if ii <= 2 Then
ema22 = ema21;
Else
ema22 = ema21 * EP2 +ema22 * (1-EP2);
if ii <= 3 Then
ema23 = ema22;
else
ema23 = ema22 * EP2 +ema23 * (1-EP2);
if ii >= 3 then
va87 = (3 * ema21) - (3 * ema22) + (ema23);
Plot78(va87, "테마합테마");
if ii >= 2 then{
//테마합테마 막대표시 -----------------------------------------------
If va87 > va87[1]+00 Then
{
Plot45(va87-50, "테마합테마매수잔량 우위");
Plot46(0, "테마합테마매도잔량 우위");
}
If va87 < va87[1]-00 Then{
Plot45(0, "테마합테마매수잔량 우위");
Plot46(va3-50, "테마합테마매도잔량 우위");
}
//매수매도신호-------------------------------------------------------
If va87 < va77-250 Then{
Plot96(va77, "매/수");
}
If va87 > va77+250 Then{
Plot97(va87, "매/도");
}
if va3 > va77 and va3 > va77+550 Then{
plot37(va3,"매도유리");}
if va3 < va77 and va3 < va77-550 Then{
plot38(va3,"매수유리");}
if crossup(va77,va87) Then
cnt1 = 0;
if CrossDown(va77,va87) Then
cnt2 = 0;
if va77 >= va87+100 Then{
cnt1 = cnt1+1;
if cnt1 == 1 then{
PlaySound("C:￦예스트레이더￦data￦Sound￦bubbles.wav");
}
}
if va77 >= va87+100 Then{
cnt1 = cnt1+1;
if cnt1 == 1 then{ plot85(va3,"y매수");}
if va77 <= va87-100 Then{
cnt2 = cnt2+1;
if cnt2 == 2 then{
PlaySound("C:￦예스트레이더￦data￦Sound￦accept.wav");
}
}
if va77 <= va87-100 Then{
cnt2 = cnt2+1;
if cnt2 == 2 then{ plot86(va3,"y매도");}
}
}
}