커뮤니티
수식 부탁드립니다.
2019-01-23 00:00:55
182
글번호 125499
전에 만들어주신건데 잘 사용중입니다.
감사하구요. 여기에 추가적으로 위아래로 3줄더 부탁드립니다.
var14-(var13-var14)*2,3,4
var24+(var24-var23)*2,3,4
input : len(11), period(200);
var : Lbar1(0), Lbar2(0), Lval1(0), Lval2(0), Hbar1(0), Hbar2(0), Hval1(0), Hval2(0);
var : UpTrend(0), DnTrend(0),TL1(0),TL2(0),TL3(0);
Lbar1 = swinglowbar(1, low, len, len, period);
Lbar2 = swinglowbar(2, low, len, len, period);
Lval1 = swinglow(1, low, len, len, period);
Lval2 = swinglow(2, low, len, len, period);
Hbar1 = swinghighbar(1, high, len, len, period);
Hbar2 = swinghighbar(2, high, len, len, period);
Hval1 = swinghigh(1, high, len, len, period);
Hval2 = swinghigh(2, high, len, len, period);
If Lval1 > Lval2 Then
{
var1 = 1;
UpTrend = (Lval1 - Lval2)/(Lbar2 - Lbar1)*Lbar1 + Lval1;
plot1(UpTrend, "상승추세선");
}
Else
var1 = 0;
If Hval1 < Hval2 Then
{
var2 = 1;
DnTrend = (Hval1 - Hval2)/(Hbar2 - Hbar1)*Hbar1 + Hval1 ;
plot2(DnTrend, "하락추세선");
}
Else
var2 = 0;
if var1 == 1 and var1[1] != 1 or (Lbar1 < Lbar1[1]) Then
{
var11 = sdate;
var12 = stime;
var13 = H;
Condition1 = false;
}
if var1 == 1 then
{
if H > var13 Then
var13 = H;
if var1[1] == 1 and Condition1 == false and CrossDown(L,UpTrend) Then
{
Condition1 = true;
var14 = UpTrend;
var15 = var14-(var13-var14);
TL1 = TL_New(var11,var12,var15,sdate,stime,var15);
TL_SetColor(TL1,CYAN);
}
if Condition1 == true then
{
TL_SetEnd(TL1,sdate,stime,var15);
}
}
if var2 == 1 and var2[1] != 1 or (Hbar1 < Hbar1[1]) Then
{
var21 = sdate;
var22 = stime;
var23 = L;
Condition2 = false;
}
if var2 == 1 then
{
if L < var23 Then
var23 = L;
if var2[1] == 1 and Condition2 == false and CrossDown(H,DnTrend) Then
{
Condition2 = true;
var24 = DnTrend;
var25 = var24+(var24-var23);
TL2 = TL_New(var21,var22,var25,sdate,stime,var25);
TL_SetColor(TL2,MAGENTA);
}
if Condition2 == true then
{
TL_SetEnd(TL2,sdate,stime,var25);
}
}
답변 2
예스스탁 예스스탁 답변
2019-01-24 11:20:47
안녕하세요
예스스탁입니다.
#var14-(var13-var14)*2,3,4
#var24+(var24-var23)*2,3,4
input : len(11), period(200);
var : Lbar1(0), Lbar2(0), Lval1(0), Lval2(0), Hbar1(0), Hbar2(0), Hval1(0), Hval2(0);
var : UpTrend(0), DnTrend(0);
var : TL11(0),TL12(0),TL13(0),TL14(0);
var : TL21(0),TL22(0),TL23(0),TL24(0);
Lbar1 = swinglowbar(1, low, len, len, period);
Lbar2 = swinglowbar(2, low, len, len, period);
Lval1 = swinglow(1, low, len, len, period);
Lval2 = swinglow(2, low, len, len, period);
Hbar1 = swinghighbar(1, high, len, len, period);
Hbar2 = swinghighbar(2, high, len, len, period);
Hval1 = swinghigh(1, high, len, len, period);
Hval2 = swinghigh(2, high, len, len, period);
If Lval1 > Lval2 Then
{
var1 = 1;
UpTrend = (Lval1 - Lval2)/(Lbar2 - Lbar1)*Lbar1 + Lval1;
plot1(UpTrend, "상승추세선");
}
Else
var1 = 0;
If Hval1 < Hval2 Then
{
var2 = 1;
DnTrend = (Hval1 - Hval2)/(Hbar2 - Hbar1)*Hbar1 + Hval1 ;
plot2(DnTrend, "하락추세선");
}
Else
var2 = 0;
if var1 == 1 and var1[1] != 1 or (Lbar1 < Lbar1[1]) Then
{
var11 = sdate;
var12 = stime;
var13 = H;
Condition1 = false;
}
if var1 == 1 then
{
if H > var13 Then
var13 = H;
if var1[1] == 1 and Condition1 == false and CrossDown(L,UpTrend) Then
{
Condition1 = true;
var14 = UpTrend;
var15 = var14-(var13-var14)*1;
var16 = var14-(var13-var14)*2;
var17 = var14-(var13-var14)*3;
var18 = var14-(var13-var14)*4;
TL11 = TL_New(var11,var12,var15,sdate,stime,var15);
TL12 = TL_New(var11,var12,var16,sdate,stime,var16);
TL13 = TL_New(var11,var12,var17,sdate,stime,var17);
TL14 = TL_New(var11,var12,var18,sdate,stime,var18);
TL_SetColor(TL11,CYAN);
TL_SetColor(TL12,CYAN);
TL_SetColor(TL13,CYAN);
TL_SetColor(TL14,CYAN);
}
if Condition1 == true then
{
TL_SetEnd(TL11,sdate,stime,var15);
TL_SetEnd(TL12,sdate,stime,var16);
TL_SetEnd(TL13,sdate,stime,var17);
TL_SetEnd(TL14,sdate,stime,var18);
}
}
if var2 == 1 and var2[1] != 1 or (Hbar1 < Hbar1[1]) Then
{
var21 = sdate;
var22 = stime;
var23 = L;
Condition2 = false;
}
if var2 == 1 then
{
if L < var23 Then
var23 = L;
if var2[1] == 1 and Condition2 == false and CrossDown(H,DnTrend) Then
{
Condition2 = true;
var24 = DnTrend;
var25 = var24+(var24-var23)*1;
var26 = var24+(var24-var23)*2;
var27 = var24+(var24-var23)*3;
var28 = var24+(var24-var23)*4;
TL21 = TL_New(var21,var22,var25,sdate,stime,var25);
TL22 = TL_New(var21,var22,var26,sdate,stime,var26);
TL23 = TL_New(var21,var22,var27,sdate,stime,var27);
TL24 = TL_New(var21,var22,var28,sdate,stime,var28);
TL_SetColor(TL21,MAGENTA);
TL_SetColor(TL22,MAGENTA);
TL_SetColor(TL23,MAGENTA);
TL_SetColor(TL24,MAGENTA);
}
if Condition2 == true then
{
TL_SetEnd(TL21,sdate,stime,var25);
TL_SetEnd(TL22,sdate,stime,var25);
TL_SetEnd(TL23,sdate,stime,var25);
TL_SetEnd(TL24,sdate,stime,var25);
}
}
즐거운 하루되세요
> 스캘퍼 님이 쓴 글입니다.
> 제목 : 수식 부탁드립니다.
> 전에 만들어주신건데 잘 사용중입니다.
감사하구요. 여기에 추가적으로 위아래로 3줄더 부탁드립니다.
var14-(var13-var14)*2,3,4
var24+(var24-var23)*2,3,4
input : len(11), period(200);
var : Lbar1(0), Lbar2(0), Lval1(0), Lval2(0), Hbar1(0), Hbar2(0), Hval1(0), Hval2(0);
var : UpTrend(0), DnTrend(0),TL1(0),TL2(0),TL3(0);
Lbar1 = swinglowbar(1, low, len, len, period);
Lbar2 = swinglowbar(2, low, len, len, period);
Lval1 = swinglow(1, low, len, len, period);
Lval2 = swinglow(2, low, len, len, period);
Hbar1 = swinghighbar(1, high, len, len, period);
Hbar2 = swinghighbar(2, high, len, len, period);
Hval1 = swinghigh(1, high, len, len, period);
Hval2 = swinghigh(2, high, len, len, period);
If Lval1 > Lval2 Then
{
var1 = 1;
UpTrend = (Lval1 - Lval2)/(Lbar2 - Lbar1)*Lbar1 + Lval1;
plot1(UpTrend, "상승추세선");
}
Else
var1 = 0;
If Hval1 < Hval2 Then
{
var2 = 1;
DnTrend = (Hval1 - Hval2)/(Hbar2 - Hbar1)*Hbar1 + Hval1 ;
plot2(DnTrend, "하락추세선");
}
Else
var2 = 0;
if var1 == 1 and var1[1] != 1 or (Lbar1 < Lbar1[1]) Then
{
var11 = sdate;
var12 = stime;
var13 = H;
Condition1 = false;
}
if var1 == 1 then
{
if H > var13 Then
var13 = H;
if var1[1] == 1 and Condition1 == false and CrossDown(L,UpTrend) Then
{
Condition1 = true;
var14 = UpTrend;
var15 = var14-(var13-var14);
TL1 = TL_New(var11,var12,var15,sdate,stime,var15);
TL_SetColor(TL1,CYAN);
}
if Condition1 == true then
{
TL_SetEnd(TL1,sdate,stime,var15);
}
}
if var2 == 1 and var2[1] != 1 or (Hbar1 < Hbar1[1]) Then
{
var21 = sdate;
var22 = stime;
var23 = L;
Condition2 = false;
}
if var2 == 1 then
{
if L < var23 Then
var23 = L;
if var2[1] == 1 and Condition2 == false and CrossDown(H,DnTrend) Then
{
Condition2 = true;
var24 = DnTrend;
var25 = var24+(var24-var23);
TL2 = TL_New(var21,var22,var25,sdate,stime,var25);
TL_SetColor(TL2,MAGENTA);
}
if Condition2 == true then
{
TL_SetEnd(TL2,sdate,stime,var25);
}
}
스캘퍼
2019-01-24 12:43:07
스캘퍼 님에 의해 삭제된 답변입니다.
다음글
이전글