커뮤니티
시스템식으로부탁드립니다.
2013-04-02 09:25:33
260
글번호 61508
안녕하세요 시스템식부탁드립니다.
input:단기봉기간(3),단기전봉차(0.07),장기전봉차(0.01);
input:장기봉기간(18),LENGTH1(10);
var:TEMA71(0),TEMA81(0),Ep(0),T1(0),T2(0),T3(0),TEMA82(0);
if dayindex+1 < 단기봉기간 Then{
var71 = DayHigh;
var72 = DayLow;
}
Else{
var71 = highest(H,단기봉기간);
var72 = Lowest(L,단기봉기간);
}
value71 = (var71 - var72)/2+var72;
plot1(value71,"단기중간",iff(value71>value71[1]+단기전봉차,red,iff(value71<value71[1]-단기전봉차,BLUE,WHITE)));
if dayindex+1 < 장기봉기간 Then{
var81 = DayHigh;
var82 = DayLow;
}
Else{
var81 = highest(H,장기봉기간);
var82 = Lowest(L,장기봉기간);
}
value81 = (var81 - var82)/2+var82;
plot2(value81,"장기중간",iff(value81>value81[1]+장기전봉차,red,iff(value81<value81[1]-장기전봉차,BLUE,WHITE)));
TEMA71 = (3 * Ema(value71,LENGTH1)) - (3 * Ema(Ema(value71,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(value71,LENGTH1),LENGTH1),LENGTH1));
plot3(tema71,"단기테마",iff(tema71>tema71[1],red,blue));
Ep = 2/(LENGTH1+1);
if dayindex == 0 Then
T1 = value81;
Else
T1 = value81*EP + T1[1] * (1-EP);
if dayindex <= 1 Then
T2 = T1;
Else
T2 = T1*EP + T2[1] * (1-EP);
if dayindex <= 2 Then
T3 = T2;
Else
T3 = T2*EP + T3[1] * (1-EP);
TEMA82 = (3 * T1) - (3 * T2) + (T3);
plot4(TEMA82,"장기테마등락",iff(tema81>tema81[1]+장기전봉차,red,iff(tema81<tema81[1]-장기전봉차,BLUE,WHITE)));
2. 스토교차시 택스트 표시가가능한지요 예제을들어 상승 하락
input : Period(12), Period1(5), Period2(5);
var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0);
var : stoLval(0), stoHval(0), fastK(0), slowK(0), slowD(0);
if date!=date[1] then { // 날짜가 변경되는 봉에서(분봉에서 첫번째 봉)
gap = Open-Close[1]; // 일간갭
sumGap = sumGap+gap; // 일간갭 누적
}
GO = O - sumGap;// 갭보정 시가
GH = H - sumGap;// 갭보정 고가
GL = L - sumGap;// 갭보정 저가
GC = C - sumGap; // 갭보정 종가
stoLval = lowest(GL,Period);
stoHval = highest(GH,Period);
fastK = (GC-stoLval)/(stoHval-stoLval)*100;
slowK = ema(fastK, Period1);
slowD = ema(slowK, Period2);
plot1(slowK);
plot2(slowD);
답변 2
외국인
2013-04-02 11:30:46
> 외국인 님이 쓴 글입니다.
> 제목 : 시스템식으로부탁드립니다.
> 안녕하세요 시스템식부탁드립니다.
input:단기봉기간(3),단기전봉차(0.07),장기전봉차(0.01);
input:장기봉기간(18),LENGTH1(10);
var:TEMA71(0),TEMA81(0),Ep(0),T1(0),T2(0),T3(0),TEMA82(0);
if dayindex+1 < 단기봉기간 Then{
var71 = DayHigh;
var72 = DayLow;
}
Else{
var71 = highest(H,단기봉기간);
var72 = Lowest(L,단기봉기간);
}
value71 = (var71 - var72)/2+var72;
plot1(value71,"단기중간",iff(value71>value71[1]+단기전봉차,red,iff(value71<value71[1]-단기전봉차,BLUE,WHITE)));
if dayindex+1 < 장기봉기간 Then{
var81 = DayHigh;
var82 = DayLow;
}
Else{
var81 = highest(H,장기봉기간);
var82 = Lowest(L,장기봉기간);
}
value81 = (var81 - var82)/2+var82;
plot2(value81,"장기중간",iff(value81>value81[1]+장기전봉차,red,iff(value81<value81[1]-장기전봉차,BLUE,WHITE)));
TEMA71 = (3 * Ema(value71,LENGTH1)) - (3 * Ema(Ema(value71,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(value71,LENGTH1),LENGTH1),LENGTH1));
plot3(tema71,"단기테마",iff(tema71>tema71[1],red,blue));
Ep = 2/(LENGTH1+1);
if dayindex == 0 Then
T1 = value81;
Else
T1 = value81*EP + T1[1] * (1-EP);
if dayindex <= 1 Then
T2 = T1;
Else
T2 = T1*EP + T2[1] * (1-EP);
if dayindex <= 2 Then
T3 = T2;
Else
T3 = T2*EP + T3[1] * (1-EP);
TEMA82 = (3 * T1) - (3 * T2) + (T3);
plot4(TEMA82,"장기테마등락",iff(tema81>tema81[1]+장기전봉차,red,iff(tema81<tema81[1]-장기전봉차,BLUE,WHITE)));
2. 스토교차시 택스트 표시가가능한지요 예제을들어 상승 하락
input : Period(12), Period1(5), Period2(5);
var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0);
var : stoLval(0), stoHval(0), fastK(0), slowK(0), slowD(0);
if date!=date[1] then { // 날짜가 변경되는 봉에서(분봉에서 첫번째 봉)
gap = Open-Close[1]; // 일간갭
sumGap = sumGap+gap; // 일간갭 누적
}
GO = O - sumGap;// 갭보정 시가
GH = H - sumGap;// 갭보정 고가
GL = L - sumGap;// 갭보정 저가
GC = C - sumGap; // 갭보정 종가
stoLval = lowest(GL,Period);
stoHval = highest(GH,Period);
fastK = (GC-stoLval)/(stoHval-stoLval)*100;
slowK = ema(fastK, Period1);
slowD = ema(slowK, Period2);
plot1(slowK);
plot2(slowD);
예스스탁 예스스탁 답변
2013-04-02 11:47:07
안녕하세요
예스스탁입니다.
1.
해당 지표식에 출력되는 값이 여러개입니다.
전략식의 내용이 정확치 않아 단기테마와 장기테마의 크로스로 작성했습니다.
input:단기봉기간(3),단기전봉차(0.07),장기전봉차(0.01);
input:장기봉기간(18),LENGTH1(10);
var:TEMA71(0),TEMA81(0),Ep(0),T1(0),T2(0),T3(0),TEMA82(0);
if dayindex+1 < 단기봉기간 Then{
var71 = DayHigh;
var72 = DayLow;
}
Else{
var71 = highest(H,단기봉기간);
var72 = Lowest(L,단기봉기간);
}
value71 = (var71 - var72)/2+var72;
if dayindex+1 < 장기봉기간 Then{
var81 = DayHigh;
var82 = DayLow;
}
Else{
var81 = highest(H,장기봉기간);
var82 = Lowest(L,장기봉기간);
}
value81 = (var81 - var82)/2+var82;
TEMA71 = (3 * Ema(value71,LENGTH1)) - (3 * Ema(Ema(value71,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(value71,LENGTH1),LENGTH1),LENGTH1));
Ep = 2/(LENGTH1+1);
if dayindex == 0 Then
T1 = value81;
Else
T1 = value81*EP + T1[1] * (1-EP);
if dayindex <= 1 Then
T2 = T1;
Else
T2 = T1*EP + T2[1] * (1-EP);
if dayindex <= 2 Then
T3 = T2;
Else
T3 = T2*EP + T3[1] * (1-EP);
TEMA82 = (3 * T1) - (3 * T2) + (T3);
if crossup(TEMA71,TEMA82) Then
buy();
if CrossDown(TEMA71,TEMA82) Then
sell();
2.
input : Period(12), Period1(5), Period2(5);
var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0);
var : stoLval(0), stoHval(0), fastK(0), slowK(0), slowD(0);
if date!=date[1] then { // 날짜가 변경되는 봉에서(분봉에서 첫번째 봉)
gap = Open-Close[1]; // 일간갭
sumGap = sumGap+gap; // 일간갭 누적
}
GO = O - sumGap;// 갭보정 시가
GH = H - sumGap;// 갭보정 고가
GL = L - sumGap;// 갭보정 저가
GC = C - sumGap; // 갭보정 종가
stoLval = lowest(GL,Period);
stoHval = highest(GH,Period);
fastK = (GC-stoLval)/(stoHval-stoLval)*100;
slowK = ema(fastK, Period1);
slowD = ema(slowK, Period2);
if crossup(slowK,slowD) Then
Text_New(sdate,stime,H,"상향돌파");
if CrossDown(slowK,slowD) Then
Text_New(sdate,stime,H,"하향이탈");
plot1(slowK);
plot2(slowD);
즐거운 하루되세요
> 외국인 님이 쓴 글입니다.
> 제목 : Re : 시스템식으로부탁드립니다.
>
> 외국인 님이 쓴 글입니다.
> 제목 : 시스템식으로부탁드립니다.
> 안녕하세요 시스템식부탁드립니다.
input:단기봉기간(3),단기전봉차(0.07),장기전봉차(0.01);
input:장기봉기간(18),LENGTH1(10);
var:TEMA71(0),TEMA81(0),Ep(0),T1(0),T2(0),T3(0),TEMA82(0);
if dayindex+1 < 단기봉기간 Then{
var71 = DayHigh;
var72 = DayLow;
}
Else{
var71 = highest(H,단기봉기간);
var72 = Lowest(L,단기봉기간);
}
value71 = (var71 - var72)/2+var72;
plot1(value71,"단기중간",iff(value71>value71[1]+단기전봉차,red,iff(value71<value71[1]-단기전봉차,BLUE,WHITE)));
if dayindex+1 < 장기봉기간 Then{
var81 = DayHigh;
var82 = DayLow;
}
Else{
var81 = highest(H,장기봉기간);
var82 = Lowest(L,장기봉기간);
}
value81 = (var81 - var82)/2+var82;
plot2(value81,"장기중간",iff(value81>value81[1]+장기전봉차,red,iff(value81<value81[1]-장기전봉차,BLUE,WHITE)));
TEMA71 = (3 * Ema(value71,LENGTH1)) - (3 * Ema(Ema(value71,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(value71,LENGTH1),LENGTH1),LENGTH1));
plot3(tema71,"단기테마",iff(tema71>tema71[1],red,blue));
Ep = 2/(LENGTH1+1);
if dayindex == 0 Then
T1 = value81;
Else
T1 = value81*EP + T1[1] * (1-EP);
if dayindex <= 1 Then
T2 = T1;
Else
T2 = T1*EP + T2[1] * (1-EP);
if dayindex <= 2 Then
T3 = T2;
Else
T3 = T2*EP + T3[1] * (1-EP);
TEMA82 = (3 * T1) - (3 * T2) + (T3);
plot4(TEMA82,"장기테마등락",iff(tema81>tema81[1]+장기전봉차,red,iff(tema81<tema81[1]-장기전봉차,BLUE,WHITE)));
2. 스토교차시 택스트 표시가가능한지요 예제을들어 상승 하락
input : Period(12), Period1(5), Period2(5);
var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0);
var : stoLval(0), stoHval(0), fastK(0), slowK(0), slowD(0);
if date!=date[1] then { // 날짜가 변경되는 봉에서(분봉에서 첫번째 봉)
gap = Open-Close[1]; // 일간갭
sumGap = sumGap+gap; // 일간갭 누적
}
GO = O - sumGap;// 갭보정 시가
GH = H - sumGap;// 갭보정 고가
GL = L - sumGap;// 갭보정 저가
GC = C - sumGap; // 갭보정 종가
stoLval = lowest(GL,Period);
stoHval = highest(GH,Period);
fastK = (GC-stoLval)/(stoHval-stoLval)*100;
slowK = ema(fastK, Period1);
slowD = ema(slowK, Period2);
plot1(slowK);
plot2(slowD);