안녕하세요 예스스탁입니다. if var1 > C and var2 > C and var3 > C Then buy(); if var1 < C and var2 < C and var3 < C Then sell(); var1이 ema(C,1)로 지수이평값입니다. ema(c,1)은 종가와 값이 같으므로 조건이 충족되지 않습니다. 최소한 2이상의 기간값을 가져야 종가와 값이 달라집니다. 수식은 따로 줄일만한 부분이 보이지 않습니다. 즐거운 하루되세요 > 외국인 님이 쓴 글입니다. > 제목 : 시스템식수정부탁드립니다 > 안녕하세요 시스템식 수정부탁드립니다. 신호가안나오네요 ,그리고 현재식이 문장이 길어서 줄이는 방법은없는지요 Input:af(0.02),maxAF(0.2); Var:오늘(0),극대(0),극저(0),가속(0),내일(0),추세(0),상승(1),하락(-1); //--------------------------------------------------------------------------------- Var1 = Ema(C,1); if Var1 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = Var1; 극저 = Var1; } if Var1 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if Var1[1] < Var1 then 추세 = 상승; if Var1[1] > Var1 then 추세 = 하락; } if 추세[1] == 상승 and Var1[1] > Var1 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and Var1[1] < Var1 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(Var1,극저); 극대 = max(Var1,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if Var1 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if Var1 > 극대[1] then { 극대 = Var1; 가속 = min(maxAF,가속+af)/3; } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = Var1; 가속 = af; } } if 추세[1] == 하락 then { if Var1 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if Var1 < 극저[1] then { 극저 = Var1; 가속 = min(maxAF,가속+af)/3; } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = Var1; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //--------------------------------------------------------------------------------- Var2 = Ema(C,2); if Var2 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = Var2; 극저 = Var2; } if Var2 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if Var2[1] < Var2 then 추세 = 상승; if Var2[1] > Var2 then 추세 = 하락; } if 추세[1] == 상승 and Var2[1] > Var2 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and Var2[1] < Var2 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(Var2,극저); 극대 = max(Var2,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if Var2 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if Var2 > 극대[1] then { 극대 = Var2; 가속 = min(maxAF,가속+af)/3; } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = Var2; 가속 = af; } } if 추세[1] == 하락 then { if Var2 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if Var2 < 극저[1] then { 극저 = Var2; 가속 = min(maxAF,가속+af)/3; } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = Var2; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; //--------------------------------------------------------------------------------- var3 = Ema(C,3); if var3 > 0 and 극대 == 0 and 극저 == 0 then { 극대 = var3; 극저 = var3; } if var3 > 0 and 오늘[1] == 0 then { if 추세[1] == 0 then { if var3[1] < var3 then 추세 = 상승; if var3[1] > var3 then 추세 = 하락; } if 추세[1] == 상승 and var3[1] > var3 then { 추세 = 하락; 오늘 = 극대[1]; 가속 = af; } if 추세[1] == 하락 and var3[1] < var3 then { 추세 = 상승; 오늘 = 극저[1]; 가속 = af; } 극저 = min(var3,극저); 극대 = max(var3,극대); } if 오늘[1] > 0 then { if 추세[1] == 상승 then { if var3 > 내일[1] then { 오늘 = 내일[1]; 극저 = 0; if var3 > 극대[1] then { 극대 = var3; 가속 = min(maxAF,가속+af)/3; } } else { 추세 = 하락; 오늘 = 극대[1]; 극대 = 0; 극저 = var3; 가속 = af; } } if 추세[1] == 하락 then { if var3 < 내일[1] then { 오늘 = 내일[1]; 극대 = 0; if var3 < 극저[1] then { 극저 = var3; 가속 = min(maxAF,가속+af)/3; } } else { 추세 = 상승; 오늘 = 극저[1]; 극저 = 0; 극대 = var3; 가속 = af; } } } 내일 = (max(극대,극저) - 오늘) * 가속 + 오늘; if var1 > C and var2 > C and var3 > C Then buy(); if var1 < C and var2 < C and var3 < C Then sell();