답변완료
파라볼릭 크기
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 이상만 저장.이하는 삭제.(상승 하락 각기 설정) 감사합니다.
2024-07-12
787
글번호 181417
지표
답변완료
수식 수정 부탁드립니다.
IF MarketPosition ==0 and 조건 then
{
Buy("b",OnClosE,DeF,2);
ExitLong("bxL1",AtStop,L);#진입봉 다음봉만 감시해서 청산
}
if MarketPosition == 1 Then
ExitLong("bxL",AtStop,L[BarsSinceEntry]);
알려주신 대로 설정하니 손절이 정확히 되고 있습니다. 감사합니다.
그런데 첨부한 파일에서 처럼 진입봉자체가 장대양봉일 때 진입가격과 저가와의 차이가 너무 커서, 그런
큰손실을 대비해서 아래의 손절을 추가 설저해놓았는데 다음다음봉에서부터는 손절이 되는데, 첨부파일처럼 진입봉 바로 다음봉에서는 저가-195p 될때까지 아래의 손절식이 안이루어집니다. 결국은 2계약 손절합이 -395p가 되어 청산되었습니다. 혹 진입봉 바로 다음봉에서도 아래의 손절이 적용되게 하는 식 좀 알려주시기 바랍니다.
if MarketPosition == 1 Then
ExitLong("Bx1",AtStop,EntryPrice-50,"",1,1);
ExitLong("Bx2",AtStop,EntryPrice-90);
2024-07-12
782
글번호 181415
시스템
답변완료
부틱드립니다
수고하십니다
아래 키움수식을 예스로 부탁드립니다
수식4
R=RSI(기간1);
if(R<=선, valuewhen(1, H<H(1), Max(O,C))*1.0,
valuewhen(1,crossdown(R,선) or crossup(R,선),Max(O,C)))
수식5
R=RSI(기간1);
if(R<=선, valuewhen(1, L<L(1), L)*1.0,
valuewhen(1,crossdown(R,선) or crossup(R,선),L))
2024-07-12
796
글번호 181413
지표
답변완료
고점 저점 추세선 수정부탁해요.
고점 저점 추세선 기존 수식입니다.
SwingHigh 기준봉의 고가와 저가가 있습니다. 위 기준봉의 저가 보다 가격이 하락하면 그때 swinghigh 기준봉 고가를 진짜 고가로 인정해주고,
swinglow 기준봉의 저가와 고가가 있는데 가격이 위 고가 보다 더 상승할 때 위 기준봉의 저가를 진짜 저가로 인정해서 찐 고가와 저가만 추세선을 연결하게 수정부탁드려요.
[기준봉의 고가 저가 범위 내에서 가격이 움직일 때(가끔 기준봉의 범위가 커서 예를 들어 상한가 양봉과 같이 그 안에서 가격이 등락하면서 잉태형 캔들들이 swinghigh나 low를 만들어도 잉태형 캔들은)는 무시하고 추후 가격이 기준봉의 고가나 저가를 돌파할 때 ( 예를 들어 과거 장대 양봉) 기준봉의 고가나 저가를 기준점으로 인정해서 추세선을 그리도록]
그리고 이전 SwingHigh 기준봉의 저가를 돌파하며 하락하는 종목 검색식,
이전 swinglow 기준봉의 고가를 상승 돌파하는 종목 검색식 부탁합니다.
input : Left(5),right(5);
var : T(0),cnt(0),TL(0),HTL1(0),HTL2(0),LTL1(0),LTL2(0);
Array : SHD[5](0),SHT[5](0),SHV[5](0);
Array : SLD[5](0),SLT[5](0),SLV[5](0);
if SwingHigh(1,H,Left,Right,Left+Right+1) != -1 then
{
var2 = 0;
var1 = var1+1;
if var1 == 1 then
{
SHD[0] = sdate[right];
SHT[0] = stime[right];
SHV[0] = H[right];
for cnt = 1 to 4
{
SHD[cnt] = SHD[cnt-1][1];
SHT[cnt] = SHT[cnt-1][1];
SHV[cnt] = SHV[cnt-1][1];
}
if SLV[0] > 0 Then
{
TL = TL_New(SLD[0],SLT[0],SLV[0],SHD[0],SHT[0],SHV[0]);
}
}
if var1 >= 2 and H[right] > SHV[0] then
{
SHD[0] = sdate[right];
SHT[0] = stime[right];
SHV[0] = H[right];
if SLV[0] > 0 Then
{
TL_Delete(TL);
TL = TL_New(SLD[0],SLT[0],SLV[0],SHD[0],SHT[0],SHV[0]);
}
}
if SHV[1] > 0 Then
{
TL_Delete(HTL1);
HTL1 = TL_New(SHD[1],SHT[1],SHV[1],SHD[0],SHT[0],SHV[0]);
TL_SetColor(HTL1,RED);
}
if SHV[2] > 0 Then
{
TL_Delete(HTL2);
HTL2 = TL_New(SHD[2],SHT[2],SHV[2],SHD[0],SHT[0],SHV[0]);
TL_SetColor(HTL2,RED);
}
}
if SwingLow(1,L,Left,Right,Left+Right+1) != -1 then
{
var1 = 0;
var2 = var2+1;
if var2 == 1 then
{
SLD[0] = sdate[right];
SLT[0] = stime[right];
SLV[0] = L[right];
for cnt = 1 to 4
{
SLD[cnt] = SLD[cnt-1][1];
SLT[cnt] = SLT[cnt-1][1];
SLV[cnt] = SLV[cnt-1][1];
}
if SHV[0] > 0 Then
{
TL = TL_New(SHD[0],SHT[0],SHV[0],SLD[0],SLT[0],SLV[0]);
}
}
if var2 >= 2 and L[right] < SLV[0] then
{
SLD[0] = sdate[right];
SLT[0] = stime[right];
SLV[0] = L[right];
TL_Delete(TL);
if SHV[0] > 0 Then
{
TL = TL_New(SHD[0],SHT[0],SHV[0],SLD[0],SLT[0],SLV[0]);
}
}
if SLV[1] > 0 Then
{
TL_Delete(LTL1);
LTL1 = TL_New(SLD[1],SLT[1],SLV[1],SLD[0],SLT[0],SLV[0]);
TL_SetColor(LTL1,BLUE);
}
if SLV[2] > 0 Then
{
TL_Delete(LTL2);
LTL2 = TL_New(SLD[2],SLT[2],SLV[2],SLD[0],SLT[0],SLV[0]);
TL_SetColor(LTL2,BLUE);
}
}
2024-07-12
709
글번호 181411
지표