커뮤니티
수식 문의 드립니다.
2011-11-02 09:58:06
472
글번호 44244
수고가 많으십니다.
3분봉 차트에서 9분봉 50~200 이평선의 최대값을
구하는 식을 문의 드립니다.
감사합니다.
안녕하세요
예스스탁입니다.
var : PLR(0),DAyPl(0),XCommission(0),XSlippage(0);
XCommission = ((C*ExitCommission)/100)*CurrentContracts; #%설정
XSlippage = (ExitSlippage)*CurrentContracts; #Pt설정
PLR = 0;
for var1 = 1 to 20{
if sdate == EntryDate(var1) Then{
PLR = PLR+(PositionProfit(var1)/EntryPrice(var1)*100);
}
}
if MarketPosition() == 1 Then
DayPL = (PositionProfit-XCommission-XSlippage)/EntryPrice*100;
Else if MarketPosition() == -1 Then
DayPL = (PositionProfit-XCommission-XSlippage)/EntryPrice*100;
Else
DayPL = 0;
var1 = ma(C,3);
If Daypl < 10 and var1[2]>var1[1] and Var1[1]<var1 and stime < 142000 Then
buy();
SetStopProfittarget(4);
SetStopLoss(7);
SetStopEndofday(145000);
답변 1
예스스탁 예스스탁 답변
2011-10-31 14:01:42
안녕하세요
예스스탁입니다.
input : Atime(9);
var : cnt(0),HH(0),cnt3(0),cnt2(0),cnt1(0);
Array : CC[201](0),sum[201](0),mav[201](0);
var1 = TimeToMinutes(stime)%Atime;
if dayindex() == 0 or (var1 <= var1[1] and stime > stime[1]) or stime == 151500 Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
for cnt1 = 50 to 200 {
sum[cnt1] = 0;
if CC[cnt1-1] != 0 then{
for cnt2 = 0 to 199 {
if cnt2 < cnt1 Then
sum[cnt1] = sum[cnt1]+CC[cnt2];
}
}
mav[cnt1] = sum[cnt1]/cnt1;
}
HH = mav[50];
for cnt3 = 50 to 200{
if Mav[cnt3] > HH Then
HH = mav[cnt3];
}
plot1(HH);
즐거운 하루되세요
> 아틀라스 님이 쓴 글입니다.
> 제목 : 수식 문의 드립니다.
> 수고가 많으십니다.
3분봉 차트에서 9분봉 50~200 이평선의 최대값을
구하는 식을 문의 드립니다.
감사합니다.
다음글
이전글