안녕하세요 예스스탁입니다. input : StartTime(080000),EndTime(055000); Input : 당일수익틱수(1000); var : 전환선(0),기준선(0),선행스팬1(0),선행스팬2(0); var : Tcond(false); Var : N1(0),dayPl(0),당일수익(0),Xcond(false); if sDate != sDate[1] then SetStopEndofday(Endtime); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; Xcond = false; N1 = NetProfit; SetStopEndofday(0); } 당일수익 = PriceScale*당일수익틱수; daypl = NetProfit-N1; if TotalTrades > TotalTrades[1] then { if daypl >= 당일수익 Then Xcond = true; if IsExitName("dbp",1) == true or IsExitName("dsp",1) == true then Xcond = true; } 전환선 = (highest(H,9)+lowest(L,9))/2; 기준선 = (highest(H,26)+lowest(L,26))/2; 선행스팬1 = (전환선[25]+기준선[25])/2; 선행스팬2 = (highest(H,52)[25]+lowest(L,52)[25])/2; var1 = Disparity(20); var : T(0); var2 = ma(C,5); var3 = ma(C,240); if crossup(var2,var3) then T = 1; if crossup(var2,var3) then T = -1; if Tcond == true and xcond == False Then { if 전환선 > 기준선 and crossup(전환선,선행스팬1) and var1 >= 99 Then buy("b"); if MarketPosition == 1 then { ExitLong("dbp",atlimit,EntryPrice+((당일수익-daypl)/CurrentContracts)); if isentryname("b") == true and crossdown(var2,var3) then sell("bs"); if 전환선 < 기준선 and CrossDown(전환선,선행스팬2) and var1 >= 99 Then exitlong("bx",onclose,def,"b"); if crossdown(var2,var3) Then Exitlong("sbx",onclose,def,"sb"); } if 전환선 < 기준선 and CrossDown(전환선,선행스팬1) and var1 <= 101 Then { sell("s"); } if MarketPosition == -1 then { ExitShort("dsp",atlimit,EntryPrice-((당일수익-daypl)/CurrentContracts)); if isentryname("s") == true and crossup(var2,var3) then buy("sb"); if 전환선 > 기준선 and CrossUp(전환선,선행스팬2) and var1 <= 101 Then ExitShort("sx",onclose,def,"s"); if crossup(var2,var3) Then ExitShort("bsx",onclose,def,"bs"); } } 즐거운 하루되세요 > 푸른 님이 쓴 글입니다. > 제목 : 수식어 부탁드립니다 > input : StartTime(080000),EndTime(055000); Input : 당일수익틱수(1000); var : 전환선(0),기준선(0),선행스팬1(0),선행스팬2(0); var : Tcond(false); Var : N1(0),dayPl(0),당일수익(0),Xcond(false); if sDate != sDate[1] then SetStopEndofday(Endtime); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; Xcond = false; N1 = NetProfit; SetStopEndofday(0); } 당일수익 = PriceScale*당일수익틱수; daypl = NetProfit-N1; if TotalTrades > TotalTrades[1] then { if daypl >= 당일수익 Then Xcond = true; if IsExitName("dbp",1) == true or IsExitName("dsp",1) == true then Xcond = true; } 전환선 = (highest(H,9)+lowest(L,9))/2; 기준선 = (highest(H,26)+lowest(L,26))/2; 선행스팬1 = (전환선[25]+기준선[25])/2; 선행스팬2 = (highest(H,52)[25]+lowest(L,52)[25])/2; var1 = Disparity(20); if Tcond == true and xcond == False Then { if 전환선 > 기준선 and crossup(전환선,선행스팬1) and var1 >= 99 Then buy("b"); if MarketPosition == 1 then { ExitLong("dbp",atlimit,EntryPrice+((당일수익-daypl)/CurrentContracts)); if 전환선 < 기준선 and CrossDown(전환선,선행스팬2) and var1 >= 99 Then exitlong(); } if 전환선 < 기준선 and CrossDown(전환선,선행스팬1) and var1 <= 101 Then sell("s"); if MarketPosition == -1 then { ExitShort("dsp",atlimit,EntryPrice-((당일수익-daypl)/CurrentContracts)); if 전환선 > 기준선 and CrossUp(전환선,선행스팬2) and var1 <= 101 Then ExitShort(); } } ------------------------ 상기 수식어 에서 5선 240선 골든크로스후 1차 sell신호는 buy 신호로 전환후 5선 240선 데드크로스에 청산 5선 240선 데드크로스후 1차 buy 신호는 sell 신호로 전환후 5선 240선 골든 크로스에 청산의 수식어를 추가하고자 합니다