커뮤니티
파라볼릭 실쓰리
2025-03-14 13:44:34
327
글번호 189165
Input : af(0.02), maxAF(0.2);
Var : cSarv(0),T(0),tx(0),tx1(0),tx2(0);
var : LL(0),LL1(0),HH(0),HH1(0);
cSarv = csar(af,maxAF);
plot1(c);
If crossup(c,cSarv) Then
{
T = 1;
Text_Delete(tx2);
HH = H;
HH1 = HH[1];
var1 = cSarv;
}
If CrossDown(c,cSarv) Then
{
T = -1;
Text_Delete(tx1);
LL = L;
LL1 = LL[1];
var4 = csarv;
}
if T == 1 Then
{
if H > HH Then
HH = H;
Text_Delete(tx1);
if HH >= HH1-PriceScale*1 and HH <= HH1+PriceScale*1
and var4>= lowest(L,600)+0.8 and var4 >= highest(H,300)-0.1 Then
{
tx1 = Text_New(sDate,sTime,HH+0.2,"■");
Text_SetStyle(tx1,2,2);
Text_SetColor(tx1,Cyan);
Text_SetSize(tx1,45);
}
}
if T == -1 Then
{
if L < LL Then
LL = L;
Text_Delete(tx2);
if LL <= LL1+PriceScale*1 and LL >= LL1-PriceScale*1
and var1<= highest(H,1000)-0.8 and var1<= lowest(L,500)+0.1 Then
{
tx2 = Text_New(sDate,sTime,LL-0.2,"■");
Text_SetStyle(tx2,2,2);
Text_SetColor(tx2,Lime);
Text_SetSize(tx2,45);
}
}
1.수정
max,min을 이용해 수식 단순화가 가능하면, 쌍바닥 가능 네모를 1틱 이내일 때 표시로 수정.
아래로 벗어나거나 양전환되면 삭제.
쌍봉은 반대.
2.추가
세 저점이 2틱 이내에 들어오면 (2틱내 쓰리바닥 가능 지점) 세로선 추가.
2틱 이내를 아래로 하향 돌파하면 세로선 삭제.
그전에 양전환되면 삭제.
세 고점이 2틱 이내에 들어오면 (2틱내 쓰리봉 가능 지점) 세로선 추가.
2틱 이내를 위로 상향 돌파하면 세로선 삭제.
그전에 음전환되면 삭제. 감사합니다.
답변 1
예스스탁 예스스탁 답변
2025-03-14 15:56:52
안녕하세요
예스스탁입니다.
Input : af(0.02), maxAF(0.2);
Var : cSarv(0),T(0),tx(0),tx1(0),tx2(0);
var : LL(0),LL1(0),HH(0),HH1(0),LL2(0),HH2(0),TL1(0),TL2(0);
cSarv = csar(af,maxAF);
plot1(c);
If crossup(c,cSarv) Then
{
T = 1;
Text_Delete(tx2);
HH = H;
HH1 = HH[1];
HH2 = HH1[1];
var1 = cSarv;
TL_Delete(TL2);
}
If CrossDown(c,cSarv) Then
{
T = -1;
Text_Delete(tx1);
LL = L;
LL1 = LL[1];
LL2 = LL1[1];
var4 = csarv;
TL_Delete(TL1);
}
if T == 1 Then
{
if H > HH Then
HH = H;
Text_Delete(tx1);
if HH >= HH1-PriceScale*1 and HH <= HH1+PriceScale*1
and var4>= lowest(L,600)+0.8 and var4 >= highest(H,300)-0.1 Then
{
tx1 = Text_New(sDate,sTime,HH+0.2,"■");
Text_SetStyle(tx1,2,2);
Text_SetColor(tx1,Cyan);
Text_SetSize(tx1,45);
}
TL_Delete(TL1);
if hh2 > 0 and max(HH2,HH1,HH) <= min(HH2,HH1,HH)+PriceScale*2 Then
{
TL1 = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL1,Red);
}
}
if T == -1 Then
{
if L < LL Then
LL = L;
Text_Delete(tx2);
if LL <= LL1+PriceScale*1 and LL >= LL1-PriceScale*1
and var1<= highest(H,1000)-0.8 and var1<= lowest(L,500)+0.1 Then
{
tx2 = Text_New(sDate,sTime,LL-0.2,"■");
Text_SetStyle(tx2,2,2);
Text_SetColor(tx2,Lime);
Text_SetSize(tx2,45);
}
TL_Delete(TL2);
if LL2 > 0 and max(LL2,LL1,LL) <= min(LL2,LL1,LL)+PriceScale*2 Then
{
TL2 = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL2,Blue);
}
}
즐거운 하루되세요
> 고성 님이 쓴 글입니다.
> 제목 : 파라볼릭 실쓰리
> Input : af(0.02), maxAF(0.2);
Var : cSarv(0),T(0),tx(0),tx1(0),tx2(0);
var : LL(0),LL1(0),HH(0),HH1(0);
cSarv = csar(af,maxAF);
plot1(c);
If crossup(c,cSarv) Then
{
T = 1;
Text_Delete(tx2);
HH = H;
HH1 = HH[1];
var1 = cSarv;
}
If CrossDown(c,cSarv) Then
{
T = -1;
Text_Delete(tx1);
LL = L;
LL1 = LL[1];
var4 = csarv;
}
if T == 1 Then
{
if H > HH Then
HH = H;
Text_Delete(tx1);
if HH >= HH1-PriceScale*1 and HH <= HH1+PriceScale*1
and var4>= lowest(L,600)+0.8 and var4 >= highest(H,300)-0.1 Then
{
tx1 = Text_New(sDate,sTime,HH+0.2,"■");
Text_SetStyle(tx1,2,2);
Text_SetColor(tx1,Cyan);
Text_SetSize(tx1,45);
}
}
if T == -1 Then
{
if L < LL Then
LL = L;
Text_Delete(tx2);
if LL <= LL1+PriceScale*1 and LL >= LL1-PriceScale*1
and var1<= highest(H,1000)-0.8 and var1<= lowest(L,500)+0.1 Then
{
tx2 = Text_New(sDate,sTime,LL-0.2,"■");
Text_SetStyle(tx2,2,2);
Text_SetColor(tx2,Lime);
Text_SetSize(tx2,45);
}
}
1.수정
max,min을 이용해 수식 단순화가 가능하면, 쌍바닥 가능 네모를 1틱 이내일 때 표시로 수정.
아래로 벗어나거나 양전환되면 삭제.
쌍봉은 반대.
2.추가
세 저점이 2틱 이내에 들어오면 (2틱내 쓰리바닥 가능 지점) 세로선 추가.
2틱 이내를 아래로 하향 돌파하면 세로선 삭제.
그전에 양전환되면 삭제.
세 고점이 2틱 이내에 들어오면 (2틱내 쓰리봉 가능 지점) 세로선 추가.
2틱 이내를 위로 상향 돌파하면 세로선 삭제.
그전에 음전환되면 삭제. 감사합니다.
다음글
이전글