커뮤니티
재문의...
2023-01-25 11:28:09
744
글번호 165678
수고 하십니다.
[80455]내용 부탁드립니다.
수고하세요...
답변 1
예스스탁 예스스탁 답변
2023-01-25 15:44:44
안녕하세요
예스스탁입니다.
//Inputs
input : source("Wicks");#'Wicks','Bodys']
input : leftLenH(25);
input : rightLenH(25);
input : leftLenL(25);
input : rightLenL(25);
input : boxLength(30);
input : bullBoxColor(Red);
input : bearBoxColor(Blue);
var : phOption(0),plOption(0);
var : leftBull(0),rightBull(0),topBull(0),bottomBull(0);
var : leftBear(0),rightBear(0),topBear(0),bottomBear(0);
var : ph(0),pl(0),tx(0),box(0);
phOption = iff(source == "Wicks" , high , close);
plOption = iff(source == "Wicks" , low , close);
if swinglow(1,plOption,leftLenL,rightLenL,leftLenL+rightLenL+1) != -1 Then
{
pl = plOption[rightLenL];
tx = text_new(sDate[rightLenL],sTime[rightLenL],pl,"▲");
Text_SetStyle(tx,2,0);
Text_SetColor(tx,bearBoxColor);
topBull = iff(source == "Bodys" , max(close[leftLenL],open[leftLenL]),min(close[leftLenL],open[leftLenL]));
bottomBull = iff(source == "Bodys" , min(close[leftLenL],open[leftLenL]),Low[leftLenL]);
box = Box_New(sDate[rightLenH],sTime[rightLenH],topBull,sDate,sTime,bottomBull);
Box_SetColor(box,bearBoxColor);
Box_SetFill(box,true);
}
if SwingHigh(1,phOption,leftLenH,rightLenH,leftLenH+rightLenH+1) != -1 Then
{
ph = phOption[rightLenH];
tx = text_new(sDate[rightLenH],sTime[rightLenH],pH,"▼");
Text_SetStyle(tx,2,1);
Text_SetColor(tx,bullBoxColor);
topBear = iff(source == "Bodys" , max(close[leftLenL],open[leftLenL]),high[leftLenL]);
bottomBear = iff(source == "Bodys" ,min(close[leftLenL],open[leftLenL]),max(close[leftLenL],open[leftLenL]));
box = Box_New(sDate[rightLenL],sTime[rightLenL],topBear,sDate,sTime,bottomBear);
Box_SetColor(box,bullBoxColor);
Box_SetFill(box,true);
}
즐거운 하루되세요
> 오이도인 님이 쓴 글입니다.
> 제목 : 재문의...
> 수고 하십니다.
[80455]내용 부탁드립니다.
수고하세요...