커뮤니티
수식요청
2023-10-17 07:47:17
810
글번호 173118
안녕하세요
수식부탁드림니다
date 2 30분봉
매수조건
이평 60선(변수)을 하향후 상승돌파 첫봉진입
30(변수)분봉 양봉 date2
macd 오실레이터 양봉
sw2 선 양선
일치시 매수
청산 20이평(변수) 하락하는 음봉시
익절 30틱(변수)
일일누적수익 100틱시(변수)매매스톱
시간 07시에서 06시까지(변수)
매도
매수의반대
첨부 sw2 78362
답변 1
예스스탁 예스스탁 답변
2023-10-17 11:49:45
안녕하세요
예스스탁입니다.
수식에서 차트 주기는 변수처리가 가능하지 않습니다.
참조데이터(data2)의 주기는 직접 지정하셔야 합니다.
Inputs : Period(20), Sence(1.5), CC_DN(Yellow);
Vars:
VLineUp(0,Data1),
VLineDn(0,Data1),
HHighest(0,Data1),
LLowest(0,Data1),
JustChanged(FALSE,Data1),
VLine(0,Data1), DBN(0,Data1);
Array:
Highs[35](0,Data1),
Lows[35](0,Data1),
RRange[35](0,Data1),
UpWave[1](FALSE,Data1),
DnWave[1](FALSE,Data1);
var :v1(0,Data1),v2(0,Data1),v3(0,Data1),v5(0,Data1),v6(0,Data1);
var :va1(0,Data1),va2(0,Data1),va3(0,Data1);
If data1(STime == 180000) Then
DBN = 0;
DBN = DBN + 1;
V1 = Period;
V2 = V1 - 1;
V3 = V1 - 2;
V5 = Sence;
V6 = data1(H-L);
JustChanged = FALSE;
if data1(CurrentBar) <= V2 then begin
Highs[data1(CurrentBar)] = data1(Close);
Lows[data1(CurrentBar)] = data1(Close);
RRange[data1(CurrentBar)] = Data1((H-L) /2);
end;
if CurrentBar == 1 then begin
if Highs[2] >= Highs[3] then begin
UpWave[1] = TRUE;
HHighest = Highs[2];
VLineUp = HHighest - (5 * MA(6,2));
end;
if Highs[2] < Highs[3] then begin
DnWave[1] = TRUE;
LLowest = Lows[2];
VLineDn = LLowest + (5 * MA(6,2));
end;
end;
if CurrentBar > v1 then begin
if DnWave[1] and Close > VLineDn then begin
DnWave[1] = FALSE;
UpWave[1] = TRUE;
JustChanged = TRUE;
HHighest = Close;
LLowest = 0;
end;
if UpWave[1] and Close < VLineUp and JustChanged == FALSE then begin
UpWave[1] = FALSE;
DnWave[1] = TRUE;
JustChanged = TRUE;
LLowest = Close;
HHighest = 0;
end;
if JustChanged == FALSE then begin
if Close > HHighest then
HHighest = Close;
else if Close < LLowest then
LLowest = Close;
end;
VLineUp = HHighest - (v5 * MA(v6,v2));
VLineDn = LLowest + (v5 * MA(v6,v2));
Input : 당일수익틱수(100);
input : StartTime(070000),EndTime(060000);
Var : N1(0),dayPl(0),당일수익(0);
var : Tcond(false),Xcond(false);
IF Endtime > starttime Then
SetStopEndofday(Endtime);
Else
{
if sDate != sDate[1] Then
SetStopEndofday(Endtime);
}
if (sdate != sdate[1] and stime >= EndTime) or
(sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then
Tcond = False;
if (sdate != sdate[1] and stime >= StartTime) or
(sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then
{
IF Endtime <= starttime Then
{
SetStopEndofday(0);
}
Tcond = true;
Xcond = False;
}
당일수익 = PriceScale*당일수익틱수;
if Bdate != Bdate[1] Then
{
Xcond = false;
N1 = NetProfit;
}
daypl = NetProfit-N1;
if TotalTrades > TotalTrades[1] then
{
if daypl >= 당일수익 Then
Xcond = true;
if (IsExitName("dbp",1) == true or
IsExitName("dsp",1) == true) then
Xcond = true;
}
var : T(0);
if UpWave[1] then T = 1;
else if DnWave[1] then T = -1;
end;
input : p1(60),short(12),long(26),sig(9),P2(20);
input : 익절틱수(30),누적수익틱수(100);
va1 = data1(ma(C,P1));
va2 = data1(MACD_OSC (short,long,sig));
va3 = Data1(ma(C,P2));
if Xcond == false and Tcond == true then
{
if MarketPosition <= 0 and CrossUp(C,va1) and Data2(C>O) and Va2 > 0 and t == 1 Then
Buy();
if MarketPosition == 1 and C < v3 and C < O Then
ExitLong();
if MarketPosition >= 0 and CrossDown(C,va1) and Data2(C<O) and Va2 < 0 and t == -1 Then
Sell();
if MarketPosition == 1 and C > v3 and C > O Then
ExitShort();
if MarketPosition == 1 then
{
ExitLong("dbp",atlimit,EntryPrice+((당일수익-daypl)/CurrentContracts));
}
if MarketPosition == -1 then
{
ExitShort("dsp",atlimit,EntryPrice-((당일수익-daypl)/CurrentContracts));
}
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
즐거운 하루되세요
> 아트정 님이 쓴 글입니다.
> 제목 : 수식요청
> 안녕하세요
수식부탁드림니다
date 2 30분봉
매수조건
이평 60선(변수)을 하향후 상승돌파 첫봉진입
30(변수)분봉 양봉 date2
macd 오실레이터 양봉
sw2 선 양선
일치시 매수
청산 20이평(변수) 하락하는 음봉시
익절 30틱(변수)
일일누적수익 100틱시(변수)매매스톱
시간 07시에서 06시까지(변수)
매도
매수의반대
첨부 sw2 78362