답변완료
시그널메이커를 변환하고 싶습니다.
안녕하세요?
아래 시스템트레이딩 수식은 시그널메이커에서 사용하는 수식입니다.
예스트레이더를 사용하려니 변환이 필요합니다.
도와주세요~~~
input : Exit_PT(500),Exit_LPT(250),BuyProfit(250),SellProfit(250),StopTick(250);
var :SP(0);
Params : TradingStartTime1(105000),TradingEndTime1(033500);
var : Today_P( 0 ), Pre_NetProfit( 0 ), ProfitPoint( 0 ),LossPoint(0), myOpenProfit(0),TickPoint(0);
Params : FastPeriod(55), SlowPeriod(150), SignalPeriod(80);
SP = SignalPosition;
TickPoint = OneTick * PriceScale;
V0 = MACD(C, FastPeriod, SlowPeriod);
V1 = XAverage(V0, SignalPeriod);
if Time = 090000 Or (Time >= 090000 And (Time[1] < 090000 Or Date<>date[1])) Then
Begin
ProfitPoint = 0; //
Today_P = 0; //
Pre_NetProfit = NetProfit[1]; //
condition99 = false; //
condition88 = false; //
End;
Today_P = NetProfit - Pre_NetProfit; // 하루 누적 수익
myOpenProfit = OpenPositionProfit;
If (Today_P + myOpenProfit) >= (Exit_PT * TickPoint ) Then
condition99 = true; //
If (Today_P + myOpenProfit) <= (-Exit_LPT * TickPoint) Then
condition88 = true; //
if TradingStartTime1 < TradingEndTime1 Then
Begin
If TradingStartTIME1 <= TIME And TIME <= TradingEndTIME1 Then COND44 = True
Else COND44 = False;
End
Else
Begin
If TradingStartTIME1 <= TIME Or TIME <= TradingEndTIME1 Then COND44 = True
Else COND44 = False;
End;
If Cond44 = False Then
Begin
if SP <> 0 Then
Begin
ExitLong("마감 매수 청산",OnClose,def,def,CurrentContracts);
ExitShort("마감 매도 청산",OnClose,def,def,CurrentContracts);
End;
Cond44 = False;
End;
ProfitPoint = Exit_PT * TickPoint - Today_P - myOpenProfit;
LossPoint = Exit_LPT * TickPoint + Today_P + myOpenProfit;
if 1 = Sp then
Begin
ExitLong("매수 익절마감", Atlimit, close + ProfitPoint);
ExitLong("매수 손절마감", AtStop, close - LossPoint);
ExitLong("매수 청산", Atlimit, EntryPrice + BuyProfit * TickPoint );
End
Else if -1 = Sp then
Begin
ExitShort("매도 익절마감", Atlimit, close - ProfitPoint);
ExitShort("매도 손절마감", AtStop, close + LossPoint);
ExitShort("매도 청산", Atlimit, EntryPrice - SellProfit * TickPoint );
End;
//지정한 시간대에만 거래
if Cond44 And false = condition99 And false = condition88 Then
Begin
if CrossUp(V0,V1) Then
Buy("매수")
Else if CrossDown(V0,V1) Then
Sell("매도");
End;
SetStopLoss(StopTick * TickPoint * currentcontracts ,pointstop);
2022-10-20
1566
글번호 163134
시스템
답변완료
문의
1
T = floor(time/10000);
개장시간조건 = Crossup(time,090000) or (T<T(1) && T>9 && T<=135000);
시작가 = ValueWhen(1, 개장시간조건, (H+L)/2);
SH = ValueWhen(1, 개장시간조건, H);
SL = ValueWhen(1, 개장시간조건, L);
S_HL = SH-SL;
Bs = BarsSince(개장시간조건);
라인 = if(개장시간조건, 시작가, 시작가 + S_HL*(비율1/100)*Bs);
2
T = floor(time/10000);
개장시간조건 = Crossup(time, x) or (T<T(1) && T>9 && T<135000);
시작가 = ValueWhen(1, 개장시간조건, (H+L)/2);
SH = ValueWhen(1, 개장시간조건, H);
SL = ValueWhen(1, 개장시간조건, L);
S_HL = SH-SL;
Bs = BarsSince(개장시간조건);
라인 = if(개장시간조건, 시작가, 시작가 + S_HL*(비율2/100)*Bs);
3
T = floor(time/10000);
개장시간조건 = Crossup(time, x) or (T<T(1) && T>9 && T<=135000);
시작가 = ValueWhen(1, 개장시간조건, (H+L)/2);
SH = ValueWhen(1, 개장시간조건, H);
SL = ValueWhen(1, 개장시간조건, L);
지표조건
비율1:3.82
비율2:5
비율3:6.18
반대로
1
T = floor(time/10000);
개장시간조건 = Crossup(time,090000) or (T<T(1) && T>9 && T<=135000);
시작가 = ValueWhen(1, 개장시간조건, (H+L)/2);
SH = ValueWhen(1, 개장시간조건, H);
SL = ValueWhen(1, 개장시간조건, L);
S_HL = SH-SL;
Bs = BarsSince(개장시간조건);
라인 = if(개장시간조건, 시작가, 시작가 + S_HL*(비율1/100)*Bs);
비율1:-3.82
수식2
개장시간조건 = Crossup(time, 090000) or (T<T(1) && T>9 && T<135000);
시작가 = ValueWhen(1, 개장시간조건, (H+L)/2);
SH = ValueWhen(1, 개장시간조건, H);
SL = ValueWhen(1, 개장시간조건, L);
S_HL = SH-SL;
Bs = BarsSince(개장시간조건);
라인 = if(개장시간조건, 시작가, 시작가 + S_HL*(비율2/100)*Bs);
비율2:-5
수식3
T = floor(time/10000);
개장시간조건 = Crossup(time, 090000) or (T<T(1) && T>9 && T<=135000);
시작가 = ValueWhen(1, 개장시간조건, (H+L)/2);
SH = ValueWhen(1, 개장시간조건, H);
SL = ValueWhen(1, 개장시간조건, L);
S_HL = SH-SL;
Bs = BarsSince(개장시간조건);
라인 = if(개장시간조건, 시작가, 시작가 + S_HL*(비율3/100)*Bs);
비율3:-6.18
시간은 변수로 부탁드립니다.
2022-10-20
1472
글번호 163133
지표
답변완료
파라볼릭 쌍바닥
Input : af(0.02), maxAF(0.2),쌍바닥상(2),쌍바닥하(0),상(2),하(1);;
Var : Sarv(0),tl(0);
Sarv = sar(af,maxAF);
Plot1(0);
If crossup(c,Sarv) Then
{
var1 = Sarv;
Var2 = var1[1];
if var1 <= var2+PriceScale*쌍바닥상 and var1 >= var2-PriceScale*쌍바닥하 and var2 > 0 Then
{
Plot1(1);
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
Plot2(0);
If crossup(c,Sarv) Then
{
var1 = Sarv;
Var2 = var1[1];
var3 = var2[1];
if abs(var1-Var2) <= PriceScale*상 and abs(var2-Var3) <= PriceScale*하 and Var3 > 0 Then
{
Plot2(-1);
TL = TL_New(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Blue);
TL_SetSize(TL,1);
}
}
쌍바닥과 쓰리바닥의 상하 폭을 서로 다르게 하여 하나의 지표로 만든 수식입니다.
보통 쌍바닥과 쓰리바닥의 지점이 서로 다른데 간혹 같을때도 있습니다.
쌍바닥일때, 쓰리바닥일때, 쌍바닥 쓰리바닥 같을때(겹칠때), 모두 매수하고 음전환시 매수청산. 감사합니다.
2022-10-19
1771
글번호 163130
시스템
답변완료
부탁드립니다
수고하십니다
아래수식이 맞는 지 그리고 밑에부분에 // 콜등가 대입 ←??? ★이부분을 어떻게 해야되는지 수식부탁드립니다 ★ 수식 완성 부탁드립니다
// 풋등가 대입 ←??? ★이부분을 어떻게 해야되는지 수식부탁드립니다 ★
★(((답변은 c40tue@naver.com 메일로 부탁드립니다)))★
// ■_등가표시
Input : 콜최저행사가(280), 풋최저행사가(232.5);
array : 콜현[14](0), 풋현[22](0);
var : 등가(0), 콜행사가수(0), 풋행사가수(0);
콜행사가수 = 15;
풋행사가수 = 23;
콜현[1] = data3(C);
콜현[2] = data4(C);
//{중략}
콜현[13] = data15(C);
콜현[14] = data16(C);
콜현[15] = data17(C);
풋현[15] = data17(C);
풋현[16] = data18(C);
//{중략}
풋현[35] = data37(C);
풋현[36] = data38(C);
풋현[37] = data39(C);
//--등가 찾기
등가 = __등행사가(data2(c)); // 코스피200 = data2(c);
//--- 행사가 대입
array : 콜행[15](0), 풋행[23](0);
var : 순번(0), 콜등가(0), 풋등가(0);
#콜행사가
//--- 배열에 참조 옵션 행사가 데이터 대입
if date != date[1] Then {
for 순번 = 1 to 콜행사가수 { // 콜행사가 대입
콜행[1]= data3(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
콜행[2]= data4(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
{중략}
콜행[13]= data15(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
콜행[14]= data16(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
콜행[15]= data16(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
콜행[순번] = 콜최저행사가 + 순번 * 2.5 - 2.5;
}
#풋행사가
for 순번 = 1 to 23 { // 풋행사가 대입
풋행[1]= data17(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
풋행[2]= data18(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
{중략}
풋행[21]= data37(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
풋행[22]= data38(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
풋행[23]= data38(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
풋행[순번] = 풋최저행사가 + (23-순번) * 2.5;
}
}
//--- 콜/풋 등가 번호 대입
for 순번 = 1 to 콜행사가수 { // 콜등가 대입 ←??? ★이부분을 어떻게 해야되는지 수식부탁드립니다 ★
If 등가 == 콜행[순번] Then {
콜등가 = 순번;
콜행사가수 = 38; }
}
for 순번 = 1 to 23 { // 풋등가 대입 ←??? ★이부분을 어떻게 해야되는지 수식부탁드립니다 ★
If 등가 == 풋행[순번] Then {
풋등가 = 순번;
풋행사가수 = 38;
}
}
//-- 옵션부에 등가 표시 출력
plot31(콜현[콜등가], "○등가_콜옵션");
plot32(풋현[풋등가], "○등가_풋옵션");
☆ 아래는 사용자정의함수 입니다.
__등행사가
Input : 코스피200(numeric);
var : 변수1(0), 변수2(0), 등가(0);
변수1 = int(코스피200/10)*10;
변수2 = 코스피200%10;
if 변수2 >= 8.75 Then 등가 = 변수1+10;
else if 변수2 < 8.75 and 변수2 >= 6.25 Then 등가 = 변수1+7.5;
else if 변수2 < 6.25 and 변수2 >= 3.75 Then 등가 = 변수1+5.0;
else if 변수2 < 3.75 and 변수2 >= 1.25 Then 등가 = 변수1+2.5;
Else 등가 = 변수1+0.0;
__등행사가 = 등가;
2022-10-19
962
글번호 163129
지표
답변완료
부탁드립니다
지표설정
수식1 거래량매집봉
VV=highest(V(1), period);
accumulationVolume=valuewhen(1, V>VV*2 and C(1)<C, V);
accumulationOpen=valuewhen(1, V>VV*2 and C(1)<C, min(C, O));
AA=C<=accumulationOpen and V*multiple<accumulationVolume;
condition=AA and O<C and (disparity(250)<=110 or disparity(125)<=110);
if(condition, O, 0)
수식2 뚝배기
VV=highest(V(1), period);
accumulationOpen=valuewhen(1, V>VV*2 and C(1)<C, min(C, O))
지표변수
period 60
multiple 2
2022-10-19
1034
글번호 163127
지표