커뮤니티
수정 부탁드릴게요~
2008-09-25 15:54:23
977
글번호 17231
첨부 이미지
그림1
분/틱챠트에 적용합니다.
밑에 원래 수식에서
B1추가,B2추가,B3추가
를 없애고요
일봉 실시간 13.95ma/14.9ma/15.82ma// 17ma/18ma/19ma //21ma/22ma/23ma
를 추가하고요
"B1매수"가 매수진입 했을시에만
현재가 <= 일봉13.95ma*1.005 면 "B1추가-1"
현재가 <= 일봉14.9ma*1.005 면 "B1추가-2"
현재가 <= 일봉15.82ma*1.005 면 "B1추가-3"
---------------------------------------------------
"B2매수"가 매수진입 했을시에만
현재가 <= 일봉17ma*1.005 면 "B2추가-1"
현재가 <= 일봉18ma*1.005 면 "B2추가-2"
현재가 <= 일봉19ma*1.005 면 "B2추가-3"
---------------------------------------------------
"B3매수"가 매수진입 했을시에만
현재가 <= 일봉21ma*1.005 면 "B3추가-1"
현재가 <= 일봉22ma*1.005 면 "B3추가-2"
현재가 <= 일봉23ma*1.005 면 "B3추가-3"
이렇게 되게끔 수정해주세요~
수식 수정후 죽 보시고 필요없는 부분도 좀 없애주시면 감사하겠습니다
부탁해요~
===========================원래수식===========
input : 날짜(20080122),P1(4),P2(5),P3(10),P4(11),P5(13),p6(16),p7(20),Pcnt(1);
var : cnt(0),mav4(0),mav5(0),mav10(0),mav11(0),mav13(0),mav16(0),mav20(0);
var : cond1(False),cond2(false),Bcnt1(0),Bcnt2(0),Bcnt3(0);
var : buycond1(False),buycond2(False),buycond3(false),Buyv1(0),Buyv2(0),Buyv3(0);
var : sellcond1(False),sellcond2(False),sellcond3(false),B1(0),B2(0),B3(0);
var1 = 0;
var2 = 0;
var3 = 0;
var4 = 0;
var5 = 0;
var6 = 0;
var7 = 0;
for cnt = 0 to P7-1{
if cnt < P1 Then
var1 = var1 + dayclose(cnt);
if cnt < P2 Then
var2 = var2 + dayclose(cnt);
if cnt < P3 Then
var3 = var3 + dayclose(cnt);
if cnt < P4 then
var4 = var4 + dayclose(cnt);
if cnt < P5 then
var5 = var5 + dayclose(cnt);
if cnt < P6 then
var6 = var6 + dayclose(cnt);
if cnt < P7 then
var7 = var7 + dayclose(cnt);
}
mav4 = var1/P1;
mav5 = var2/p2;
mav10 = var3/P3;
mav11 = var4/P4;
mav13 = var5/P5;
mav16 = var6/P6;
mav20 = var7/P7;
cond1 = dayopen() >= mav11*0.99;
cond2 = dayopen() < mav11*0.99;
buyCond1 =dayclose(1) >= 1025 and
C > dayclose(1)*0.89 and
c <= mav13*1.005;
buyCond2 = dayclose(1) >= 1025 and
C > dayclose(1)*0.87 and
c <= mav16*1.005;
buyCond3 = dayclose(1) >= 1025 and
C > dayclose(1)*0.87 and
c <= mav20*1.005;
sellcond1 = C >= mav4*0.99;
sellcond2 = C >= mav5*0.99;
sellcond3 = mav4 >= mav10*0.99 and mav4 <= mav10*1.01 and
C >= mav10*0.988;
if cond1 == true Then{
if buyCond1 == true and Sdate >= 날짜 and Bcnt1 < 1 Then{
buy("B1매수");
Bcnt1 = 1;
Buyv1 = C; //B1 진입가
B1 = Pcnt;
B2 = 0; //B2 해제
}
}
if cond1 == true or cond2 == true then{ //매수조건 1,2는 cond1,cond2 모두 발동
if buyCond2 == true and Sdate >= 날짜 and Bcnt2 < 1 Then{
buy("B2매수");
Bcnt2 = 1;
Buyv2 = C; //B2 진입가
B2 = Pcnt;
B1 = 0; //B1 해제
}
if buyCond3 == true and Sdate >= 날짜 and Bcnt3 < 1 Then{
buy("B3매수");
Bcnt3 = 1;
Buyv3 = C; //B2 진입가
B3 = Pcnt;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
}
if marketposition() == 1 and B1 >= Pcnt and crossdown(C, Buyv1*(1-B1/100)) Then{
buy("B1추가");
B1 = B1+Pcnt;
}
if marketposition() == 1 and B2 >= Pcnt and crossdown(C, Buyv2*(1-B2/100)) Then{
buy("B2추가");
B2 = B2+Pcnt;
}
if marketposition() == 1 and B3 >= Pcnt and crossdown(C, Buyv3*(1-B3/100)) Then{
buy("B3추가");
B3 = B3+Pcnt;
}
if MarketPosition() == 1 and sellcond1 == true Then {
exitlong("EX1");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
if MarketPosition() == 1 and sellcond2 == true Then {
exitlong("EX2");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
if MarketPosition() == 1 and sellcond3 == true Then {
exitlong("EX3");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
- 1. 에듀박스 1분봉.JPG (0.15 MB)
답변 1
예스스탁 예스스탁 답변
2008-09-25 18:31:35
안녕하세요
예스스탁입니다.
B1추가,B2추가,B3추가는 주석처리로 막았습니다.
input : 날짜(20080122),P1(4),P2(5),P3(10),P4(11),P5(13),p6(16),p7(20),Pcnt(1);
input : L1(13.95),L2(14.9),L3(15.82),L4(17),L5(18),L6(19),L7(21),L8(22),L9(23);
var : cnt(0),mav4(0),mav5(0),mav10(0),mav11(0),mav13(0),mav16(0),mav20(0);
var : cond1(False),cond2(false),Bcnt1(0),Bcnt2(0),Bcnt3(0);
var : buycond1(False),buycond2(False),buycond3(false),Buyv1(0),Buyv2(0),Buyv3(0);
var : sellcond1(False),sellcond2(False),sellcond3(false),B1(0),B2(0),B3(0);
var : mav1395(0), mav1490(0),mav1582(0),mav17(0),mav18(0),mav19(0),mav21(0),mav22(0),mav23(0);
var : B11(0),B12(0),B13(0),B21(0),B22(0),B23(0),B31(0),B32(0),B33(0);
var1 = 0;
var2 = 0;
var3 = 0;
var4 = 0;
var5 = 0;
var6 = 0;
var7 = 0;
var11 = 0;
var12 = 0;
var13 = 0;
var14 = 0;
var15 = 0;
var16 = 0;
var17 = 0;
var18 = 0;
var19 = 0;
for cnt = 0 to L9-1{
if cnt < P1 Then
var1 = var1 + dayclose(cnt);
if cnt < P2 Then
var2 = var2 + dayclose(cnt);
if cnt < P3 Then
var3 = var3 + dayclose(cnt);
if cnt < P4 then
var4 = var4 + dayclose(cnt);
if cnt < P5 then
var5 = var5 + dayclose(cnt);
if cnt < P6 then
var6 = var6 + dayclose(cnt);
if cnt < P7 then
var7 = var7 + dayclose(cnt);
if cnt < L1 Then
var11 = var11 + dayclose(cnt);
if cnt < L2 Then
var12 = var12 + dayclose(cnt);
if cnt < L3 Then
var13 = var13 + dayclose(cnt);
if cnt < L4 then
var14 = var14 + dayclose(cnt);
if cnt < L5 then
var15 = var15 + dayclose(cnt);
if cnt < L6 then
var16 = var16 + dayclose(cnt);
if cnt < L7 then
var17 = var17 + dayclose(cnt);
if cnt < L8 then
var18 = var18 + dayclose(cnt);
if cnt < L9 then
var19 = var19 + dayclose(cnt);
}
mav4 = var1/P1;
mav5 = var2/p2;
mav10 = var3/P3;
mav11 = var4/P4;
mav13 = var5/P5;
mav16 = var6/P6;
mav20 = var7/P7;
mav1395 = var11/L1;
mav1490 = var12/L2;
mav1582 = var13/L3;
mav17 = var14/L4;
mav18 = var15/L5;
mav19 = var16/L6;
mav21 = var17/L7;
mav22 = var18/L8;
mav23 = var19/L9;
cond1 = dayopen() >= mav11*0.99;
cond2 = dayopen() < mav11*0.99;
buyCond1 =dayclose(1) >= 1025 and
C > dayclose(1)*0.89 and
c <= mav13*1.005;
buyCond2 = dayclose(1) >= 1025 and
C > dayclose(1)*0.87 and
c <= mav16*1.005;
buyCond3 = dayclose(1) >= 1025 and
C > dayclose(1)*0.87 and
c <= mav20*1.005;
sellcond1 = C >= mav4*0.99;
sellcond2 = C >= mav5*0.99;
sellcond3 = mav4 >= mav10*0.99 and mav4 <= mav10*1.01 and
C >= mav10*0.988;
if cond1 == true Then{
if buyCond1 == true and Sdate >= 날짜 and Bcnt1 < 1 Then{
buy("B1매수");
Bcnt1 = 1;
Buyv1 = C; //B1 진입가
B1 = Pcnt;
B2 = 0; //B2 해제
}
}
if cond1 == true or cond2 == true then{ //매수조건 1,2는 cond1,cond2 모두 발동
if buyCond2 == true and Sdate >= 날짜 and Bcnt2 < 1 Then{
buy("B2매수");
Bcnt2 = 1;
Buyv2 = C; //B2 진입가
B2 = Pcnt;
B1 = 0; //B1 해제
}
if buyCond3 == true and Sdate >= 날짜 and Bcnt3 < 1 Then{
buy("B3매수");
Bcnt3 = 1;
Buyv3 = C; //B2 진입가
B3 = Pcnt;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
}
/*if marketposition() == 1 and B1 >= Pcnt and crossdown(C, Buyv1*(1-B1/100)) Then{
buy("B1추가");
B1 = B1+Pcnt;
}
if marketposition() == 1 and B2 >= Pcnt and crossdown(C, Buyv2*(1-B2/100)) Then{
buy("B2추가");
B2 = B2+Pcnt;
}
if marketposition() == 1 and B3 >= Pcnt and crossdown(C, Buyv3*(1-B3/100)) Then{
buy("B3추가");
B3 = B3+Pcnt;
}
*/
if MarketPosition() == 1 then{
if IsEntryName("B1") == True and C <= mav1395*1.005 and B11 < 1 Then{
buy("B1추가-1");
B11 = 1;
}
if IsEntryName("B1") == True and C <= mav1490*1.005 and B12 < 1 Then{
buy("B1추가-2");
B12 = 1;
}
if IsEntryName("B1") == True and C <= mav1582*1.005 and B13 < 1 Then{
buy("B1추가-3");
B13 = 1;
}
}
if MarketPosition() == 1 then{
if IsEntryName("B2") == True and C <= mav1395*1.005 and B21 < 1 Then{
buy("B2추가-1");
B2 = 1;
}
if IsEntryName("B2") == True and C <= mav1490*1.005 and B22 < 1 Then{
buy("B2추가-2");
B22 = 1;
}
if IsEntryName("B2") == True and C <= mav1582*1.005 and B23 < 1 Then{
buy("B2추가-3");
B23 = 1;
}
}
if MarketPosition() == 1 then{
if IsEntryName("B3") == True and C <= mav1395*1.005 and B31 < 1 Then{
buy("B3추가-1");
B31 = 1;
}
if IsEntryName("B3") == True and C <= mav1490*1.005 and B32 < 1 Then{
buy("B3추가-2");
B32 = 1;
}
if IsEntryName("B3") == True and C <= mav1582*1.005 and B33 < 1 Then{
buy("B3추가-3");
B33 = 1;
}
}
if MarketPosition() == 1 and sellcond1 == true Then {
exitlong("EX1");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
B11 = 0;
B12 = 0;
B13 = 0;
B21 = 0;
B22 = 0;
B23 = 0;
B31 = 0;
B32 = 0;
B33 = 0;
}
if MarketPosition() == 1 and sellcond2 == true Then {
exitlong("EX2");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
B11 = 0;
B12 = 0;
B13 = 0;
B21 = 0;
B22 = 0;
B23 = 0;
B31 = 0;
B32 = 0;
B33 = 0;
}
if MarketPosition() == 1 and sellcond3 == true Then {
exitlong("EX3");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
B11 = 0;
B12 = 0;
B13 = 0;
B21 = 0;
B22 = 0;
B23 = 0;
B31 = 0;
B32 = 0;
B33 = 0;
}
즐거운 하루되세요
> 부상전에탭치자 님이 쓴 글입니다.
> 제목 : 수정 부탁드릴게요~
> 분/틱챠트에 적용합니다.
밑에 원래 수식에서
B1추가,B2추가,B3추가
를 없애고요
일봉 실시간 13.95ma/14.9ma/15.82ma// 17ma/18ma/19ma //21ma/22ma/23ma
를 추가하고요
"B1매수"가 매수진입 했을시에만
현재가 <= 일봉13.95ma*1.005 면 "B1추가-1"
현재가 <= 일봉14.9ma*1.005 면 "B1추가-2"
현재가 <= 일봉15.82ma*1.005 면 "B1추가-3"
---------------------------------------------------
"B2매수"가 매수진입 했을시에만
현재가 <= 일봉17ma*1.005 면 "B2추가-1"
현재가 <= 일봉18ma*1.005 면 "B2추가-2"
현재가 <= 일봉19ma*1.005 면 "B2추가-3"
---------------------------------------------------
"B3매수"가 매수진입 했을시에만
현재가 <= 일봉21ma*1.005 면 "B3추가-1"
현재가 <= 일봉22ma*1.005 면 "B3추가-2"
현재가 <= 일봉23ma*1.005 면 "B3추가-3"
이렇게 되게끔 수정해주세요~
수식 수정후 죽 보시고 필요없는 부분도 좀 없애주시면 감사하겠습니다
부탁해요~
===========================원래수식===========
input : 날짜(20080122),P1(4),P2(5),P3(10),P4(11),P5(13),p6(16),p7(20),Pcnt(1);
var : cnt(0),mav4(0),mav5(0),mav10(0),mav11(0),mav13(0),mav16(0),mav20(0);
var : cond1(False),cond2(false),Bcnt1(0),Bcnt2(0),Bcnt3(0);
var : buycond1(False),buycond2(False),buycond3(false),Buyv1(0),Buyv2(0),Buyv3(0);
var : sellcond1(False),sellcond2(False),sellcond3(false),B1(0),B2(0),B3(0);
var1 = 0;
var2 = 0;
var3 = 0;
var4 = 0;
var5 = 0;
var6 = 0;
var7 = 0;
for cnt = 0 to P7-1{
if cnt < P1 Then
var1 = var1 + dayclose(cnt);
if cnt < P2 Then
var2 = var2 + dayclose(cnt);
if cnt < P3 Then
var3 = var3 + dayclose(cnt);
if cnt < P4 then
var4 = var4 + dayclose(cnt);
if cnt < P5 then
var5 = var5 + dayclose(cnt);
if cnt < P6 then
var6 = var6 + dayclose(cnt);
if cnt < P7 then
var7 = var7 + dayclose(cnt);
}
mav4 = var1/P1;
mav5 = var2/p2;
mav10 = var3/P3;
mav11 = var4/P4;
mav13 = var5/P5;
mav16 = var6/P6;
mav20 = var7/P7;
cond1 = dayopen() >= mav11*0.99;
cond2 = dayopen() < mav11*0.99;
buyCond1 =dayclose(1) >= 1025 and
C > dayclose(1)*0.89 and
c <= mav13*1.005;
buyCond2 = dayclose(1) >= 1025 and
C > dayclose(1)*0.87 and
c <= mav16*1.005;
buyCond3 = dayclose(1) >= 1025 and
C > dayclose(1)*0.87 and
c <= mav20*1.005;
sellcond1 = C >= mav4*0.99;
sellcond2 = C >= mav5*0.99;
sellcond3 = mav4 >= mav10*0.99 and mav4 <= mav10*1.01 and
C >= mav10*0.988;
if cond1 == true Then{
if buyCond1 == true and Sdate >= 날짜 and Bcnt1 < 1 Then{
buy("B1매수");
Bcnt1 = 1;
Buyv1 = C; //B1 진입가
B1 = Pcnt;
B2 = 0; //B2 해제
}
}
if cond1 == true or cond2 == true then{ //매수조건 1,2는 cond1,cond2 모두 발동
if buyCond2 == true and Sdate >= 날짜 and Bcnt2 < 1 Then{
buy("B2매수");
Bcnt2 = 1;
Buyv2 = C; //B2 진입가
B2 = Pcnt;
B1 = 0; //B1 해제
}
if buyCond3 == true and Sdate >= 날짜 and Bcnt3 < 1 Then{
buy("B3매수");
Bcnt3 = 1;
Buyv3 = C; //B2 진입가
B3 = Pcnt;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
}
if marketposition() == 1 and B1 >= Pcnt and crossdown(C, Buyv1*(1-B1/100)) Then{
buy("B1추가");
B1 = B1+Pcnt;
}
if marketposition() == 1 and B2 >= Pcnt and crossdown(C, Buyv2*(1-B2/100)) Then{
buy("B2추가");
B2 = B2+Pcnt;
}
if marketposition() == 1 and B3 >= Pcnt and crossdown(C, Buyv3*(1-B3/100)) Then{
buy("B3추가");
B3 = B3+Pcnt;
}
if MarketPosition() == 1 and sellcond1 == true Then {
exitlong("EX1");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
if MarketPosition() == 1 and sellcond2 == true Then {
exitlong("EX2");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
if MarketPosition() == 1 and sellcond3 == true Then {
exitlong("EX3");
Bcnt1 = 1;
Bcnt2 = 1;
Bcnt3 = 1;
B1 = 0; //B1 해제
B2 = 0; //B2 해제
}
다음글
이전글