커뮤니티
좋은 주말 되십시요^^
2024-09-21 13:33:45
686
글번호 183188
* 안녕 하세요.
한 달 만에 10만원 → 6000만원 만든 매매법 분석
9월 1일부터 19일까지 타점 승률 100%, 추세 추종 끝판왕 매매법 알려드릴게요
캔들 차트만 평생 봤어도, "이 개념" 을 모르면 반드시 당합니다
* 아래 수식에서 점이 생긴후 수평선이 생기는데 아무리 해도 안없어 지네요
요청 사항
1. 수평선 삭제
2. 사각형 점 선으로 연결 (빨강은 빨강 파알은 파랑기리 연결선)
3. 연결선 마지막 봉은 C[1] 으로 연결 좀 부탁 드립니다
즉 현재봉 이전에 5개 봉에 고 저점 점이 없을경우
연결선이 안되므로
직전 고저점 부터 C[1] 가지 선으로 연결(고저점 신호 생기면 끝)
##
input : 간격(4),갯수(4);
var : T(0),cnt(0);
var : HH1(0),HI1(0),HI2(0),LL1(0),LI1(0),LI2(0);
var : LD(0),LT(0),LL(0),HD(0),HT(0),HH(0),TX(0);
Array : HTL[100](0),LTL[100](0);
if H[간격] > Highest(H,간격) and H[간격] > Highest(H,간격)[간격+1] Then
{
T = 1;
HH1 = H[간격];
Hi1 = index[간격];
Hi2 = HI1[1];
HTL[0] = TL_New(sdate[간격],stime[간격],HH1,sdate,stime,HH1);
TL_SetColor(HTL[0],RED);
// TL_SetExtRight(HTL[0],true);
TX = Text_New(sdate[간격],stime[간격],HH1,"■");
Text_SetColor(TX,RgB(255,0,0));
Text_SetStyle(TX,2,2);
Text_SetSize(tx,19);
// PlaySound("C:￦KiwoomGlobal￦sound￦sound1.wav");
//PlaySound("C:￦KiwoomGlobal￦sound￦알람소리02.wav");
for cnt = 1 to 99
{
HTL[cnt] = HTL[cnt-1][1];
}
TL_Delete(HTL[갯수]);
if t == t[1] then
{
LD = 0;
LT = 0;
LL = 0;
for cnt = index-HI1 to index-HI2
{
if LL == 0 or (LL > 0 and L[cnt] < LL) Then
{
LL = L[cnt];
LD = sdate[cnt];
LT = stime[cnt];
}
}
/*
LTL[0] = TL_New(ld,lt,ll,sdate,stime,ll);
TL_SetColor(LTL[0],blue);
TL_SetExtRight(LTL[0],true);
TX = Text_New(LD,LT,LL+1,"■");
Text_SetColor(TX,MAGENTA);
Text_SetStyle(TX,2,2);
*/
for cnt = 1 to 99
{
LTL[cnt] = LTL[cnt-1][1];
}
TL_Delete(LTL[갯수]);
}
}
if L[간격] < Lowest(L,간격) and L[간격] < Lowest(L,간격)[간격+1] Then
{
T = -1;
LL1 = L[간격];
LI1 = index[간격];
LI2 = LI1[1];
LTL[0] = TL_New(sdate[간격],stime[간격],LL1,sdate,stime,LL1);
TL_SetColor(LTL[0],blue);
// TL_SetExtRight(LTL[0],true);
TX = Text_New(sdate[간격],stime[간격],LL1,"■");
Text_SetColor(TX,RgB(0,0,255));
Text_SetStyle(TX,2,2);
Text_SetSize(tx,19);
// PlaySound("C:￦KiwoomGlobal￦sound￦sound4.wav");
// PlaySound("C:￦KiwoomGlobal￦sound￦알람소리03.wav");
for cnt = 1 to 99
{
LTL[cnt] = LTL[cnt-1][1];
}
TL_Delete(LTL[갯수]);
if t == t[1] then
{
HD = 0;
HT = 0;
HH = 0;
for cnt = index-LI1 to index-LI2
{
if HH == 0 or (HH > 0 and H[cnt] > HH) Then
{
HH = H[cnt];
HD = sdate[cnt];
HT = stime[cnt];
}
}
/*
HTL[0] = TL_New(HD,HT,HH,sdate,stime,HH);
TL_SetColor(HTL[0],RED);
TL_SetExtRight(HTL[0],true);
TX = Text_New(HD,HT,HH+1,"■");
Text_SetColor(TX,BLACK);
Text_SetStyle(TX,2,2);
*/
for cnt = 1 to 99
{
HTL[cnt] = HTL[cnt-1][1];
}
TL_Delete(HTL[갯수]);
}
}
수고 하셨습니다. 좋은 주말 되십시요.
답변 1
예스스탁 예스스탁 답변
2024-09-05 14:18:45
안녕하세요
예스스탁입니다.
##
input : 간격(4),갯수(4);
var : T(0),cnt(0);
var : HH1(0),HI1(0),HI2(0),LL1(0),LI1(0),LI2(0);
var : HD1(0),HT1(0),HD2(0),HT2(0),HH2(0);
var : LD1(0),LT1(0),LD2(0),LT2(0),LL2(0);
var : LD(0),LT(0),LL(0),HD(0),HT(0),HH(0),TX(0);
var : TL11(0),TL22(0);
Array : HTL[100](0),LTL[100](0);
if H[간격] > Highest(H,간격) and H[간격] > Highest(H,간격)[간격+1] Then
{
T = 1;
HH1 = H[간격];
HD1 = sDate[간격];
HT1 = sTime[간격];
HH2 = HH1[1];
HD2 = HD1[1];
HT2 = HT1[1];
Hi1 = index[간격];
Hi2 = HI1[1];
HTL[0] = TL_New(HD2,HT2,HH2,HD1,HT1,HH1);
TL_SetColor(HTL[0],RED);
TL_SetStyle(HTL[0],3);
// TL_SetExtRight(HTL[0],true);
TX = Text_New(sdate[간격],stime[간격],HH1,"■");
Text_SetColor(TX,RgB(255,0,0));
Text_SetStyle(TX,2,2);
Text_SetSize(tx,19);
//PlaySound("C:￦KiwoomGlobal￦sound￦sound1.wav");
//PlaySound("C:￦KiwoomGlobal￦sound￦알람소리02.wav");
for cnt = 1 to 99
{
HTL[cnt] = HTL[cnt-1][1];
}
TL_Delete(HTL[갯수]);
if t == t[1] then
{
LD = 0;
LT = 0;
LL = 0;
for cnt = index-HI1 to index-HI2
{
if LL == 0 or (LL > 0 and L[cnt] < LL) Then
{
LL = L[cnt];
LD = sdate[cnt];
LT = stime[cnt];
}
}
/*
LTL[0] = TL_New(ld,lt,ll,sdate,stime,ll);
TL_SetColor(LTL[0],blue);
TL_SetExtRight(LTL[0],true);
TX = Text_New(LD,LT,LL+1,"■");
Text_SetColor(TX,MAGENTA);
Text_SetStyle(TX,2,2);
*/
for cnt = 1 to 99
{
LTL[cnt] = LTL[cnt-1][1];
}
TL_Delete(LTL[갯수]);
}
TL_Delete(TL11);
}
Else
{
TL_Delete(TL11);
TL11 = TL_new(HD1,HT1,HH1,Sdate,sTime,C);
TL_SetColor(TL11,Red);
TL_SetStyle(TL11,3);
}
if L[간격] < Lowest(L,간격) and L[간격] < Lowest(L,간격)[간격+1] Then
{
T = -1;
LL1 = L[간격];
LD1 = sDate[간격];
LT1 = sTime[간격];
LL2 = LL1[1];
LD2 = LD1[1];
LT2 = LT1[1];
LI1 = index[간격];
LI2 = LI1[1];
LTL[0] = TL_New(LD2,LT2,LL2,LD1,LT1,LL1);
TL_SetColor(LTL[0],blue);
TL_SetStyle(LTL[0],3);
// TL_SetExtRight(LTL[0],true);
TX = Text_New(sdate[간격],stime[간격],LL1,"■");
Text_SetColor(TX,RgB(0,0,255));
Text_SetStyle(TX,2,2);
Text_SetSize(tx,19);
// PlaySound("C:￦KiwoomGlobal￦sound￦sound4.wav");
// PlaySound("C:￦KiwoomGlobal￦sound￦알람소리03.wav");
for cnt = 1 to 99
{
LTL[cnt] = LTL[cnt-1][1];
}
TL_Delete(LTL[갯수]);
if t == t[1] then
{
HD = 0;
HT = 0;
HH = 0;
for cnt = index-LI1 to index-LI2
{
if HH == 0 or (HH > 0 and H[cnt] > HH) Then
{
HH = H[cnt];
HD = sdate[cnt];
HT = stime[cnt];
}
}
/*
HTL[0] = TL_New(HD,HT,HH,sdate,stime,HH);
TL_SetColor(HTL[0],RED);
TL_SetExtRight(HTL[0],true);
TX = Text_New(HD,HT,HH+1,"■");
Text_SetColor(TX,BLACK);
Text_SetStyle(TX,2,2);
*/
for cnt = 1 to 99
{
HTL[cnt] = HTL[cnt-1][1];
}
TL_Delete(HTL[갯수]);
}
TL_Delete(TL22);
}
Else
{
TL_Delete(TL22);
TL22 = TL_new(LD1,LT1,LL1,Sdate,sTime,C);
TL_SetColor(TL22,Blue);
TL_SetStyle(TL22,3);
}
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 좋은 주말 되십시요^^
> * 안녕 하세요.
* 아래 수식에서 점이 생긴후 수평선이 생기는데 아무리 해도 안없어 지네요
요청 사항
1. 수평선 삭제
2. 사각형 점 선으로 연결 (빨강은 빨강 파알은 파랑기리 연결선)
3. 연결선 마지막 봉은 C[1] 으로 연결 좀 부탁 드립니다
즉 현재봉 이전에 5개 봉에 고 저점 점이 없을경우
연결선이 안되므로
직전 고저점 부터 C[1] 가지 선으로 연결(고저점 신호 생기면 끝)
##
input : 간격(4),갯수(4);
var : T(0),cnt(0);
var : HH1(0),HI1(0),HI2(0),LL1(0),LI1(0),LI2(0);
var : LD(0),LT(0),LL(0),HD(0),HT(0),HH(0),TX(0);
Array : HTL[100](0),LTL[100](0);
if H[간격] > Highest(H,간격) and H[간격] > Highest(H,간격)[간격+1] Then
{
T = 1;
HH1 = H[간격];
Hi1 = index[간격];
Hi2 = HI1[1];
HTL[0] = TL_New(sdate[간격],stime[간격],HH1,sdate,stime,HH1);
TL_SetColor(HTL[0],RED);
// TL_SetExtRight(HTL[0],true);
TX = Text_New(sdate[간격],stime[간격],HH1,"■");
Text_SetColor(TX,RgB(255,0,0));
Text_SetStyle(TX,2,2);
Text_SetSize(tx,19);
// PlaySound("C:￦KiwoomGlobal￦sound￦sound1.wav");
//PlaySound("C:￦KiwoomGlobal￦sound￦알람소리02.wav");
for cnt = 1 to 99
{
HTL[cnt] = HTL[cnt-1][1];
}
TL_Delete(HTL[갯수]);
if t == t[1] then
{
LD = 0;
LT = 0;
LL = 0;
for cnt = index-HI1 to index-HI2
{
if LL == 0 or (LL > 0 and L[cnt] < LL) Then
{
LL = L[cnt];
LD = sdate[cnt];
LT = stime[cnt];
}
}
/*
LTL[0] = TL_New(ld,lt,ll,sdate,stime,ll);
TL_SetColor(LTL[0],blue);
TL_SetExtRight(LTL[0],true);
TX = Text_New(LD,LT,LL+1,"■");
Text_SetColor(TX,MAGENTA);
Text_SetStyle(TX,2,2);
*/
for cnt = 1 to 99
{
LTL[cnt] = LTL[cnt-1][1];
}
TL_Delete(LTL[갯수]);
}
}
if L[간격] < Lowest(L,간격) and L[간격] < Lowest(L,간격)[간격+1] Then
{
T = -1;
LL1 = L[간격];
LI1 = index[간격];
LI2 = LI1[1];
LTL[0] = TL_New(sdate[간격],stime[간격],LL1,sdate,stime,LL1);
TL_SetColor(LTL[0],blue);
// TL_SetExtRight(LTL[0],true);
TX = Text_New(sdate[간격],stime[간격],LL1,"■");
Text_SetColor(TX,RgB(0,0,255));
Text_SetStyle(TX,2,2);
Text_SetSize(tx,19);
// PlaySound("C:￦KiwoomGlobal￦sound￦sound4.wav");
// PlaySound("C:￦KiwoomGlobal￦sound￦알람소리03.wav");
for cnt = 1 to 99
{
LTL[cnt] = LTL[cnt-1][1];
}
TL_Delete(LTL[갯수]);
if t == t[1] then
{
HD = 0;
HT = 0;
HH = 0;
for cnt = index-LI1 to index-LI2
{
if HH == 0 or (HH > 0 and H[cnt] > HH) Then
{
HH = H[cnt];
HD = sdate[cnt];
HT = stime[cnt];
}
}
/*
HTL[0] = TL_New(HD,HT,HH,sdate,stime,HH);
TL_SetColor(HTL[0],RED);
TL_SetExtRight(HTL[0],true);
TX = Text_New(HD,HT,HH+1,"■");
Text_SetColor(TX,BLACK);
Text_SetStyle(TX,2,2);
*/
for cnt = 1 to 99
{
HTL[cnt] = HTL[cnt-1][1];
}
TL_Delete(HTL[갯수]);
}
}
수고 하셨습니다. 좋은 주말 되십시요.