답변완료
수식 변경
수고하십니다
현재등가의표시를 등가가 변경된면 변경된 등가에 표시되는 수식을 변경해서 부탁드립니다
var : V1(0,Data1),V2(0,Data1),ATM(0,Data1);
var : cnt(0,Data1);
var : Ci(0,Data1),Pi(0,Data1);
Array : CS[7](0),CC[7](0),PS[7](0),PP[7](0);
#콜종가
CC[2] = Data2(c);
CC[3] = Data4(c);
CC[4] = Data5(c);
CC[5] = Data6(c);
CC[6] = Data7(c);
#풋가격
PP[2] = Data3(c);
PP[3] = Data8(c);
PP[4] = Data9(c);
PP[5] = Data10(c);
PP[6] = Data11(c);
if data1(Bdate != Bdate[1]) then
{
V1 = Data12(c);
V2 = data12(Floor(c/2.5)*2.5);
if V1-V2 > 2.5/2 Then
ATM = V2+2.5;
else
ATM = V2;
#콜행사가
CS[2]= data2(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
CS[3]= data4(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
CS[4]= data5(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
CS[5]= data6(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
CS[6]= data7(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
#풋행사가
PS[2]= data3(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
PS[3]= data8(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
PS[4]= data9(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
PS[5]= data10(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
PS[6]= data11(iff(StrToNum(RightStr(SymbolCode,1)) == 5 or StrToNum(RightStr(SymbolCode,1)) == 0, StrToNum(RightStr(SymbolCode,3)), StrToNum(RightStr(SymbolCode,3))+0.5));
var1 = 0;
Var2 = 0;
Var3 = 0;
For cnt = 2 to 6
{
if CS[cnt] == ATM Then
var1 = cnt;
if CS[cnt] == ATM+2.5 Then
Var2 = cnt;
if CS[cnt] == ATM-2.5 Then
Var3 = cnt;
if PS[cnt] == ATM Then
value1 = cnt;
if PS[cnt] == ATM+2.5 Then
Value2 = cnt;
if PS[cnt] == ATM-2.5 Then
Value3 = cnt;
}
}
if var1 > 0 Then
Plot1(CC[var1]);
if Var2 > 0 Then
Plot2(CC[Var2]);
if Var3 > 0 Then
Plot3(CC[Var3]);
if value1 > 0 then
plot4(PP[value1]);
if value2 > 0 then
plot5(PP[value2]);
if value3 > 0 then
plot6(PP[value3])
2022-10-14
1032
글번호 162957
지표
답변완료
중간선 쌍바닥 쓰리바닥 세로선
input : P(10),상(2),하(1);
var : T(0),ll(0),TL(0);
var1 = highest(H,P);
var2 = Lowest(L,P);
var3 = (var1+var2)/2;
if Var3 > Var3[1] Then
T = 1;
if Var3 < Var3 [1] Then
T = -1;
Plot1(Var3,"var3",IFF(T == 1,Red,Blue));
#상승구간
if T == 1 Then
{
#상승구간 첫봉
if T != T[1] Then
{
#직전 하락구간 최저가 저장
value1 = ll[1];
#전전 하락구간 최저가
value2 = value1[1];
#전전전 하락구간 최저가
value3 = value2[1];
if value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and value2 > 0 Then
{
TL = TL_New_self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,Red);
TL_SetSize(TL,0.5);
}
}
}
#하락구간
if T == -1 Then
{
#최저가 계산
if T != T[1] Then
{
ll = l;
}
Else
{
if ll > 0 and l < ll Then
ll = l;
}
}
#상승구간
if T == 1 Then
{
#상승구간 첫봉
if T != T[1] Then
{
#직전 하락구간 최저가 저장
value1 = ll[1];
#전전 하락구간 최저가
value2 = value1[1];
#전전전 하락구간 최저가
value3 = value2[1];
if value1 <= value2+PriceScale*상 and value1 >= value2-PriceScale*하 and
value2 <= value3+PriceScale*상 and value2 >= value3-PriceScale*하 and
value3 > 0 Then
{
TL = TL_New_Self(sDate,sTime,0,sDate,sTime,99999999);
TL_SetColor(TL,blue);
TL_SetSize(TL,1);
}
}
}
#하락구간
if T == -1 Then
{
#최저가 계산
if T != T[1] Then
{
ll = l;
}
Else
{
if ll > 0 and l < ll Then
ll = l;
}
}
한 지표에 세로선을 두가지 구현하다보니, 쌍바닥이 연속될때 쓰리바닥이라서, 쓰리바닥은 쌍바닥과 겹치게되어 세로선 색상이 이상합니다. 겹치는 부분에서는 쌍바닥 세로선은 안 나타나고 쓰리바닥 세로선만 표시되게 부탁합니다.
2022-10-13
1227
글번호 162954
지표
답변완료
그뮬망지표부탁드립니다
수식1
AA=eavg(C, period);
valuewhen(1, AA>=AA(1), AA)
수식2
AA=eavg(C, period+5);
valuewhen(1, AA>=AA(1), AA)
수식3
AA=eavg(C, period+10);
valuewhen(1, AA>=AA(1), AA)
수식4
AA=eavg(C, period+15);
valuewhen(1, AA>=AA(1), AA)
수식5
AA=eavg(C, period+20);
valuewhen(1, AA>=AA(1), AA)
지표조건
period 5 1일 이평 부터 60 일 이평 까지 부탁드립니다
2022-10-13
873
글번호 162952
지표
답변완료
시스탬식과 종목 검색부탁드립니다
이격도압축돌파 시스템
수식
A5=disparity(5);
A10=disparity(10);
A15=disparity(15);
A20=disparity(20);
A25=disparity(25);
A30=disparity(30);
A35=disparity(35);
A40=disparity(40);
A45=disparity(45);
A50=disparity(50);
A55=disparity(55);
A60=disparity(60);
A65=disparity(65);
A70=disparity(70);
A75=disparity(75);
A80=disparity(80);
A85=disparity(85);
A90=disparity(90);
A95=disparity(95);
A100=disparity(100);
MAXA=max(A5, A10, A15, A20, A25, A30, A35, A40, A45, A50, A55, A60, A65, A70, A75, A80, A85, A90, A95, A100);
MINA=min(A5, A10, A15, A20, A25, A30, A35, A40, A45, A50, A55, A60, A65, A70, A75, A80, A85, A90, A95, A100);
AA=valuewhen(1, MAXA/MINA*100 <ratio, eavg(C, 50)*MAXA/100);
if(crossup(C, AA) and V>=eavg(V, 20)*Vratio, 1, 0)
지표변수
ratio 105
Vratio 3
2022-10-13
1258
글번호 162950
시스템