커뮤니티
수식부탁드립니다--------------------
2016-09-05 18:32:59
86
글번호 101698
Input : Period1(5),Period5(1),급증(0),급감(0),매수도전봉차(0),급등락(0),소등락(0);
Var : va(0);
Var : va1(0);
Var : value(0);
Var : vp(0);
va = ma(bids,period5)-ma(asks,period5)+5000;
va1 = ma(bids,period1)-ma(asks,period1)+5000;
If va1 > va1[1] Then
{
Plot10(va1, "매수잔량 우위");
Plot11(0, "매도잔량 우위");
}
Else{
Plot10(0, "매수잔량 우위");
Plot11(va1, "매도잔량 우위");
}
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
If va > va[1] Then
{
Plot3(va, "5매수총잔량 우위");
Plot4(0, "5매도총잔량 우위");
}
Else{
Plot3(0, "5매수총잔량 우위");
Plot4(va, "5매도총잔량 우위");
}
//plot6(value,"선",iff(value>value[1],red,iff(value<value[1],BLUE,WHITE)));
//PlotBaseLine1(5000,"기준선");
PlotBaseLine5(va,"기준선5");
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
PlotBaseLine1(va1,"기준선1");
//--------------------------------------------
if va < va1 then
{vp=((va1-va)/2)+va;}
if va1 < va then
{vp=((va-va1)/2)+va1;}
Plot20(vp, "반");
//OSCP*******************************************
//PriceOsc = OSCP(va, vp);
//Plot5(PriceOsc, "선");
//점찍기
If va > va[1]+0 and va[1] < va[2]+0 and dayindex >= 3 Then
{
Plot6(va+500, "매수점");}
//소리
//If vp > vp[1] and vp[1] < vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩bubbles.wav"); }
If va < va[1]-0 and va[1] > va[2]+0 and dayindex >= 3 Then
{
Plot7(va+500, "매도점");}
//소리
//If va < vp[1] and vp[1] > vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩accept.wav" ); }
***
va1중 이전 3봉중 가장높은값들만 선으로 연결하고 싶습니다
부탁드립니다
답변 1
예스스탁 예스스탁 답변
2016-09-06 11:00:58
안녕하세요
예스스탁입니다.
Input : Period1(5),Period5(1),급증(0),급감(0),매수도전봉차(0),급등락(0),소등락(0);
Var : va(0);
Var : va1(0);
Var : value(0);
Var : vp(0);
va = ma(bids,period5)-ma(asks,period5)+5000;
va1 = ma(bids,period1)-ma(asks,period1)+5000;
If va1 > va1[1] Then
{
Plot10(va1, "매수잔량 우위");
Plot11(0, "매도잔량 우위");
}
Else{
Plot10(0, "매수잔량 우위");
Plot11(va1, "매도잔량 우위");
}
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
If va > va[1] Then
{
Plot3(va, "5매수총잔량 우위");
Plot4(0, "5매도총잔량 우위");
}
Else{
Plot3(0, "5매수총잔량 우위");
Plot4(va, "5매도총잔량 우위");
}
//plot6(value,"선",iff(value>value[1],red,iff(value<value[1],BLUE,WHITE)));
//PlotBaseLine1(5000,"기준선");
PlotBaseLine5(va,"기준선5");
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
PlotBaseLine1(va1,"기준선1");
//--------------------------------------------
if va < va1 then
{vp=((va1-va)/2)+va;}
if va1 < va then
{vp=((va-va1)/2)+va1;}
Plot20(vp, "반");
//OSCP*******************************************
//PriceOsc = OSCP(va, vp);
//Plot5(PriceOsc, "선");
//점찍기
If va > va[1]+0 and va[1] < va[2]+0 and dayindex >= 3 Then
{
Plot6(va+500, "매수점");}
//소리
//If vp > vp[1] and vp[1] < vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩bubbles.wav"); }
If va < va[1]-0 and va[1] > va[2]+0 and dayindex >= 3 Then
{
Plot7(va+500, "매도점");}
//소리
//If va < vp[1] and vp[1] > vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩accept.wav" ); }
if va1 == highest(va1,3) Then
plot99(va1);
즐거운 하루되세요
> leekss1 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다--------------------
> Input : Period1(5),Period5(1),급증(0),급감(0),매수도전봉차(0),급등락(0),소등락(0);
Var : va(0);
Var : va1(0);
Var : value(0);
Var : vp(0);
va = ma(bids,period5)-ma(asks,period5)+5000;
va1 = ma(bids,period1)-ma(asks,period1)+5000;
If va1 > va1[1] Then
{
Plot10(va1, "매수잔량 우위");
Plot11(0, "매도잔량 우위");
}
Else{
Plot10(0, "매수잔량 우위");
Plot11(va1, "매도잔량 우위");
}
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
If va > va[1] Then
{
Plot3(va, "5매수총잔량 우위");
Plot4(0, "5매도총잔량 우위");
}
Else{
Plot3(0, "5매수총잔량 우위");
Plot4(va, "5매도총잔량 우위");
}
//plot6(value,"선",iff(value>value[1],red,iff(value<value[1],BLUE,WHITE)));
//PlotBaseLine1(5000,"기준선");
PlotBaseLine5(va,"기준선5");
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
PlotBaseLine1(va1,"기준선1");
//--------------------------------------------
if va < va1 then
{vp=((va1-va)/2)+va;}
if va1 < va then
{vp=((va-va1)/2)+va1;}
Plot20(vp, "반");
//OSCP*******************************************
//PriceOsc = OSCP(va, vp);
//Plot5(PriceOsc, "선");
//점찍기
If va > va[1]+0 and va[1] < va[2]+0 and dayindex >= 3 Then
{
Plot6(va+500, "매수점");}
//소리
//If vp > vp[1] and vp[1] < vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩bubbles.wav"); }
If va < va[1]-0 and va[1] > va[2]+0 and dayindex >= 3 Then
{
Plot7(va+500, "매도점");}
//소리
//If va < vp[1] and vp[1] > vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩accept.wav" ); }
***
va1중 이전 3봉중 가장높은값들만 선으로 연결하고 싶습니다
부탁드립니다