커뮤니티
수식 부탁 드립니다.
2022-12-22 13:55:41
1172
글번호 164795
문의 드립니다.
1. 1일전,2일전,3일전,4일전 캔들의 최고가를 현재가가 상향 돌파 하면 즉시 매수 진입(현재가로 즉시매수)
매수시 가격 표시, 매수가격 아래로 내려가면 매수 표시가격 삭제, 매수가격 상향돌파시 매수가격 표시
1일전,2일전,3일전,4일전 최저가를 하향붕괴하면 즉시 매도 진입
2.1일전,2일전,3일전,4일전,캔들의 4평균값을 현재가가 돌파하면 즉시 매수( 봉 완성전 현재가로 즉시 매수)
4평균값을 현재가가 하락시 현재가로 즉시 매도 진입(봉 완성전 현재가로 즉각 실행 되어야 합니다.
답변 1
예스스탁 예스스탁 답변
2022-12-22 15:31:27
안녕하세요
예스스탁입니다.
1
input : N(4);
var : cnt(0),hh(0),ll(0),hv(0),lv(0),tx(0);
hh = 0;
ll = 0;
For cnt = 0 to N-1
{
if hh == 0 or (hh > 0 and DayHigh(cnt) > hh) Then
hh = DayHigh(cnt);
if ll == 0 or (ll > 0 and DayLow(cnt) < ll) Then
ll = DayLow(cnt);
}
if NextBarSdate != sDate Then
{
hv = hh;
lv = ll;
}
if MarketPosition <= 0 and hv > 0 Then
Buy("b",AtStop,hv);
if MarketPosition >= 0 and lv > 0 Then
Sell("s",AtStop,lv);
if MarketPosition == 1 Then
{
if MarketPosition != MarketPosition[1] Then
{
tx = Text_New(sDate,sTime,c,NumToStr(EntryPrice,2));#진입가표시 종가면 C
Text_SetStyle(tx,2,1);
}
if C >= Hv Then
Text_SetLocation(tx,sDate,sTime,C);
Else
Text_SetLocation(tx,sDate,sTime,0);
}
if MarketPosition == -1 Then
{
if MarketPosition != MarketPosition[1] Then
{
tx = Text_New(sDate,sTime,c,NumToStr(EntryPrice,2));#진입가표시 종가면 C
Text_SetStyle(tx,2,0);
}
if C <= Lv Then
Text_SetLocation(tx,sDate,sTime,C);
Else
Text_SetLocation(tx,sDate,sTime,0);
}
2
1~4일전 고가와 저가평균으로 작성된 식입니다.
input : N(4);
var : cnt(0),hh(0),ll(0),hmav(0),lmav(0),hv(0),lv(0),tx(0);
hh = 0;
ll = 0;
For cnt = 0 to N-1
{
hh = hh+DayHigh(cnt);
ll = ll+DayLow(cnt);
}
hmav = hh/n;
lmav = ll/n;
if NextBarSdate != sDate Then
{
hv = hmav;
lv = lmav;
}
if MarketPosition <= 0 and hv > 0 Then
Buy("b",AtStop,hv);
if MarketPosition >= 0 and lv > 0 Then
Sell("s",AtStop,lv);
if MarketPosition == 1 Then
{
if MarketPosition != MarketPosition[1] Then
{
tx = Text_New(sDate,sTime,c,NumToStr(EntryPrice,2));#진입가표시 종가면 C
Text_SetStyle(tx,2,1);
}
if C >= Hv Then
Text_SetLocation(tx,sDate,sTime,C);
Else
Text_SetLocation(tx,sDate,sTime,0);
}
if MarketPosition == -1 Then
{
if MarketPosition != MarketPosition[1] Then
{
tx = Text_New(sDate,sTime,c,NumToStr(EntryPrice,2));#진입가표시 종가면 C
Text_SetStyle(tx,2,0);
}
if C <= Lv Then
Text_SetLocation(tx,sDate,sTime,C);
Else
Text_SetLocation(tx,sDate,sTime,0);
}
3
1~4일전 종가평균이면 아래식입니다.
input : N(4);
var : cnt(0),sum(0),mav(0),mv(0),tx(0);
sum = 0;
For cnt = 0 to N-1
{
sum = sum + DayClose(cnt);
}
mav = sum/N;
if NextBarSdate != sDate Then
{
mv = mav;
}
if MarketPosition <= 0 and mv > 0 Then
Buy("b",AtStop,mv);
if MarketPosition >= 0 and mv > 0 Then
Sell("s",AtStop,mv);
if MarketPosition == 1 Then
{
if MarketPosition != MarketPosition[1] Then
{
tx = Text_New(sDate,sTime,c,NumToStr(EntryPrice,2));#진입가표시 종가면 C
Text_SetStyle(tx,2,1);
}
if C >= mv Then
Text_SetLocation(tx,sDate,sTime,C);
Else
Text_SetLocation(tx,sDate,sTime,0);
}
if MarketPosition == -1 Then
{
if MarketPosition != MarketPosition[1] Then
{
tx = Text_New(sDate,sTime,c,NumToStr(EntryPrice,2));#진입가표시 종가면 C
Text_SetStyle(tx,2,0);
}
if C <= mv Then
Text_SetLocation(tx,sDate,sTime,C);
Else
Text_SetLocation(tx,sDate,sTime,0);
}
즐거운 하루되세요
> 월드맨 님이 쓴 글입니다.
> 제목 : 수식 부탁 드립니다.
> 문의 드립니다.
1. 1일전,2일전,3일전,4일전 캔들의 최고가를 현재가가 상향 돌파 하면 즉시 매수 진입(현재가로 즉시매수)
매수시 가격 표시, 매수가격 아래로 내려가면 매수 표시가격 삭제, 매수가격 상향돌파시 매수가격 표시
1일전,2일전,3일전,4일전 최저가를 하향붕괴하면 즉시 매도 진입
2.1일전,2일전,3일전,4일전,캔들의 4평균값을 현재가가 돌파하면 즉시 매수( 봉 완성전 현재가로 즉시 매수)
4평균값을 현재가가 하락시 현재가로 즉시 매도 진입(봉 완성전 현재가로 즉각 실행 되어야 합니다.