커뮤니티
지표
2023-02-20 09:17:28
940
글번호 166453
항상감사합니다.
지표첨삭부탁드립니다.
1]고가,저가,(고+저/2)에진동폭표시도부탁드립니다.
2]시가자리에는 시가표시 대신
고가-시가의 진동폭표시/시가-저가의 진동폭표시 가능할까요?
[수식]
input : 타주기분(60);
var : S1(0),D1(0),TM(0),TF(0),tx1(0),tx2(0),tx3(0),tx4(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
var1 = O;
Var2 = H;
Var3 = L;
Var4 = (var2+Var3)/2;
tx1 = text_new(sDate,sTime,var1,"시:"+NumToStr(var1,2));
tx2 = text_new(sDate,sTime,var2,"고:"+NumToStr(var2,2));
tx3 = text_new(sDate,sTime,var3,"저:"+NumToStr(var3,2));
tx4 = text_new(sDate,sTime,var4,"저:"+NumToStr(var4,2));
Text_SetStyle(tx1,2,1);
Text_SetStyle(tx2,2,1);
Text_SetStyle(tx3,2,0);
Text_SetStyle(tx4,2,0);
}
if h > Var2 Then
Var2 = h;
if l < Var3 Then
Var3 = l;
Var4 = (var2+Var3)/2;
Plot1(var1,"시");
Plot2(var2,"고");
Plot3(var3,"저");
Plot4(Var4,"반");
Text_SetString(tx1," 시-"+NumToStr(var1,2));
Text_SetLocation(tx1,sDate,sTime,var1);
Text_SetString(tx2," 고:"+NumToStr(var2,2));
Text_SetLocation(tx2,sDate,sTime,var2);
Text_SetString(tx3," 저:"+NumToStr(var3,2));
Text_SetLocation(tx3,sDate,sTime,var3);
Text_SetString(tx4," 반:"+NumToStr(var4,2));
Text_SetLocation(tx4,sDate,sTime,var4);
}
#텍스트색
Text_SetColor(tx1,White);Text_SetColor(tx2,Orange);Text_SetColor(tx3,Black);Text_SetColor(tx4,Olive);
#텍스트크기
Text_SetSize(tx1,10);Text_SetSize(tx2,10);Text_SetSize(tx3,10);Text_SetSize(tx4,10);
답변 1
예스스탁 예스스탁 답변
2023-02-20 10:48:29
안녕하세요
예스스탁입니다.
input : 타주기분(60);
var : S1(0),D1(0),TM(0),TF(0),tx1(0),tx2(0),tx3(0),tx4(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
var1 = O;
Var2 = H;
Var3 = L;
Var4 = (var2+Var3)/2;
tx1 = text_new(sDate,sTime,var1,"시:"+NumToStr(var1,2));
tx2 = text_new(sDate,sTime,var2,"고:"+NumToStr(var2,2));
tx3 = text_new(sDate,sTime,var3,"저:"+NumToStr(var3,2));
tx4 = text_new(sDate,sTime,var4,"반:"+NumToStr(var4,2));
Text_SetStyle(tx1,2,1);
Text_SetStyle(tx2,2,1);
Text_SetStyle(tx3,2,0);
Text_SetStyle(tx4,2,0);
}
if h > Var2 Then
Var2 = h;
if l < Var3 Then
Var3 = l;
Var4 = (var2+Var3)/2;
Plot1(var1,"시");
Plot2(var2,"고");
Plot3(var3,"저");
Plot4(Var4,"반");
Text_SetString(tx1," +"+NumToStr(var2-var1,2)+"/-"+NumToStr(var1-var3,2));
Text_SetLocation(tx1,sDate,sTime,var1);
Text_SetString(tx2," 고:"+NumToStr(var2,2)+"/+"+NumToStr(var2-var1,2));
Text_SetLocation(tx2,sDate,sTime,var2);
Text_SetString(tx3," 저:"+NumToStr(var3,2)+"/-"+NumToStr(var1-var3,2));
Text_SetLocation(tx3,sDate,sTime,var3);
if Var3 > var1 Then
Text_SetString(tx4," 반:"+NumToStr(var4,2)+"/+"+NumToStr(var1-var3,2));
Else
Text_SetString(tx4," 반:"+NumToStr(var4,2)+"/-"+NumToStr(var1-var3,2));
Text_SetLocation(tx4,sDate,sTime,var4);
}
#텍스트색
Text_SetColor(tx1,White);Text_SetColor(tx2,Orange);Text_SetColor(tx3,Black);Text_SetColor(tx4,Olive);
#텍스트크기
Text_SetSize(tx1,10);Text_SetSize(tx2,10);Text_SetSize(tx3,10);Text_SetSize(tx4,10);
즐거운 하루되세요
> 호정0688 님이 쓴 글입니다.
> 제목 : 지표
> 항상감사합니다.
지표첨삭부탁드립니다.
1]고가,저가,(고+저/2)에진동폭표시도부탁드립니다.
2]시가자리에는 시가표시 대신
고가-시가의 진동폭표시/시가-저가의 진동폭표시 가능할까요?
[수식]
input : 타주기분(60);
var : S1(0),D1(0),TM(0),TF(0),tx1(0),tx2(0),tx3(0),tx4(0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
var1 = O;
Var2 = H;
Var3 = L;
Var4 = (var2+Var3)/2;
tx1 = text_new(sDate,sTime,var1,"시:"+NumToStr(var1,2));
tx2 = text_new(sDate,sTime,var2,"고:"+NumToStr(var2,2));
tx3 = text_new(sDate,sTime,var3,"저:"+NumToStr(var3,2));
tx4 = text_new(sDate,sTime,var4,"저:"+NumToStr(var4,2));
Text_SetStyle(tx1,2,1);
Text_SetStyle(tx2,2,1);
Text_SetStyle(tx3,2,0);
Text_SetStyle(tx4,2,0);
}
if h > Var2 Then
Var2 = h;
if l < Var3 Then
Var3 = l;
Var4 = (var2+Var3)/2;
Plot1(var1,"시");
Plot2(var2,"고");
Plot3(var3,"저");
Plot4(Var4,"반");
Text_SetString(tx1," 시-"+NumToStr(var1,2));
Text_SetLocation(tx1,sDate,sTime,var1);
Text_SetString(tx2," 고:"+NumToStr(var2,2));
Text_SetLocation(tx2,sDate,sTime,var2);
Text_SetString(tx3," 저:"+NumToStr(var3,2));
Text_SetLocation(tx3,sDate,sTime,var3);
Text_SetString(tx4," 반:"+NumToStr(var4,2));
Text_SetLocation(tx4,sDate,sTime,var4);
}
#텍스트색
Text_SetColor(tx1,White);Text_SetColor(tx2,Orange);Text_SetColor(tx3,Black);Text_SetColor(tx4,Olive);
#텍스트크기
Text_SetSize(tx1,10);Text_SetSize(tx2,10);Text_SetSize(tx3,10);Text_SetSize(tx4,10);
다음글
이전글