커뮤니티
수식요청
2017-07-21 10:37:43
123
글번호 111489
1. 전주의 중심선이 필요합니다
2.
아랫식 변형 부탁드립니다
아랫식은 당일기준인데
해당주기준으로 바꾸었으면 합니다
input : 텍스트소수점자리수(5);
var : TL1(0),TL2(0),TL3(0),TL4(0);
var : TL5(0),TL6(0),TL7(0),TL8(0);
var : Tx1(0),Tx2(0),Tx3(0),Tx4(0);
var : Tx5(0),Tx6(0),Tx7(0),Tx8(0);
var : Tx11(0),Tx12(0),Tx13(0),Tx14(0);
var : Tx15(0),Tx16(0),Tx17(0),Tx18(0);
if L == DayLow Then{
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL2 = TL_New(sdate[1],stime[1],DayLow+PriceScale*65,sdate,stime,DayLow+PriceScale*65);
TL3 = TL_New(sdate[1],stime[1],DayLow+PriceScale*135,sdate,stime,DayLow+PriceScale*135);
TL4 = TL_New(sdate[1],stime[1],DayLow+PriceScale*120,sdate,stime,DayLow+PriceScale*120);
TL_SetExtRight(TL2,true);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL3,true);
TL_SetExtLeft(TL3,true);
TL_SetExtRight(TL4,true);
TL_SetExtLeft(TL4,true);
TL_SetColor(TL2,RED);
TL_SetColor(TL3,RED);
TL_SetColor(TL4,RED);
TL_SetSize(TL2,2);
TL_SetSize(TL3,2);
TL_SetSize(TL4,2);
}
if H == DayHigh Then{
TL_Delete(TL6);
TL_Delete(TL7);
TL_Delete(TL8);
TL6 = TL_New(sdate[1],stime[1],DayHigh-PriceScale*65,sdate,stime,DayHigh-PriceScale*65);
TL7 = TL_New(sdate[1],stime[1],DayHigh-PriceScale*135,sdate,stime,DayHigh-PriceScale*135);
TL8 = TL_New(sdate[1],stime[1],DayHigh-PriceScale*120,sdate,stime,DayHigh-PriceScale*120);
TL_SetExtRight(TL6,true);
TL_SetExtLeft(TL6,true);
TL_SetExtRight(TL7,true);
TL_SetExtLeft(TL7,true);
TL_SetExtRight(TL8,true);
TL_SetExtLeft(TL8,true);
TL_SetColor(TL6,BLUE);
TL_SetColor(TL7,BLUE);
TL_SetColor(TL8,BLUE);
TL_SetSize(TL6,2);
TL_SetSize(TL7,2);
TL_SetSize(TL8,2);
}
Text_Delete(Tx2);
Text_Delete(Tx3);
Text_Delete(Tx4);
tx2 = Text_New(sdate,stime,DayLow+PriceScale*65,"당일저점+65틱("+NumToStr(DayLow+PriceScale*65,텍스트소수점자리수)+")");
tx3 = Text_New(sdate,stime,DayLow+PriceScale*135,"당일저점+135틱("+NumToStr(DayLow+PriceScale*135,텍스트소수점자리수)+")");
tx4 = Text_New(sdate,stime,DayLow+PriceScale*120,"당일저점+120틱("+NumToStr(DayLow+PriceScale*120,텍스트소수점자리수)+")");
Text_SetColor(tx2,red);
Text_SetColor(tx3,red);
Text_SetColor(tx4,red);
text_setStyle(tx2,2,1);
text_setStyle(tx3,2,1);
text_setStyle(tx4,2,1);
Text_Delete(Tx12);
Text_Delete(Tx13);
Text_Delete(Tx14);
tx12 = Text_New(sdate,stime,DayHigh-PriceScale*65,"당일고점-65틱("+NumToStr(DayHigh-PriceScale*65,텍스트소수점자리수)+")");
tx13 = Text_New(sdate,stime,DayHigh-PriceScale*135,"당일고점-135틱("+NumToStr(DayHigh-PriceScale*135,텍스트소수점자리수)+")");
tx14 = Text_New(sdate,stime,DayHigh-PriceScale*120,"당일고점-120틱("+NumToStr(DayHigh-PriceScale*120,텍스트소수점자리수)+")");
Text_SetColor(tx12,blue);
Text_SetColor(tx13,blue);
Text_SetColor(tx14,blue);
text_setStyle(tx12,2,1);
text_setStyle(tx13,2,1);
text_setStyle(tx14,2,1);
답변 1
예스스탁 예스스탁 답변
2017-07-21 14:46:00
안녕하세요
예스스탁입니다.
1.
var : cnt(0);
Array : WH[10](0),WL[10](0);
if DayOfWeek(Bdate) < DayOfWeek(Bdate[1]) Then{
WH[0] = H;
WL[0] = L;
for cnt = 1 to 9{
WH[cnt] = WH[cnt-1][1];
WL[cnt] = WL[cnt-1][1];
}
}
if H > WH[0] Then
WH[0] = H;
if L < WL[0] Then
WL[0] = L;
if WH[1] > 0 and WL[1] > 0 Then{
var1 = (WH[1]+WL[1])/2;
plot1(var1,"전주중심");
}
2
var : cnt(0);
Array : WH[10](0),WL[10](0);
if DayOfWeek(Bdate) < DayOfWeek(Bdate[1]) Then{
WH[0] = H;
WL[0] = L;
for cnt = 1 to 9{
WH[cnt] = WH[cnt-1][1];
WL[cnt] = WL[cnt-1][1];
}
}
if H > WH[0] Then
WH[0] = H;
if L < WL[0] Then
WL[0] = L;
input : 텍스트소수점자리수(5);
var : TL1(0),TL2(0),TL3(0),TL4(0);
var : TL5(0),TL6(0),TL7(0),TL8(0);
var : Tx1(0),Tx2(0),Tx3(0),Tx4(0);
var : Tx5(0),Tx6(0),Tx7(0),Tx8(0);
var : Tx11(0),Tx12(0),Tx13(0),Tx14(0);
var : Tx15(0),Tx16(0),Tx17(0),Tx18(0);
if L == WL[0] Then{
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL2 = TL_New(sdate[1],stime[1],WL[0]+PriceScale*65,sdate,stime,WL[0]+PriceScale*65);
TL3 = TL_New(sdate[1],stime[1],WL[0]+PriceScale*135,sdate,stime,WL[0]+PriceScale*135);
TL4 = TL_New(sdate[1],stime[1],WL[0]+PriceScale*120,sdate,stime,WL[0]+PriceScale*120);
TL_SetExtRight(TL2,true);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL3,true);
TL_SetExtLeft(TL3,true);
TL_SetExtRight(TL4,true);
TL_SetExtLeft(TL4,true);
TL_SetColor(TL2,RED);
TL_SetColor(TL3,RED);
TL_SetColor(TL4,RED);
TL_SetSize(TL2,2);
TL_SetSize(TL3,2);
TL_SetSize(TL4,2);
}
if H == WH[0] Then{
TL_Delete(TL6);
TL_Delete(TL7);
TL_Delete(TL8);
TL6 = TL_New(sdate[1],stime[1],WH[0]-PriceScale*65,sdate,stime,WH[0]-PriceScale*65);
TL7 = TL_New(sdate[1],stime[1],WH[0]-PriceScale*135,sdate,stime,WH[0]-PriceScale*135);
TL8 = TL_New(sdate[1],stime[1],WH[0]-PriceScale*120,sdate,stime,WH[0]-PriceScale*120);
TL_SetExtRight(TL6,true);
TL_SetExtLeft(TL6,true);
TL_SetExtRight(TL7,true);
TL_SetExtLeft(TL7,true);
TL_SetExtRight(TL8,true);
TL_SetExtLeft(TL8,true);
TL_SetColor(TL6,BLUE);
TL_SetColor(TL7,BLUE);
TL_SetColor(TL8,BLUE);
TL_SetSize(TL6,2);
TL_SetSize(TL7,2);
TL_SetSize(TL8,2);
}
Text_Delete(Tx2);
Text_Delete(Tx3);
Text_Delete(Tx4);
tx2 = Text_New(sdate,stime,WL[0]+PriceScale*65,"당일저점+65틱("+NumToStr(WL[0]+PriceScale*65,텍스트소수점자리수)+")");
tx3 = Text_New(sdate,stime,WL[0]+PriceScale*135,"당일저점+135틱("+NumToStr(WL[0]+PriceScale*135,텍스트소수점자리수)+")");
tx4 = Text_New(sdate,stime,WL[0]+PriceScale*120,"당일저점+120틱("+NumToStr(WL[0]+PriceScale*120,텍스트소수점자리수)+")");
Text_SetColor(tx2,red);
Text_SetColor(tx3,red);
Text_SetColor(tx4,red);
text_setStyle(tx2,2,1);
text_setStyle(tx3,2,1);
text_setStyle(tx4,2,1);
Text_Delete(Tx12);
Text_Delete(Tx13);
Text_Delete(Tx14);
tx12 = Text_New(sdate,stime,WH[0]-PriceScale*65,"당일고점-65틱("+NumToStr(WH[0]-PriceScale*65,텍스트소수점자리수)+")");
tx13 = Text_New(sdate,stime,WH[0]-PriceScale*135,"당일고점-135틱("+NumToStr(WH[0]-PriceScale*135,텍스트소수점자리수)+")");
tx14 = Text_New(sdate,stime,WH[0]-PriceScale*120,"당일고점-120틱("+NumToStr(WH[0]-PriceScale*120,텍스트소수점자리수)+")");
Text_SetColor(tx12,blue);
Text_SetColor(tx13,blue);
Text_SetColor(tx14,blue);
text_setStyle(tx12,2,1);
text_setStyle(tx13,2,1);
text_setStyle(tx14,2,1);
즐거운 하루되세요
> 렉쳐 님이 쓴 글입니다.
> 제목 : 수식요청
> 1. 전주의 중심선이 필요합니다
2.
아랫식 변형 부탁드립니다
아랫식은 당일기준인데
해당주기준으로 바꾸었으면 합니다
input : 텍스트소수점자리수(5);
var : TL1(0),TL2(0),TL3(0),TL4(0);
var : TL5(0),TL6(0),TL7(0),TL8(0);
var : Tx1(0),Tx2(0),Tx3(0),Tx4(0);
var : Tx5(0),Tx6(0),Tx7(0),Tx8(0);
var : Tx11(0),Tx12(0),Tx13(0),Tx14(0);
var : Tx15(0),Tx16(0),Tx17(0),Tx18(0);
if L == DayLow Then{
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL2 = TL_New(sdate[1],stime[1],DayLow+PriceScale*65,sdate,stime,DayLow+PriceScale*65);
TL3 = TL_New(sdate[1],stime[1],DayLow+PriceScale*135,sdate,stime,DayLow+PriceScale*135);
TL4 = TL_New(sdate[1],stime[1],DayLow+PriceScale*120,sdate,stime,DayLow+PriceScale*120);
TL_SetExtRight(TL2,true);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL3,true);
TL_SetExtLeft(TL3,true);
TL_SetExtRight(TL4,true);
TL_SetExtLeft(TL4,true);
TL_SetColor(TL2,RED);
TL_SetColor(TL3,RED);
TL_SetColor(TL4,RED);
TL_SetSize(TL2,2);
TL_SetSize(TL3,2);
TL_SetSize(TL4,2);
}
if H == DayHigh Then{
TL_Delete(TL6);
TL_Delete(TL7);
TL_Delete(TL8);
TL6 = TL_New(sdate[1],stime[1],DayHigh-PriceScale*65,sdate,stime,DayHigh-PriceScale*65);
TL7 = TL_New(sdate[1],stime[1],DayHigh-PriceScale*135,sdate,stime,DayHigh-PriceScale*135);
TL8 = TL_New(sdate[1],stime[1],DayHigh-PriceScale*120,sdate,stime,DayHigh-PriceScale*120);
TL_SetExtRight(TL6,true);
TL_SetExtLeft(TL6,true);
TL_SetExtRight(TL7,true);
TL_SetExtLeft(TL7,true);
TL_SetExtRight(TL8,true);
TL_SetExtLeft(TL8,true);
TL_SetColor(TL6,BLUE);
TL_SetColor(TL7,BLUE);
TL_SetColor(TL8,BLUE);
TL_SetSize(TL6,2);
TL_SetSize(TL7,2);
TL_SetSize(TL8,2);
}
Text_Delete(Tx2);
Text_Delete(Tx3);
Text_Delete(Tx4);
tx2 = Text_New(sdate,stime,DayLow+PriceScale*65,"당일저점+65틱("+NumToStr(DayLow+PriceScale*65,텍스트소수점자리수)+")");
tx3 = Text_New(sdate,stime,DayLow+PriceScale*135,"당일저점+135틱("+NumToStr(DayLow+PriceScale*135,텍스트소수점자리수)+")");
tx4 = Text_New(sdate,stime,DayLow+PriceScale*120,"당일저점+120틱("+NumToStr(DayLow+PriceScale*120,텍스트소수점자리수)+")");
Text_SetColor(tx2,red);
Text_SetColor(tx3,red);
Text_SetColor(tx4,red);
text_setStyle(tx2,2,1);
text_setStyle(tx3,2,1);
text_setStyle(tx4,2,1);
Text_Delete(Tx12);
Text_Delete(Tx13);
Text_Delete(Tx14);
tx12 = Text_New(sdate,stime,DayHigh-PriceScale*65,"당일고점-65틱("+NumToStr(DayHigh-PriceScale*65,텍스트소수점자리수)+")");
tx13 = Text_New(sdate,stime,DayHigh-PriceScale*135,"당일고점-135틱("+NumToStr(DayHigh-PriceScale*135,텍스트소수점자리수)+")");
tx14 = Text_New(sdate,stime,DayHigh-PriceScale*120,"당일고점-120틱("+NumToStr(DayHigh-PriceScale*120,텍스트소수점자리수)+")");
Text_SetColor(tx12,blue);
Text_SetColor(tx13,blue);
Text_SetColor(tx14,blue);
text_setStyle(tx12,2,1);
text_setStyle(tx13,2,1);
text_setStyle(tx14,2,1);