커뮤니티
수식부탁드립니다=========
2018-05-01 06:05:49
197
글번호 118601
1분차트로해놓고 조건이맞아도 소리가안나네요 부탁드립니다
(아래 교차간격에서는 소리가 정상적으로 납니다 )
var:신호비교봉(3),신호발생가격(1250),찬스라인(0.1),downn(0.99),LENGTH1(60),LENGTH2(10),비교봉(5),비교봉1(5),양합상승(1.008),양합하락(0.985),표시2(0);
Input:라인폭(0),소리2(0),소리22(0),표시위치(0.7),최고저기준(10),교차간격(0.05),abs간격(2),susmss간격(3);
INPUTS: LENGTH11(30),전봉차(0);
Input : Periodtsf(30);
Input : Periodt(30);
VARS: TEMA11(0),susm22tem(0);
var : sum2(0,data1),sum4(0,data1),sum6(0,data1),TEMA1atm2(0),TEMA1atm4(0),TEMA1atm6(0),ss(0);
var : HH(0,data2),LL(0,data2),hl(0,data2),ii(0,data2);;
var : crup(0),crdn(0),sum22(0),ccurnt(0),cgap(0),callgap(0),putgap(0),plemeumgap(0),chanline(0);
var :linegi(0),data2yc(0),data3yc(0),hapyc(0),hapycrt(0),TEMA1hapycrt(0),crup96(0),data2opc(0),data3opc(0),datatoopp(0);
var :susm22(0),sucrup(0),hhh(0),lll(0),hii(0),chanceline(0),pyungyc(0),pyungty(0);
var :dataabs(0),dataabstem(0);
sum2 = (data2(c)+data3(c));
sum22 =(data2(c)+data3(c))/2*250000;
data2opc = data2(openD(0));
data3opc = data3(openD(0));
// if data2(dayindex+1 == 3) Then
// data2opc = data2(c);
// if data3(dayindex+1 == 3) Then
// data3opc = data3(c);
dataabs = abs(data2(c) - data3(c));
//************ susm22의 테마 *****************************************
dataabstem = (3 * Ema(dataabs,LENGTH11)) - (3 * Ema(Ema(dataabs,LENGTH11),LENGTH11)) +
(Ema(Ema(Ema(dataabs,LENGTH11),LENGTH11),LENGTH11));
// Plot41(dataabstem,"abstemup",iff((dataabstem )>(dataabstem[1])+00,RED,iff((dataabstem )<(dataabstem[1] )-00,BLUE,BLACK)));
//*********************************************************
datatoopp = (data2opc + data3opc) / 2 *250000;
susm22 = sum22 - datatoopp;
data2yc = data2(closeD(1));
data3yc = data3(closeD(1));
pyungyc = ( data2yc + data3yc ) / 2 *250000;
pyungty = pyungyc - datatoopp;
if data2(bdate != bdate[1]) Then{
ii = 0;
HHh = susm22;
LlL = susm22;
}
else
{
ii = ii+1;
if ii < 최고저기준 Then
{
if susm22 > hhh Then
hhh = susm22;
if susm22 < lll Then
lll = susm22;
}
else{
hhh = data2(highest(susm22,최고저기준));
lll = data2(lowest(susm22,최고저기준));
}
}
hii = (hhh + lll)/2;
//plot1(sum2,"양합");
PLOT3(sum22,"수정양합");
//hhh = hh - susm22;
//lll = ll - susm22;
//hii = (hhh + lll) / 2;
plot21(HHh,"Data2 H" );
plot22(LLl,"Data2 L");
plot76(hii,"hii");
/*
if ss<=0 and hii > hii[신호비교봉] + 신호발생가격 then {
ss=1;
PLOT24(0,"상승");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsound동시매수진입.wav");
}
}
if ss>=0 and hii < hii[신호비교봉] - 신호발생가격 then {
ss=-1;
PLOT25(0,"하락");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsound동시매도진입.wav");
}
}
*/
/**********************************************************************
if ss<=0 and tema1[1] < tema1 Then {
ss=1;
PLOT45((tema1 )-0.01,"매수");
// PlaySound("C:UsersAdministratorDesktop효과Bandi.wav");
}
if ss>=0 and tema1[1] > tema1 Then {
ss=-1;
PLOT46((tema1 )-0.01,"매도");
//PlaySound("C:UsersAdministratorDesktop효과click08.wav");
}
**********************************************************************/
TEMA1atm2 = (3 * Ema(sum22,LENGTH1)) - (3 * Ema(Ema(sum22,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(sum22,LENGTH1),LENGTH1),LENGTH1));
plot5(TEMA1atm2,"태마2",iff((TEMA1atm2 )>(TEMA1atm2[1])+00,RED,iff((TEMA1atm2 )<(TEMA1atm2[1] )-00,BLUE,BLACK)));
if ( Data2(c) > Data3(c)) and ( Data2(c) - Data3(c)) < 교차간격 Then{
crup = (Data2(c)+Data3(c))/2*250000;
ccurnt = c;
}
if ( Data3(c) > Data2(c)) and ( Data3(c) - Data2(c)) < 교차간격 Then{
crup = (Data2(c)+Data3(c))/2*250000;
ccurnt = c;
}
// PLOT31(crup,"교차라인");
if ( Data2(c) > Data3(c)) and ( Data2(c) - Data3(c)) < 교차간격 Then{
PLOT52(10000,"상승교차");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd2.wav");
}
}
if ( Data3(c) > Data2(c)) and ( Data3(c) - Data2(c)) < 교차간격 Then{
PLOT53(10000,"하락교차");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd2.wav");
}
}
if sTime == 090000 Then {
plot59( 20000,"장시작" );
}
// PLOT58(datatoopp ,"시가평균");
susm22 = sum22 - datatoopp;
PLOT99(susm22 ,"시가대비평가");
//************ susm22의 테마 *****************************************
susm22tem = (3 * Ema(susm22,LENGTH11)) - (3 * Ema(Ema(susm22,LENGTH11),LENGTH11)) +
(Ema(Ema(Ema(susm22,LENGTH11),LENGTH11),LENGTH11));
Plot75(susm22tem,"temup",iff((susm22tem )>(susm22tem[1])+00,RED,iff((susm22tem )<(susm22tem[1] )-00,BLUE,BLACK)));
Plot91(susm22tem-라인폭,"susm22tem_1") ;
Plot92(susm22tem+라인폭,"susm22tem_2") ;
if susm22tem > susm22tem[1] and (NextBarSdate > sdate or (NextBarSdate == sdate and NextBarStime > stime)) Then{
plot93(susm22tem,"susmup");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddn3.wav");
}
}
if susm22tem < susm22tem[1] and (NextBarSdate > sdate or (NextBarSdate == sdate and NextBarStime > stime)) Then{
plot94(susm22tem,"susmdn");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd5.wav");
}
}
/*
if ss<=0 and susm22tem < susm22tem[susmss간격] then {
ss=1;
PLOT24(susm22,"매도진입");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddn3.wav");
}
}
if ss>=0 and susm22tem > susm22tem[susmss간격] then {
ss=-1;
PLOT25(susm22,"매수진입");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd5.wav");
}
}
*/
//*********************************************************
plotbaseline1(0);
/*
plotbaseline2(-10000);
plotbaseline3(-20000);
plotbaseline4(-30000);
plotbaseline5(-40000);
plotbaseline6(10000);
plotbaseline8(20000);
plotbaseline9(30000);
plotbaseline10(40000);
*/
sucrup = crup - datatoopp;
PLOT62(sucrup,"수정교차라인");
// chanceline = datatoopp * 찬스라인;
// PLOT63(chanceline,"찬스라인");
PLOT63(pyungty ,"전데이타평");
if 소리22 == 1 then {
if CrossDown(susm22,-10000) or CrossUp(susm22,-10000) Then
{ plot64(susm22,"-10000");
PlaySound("C:UsersAdministratorDesktopsound마1w.wav");
}
if CrossDown(susm22,-20000) or CrossUp(susm22,-20000) Then
{ plot65(susm22,"-20000");
PlaySound("C:UsersAdministratorDesktopsound마2w.wav");
}
if CrossDown(susm22,-30000) or CrossUp(susm22,-30000) Then
{ plot66(susm22,"-30000");
PlaySound("C:UsersAdministratorDesktopsound마3w.wav");
}
if CrossDown(susm22,-40000) or CrossUp(susm22,-40000) Then
{ plot67(susm22,"-40000");
PlaySound("C:UsersAdministratorDesktopsound마4w.wav");
}
//*********************************+++++++++++++++++++++++++++++++++++++
if CrossDown(susm22,10000) or CrossUp(susm22,10000) Then
{ plot68(susm22,"10000");
PlaySound("C:UsersAdministratorDesktopsound프1w.wav");
}
if CrossDown(susm22,20000) or CrossUp(susm22,20000) Then
{ plot69(susm22,"20000");
PlaySound("C:UsersAdministratorDesktopsound프2w.wav");
}
if CrossDown(susm22,30000) or CrossUp(susm22,30000) Then
{ plot70(susm22,"30000");
PlaySound("C:UsersAdministratorDesktopsound프3w.wav");
}
if CrossDown(susm22,40000) or CrossUp(susm22,40000) Then
{ plot71(susm22,"40000");
PlaySound("C:UsersAdministratorDesktopsound프4w.wav");
}
}
var : LRLv(0);
LRLv = LRL(susm22,Periodt);
Plot72(LRLv, "LRS_susm22");
var : TSF(0);
TSF = LRL(susm22,Periodtsf)+LRS(susm22,Periodtsf);
//Plot91(TSF-라인폭,"TSF_susm221") ;
//Plot92(TSF+라인폭,"TSF_susm222") ;
if susm22 > -5000 and susm22 <= 0 then plot83(tsf,"하1");
if susm22 > -10000 and susm22 <= -5000 then plot84(tsf,"하2");
if susm22 > -15000 and susm22 <= -10000 then plot85(tsf,"하3");
if susm22 > -20000 and susm22 <= -15000 then plot86(tsf,"하4");
if susm22 > -25000 and susm22 <= -20000 then plot87(tsf,"하5");
if susm22 > -30000 and susm22 <= -25000 then plot88(tsf,"하6");
if susm22 > -35000 and susm22 <= -30000 then plot89(tsf,"하7");
if susm22 > -40000 and susm22 <= -35000 then plot90(tsf,"하8");
답변 1
예스스탁 예스스탁 답변
2018-05-02 11:01:17
안녕하세요
예스스탁입니다.
수식의 어느부분을 수정해 드려야 할지 모르겠습니다.
조건이 어떤 조건을 의미하시는지 모르겠습니다.
해당 부분은 사용자분이 내용을 살펴보셔야 할것 같습니다.
도움을 드리지 못해 죄송합니다.
즐거운 하루되세요
> leekss1 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다=========
> 1분차트로해놓고 조건이맞아도 소리가안나네요 부탁드립니다
(아래 교차간격에서는 소리가 정상적으로 납니다 )
var:신호비교봉(3),신호발생가격(1250),찬스라인(0.1),downn(0.99),LENGTH1(60),LENGTH2(10),비교봉(5),비교봉1(5),양합상승(1.008),양합하락(0.985),표시2(0);
Input:라인폭(0),소리2(0),소리22(0),표시위치(0.7),최고저기준(10),교차간격(0.05),abs간격(2),susmss간격(3);
INPUTS: LENGTH11(30),전봉차(0);
Input : Periodtsf(30);
Input : Periodt(30);
VARS: TEMA11(0),susm22tem(0);
var : sum2(0,data1),sum4(0,data1),sum6(0,data1),TEMA1atm2(0),TEMA1atm4(0),TEMA1atm6(0),ss(0);
var : HH(0,data2),LL(0,data2),hl(0,data2),ii(0,data2);;
var : crup(0),crdn(0),sum22(0),ccurnt(0),cgap(0),callgap(0),putgap(0),plemeumgap(0),chanline(0);
var :linegi(0),data2yc(0),data3yc(0),hapyc(0),hapycrt(0),TEMA1hapycrt(0),crup96(0),data2opc(0),data3opc(0),datatoopp(0);
var :susm22(0),sucrup(0),hhh(0),lll(0),hii(0),chanceline(0),pyungyc(0),pyungty(0);
var :dataabs(0),dataabstem(0);
sum2 = (data2(c)+data3(c));
sum22 =(data2(c)+data3(c))/2*250000;
data2opc = data2(openD(0));
data3opc = data3(openD(0));
// if data2(dayindex+1 == 3) Then
// data2opc = data2(c);
// if data3(dayindex+1 == 3) Then
// data3opc = data3(c);
dataabs = abs(data2(c) - data3(c));
//************ susm22의 테마 *****************************************
dataabstem = (3 * Ema(dataabs,LENGTH11)) - (3 * Ema(Ema(dataabs,LENGTH11),LENGTH11)) +
(Ema(Ema(Ema(dataabs,LENGTH11),LENGTH11),LENGTH11));
// Plot41(dataabstem,"abstemup",iff((dataabstem )>(dataabstem[1])+00,RED,iff((dataabstem )<(dataabstem[1] )-00,BLUE,BLACK)));
//*********************************************************
datatoopp = (data2opc + data3opc) / 2 *250000;
susm22 = sum22 - datatoopp;
data2yc = data2(closeD(1));
data3yc = data3(closeD(1));
pyungyc = ( data2yc + data3yc ) / 2 *250000;
pyungty = pyungyc - datatoopp;
if data2(bdate != bdate[1]) Then{
ii = 0;
HHh = susm22;
LlL = susm22;
}
else
{
ii = ii+1;
if ii < 최고저기준 Then
{
if susm22 > hhh Then
hhh = susm22;
if susm22 < lll Then
lll = susm22;
}
else{
hhh = data2(highest(susm22,최고저기준));
lll = data2(lowest(susm22,최고저기준));
}
}
hii = (hhh + lll)/2;
//plot1(sum2,"양합");
PLOT3(sum22,"수정양합");
//hhh = hh - susm22;
//lll = ll - susm22;
//hii = (hhh + lll) / 2;
plot21(HHh,"Data2 H" );
plot22(LLl,"Data2 L");
plot76(hii,"hii");
/*
if ss<=0 and hii > hii[신호비교봉] + 신호발생가격 then {
ss=1;
PLOT24(0,"상승");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsound동시매수진입.wav");
}
}
if ss>=0 and hii < hii[신호비교봉] - 신호발생가격 then {
ss=-1;
PLOT25(0,"하락");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsound동시매도진입.wav");
}
}
*/
/**********************************************************************
if ss<=0 and tema1[1] < tema1 Then {
ss=1;
PLOT45((tema1 )-0.01,"매수");
// PlaySound("C:UsersAdministratorDesktop효과Bandi.wav");
}
if ss>=0 and tema1[1] > tema1 Then {
ss=-1;
PLOT46((tema1 )-0.01,"매도");
//PlaySound("C:UsersAdministratorDesktop효과click08.wav");
}
**********************************************************************/
TEMA1atm2 = (3 * Ema(sum22,LENGTH1)) - (3 * Ema(Ema(sum22,LENGTH1),LENGTH1)) +
(Ema(Ema(Ema(sum22,LENGTH1),LENGTH1),LENGTH1));
plot5(TEMA1atm2,"태마2",iff((TEMA1atm2 )>(TEMA1atm2[1])+00,RED,iff((TEMA1atm2 )<(TEMA1atm2[1] )-00,BLUE,BLACK)));
if ( Data2(c) > Data3(c)) and ( Data2(c) - Data3(c)) < 교차간격 Then{
crup = (Data2(c)+Data3(c))/2*250000;
ccurnt = c;
}
if ( Data3(c) > Data2(c)) and ( Data3(c) - Data2(c)) < 교차간격 Then{
crup = (Data2(c)+Data3(c))/2*250000;
ccurnt = c;
}
// PLOT31(crup,"교차라인");
if ( Data2(c) > Data3(c)) and ( Data2(c) - Data3(c)) < 교차간격 Then{
PLOT52(10000,"상승교차");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd2.wav");
}
}
if ( Data3(c) > Data2(c)) and ( Data3(c) - Data2(c)) < 교차간격 Then{
PLOT53(10000,"하락교차");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd2.wav");
}
}
if sTime == 090000 Then {
plot59( 20000,"장시작" );
}
// PLOT58(datatoopp ,"시가평균");
susm22 = sum22 - datatoopp;
PLOT99(susm22 ,"시가대비평가");
//************ susm22의 테마 *****************************************
susm22tem = (3 * Ema(susm22,LENGTH11)) - (3 * Ema(Ema(susm22,LENGTH11),LENGTH11)) +
(Ema(Ema(Ema(susm22,LENGTH11),LENGTH11),LENGTH11));
Plot75(susm22tem,"temup",iff((susm22tem )>(susm22tem[1])+00,RED,iff((susm22tem )<(susm22tem[1] )-00,BLUE,BLACK)));
Plot91(susm22tem-라인폭,"susm22tem_1") ;
Plot92(susm22tem+라인폭,"susm22tem_2") ;
if susm22tem > susm22tem[1] and (NextBarSdate > sdate or (NextBarSdate == sdate and NextBarStime > stime)) Then{
plot93(susm22tem,"susmup");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddn3.wav");
}
}
if susm22tem < susm22tem[1] and (NextBarSdate > sdate or (NextBarSdate == sdate and NextBarStime > stime)) Then{
plot94(susm22tem,"susmdn");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd5.wav");
}
}
/*
if ss<=0 and susm22tem < susm22tem[susmss간격] then {
ss=1;
PLOT24(susm22,"매도진입");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddn3.wav");
}
}
if ss>=0 and susm22tem > susm22tem[susmss간격] then {
ss=-1;
PLOT25(susm22,"매수진입");
if 소리2 == 1 then {
PlaySound("C:UsersAdministratorDesktopsounddd5.wav");
}
}
*/
//*********************************************************
plotbaseline1(0);
/*
plotbaseline2(-10000);
plotbaseline3(-20000);
plotbaseline4(-30000);
plotbaseline5(-40000);
plotbaseline6(10000);
plotbaseline8(20000);
plotbaseline9(30000);
plotbaseline10(40000);
*/
sucrup = crup - datatoopp;
PLOT62(sucrup,"수정교차라인");
// chanceline = datatoopp * 찬스라인;
// PLOT63(chanceline,"찬스라인");
PLOT63(pyungty ,"전데이타평");
if 소리22 == 1 then {
if CrossDown(susm22,-10000) or CrossUp(susm22,-10000) Then
{ plot64(susm22,"-10000");
PlaySound("C:UsersAdministratorDesktopsound마1w.wav");
}
if CrossDown(susm22,-20000) or CrossUp(susm22,-20000) Then
{ plot65(susm22,"-20000");
PlaySound("C:UsersAdministratorDesktopsound마2w.wav");
}
if CrossDown(susm22,-30000) or CrossUp(susm22,-30000) Then
{ plot66(susm22,"-30000");
PlaySound("C:UsersAdministratorDesktopsound마3w.wav");
}
if CrossDown(susm22,-40000) or CrossUp(susm22,-40000) Then
{ plot67(susm22,"-40000");
PlaySound("C:UsersAdministratorDesktopsound마4w.wav");
}
//*********************************+++++++++++++++++++++++++++++++++++++
if CrossDown(susm22,10000) or CrossUp(susm22,10000) Then
{ plot68(susm22,"10000");
PlaySound("C:UsersAdministratorDesktopsound프1w.wav");
}
if CrossDown(susm22,20000) or CrossUp(susm22,20000) Then
{ plot69(susm22,"20000");
PlaySound("C:UsersAdministratorDesktopsound프2w.wav");
}
if CrossDown(susm22,30000) or CrossUp(susm22,30000) Then
{ plot70(susm22,"30000");
PlaySound("C:UsersAdministratorDesktopsound프3w.wav");
}
if CrossDown(susm22,40000) or CrossUp(susm22,40000) Then
{ plot71(susm22,"40000");
PlaySound("C:UsersAdministratorDesktopsound프4w.wav");
}
}
var : LRLv(0);
LRLv = LRL(susm22,Periodt);
Plot72(LRLv, "LRS_susm22");
var : TSF(0);
TSF = LRL(susm22,Periodtsf)+LRS(susm22,Periodtsf);
//Plot91(TSF-라인폭,"TSF_susm221") ;
//Plot92(TSF+라인폭,"TSF_susm222") ;
if susm22 > -5000 and susm22 <= 0 then plot83(tsf,"하1");
if susm22 > -10000 and susm22 <= -5000 then plot84(tsf,"하2");
if susm22 > -15000 and susm22 <= -10000 then plot85(tsf,"하3");
if susm22 > -20000 and susm22 <= -15000 then plot86(tsf,"하4");
if susm22 > -25000 and susm22 <= -20000 then plot87(tsf,"하5");
if susm22 > -30000 and susm22 <= -25000 then plot88(tsf,"하6");
if susm22 > -35000 and susm22 <= -30000 then plot89(tsf,"하7");
if susm22 > -40000 and susm22 <= -35000 then plot90(tsf,"하8");