커뮤니티
파라볼릭 크기
2024-07-12 11:08:26
752
글번호 181417
첨부 이미지
그림1
Input : af(0.02), maxAF(0.2);
var : T(0),B(0),S(0),tx(0);
var1 = CSar(af,maxAF);
plot1(var1, "CSAR",IFF(c>var1,Red,Blue));
if CrossUp(C,var1) Then
{
T = 1;
B = var1;
tx = Text_New(sDate,sTime,var1,NumToStr(abs(var1-B),2));
Text_SetColor(tx,Red);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
else if CrossDown(C,var1) Then
{
T = -1;
S = var1;
tx = Text_New(sDate,sTime,var1,NumToStr(abs(var1-S),2));
Text_SetColor(tx,Blue);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
Else
{
if T == 1 Then
{
Text_SetString(tx,NumToStr(abs(var1-B),2));
Text_SetLocation(tx,sDate,sTime,var1);
}
if T == -1 Then
{
Text_SetString(tx,NumToStr(abs(var1-S),2));
Text_SetLocation(tx,sDate,sTime,var1);
}
}
1.파라볼릭 크기와 위치 수정.
하락선의 색 부분만 계산되는데,상단부터 상승전환전 주가의 최저가까지 계산.
2.전환되면 크기가 0.5 이상만 저장.이하는 삭제.(상승 하락 각기 설정) 감사합니다.
- 1. 20240712_104801.png (0.33 MB)
답변 1
예스스탁 예스스탁 답변
2024-07-12 14:20:30
안녕하세요
예스스탁입니다.
Input : af(0.02), maxAF(0.2);
var : T(0),B(0),S(0),tx(0),hh(0),ll(0);
var1 = CSar(af,maxAF);
plot1(var1, "CSAR",IFF(c>var1,Red,Blue));
if CrossUp(C,var1) Then
{
T = 1;
B = var1;
HH = H;
Condition1 = False;
if Condition1 == False and HH >= B+0.5 Then
{
Condition1 = true;
tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2));
Text_SetColor(tx,Red);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
}
if CrossDown(C,var1) Then
{
T = -1;
S = var1;
LL = L;
Condition2 = False;
if Condition2 == False and LL <= B-0.5 Then
{
Condition2 = true;
tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2));
Text_SetColor(tx,Blue);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
}
Else
{
if T == 1 Then
{
if H > HH Then
HH = H;
if Condition1 == False and HH >= B+0.5 Then
{
Condition1 = true;
tx = Text_New(sDate,sTime,HH,NumToStr(abs(HH-B),2));
Text_SetColor(tx,Red);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
if Condition1 == true Then
{
Text_SetString(tx,NumToStr(abs(HH-B),2));
Text_SetLocation(tx,sDate,sTime,HH);
}
}
if T == -1 Then
{
if L < LL Then
LL = L;
if Condition2 == False and LL <= B-0.5 Then
{
Condition2 = true;
tx = Text_New(sDate,sTime,LL,NumToStr(abs(LL-S),2));
Text_SetColor(tx,Blue);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
if Condition2 == true Then
{
Text_SetString(tx,NumToStr(abs(LL-S),2));
Text_SetLocation(tx,sDate,sTime,LL);
}
}
}
즐거운 하루되세요
> 고성 님이 쓴 글입니다.
> 제목 : 파라볼릭 크기
> Input : af(0.02), maxAF(0.2);
var : T(0),B(0),S(0),tx(0);
var1 = CSar(af,maxAF);
plot1(var1, "CSAR",IFF(c>var1,Red,Blue));
if CrossUp(C,var1) Then
{
T = 1;
B = var1;
tx = Text_New(sDate,sTime,var1,NumToStr(abs(var1-B),2));
Text_SetColor(tx,Red);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
else if CrossDown(C,var1) Then
{
T = -1;
S = var1;
tx = Text_New(sDate,sTime,var1,NumToStr(abs(var1-S),2));
Text_SetColor(tx,Blue);
Text_SetSize(tx,25);
Text_SetStyle(tx,2,2);
Text_SetBold(tx,1);
}
Else
{
if T == 1 Then
{
Text_SetString(tx,NumToStr(abs(var1-B),2));
Text_SetLocation(tx,sDate,sTime,var1);
}
if T == -1 Then
{
Text_SetString(tx,NumToStr(abs(var1-S),2));
Text_SetLocation(tx,sDate,sTime,var1);
}
}
1.파라볼릭 크기와 위치 수정.
하락선의 색 부분만 계산되는데,상단부터 상승전환전 주가의 최저가까지 계산.
2.전환되면 크기가 0.5 이상만 저장.이하는 삭제.(상승 하락 각기 설정) 감사합니다.
다음글
이전글