답변완료
수식 추가 부탁드립니다
아래 수식은 전일과 분리된 당일 파라볼릭 수식을 만들어주신 것입니다
아래 수식을 기반으로
1)전일과 분리된 당일 파라볼릭 양전환시 양전환 캔들 고가와 당일 저가 대칭값
2)전일과 분리된 당일 파라볼릭 음전환시 음전환 캔들 저가와 당일 고가 대칭값
수식 추가 부탁드립니다. 감사합니다
-----------------------------------------------------------------------------
Input : AF(0.02), AFMAX(0.2);
Var : Direction(0), SAR_Value(Close), AF_Value(.02), HighValue(High), LowValue(Low), EP(0);
var : CSarv(0);
if Bdate != Bdate[1] Then
{
Direction = 0;
SAR_Value = C;
AF_Value = 0.02;
HighValue = H;
LowValue = L;
EP = 0;
}
if EP != 0 Then
{
if Direction == 1 then
{
EP = HighValue;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if High > HighValue then
{
HighValue = High;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
if Close < SAR_Value then
{
Direction = -1;
SAR_Value = EP;
AF_Value = 0;
EP = 0;
LowValue = low;
}
}
else
{
EP = LowValue;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if Low < LowValue then
{
LowValue = Low;
AF_Value = AF_Value + Af;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
if Close > SAR_Value then
{
Direction = 1;
SAR_Value = EP;
AF_Value = 0;
EP = 0;
HighValue = High;
}
}
CSarv = SAR_Value;
}
else
{
if SAR_Value != 0 && EP == 0 then
{
if Direction == 1 then
{
EP = HighValue;
AF_Value = AF;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if High > HighValue then
{
HighValue = High;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
}
else
{
EP = LowValue;
AF_Value = Af;
SAR_Value = SAR_Value + AF_Value * (EP - SAR_Value);
if Low < LowValue then
{
LowValue = Low;
AF_Value = AF_Value + AF;
if AF_Value >= AFMAX then AF_Value = AFMAX;
}
}
CSarv = SAR_Value;
}
else
{
if Direction == 0 then
{
if Close > Close[1] then Direction = 1;
else
if Close < Close[1] then Direction = -1;
}
else
{
if Direction == 1 then
{
if Close < Close[1] then
{
Direction = -1;
SAR_Value = HighValue;
CSarv = SAR_Value;
}
}
if Direction == -1 then
{
if Close > Close[1] then
{
Direction = 1;
SAR_Value = LowValue;
CSarv = SAR_Value;
}
}
}
LowValue = min(Low, LowValue);
HighValue = max(High, HighValue);
}
}
Plot1(CSarv,iff(C>CSaRV,RED,BLUE));
2021-09-29
883
글번호 152547
지표
답변완료
수식문의 입니다. 합산거래량이 다릅니다.
안녕하세요...
지표식 문의인데요...
아래 식을 완성하고, 지표식에 적용했는데요.
제가 원하는값은 당일의 현재시간까지의 거래량과 이전일별 현재시간까지의 거래량
구한후 5일동안 합산거래량을 지표에 나타내었는데요...
지표식에서 기준주기(분)를 바꿔가면서 조회를 하면 결과값이 다르게 나옵니다.
제가알기로는 10분봉이상에서는 5일치 봉이 차트에 표현되는걸로 알고 있습니다.
예) 10분봉의 sum값과 15분봉의 sum값 30분봉의 sum값이 다릅니다.
plot1(sum);
어디가 잘못되었을까요?
input : Ilsu(5),MinPer(500);
var : idx(-1),sum(0),count(0),cnt(0),mav(0),per(0);
if Bdate != Bdate[1] Then
{
idx = 0;
}
idx = idx+1;
if idx >= 1 Then
{
sum = 0;
count = 0;
For cnt = idx to Index
{
if count < Ilsu and sDate[cnt] < sDate and sTime[cnt] == sTime Then
{
sum = sum + V[cnt];
count = count+1;
}
if count == Ilsu Then
cnt = Index+1;
}
mav = sum/Ilsu;
Per = DayVolume / mav * 100;
plot1(sum);
MessageLog("종목명 : %s 당일거래량 : %.2f %.f일거래량 : %.f 일평균거래량 : %.f 달성율 : %.2f", SymbolCode, DayVolume, Ilsu, sum, mav, Per);
}
2021-09-29
1413
글번호 152546
지표
답변완료
키움증권 지표변환 부탁드립니다.
안녕하세요?
1번, 키움증권에서 사용하는 지표입니다,,, 에스트레이더의 지표로 변환부탁드립니다,
A = (highest(high,100)+lowest(low,100))/2;
A + AvgIf( 가격 - A, 1, 0.0 )
+ 0.658 * StdevIf( 가격 - A, 1, 0.0 )
2번 MACD 오실레이터의 장단기 골든크로스및 데드크로스시 화살표가 표시되도록 지표 부탁드립니다.,
두가지 요청드립니다,
2021-09-29
1522
글번호 152545
지표
답변완료
문의 드립니다.
Var : Pivot(0),R1(0),R2(0),S1(0),S2(0);
Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3;
R1 = 2*Pivot-DayLow(1);
R2 = Pivot+DayHigh(1)-DayLow(1);
S1 = 2*Pivot-DayHigh(1);
S2 = Pivot-DayHigh(1)+DayLow(1);
if CrossUp (c,r1) Then Buy("r1b");
if CrossDown(c,r1) Then Sell("r1s");
다음날 장시작시 07:00에 피봇지표라인에 없는 r1s 신호가 나오는데 왜 이런지 안나오게 할순 없는지요 우측 r1s는 지표대로 잘 나오는것 같읍니다
2022-09-27
1074
글번호 152539
시스템
답변완료
수식 문의
아래 종목검색식이 작동이 안되는데 수정 부탁합니다
Input:length(8);
Var:j(0),lastHiVal(0),lastLoVal(0),turnPntBit(""),TL1(0);
Array:valArr[10](0),barArr[10](0),turnPntArr[10]("");
// 봉이 새로 생겼으므로 봉개수 관리하는 변수들의 봉개수 값 1씩 증가
For j = 0 To 9
{
barArr[j] = barArr[j] + 1;
}
// 고점조건 = 현재 봉의 고가가 기간최고가이면서 최고가 갱신되었을 때;
// 저점조건 = 현재 봉의 저가가 기간최저가이면서 최저가 갱신되었을 때;
// 고점,저점조건 만족시 현재 봉의 고[저]가를 변수에 저장
Condition1 = Highest(H,length) == H and lastHiVal <> H;
Condition2 = Lowest(L,length) == L and lastLoVal <> L;
If Condition1 Then lastHiVal = H;
If Condition2 Then lastLoVal = L;
// 전환점구분 null값으로 초기화;
turnPntBit = "";
// if 고점조건, 저점조건 동시 만족시 then
// if 이전 고점,저점 범위를 모두 벗어났을 때
// 전환점구분 = 고저점;
// else if 이전 고점을 갱신했다면 전환점구분 = 고점;
// else if 이전 저점을 갱신했다면 전환점구분 = 저점;
// else if 고점조건 만족하면 전환점구분 = 고점;
// else if 저점조건 만족하면 전환점구분 = 저점;
If Condition1 and Condition2 Then
{
If Max(valArr[1],valArr[2]) < H and Min(valArr[1],valArr[2]) > L Then
turnPntBit = "HiLo";
Else If Max(valArr[1],valArr[2]) < H Then turnPntBit = "Hi";
Else If Min(valArr[1],valArr[2]) > L Then turnPntBit = "Lo";
}
Else If Condition1 Then turnPntBit = "Hi";
Else If Condition2 Then turnPntBit = "Lo";
// if 전환점구분에 값이 있을 때만 then 아래 실행, 없으면 통과
If turnPntBit <> "" Then
{
// if 전환점구분이 고저점이면 then
// 이전 파동은 연장시키고 아래에서 새로이 파동선을 추가토록 한다.
If turnPntBit == "HiLo" Then
{
valArr[1] = IFF(turnPntArr[1] == "Hi",H,L);
barArr[1] = 0;
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
If turnPntArr[1] == "Hi" Then
turnPntBit = "Lo";
Else
turnPntBit = "Hi";
}
// if 신규 전환점구분이 현재(전환점배열 1번째)와 다르면 then
// 배열값들을 이전값으로 Move;
If turnPntBit <> turnPntArr[1] Then
{
for j = 8 downto 1
{
valArr[j+1] = valArr[j];
barArr[j+1] = barArr[j];
turnPntArr[j+1] = turnPntArr[j];
}
}
// if 전환점구분이 바뀌었거나 또는
// (전환점구분은 안바뀌었는데
// (이전 고점보다 높은 고점이 발생했거나 또는
// 이전 저점보다 낮은 저점이 발생했으면)) then
If turnPntBit <> turnPntArr[1] or
(turnPntBit == turnPntArr[1] and
((turnPntBit == "Hi" and valArr[1] < H) or
(turnPntBit == "Lo" and valArr[1] > L))) Then
{
// 값 배열에는 고점 또는 저점을 대입;
// 봉개수 배열에는 0값 대입;
// 전환점 배열에 전환점구분값을 대입;
valArr[1] = IFF(turnPntBit == "Hi",H,L);
barArr[1] = 0;
turnPntArr[1] = turnPntBit;
// if 이전봉대비 전환점구분이 바뀌었다면 추세선 새로 그리고;
// else 전환점구분이 안바뀌었으면 값만 바뀐거므로 추세선 연장;
If turnPntArr[1][1] <> turnPntArr[1][0] Then
TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
Else
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
If turnPntArr[1][1] <> turnPntArr[1][0] and turnPntArr[1][0] == "Hi"
Then
find(1);
}
}
TL_SetSize(TL1,4);
TL_SetColor(TL1,GREEN);
2021-09-29
1059
글번호 152534
종목검색
답변완료
시초가 기준 매매수식 수정 부탁드립니다.
아래의 수식을 대입하여 시뮬레이션 해보았습니다.
자정을 시초가로 인식하고 진입을 하는 문제가 있네요.
그리고 시초가에 매매가 이루어지지 않는 날이 많습니다.
ntime 이나 Dayopen을 사용하여 대입해 보았는데도 먹히질 않네요.
바쁘시겠지만 점검 좀 부탁드립니다.
- 아 래 -
input : n1(10),n2(20);
if NextBarSdate != sDate Then
{
if NextBarOpen > c Then
buy("b",AtMarket);
if NextBarOpen < c Then
Sell("s",AtMarket);
}
if MarketPosition == 1 Then
ExitLong("bx",AtStop,Highest(H,BarsSinceEntry)-n1);
if MarketPosition == -1 Then
ExitShort("sx",AtStop,lowest(L,BarsSinceEntry)-n1);
SetStopProfittarget(n2*PriceScale,PointStop);
2021-09-28
939
글번호 152531
시스템