답변완료
질문 요청 드립니다.
* 시스템 수식 좀 요청 드림니다.
* 아래 수식에서 시스탬 성능 보고서 보면
1. 전일 매수 해서 다음날 매수 청산 하여 -15.9 나왔습니다.
요청 사항: 당일 23시 되면 모두 청산 기능 좀 추가 요청 드림니다.
2. 매수 진입후 CrossDown(var1 , var2 ) 되면 매수 진입 은 매도 로 스위칭
매도 진입후 CrossUp(var1 , var2) 되면 매도 진입 은 매수 로 스위칭
3. 진입후 40틱 손해 나면 추가진입 2회 까지
4. 진입후 100틱 손해 나면 즉시 청산
4가지 청산 조건 좀 추가 부탁 좀 드림니다.
## 아래 수식
var1 = ma(c,5);
var2 = ma(c,20);
If MarketPosition <= 0 and sDate >= 20250101 and stime >= 080000 and CrossUp(var1 , var2) Then
{ Buy( "수");
PlaySound("C:KiwoomGlobalsoundsound9.wav");
}
if MarketPosition == 1 then
{
ExitLong("수수익",AtLimit,EntryPrice+PriceScale*90);
if highest(H,BarsSinceEntry) >= EntryPrice+PriceScale*50 Then
Exitlong("2프수",AtStop,highest(H,BarsSinceEntry)-abs(highest(H,BarsSinceEntry)-EntryPrice)*0.8);
}
If MarketPosition >= 0 and sDate >= 20250101 and stime >= 080000 and CrossDown(var1 , var2 ) Then
{ Sell("도");
PlaySound("C:KiwoomGlobalsoundsound4.wav");
}
if MarketPosition == -1 then
{
ExitShort("도수익",AtLimit,EntryPrice-PriceScale*90);
if lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*50 Then
ExitShort("2프도",AtStop,lowest(L,BarsSinceEntry)+abs(lowest(L,BarsSinceEntry)-EntryPrice)*0.8);
}
* 항상 많은 도움에 고맙습니다. 좋은 하루 되십시요
2025-01-14
501
글번호 187159
시스템
답변완료
문의 드립니다
input:length(2),a틱(30),b틱(30),c틱(2);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),Text1(0),process(0),T(0);
Array:HH[10,2](0),LL[10,2](0);
input : StartTime(120000),EndTime(53000);
var : Tcond(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
{
Tcond = true;
IF Endtime <= starttime Then
{
SetStopEndofday(0);
}
}
process = 0;
If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then
{
If LL[1,1] > L Then process = -1;
If HH[1,1] < H Then process = 1;
}
Else If Highest(H,length) == H and lastHiVal <> H Then process = 1;
Else If Lowest(L,length) == L and lastLoVal <> L Then process = -1;
If process == 1 Then
{
T = 1;
lastHiVal = H;
If HH[1,2] < LL[1,2] Then
{
For j = 10 DownTo 2
{
HH[j,1] = HH[j-1,1];
HH[j,2] = HH[j-1,2];
}
}
If HH[1,2] < LL[1,2] or HH[1,1] < H Then
{
HH[1,1] = H;
HH[1,2] = Index;
sBar = Index - LL[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
Text_Delete(Text1);
}
if LL[1,1] > 0 Then
{
TL1 = TL_New(sDate[sBar],sTime[sBar],LL[1,1],sDate[eBar],sTime[eBar],HH[1,1]);
Text1 = Text_New(sDate[eBar],sTime[eBar],HH[1,1],"+"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,0));
Text_SetStyle(Text1, 2, 1);
}
Else
{
Text_Delete(text1);
Text1 = Text_New(sDate[eBar],sTime[eBar],HH[1,1],"+"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,2));
Text_SetStyle(Text1, 2, 1);
}
Text_SetStyle(Text1, 2, 1);
}
if MarketPosition <= 0 and
HH[2,1] >= LL[2,1]+PriceScale*a틱 and
LL[1,1] <= HH[2,1]-PriceScale*b틱 and
Tcond == true Then
Buy("b",AtStop,HH[2,1]+PriceScale*c틱);
}
If process == -1 Then
{
T = -1;
lastLoVal = L;
If LL[1,2] < HH[1,2] Then
{
For j = 10 DownTo 2
{
LL[j,1] = LL[j-1,1];
LL[j,2] = LL[j-1,2];
}
}
If LL[1,2] < HH[1,2] or LL[1,1] > L Then
{
LL[1,1] = L;
LL[1,2] = Index;
sBar = Index - HH[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
Text_Delete(Text1);
}
if HH[1,1] > 0 Then
{
TL1 = TL_New(sDate[sBar],sTime[sBar],HH[1,1],sDate[eBar],sTime[eBar],LL[1,1]);
Text1 = Text_New(sDate[eBar],sTime[eBar],LL[1,1],"-"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,0));
Text_SetStyle(Text1, 2, 0);
}
Else
{
Text_Delete(text1);
Text1 = Text_New(sDate[eBar],sTime[eBar],LL[1,1],"-"+NumToStr(abs(HH[1,1]-LL[1,1])/PriceScale,0));
Text_SetStyle(Text1, 2, 0);
}
}
if MarketPosition >= 0 and
LL[2,1] <= HH[2,1]-PriceScale*a틱 and
HH[1,1] >= LL[2,1]+PriceScale*b틱 and
Tcond == true Then
Sell("s",AtStop,LL[2,1]-PriceScale*c틱);
}
if MarketPosition == 1 and IsEntryName("b") == true Then
Sell("bs",AtStop,EntryPrice-PriceScale*50);
if MarketPosition == -1 and IsEntryName("s") == true Then
Buy("sb",AtStop,EntryPrice+PriceScale*50);
위 수식어의 해석을 부탁드립니다
-------------------------------------------
아래 2가지 수식어를 부탁드립니다.
1. 전일 전체폭의 60% 당일 하락시 매수후 청산은 +300%
해외선물 매매시간은 08시 ~익일 07시
2. 당일 하락폭이 -200틱일때 매수후 청산은 +200틱
해외선물 매매시간은 08시 ~익일 07시
2025-01-14
614
글번호 187157
시스템
답변완료
종목검색 재질문 드립니다.
노고에 감사드립니다.
질문1
3201. 3202 화면에서 과거시점을 검색하려고 5를 입력하고 검색해도 현재봉이 나오는데 제가 조작을 잘못했나요?
5를 입력후 5봉전 결과를 알고 싶을때 조작방법을 설명부탁드립니다.
질문2
지난번 질문에서 일목균형표 선행 (1 or 2) 보다 캔들(주가)이 아래 있기를 기대했는데 전부 일목 구름위에 있습니다.
일목 구름속 or 일목 아래 있는걸로 수정하려고 하는데 어디를 고처야할지 모르겠습니다.
수고스럽지만 부탁드립니다.
var : AA(0),BB(0),X1(0),X2(0),A(0);
AA=(H+L+C)/3;
BB=AA*V;
X1=AccumN(BB,2);
X2=AccumN(V,2);
A=X1/X2;
input : Period(20),dv(2);
var : BBup(0),BBmd(0),BBdn(0);
BBup = BollBandUp(Period,dv);
BBmd = ma(c,Period);
BBdn = BollBandDown(Period,dv);
var : 기준선(0), 전환선(0),선행스팬1(0), 선행스팬2(0);
전환선 = (Highest(High, 9) + Lowest(Low, 9)) / 2;
기준선 = (Highest(High, 26) + Lowest(Low, 26)) / 2;
선행스팬1 = (전환선[25] + 기준선[25]) / 2 ;
선행스팬2 = (Highest(High, 52)[25] + Lowest(Low, 52)[25]) / 2;
if ma(Money,5)[1] >= 500000000 and
ma(Volume,5)[1] >= 50000 and
ma(C,112) < ma(C,224) and ma(C,224) < ma(C,448) and
V >= ma(V,120)[1]*(700/100) and
A[3] > A[2] &&
A[2] > A[1] &&
A[1] < A[0] and
((CrossUp(C,bbup) or CrossUp(c,선행스팬1) or CrossUp(c, 선행스팬2)) or
CrossUp(C,C[25])) and
((C < min(선행스팬1,선행스팬2) and C >= min(선행스팬1,선행스팬2)*0.98) and
(C < C[25] and C >= C[25]*0.98)) Then
Find(1);
2025-01-13
483
글번호 187150
종목검색