커뮤니티
파라볼릭 쓰리바닥 쓰리봉 분리
2022-11-07 12:17:11
750
글번호 163574
Input : af(0.02), maxAF(0.2),상(1),하(1);
Var : Sarv(0),tl(0),T(0);
Sarv = sar(af,maxAF);
If crossup(c,Sarv) Then
{
T = 1;
var1 = Sarv;
Var2 = var1[1];
Var3 = var2[1];
Condition1 = False;
if var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and
var2 <= var3+PriceScale*상 and var2 >= var3-PriceScale*하 and var3 > 0 Then
{
Condition1 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
if CrossDown(C,sarv) Then
{
T = -1;
value1 = Sarv;
value2 = value1[1];
value3 = value2[1];
Condition2 = False;
if value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and value3 > 0 Then
{
Condition2 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,0.5);
}
}
Else
{
if T == 1 Then
{
if sarv < var1 Then
{
var1 = sarv;
if Condition1 == False and var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and
var2 <= var3+PriceScale*상 and var2 >= var3-PriceScale*하 and var3 > 0 Then
{
Condition1 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
}
if T == -1 Then
{
if sarv > value1 Then
{
value1 = sarv;
if Condition2 == False and value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and value3 > 0 Then
{
Condition2 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,0.5);
}
}
}
}
쓰리바닥과 쓰리봉을 각기 다른 두개의 수식으로 분리. 감사합니다.
답변 1
예스스탁 예스스탁 답변
2022-11-07 13:49:32
안녕하세요
예스스탁입니다.
1
Input : af(0.02), maxAF(0.2),상(1),하(1);
Var : Sarv(0),tl(0),T(0);
Sarv = sar(af,maxAF);
If crossup(c,Sarv) Then
{
T = 1;
var1 = Sarv;
Var2 = var1[1];
Var3 = var2[1];
Condition1 = False;
if var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and
var2 <= var3+PriceScale*상 and var2 >= var3-PriceScale*하 and var3 > 0 Then
{
Condition1 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
else if CrossDown(C,sarv) Then
{
T = -1;
}
Else
{
if T == 1 Then
{
if sarv < var1 Then
{
var1 = sarv;
if Condition1 == False and var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and
var2 <= var3+PriceScale*상 and var2 >= var3-PriceScale*하 and var3 > 0 Then
{
Condition1 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
}
}
2
Input : af(0.02), maxAF(0.2),상(1),하(1);
Var : Sarv(0),tl(0),T(0);
Sarv = sar(af,maxAF);
If crossup(c,Sarv) Then
{
T = 1;
}
else if CrossDown(C,sarv) Then
{
T = -1;
value1 = Sarv;
value2 = value1[1];
value3 = value2[1];
Condition2 = False;
if value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and value3 > 0 Then
{
Condition2 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,0.5);
}
}
Else
{
if T == -1 Then
{
if sarv > value1 Then
{
value1 = sarv;
if Condition2 == False and value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and value3 > 0 Then
{
Condition2 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,0.5);
}
}
}
}
즐거운 하루되세요
> 고성 님이 쓴 글입니다.
> 제목 : 파라볼릭 쓰리바닥 쓰리봉 분리
> Input : af(0.02), maxAF(0.2),상(1),하(1);
Var : Sarv(0),tl(0),T(0);
Sarv = sar(af,maxAF);
If crossup(c,Sarv) Then
{
T = 1;
var1 = Sarv;
Var2 = var1[1];
Var3 = var2[1];
Condition1 = False;
if var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and
var2 <= var3+PriceScale*상 and var2 >= var3-PriceScale*하 and var3 > 0 Then
{
Condition1 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
if CrossDown(C,sarv) Then
{
T = -1;
value1 = Sarv;
value2 = value1[1];
value3 = value2[1];
Condition2 = False;
if value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and value3 > 0 Then
{
Condition2 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,0.5);
}
}
Else
{
if T == 1 Then
{
if sarv < var1 Then
{
var1 = sarv;
if Condition1 == False and var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and
var2 <= var3+PriceScale*상 and var2 >= var3-PriceScale*하 and var3 > 0 Then
{
Condition1 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
}
if T == -1 Then
{
if sarv > value1 Then
{
value1 = sarv;
if Condition2 == False and value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and value3 > 0 Then
{
Condition2 = true;
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,0.5);
}
}
}
}
쓰리바닥과 쓰리봉을 각기 다른 두개의 수식으로 분리. 감사합니다.