답변완료
지표를 시스템식으로 변환 부탁드립니다.
안녕하십니까, 지표를 시스템식으로 변환 부탁드립니다.
종가가 파란선 위에 있고, 빨간색 선을 CrossUp 할 경우 매수
종가가 파란색 선을 CrossDown 할 경우 매도
부탁드립니다.
input : 비교고저점기준(10);
var : cnt(0),BTL(0),STL(0);
Array : HH[20](0),HD[20](0),HT[20](0);
Array : LL[20](0),LD[20](0),LT[20](0);
if SwingHigh(1,H,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then{
HH[0] = H[비교고저점기준];
HD[0] = sdate[비교고저점기준];
HT[0] = sTime[비교고저점기준];
Condition1 = false;
for cnt = 1 to 19{
HH[cnt] = HH[cnt-1][1];
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
if Condition1 == false and HH[cnt] > HH[0] and HH[cnt] > 0 Then{
Condition1 = true;
TL_Delete(BTL);
BTL = TL_New(HD[cnt],HT[cnt],HH[cnt],HD[0],HT[0],HH[0]);
TL_SetExtRight(BTL,true);
TL_SetColor(BTL,BLUE);
}
}
}
if SwingLow(1,L,비교고저점기준,비교고저점기준,비교고저점기준*2+1) != -1 Then{
LL[0] = L[비교고저점기준];
LD[0] = sdate[비교고저점기준];
LT[0] = sTime[비교고저점기준];
Condition2 = false;
for cnt = 1 to 19{
LL[cnt] = LL[cnt-1][1];
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
if Condition2 == false and LL[cnt] < LL[0] and LL[cnt] > 0 Then{
Condition2 = true;
TL_Delete(STL);
STL = TL_New(LD[cnt],LT[cnt],LL[cnt],LD[0],LT[0],LL[0]);
TL_SetExtRight(STL,true);
TL_SetColor(STL,RED);
}
}
}
if TL_GetValue(BTL,sdate,stime) > TL_GetValue(STL,sdate,stime) Then
{
if CrossUp(C, TL_GetValue(BTL,sdate,stime)) Then{
buy("b");
}
if CrossDown(C, TL_GetValue(STL,sdate,stime)) Then{
sell("s");
}
}
2022-01-10
1094
글번호 155300
시스템
답변완료
함수요청
안녕하세요?
기작성주신 아래 글번호 75023번의 지표와 74425번의 지표를 활용하여
국내선물 3분봉으로 일중거래를 하고자 합니다.
- HH = HV이고 LL값이 나왔으나 LV값이 나오지 않은 상태라면 LL 이탈 완성시 익봉 시가에 3계약 매도 진입
-> 매수 진입 이후 LV값이 나오고 LV값을 하향 이탈 완성하면 익봉 시가에 1계약 매도청산
-> 60ma 상향 돌파 완성 익봉 시가에 1계약 매도청산
-> 15시 15분 나머지 포지션 전량 강제청산 (미결제약정 1계약~3계약)
- LL = LV이고 HH값이 나왔으나 HV값이 나오지 않은 상태라면 HH 돌파 완성시 익봉 시가에 3계약 매수 진입
-> 매수 진입 이후 HV값이 나오고 HV값을 상향 돌파 완성하면 익봉 시가에 1계약 매수청산
-> 60ma 하향 이탈 완성 익봉 시가에 1계약 매수청산
-> 15시 15분 나머지 포지션 전량 강제청산 (미결제약정 1계약~3계약)
: 하루 3계약을 1번 진입하며 당일 모두 청산하여 오버나이트 하지 않습니다.
-----------------------------------------------------------------------------------
[지표 75023]
Input : short(12), long(26), signal(9);
Var : MACDv(0), MACDs(0),macdo(0),T(0),HH(0),LL(0);
var : d1(0),t1(0),tl1(0),tl2(0);
MACDv = MACD(short, long);
MACDs = ema(MACDv,signal);
macdo = MACDv-MACDs;
if Bdate != Bdate[1] Then
{
d1 = sDate;
t1 = sTime;
HH = 0;
LL = 0;
Condition1 = False;
}
if d1 > 0 Then
{
if macdo > hh Then
hh = macdo;
if macdo < ll Then
ll = macdo;
if Condition1 == False and hh >= ll+0.5 Then
{
Condition1 = true;
var1 = DayHigh;
Var2 = DayLow;
TL1 = TL_New(d1,t1,var1,NextBarSdate,NextBarStime,var1);
TL2 = TL_New(d1,t1,var2,NextBarSdate,NextBarStime,var2);
}
if Condition1 == true Then
{
TL_SetEnd(TL1,sDate,sTime,var1);
TL_SetEnd(TL2,sDate,sTime,var2);
}
}
[지표 74425]
Input : short(12), long(26), signal(9);
Var : MACDv(0), MACDs(0),macdo(0),T(0),HV(0),LV(0);
var : d1(0),t1(0),tl1(0),tl2(0);
MACDv = MACD(short, long);
MACDs = ema(MACDv,signal);
macdo = MACDv-MACDs;
if Bdate != Bdate[1] Then
{
d1 = sDate;
t1 = sTime;
T = 0;
if MACDO > 0 Then
{
T = 1;
HV = H;
LV = L;
}
if MACDO < 0 Then
{
T = -1;
HV = H;
LV = L;
}
}
Else
{
if ABS(T) < 2 Then
{
if H > HV Then
HV = H;
if L < LV Then
LV = L;
}
if T == 1 and CrossUp(MACDO,0) Then
{
T = 2;
var1 = HV;
Var2 = LV;
TL1 = TL_New(d1,t1,var1,sDate,sTime,var1);
TL2 = TL_New(d1,t1,var2,sDate,sTime,var2);
}
if T == -1 and CrossDown(MACDO,0) Then
{
T = -2;
var1 = HV;
Var2 = LV;
TL1 = TL_New(d1,t1,var1,sDate,sTime,var1);
TL2 = TL_New(d1,t1,var2,sDate,sTime,var2);
}
if T == 2 or T == -2 Then
{
TL_SetEnd(TL1,sDate,sTime,var1);
TL_SetEnd(TL2,sDate,sTime,var2);
}
}
2022-01-10
939
글번호 155290
시스템
답변완료
수식 문의
안녕하세요. 주말 잘 보내셨는지요.
일전에 도움 주신 아래의 수식을
data2에도 적용할 수 있도록 수정하고 싶습니다.
항상 친절한 답변 감사드립니다.
input : X(1),X1(1);
var : diff(0),color(0);
diff = Upvol-DownVol;
if Bdate != Bdate[1] Then
{
Condition1 = False;
if diff > 0 Then
{
Condition1 = true;
color = rgb(242,150,97);
}
Else
{
Condition1 = true;
color = Rgb(103,153,255);
}
}
else
{
if diff < 0 and diff[1] > 0 and
abs(diff) >= abs(diff[1]+(diff[2]*X1))*X Then
{
Condition1 = true;
color = rgb(103,153,255);
}
if diff > 0 and diff[1] < 0 and
abs(diff) >= abs(diff[1]+(diff[2]*X1))*X Then
{
Condition1 = true;
color = Rgb(242,150,97);
}
}
if Condition1 == true Then
PlotPaintBar(H,L,"강조",color);
2022-01-10
1210
글번호 155277
지표