예스스탁
예스스탁 답변
2021-03-23 10:51:17
안녕하세요
예스스탁입니다.
1
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
var : a1(0),a2(0),b1(0),b2(0);
if Bdate != Bdate[1] Then
{
var1 = O;
}
Else
{
if H[1] == L[1] and v[1] == 0 and
v >= 1 and
(abs(C[1]-A1[1]) <= PriceScale*1 or
abs(C[1]-A1[1]) <= PriceScale*1) Then
var1 = O;
}
Var2 = Floor((var1*0.1)/PriceScale)*PriceScale;
if var1*0.1 > Var2 Then
{
Var2 = Var2+PriceScale;
}
a1 = var1+Var2*1;
b1 = var1-Var2*1;
a2 = var1+Var2*2;
b2 = var1-Var2*2;
Plot1(DayOpen,"시가",GREEN);
Plot2(a1,"상단1",RED);
Plot3(b1,"하단1",BLUE);
Plot4(a2,"상단2",RED);
Plot5(b2,"하단2",BLUE);
Text_Delete(tx1);
tx1 = Text_New(NextBarSdate,NextBarStime,DayOpen,NumToStr(DayOpen,2));
Text_SetStyle(tx1,0,1);
Text_SetColor(tx1,GREEN);
Text_Delete(tx2);
tx2 = Text_New(NextBarSdate,NextBarStime,a1,NumToStr(a1,2));
Text_SetStyle(tx2,0,1);
Text_SetColor(tx2,RED);
Text_Delete(tx3);
tx3 = Text_New(NextBarSdate,NextBarStime,b1,NumToStr(b1,2));
Text_SetStyle(tx3,0,1);
Text_SetColor(tx3,BLUE);
Text_Delete(tx4);
tx4 = Text_New(NextBarSdate,NextBarStime,a2,NumToStr(a2,2));
Text_SetStyle(tx4,0,1);
Text_SetColor(tx4,RED);
Text_Delete(tx5);
tx5 = Text_New(NextBarSdate,NextBarStime,b2,NumToStr(b2,2));
Text_SetStyle(tx5,0,1);
Text_SetColor(tx5,BLUE);
2
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
var : a1(0),a2(0),b1(0),b2(0);
if Bdate != Bdate[1] Then
{
var1 = O;
}
Else
{
if H[1] == L[1] and v[1] == 0 and
v >= 1 and
(abs(C[1]-A1[1]) <= PriceScale*1 or
abs(C[1]-A1[1]) <= PriceScale*1) Then
var1 = O;
}
Var2 = Floor((var1*0.1)/PriceScale)*PriceScale;
if var1*0.1 > Var2 Then
{
Var2 = Var2+PriceScale;
}
a1 = var1+Var2*1;
b1 = var1-Var2*1;
a2 = var1+Var2*2;
b2 = var1-Var2*2;
if MarketPosition <= 0 and CrossUp(c,a1) Then
Buy();
if MarketPosition >= 0 and CrossDown(c,b1) Then
Sell();
if MarketPosition == 1 Then
{
if CrossUp(c,a2) Then
ExitLong();
if CrossDown(c,DayOpen) Then
ExitLong();
}
if MarketPosition == -1 Then
{
if CrossDown(c,b2) Then
ExitShort();
if CrossUp(c,DayOpen) Then
ExitShort();
}
3
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
var : a1(0),a2(0),b1(0),b2(0);
if Bdate != Bdate[1] Then
{
var1 = O;
}
Else
{
if H[1] == L[1] and v[1] == 0 and
v >= 1 and
(abs(C[1]-A1[1]) <= PriceScale*1 or
abs(C[1]-A1[1]) <= PriceScale*1) Then
var1 = O;
}
Var2 = Floor((var1*0.1)/PriceScale)*PriceScale;
if var1*0.1 > Var2 Then
{
Var2 = Var2+PriceScale;
}
a1 = var1+Var2*1;
b1 = var1-Var2*1;
a2 = var1+Var2*2;
b2 = var1-Var2*2;
if CrossUp(c,a1) Then
PlotPaintBar(H,L,"강조",RED);
if CrossDown(c,b1) Then
PlotPaintBar(H,L,"강조",BLUE);
4
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
var : a1(0),a2(0),b1(0),b2(0);
if Bdate != Bdate[1] Then
{
var1 = O;
Condition1 = False;
}
Else
{
if H[1] == L[1] and v[1] == 0 and
v >= 1 and
(abs(C[1]-A1[1]) <= PriceScale*1 or
abs(C[1]-A1[1]) <= PriceScale*1) Then
var1 = O;
}
Var2 = Floor((var1*0.1)/PriceScale)*PriceScale;
if var1*0.1 > Var2 Then
{
Var2 = Var2+PriceScale;
}
a1 = var1+Var2*1;
b1 = var1-Var2*1;
a2 = var1+Var2*2;
b2 = var1-Var2*2;
if CrossUp(c,a1) Then
Condition1 = true;
if Condition1 == true Then
Find(1);
5
아래와 같이 작성하시면 data2에서 정적vi발동 후 신호가 발생합니다.
var : v1(0,Data2),v2(0,Data2);
var : a1(0,Data2),a2(0,Data2),b1(0,Data2),b2(0,Data2),cond(False,Data1);;
if data2(Bdate != Bdate[1]) Then
{
v1 = data2(O);
}
Else
{
if data2(H[1] == L[1] and v[1] == 0 and
v >= 1 and
(abs(C[1]-A1[1]) <= PriceScale*1 or
abs(C[1]-A1[1]) <= PriceScale*1)) Then
v1 = O;
}
V2 = data2(Floor((var1*0.1)/PriceScale)*PriceScale);
if v1*0.1 > V2 Then
{
V2 = V2+data2(PriceScale);
}
a1 = var1+Var2*1;
b1 = var1-Var2*1;
a2 = var1+Var2*2;
b2 = var1-Var2*2;
if data1(Bdate != Bdate[1]) Then
cond = False;
if data2(CrossUp(c,a1) or CrossDown(c,b1)) Then
cond = true;
if cond == true Then
{
진입청산수식
}
즐거운 하루되세요
> 하리마우 님이 쓴 글입니다.
> 제목 : 지표식 부탁드립니다.
> 정적VI지표식에 1차 상승선과 2차 상승선 그리고 기준선(시가)을 나타내고 텍스트에 가격과 %가 출력(첨부1 처럼)되게 부탁 드립니다~~첨부 2는 제가 사용중인것입니다^^
아울러(공매도 대비) 첨부1에 정적VI를 1차 상승선 돌파시 매수진입 2차 상승선 돌파시 매수청산, 기준가 이탈시 손절, 1차 하락선 이탈시 매도진입, 2차 하락선 이탈시 매도청산, 기준가 돌파시 손절하는 시스템식 부탁드립니다.
그리고 해당봉에 적색과 파란색 색칠로 강조하는식과 종목검색식도 부탁드리겠습니다!!
항상 예스스탁 여러분의 친절한 응대에 감사드리고 있습니다!! 수고하세요~~
참, DATA2를 이용하여 당일 정적VI가 발생한 이후에 시스템식(이동평균선 돌파)이 실시되도록 가능한지요~~ 아니면, 수식에 //진입시간 <= 0 or Time == 진입시간// : VI발생시간 113000 이후부터 시스템이 되도록 진입을 넣어야 하는데, 진입시간을 넣으니까 신호가 나오지 않아서요~~