• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

수익수식검증 요청 및 추가사항[매도진입부분10틱~100틱까지]

프로필 이미지
정밀타격수
2016-01-25 10:33:52
205
글번호 94710
답변완료
===>100틱까지 매수진입후-->수익표시 수식을 만들었는되요 무엇이 잘못되었는지 검증이 아니되옵니다요 수식을 검정하여 주시고요 repeat---반드시 "매도진입후"~"매수진입후"는빼시고===>오직"틱"만 --> 현재 오른쪽에나오는것을 챠트왼쪽에 나오게 하여주세요 감사합니당~!!! ===>그리고 숫자뒤에30.00에서 30만나오게하여주시고 ===>매도진입후는 40틱까지만되어있는데 이것도 100틱까지해야하는지요-- 매수진입식과 매도진입식 똑같이해야 되는지요---> ===>매도와 매수진입후 100틱까지 수식을 "틱"표시되게 할려구요 항상 수고넘넘 많이 하시어 감사합니다 ================================================================= Input&nbsp;:&nbsp;Period1(3),Period2(3),&nbsp;shortPeriod(5),&nbsp;longPeriod(12),&nbsp;Period(5),Length1(14),Length2(3),Length3(3),rsiperiod(12),trixperiod(7); &nbsp;Inputs:&nbsp;Length(7),&nbsp;Pval(0.01); &nbsp;Variables:&nbsp;Mom(0),Tl(0),tx(0); &nbsp;Var&nbsp;:&nbsp;Pivot(0),R1(0),R2(0),S1(0),S2(0); &nbsp;var&nbsp;:&nbsp;DD(0),TT(0),TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0); &nbsp;var&nbsp;:&nbsp;Tx11(0),Tx12(0),Tx13(0),Tx14(0),Tx15(0),Tx16(0),Tx17(0),Tx18(0); &nbsp;Pivot&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1))/3; &nbsp;R1&nbsp;=&nbsp;2*Pivot-DayLow(1); &nbsp;R2&nbsp;=&nbsp;Pivot+DayHigh(1)-DayLow(1); &nbsp;S1&nbsp;=&nbsp;2*Pivot-DayHigh(1); &nbsp;S2&nbsp;=&nbsp;Pivot-DayHigh(1)+DayLow(1); &nbsp;If&nbsp;DayClose(1)&nbsp;>&nbsp;DayOpen(1)&nbsp;Then&nbsp; &nbsp;{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var1&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/2-DayLow(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var2&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/2-DayHigh(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var3&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; &nbsp;} &nbsp;Else&nbsp;&nbsp;If&nbsp;DayClose(1)&nbsp;<&nbsp;DayOpen(1)&nbsp;Then&nbsp; &nbsp;{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var1&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayLow(1))/2-DayLow(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var2&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayLow(1))/2-DayHigh(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var3&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; &nbsp;} &nbsp;Else&nbsp; &nbsp;{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var1&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayClose(1))/2-DayLow(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var2&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayClose(1))/2-DayHigh(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var3&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; &nbsp;} &nbsp;Mom&nbsp;=&nbsp;C-&nbsp;C[Length]; &nbsp;value1&nbsp;=&nbsp;ema(&nbsp;c,period1); &nbsp;value2&nbsp;=&nbsp;ma(macd(shortperiod,longperiod),period); &nbsp;value3&nbsp;=&nbsp;StochasticsD(Length1,Length2,Length3); &nbsp;value4&nbsp;=&nbsp;rsi(rsiperiod); &nbsp;value5&nbsp;=&nbsp;trix(trixperiod); &nbsp;value6&nbsp;=&nbsp;highest(H,&nbsp;Period2); &nbsp;value7&nbsp;=&nbsp;lowest(l,period2); &nbsp;if&nbsp;value1-&nbsp;value1[1]&nbsp;>&nbsp;0&nbsp;and&nbsp;value2&nbsp;>&nbsp;value2[1]&nbsp;and&nbsp;value3&nbsp;-&nbsp;value3[1]&nbsp;>&nbsp;0&nbsp;and&nbsp;value4&nbsp;-&nbsp;value4[1]&nbsp;>&nbsp;0&nbsp;and&nbsp;value5&nbsp;-&nbsp;value5[1]&nbsp;>&nbsp;0&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;and&nbsp;(value6&nbsp;+&nbsp;value7)/2&nbsp;-&nbsp;(value6&nbsp;+&nbsp;value7[1])/2&nbsp;>0&nbsp;and&nbsp;Mom&nbsp;>&nbsp;0&nbsp;AND&nbsp;Mom&nbsp;>=&nbsp;Mom[1]&nbsp;AND&nbsp;MarketPosition()&nbsp;<>&nbsp;1&nbsp;then &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;#&nbsp;매수/매도청산&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Buy("매수",onclose);&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;} &nbsp;&nbsp;#&nbsp;매도/매수청산 If&nbsp;&nbsp;value1-&nbsp;value1[1]&nbsp;<&nbsp;0&nbsp;and&nbsp;value2&nbsp;<&nbsp;value2[1]&nbsp;and&nbsp;value3&nbsp;-&nbsp;value3[1]&nbsp;<&nbsp;0&nbsp;and&nbsp;value4&nbsp;-&nbsp;value4[1]&nbsp;<&nbsp;0&nbsp;and&nbsp;value5&nbsp;-&nbsp;value5[1]&nbsp;<&nbsp;0&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;and&nbsp;(value6&nbsp;+&nbsp;value7)/2&nbsp;-&nbsp;(value6&nbsp;+&nbsp;value7[1])/2&nbsp;<&nbsp;0&nbsp;and&nbsp;Mom&nbsp;<&nbsp;0&nbsp;AND&nbsp;Mom&nbsp;<=&nbsp;Mom[1]&nbsp;AND&nbsp;MarketPosition()&nbsp;<>&nbsp;-1&nbsp;Then&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sell("매도",onclose);&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;var&nbsp;:&nbsp;TL1(0),TL2(0),TL3(0),TL4(0); &nbsp;var&nbsp;:&nbsp;TX1(0),TX2(0),TX3(0),TX4(0); &nbsp;if&nbsp;MarketPosition&nbsp;==&nbsp;1&nbsp;Then{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL1&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*10,sdate,stime,EntryPrice+PriceScale*10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx1&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*10,"틱&nbsp;"+NumToStr(PriceScale*10,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx1,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL2&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*20,sdate,stime,EntryPrice+PriceScale*20); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx2&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*20,"틱&nbsp;"+NumToStr(PriceScale*20,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx2,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL3&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*30,sdate,stime,EntryPrice+PriceScale*30); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx3&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*30,"틱&nbsp;"+NumToStr(PriceScale*30,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx3,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL4&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*40,sdate,stime,EntryPrice+PriceScale*40); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx4&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*40,"틱&nbsp;"+NumToStr(PriceScale*40,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx4,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl5); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL5&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*50,sdate,stime,EntryPrice+PriceScale*50); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx5); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx5&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*50,"틱&nbsp;"+NumToStr(PriceScale*50,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx5,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl6); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL6&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*60,sdate,stime,EntryPrice+PriceScale*60); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx6); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx6&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*60,"틱&nbsp;"+NumToStr(PriceScale*60,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx6,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl7); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL7&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*70,sdate,stime,EntryPrice+PriceScale*70); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx7); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx7&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*70,"틱&nbsp;"+NumToStr(PriceScale*70,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx7,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl8); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL8&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*80,sdate,stime,EntryPrice+PriceScale*80); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx8); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx8&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*80,"틱&nbsp;"+NumToStr(PriceScale*80,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx8,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl9); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL9&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*90,sdate,stime,EntryPrice+PriceScale*90); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx9); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx9&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*90,"틱&nbsp;"+NumToStr(PriceScale*90,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx9,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL10&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*100,sdate,stime,EntryPrice+PriceScale*100); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx10&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*100,"틱&nbsp;"+NumToStr(PriceScale*100,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx10,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;} &nbsp;if&nbsp;MarketPosition&nbsp;==&nbsp;-1&nbsp;Then{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL1&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*10,sdate,stime,EntryPrice-PriceScale*10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx1&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*10,"틱&nbsp;"+NumToStr(PriceScale*10,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx1,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL2&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*20,sdate,stime,EntryPrice-PriceScale*20); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx2&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*20,"틱&nbsp;"+NumToStr(PriceScale*20,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx2,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL3&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*30,sdate,stime,EntryPrice-PriceScale*30); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx3&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*30,"틱&nbsp;"+NumToStr(PriceScale*30,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx3,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL4&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*40,sdate,stime,EntryPrice-PriceScale*40); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx4&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*40,"틱&nbsp;"+NumToStr(PriceScale*40,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx4,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;} &nbsp;if&nbsp;date&nbsp;!=&nbsp;date[1]&nbsp;Then{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DD&nbsp;=&nbsp;sdate[1]; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TT&nbsp;=&nbsp;stime[1]; &nbsp;} &nbsp;TL_Delete(TL11); &nbsp;TL_Delete(TL12); &nbsp;TL_Delete(TL13); &nbsp;TL_Delete(TL14); &nbsp;TL_Delete(TL15); &nbsp;TL_Delete(TL16); &nbsp;TL_Delete(TL17); &nbsp;TL_Delete(TL18); &nbsp;TL11&nbsp;=&nbsp;TL_New(dd,tt,dayopen,sdate,stime,dayopen); &nbsp;TL12&nbsp;=&nbsp;TL_New(dd,tt,dayopen(1),sdate,stime,dayopen(1)); &nbsp;TL13&nbsp;=&nbsp;TL_New(dd,tt,DayHigh(1),sdate,stime,DayHigh(1)); &nbsp;TL14&nbsp;=&nbsp;TL_New(dd,tt,daylow(1),sdate,stime,daylow(1)); &nbsp;TL15&nbsp;=&nbsp;TL_New(dd,tt,DayClose(1),sdate,stime,DayClose(1)); &nbsp;TL16&nbsp;=&nbsp;TL_New(dd,tt,pivot,sdate,stime,pivot); &nbsp;TL17&nbsp;=&nbsp;TL_New(dd,tt,var3,sdate,stime,var3); &nbsp;TL18&nbsp;=&nbsp;TL_New(dd,tt,(dayhigh+daylow)/2,sdate,stime,(dayhigh+daylow)/2); &nbsp;Text_Delete(tx11); &nbsp;Text_Delete(tx12); &nbsp;Text_Delete(tx13); &nbsp;Text_Delete(tx14); &nbsp;Text_Delete(tx15); &nbsp;Text_Delete(tx16); &nbsp;Text_Delete(tx17); &nbsp;Text_Delete(tx18); &nbsp;tx11&nbsp;=&nbsp;Text_New(sdate,stime,dayopen,"당일시가:"+NumToStr(dayopen,2));&nbsp; &nbsp;tx12&nbsp;=&nbsp;Text_New(sdate,stime,dayopen(1),"전일시가:"+NumToStr(dayopen(1),2));&nbsp; &nbsp;tx13&nbsp;=&nbsp;Text_New(sdate,stime,DayHigh(1),"전일고가:"+NumToStr(DayHigh(1),2));&nbsp; &nbsp;tx14&nbsp;=&nbsp;Text_New(sdate,stime,daylow(1),"전일저가:"+NumToStr(daylow(1),2));&nbsp; &nbsp;tx15&nbsp;=&nbsp;Text_New(sdate,stime,DayClose(1),"전일종가:"+NumToStr(DayClose(1),2));&nbsp; &nbsp;tx16&nbsp;=&nbsp;Text_New(sdate,stime,pivot,"피봇:"+NumToStr(pivot,2));&nbsp; &nbsp;tx17&nbsp;=&nbsp;Text_New(sdate,stime,var3,"디마크중심:"+NumToStr(var3,2));&nbsp; &nbsp;tx18&nbsp;=&nbsp;Text_New(sdate,stime,(dayhigh+daylow)/2,"당일중심:"+NumToStr((dayhigh+daylow)/2,2));&nbsp; &nbsp;Text_SetStyle(Tx11,2,2); &nbsp;Text_SetStyle(Tx12,2,2); &nbsp;Text_SetStyle(Tx13,2,2); &nbsp;Text_SetStyle(Tx14,2,2); &nbsp;Text_SetStyle(Tx15,2,2); &nbsp;Text_SetStyle(Tx16,2,2); &nbsp;Text_SetStyle(Tx17,2,2); &nbsp;Text_SetStyle(Tx18,2,2);
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2016-01-25 14:28:04

안녕하세요 예스스탁입니다. 변수선언부분이 빠져 있어 추가했습니다. 매도쪽에도 10개가 나오게 수정하고 출력값에서 소숫점은 재외했습니다. 틱수로만 표시를 하고자 하시면 text_new함수에 NumToStr(PriceScale*10,0)에서 PriceSclse*를 제거하시면 됩니다. Input : Period1(3),Period2(3), shortPeriod(5), longPeriod(12), Period(5),Length1(14),Length2(3),Length3(3),rsiperiod(12),trixperiod(7); Inputs: Length(7), Pval(0.01); Variables: Mom(0),Tl(0),tx(0); Var : Pivot(0),R1(0),R2(0),S1(0),S2(0); var : DD(0),TT(0),TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0); var : Tx11(0),Tx12(0),Tx13(0),Tx14(0),Tx15(0),Tx16(0),Tx17(0),Tx18(0); Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3; R1 = 2*Pivot-DayLow(1); R2 = Pivot+DayHigh(1)-DayLow(1); S1 = 2*Pivot-DayHigh(1); S2 = Pivot-DayHigh(1)+DayLow(1); If DayClose(1) > DayOpen(1) Then { var1 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/2-DayLow(1); var2 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/2-DayHigh(1); var3 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; } Else If DayClose(1) < DayOpen(1) Then { var1 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayLow(1))/2-DayLow(1); var2 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayLow(1))/2-DayHigh(1); var3 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; } Else { var1 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayClose(1))/2-DayLow(1); var2 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayClose(1))/2-DayHigh(1); var3 = (DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; } Mom = C- C[Length]; value1 = ema( c,period1); value2 = ma(macd(shortperiod,longperiod),period); value3 = StochasticsD(Length1,Length2,Length3); value4 = rsi(rsiperiod); value5 = trix(trixperiod); value6 = highest(H, Period2); value7 = lowest(l,period2); if value1- value1[1] > 0 and value2 > value2[1] and value3 - value3[1] > 0 and value4 - value4[1] > 0 and value5 - value5[1] > 0 and (value6 + value7)/2 - (value6 + value7[1])/2 >0 and Mom > 0 AND Mom >= Mom[1] AND MarketPosition() <> 1 then # 매수/매도청산 { Buy("매수",onclose); } # 매도/매수청산 If value1- value1[1] < 0 and value2 < value2[1] and value3 - value3[1] < 0 and value4 - value4[1] < 0 and value5 - value5[1] < 0 and (value6 + value7)/2 - (value6 + value7[1])/2 < 0 and Mom < 0 AND Mom <= Mom[1] AND MarketPosition() <> -1 Then { Sell("매도",onclose); } var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0),TL8(0),TL9(0),TL10(0); var : TX1(0),TX2(0),TX3(0),TX4(0),TX5(0),TX6(0),TX7(0),Tx8(0),Tx9(0),Tx10(0); if MarketPosition == 1 Then{ TL_Delete(tl1); TL1 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*10,sdate,stime,EntryPrice+PriceScale*10); Text_Delete(tx1); tx1 = Text_New(sdate,stime,EntryPrice+PriceScale*10,"틱 "+NumToStr(PriceScale*10,0)+" 수익"); Text_SetStyle(Tx1,2,2); TL_Delete(tl2); TL2 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*20,sdate,stime,EntryPrice+PriceScale*20); Text_Delete(tx2); tx2 = Text_New(sdate,stime,EntryPrice+PriceScale*20,"틱 "+NumToStr(PriceScale*20,0)+" 수익"); Text_SetStyle(Tx2,2,2); TL_Delete(tl3); TL3 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*30,sdate,stime,EntryPrice+PriceScale*30); Text_Delete(tx3); tx3 = Text_New(sdate,stime,EntryPrice+PriceScale*30,"틱 "+NumToStr(PriceScale*30,0)+" 수익"); Text_SetStyle(Tx3,2,2); TL_Delete(tl4); TL4 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*40,sdate,stime,EntryPrice+PriceScale*40); Text_Delete(tx4); tx4 = Text_New(sdate,stime,EntryPrice+PriceScale*40,"틱 "+NumToStr(PriceScale*40,0)+" 수익"); Text_SetStyle(Tx4,2,2); TL_Delete(tl5); TL5 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*50,sdate,stime,EntryPrice+PriceScale*50); Text_Delete(tx5); tx5 = Text_New(sdate,stime,EntryPrice+PriceScale*50,"틱 "+NumToStr(PriceScale*50,0)+" 수익"); Text_SetStyle(Tx5,2,2); TL_Delete(tl6); TL6 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*60,sdate,stime,EntryPrice+PriceScale*60); Text_Delete(tx6); tx6 = Text_New(sdate,stime,EntryPrice+PriceScale*60,"틱 "+NumToStr(PriceScale*60,0)+" 수익"); Text_SetStyle(Tx6,2,2); TL_Delete(tl7); TL7 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*70,sdate,stime,EntryPrice+PriceScale*70); Text_Delete(tx7); tx7 = Text_New(sdate,stime,EntryPrice+PriceScale*70,"틱 "+NumToStr(PriceScale*70,0)+" 수익"); Text_SetStyle(Tx7,2,2); TL_Delete(tl8); TL8 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*80,sdate,stime,EntryPrice+PriceScale*80); Text_Delete(tx8); tx8 = Text_New(sdate,stime,EntryPrice+PriceScale*80,"틱 "+NumToStr(PriceScale*80,0)+" 수익"); Text_SetStyle(Tx8,2,2); TL_Delete(tl9); TL9 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*90,sdate,stime,EntryPrice+PriceScale*90); Text_Delete(tx9); tx9 = Text_New(sdate,stime,EntryPrice+PriceScale*90,"틱 "+NumToStr(PriceScale*90,0)+" 수익"); Text_SetStyle(Tx9,2,2); TL_Delete(tl10); TL10 = TL_New(EntryDate,entrytime,EntryPrice+PriceScale*100,sdate,stime,EntryPrice+PriceScale*100); Text_Delete(tx10); tx10 = Text_New(sdate,stime,EntryPrice+PriceScale*100,"틱 "+NumToStr(PriceScale*100,0)+" 수익"); Text_SetStyle(Tx10,2,2); } if MarketPosition == -1 Then{ TL_Delete(tl1); TL1 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*10,sdate,stime,EntryPrice-PriceScale*10); Text_Delete(tx1); tx1 = Text_New(sdate,stime,EntryPrice-PriceScale*10,"틱 "+NumToStr(PriceScale*10,0)+" 수익"); Text_SetStyle(Tx1,2,2); TL_Delete(tl2); TL2 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*20,sdate,stime,EntryPrice-PriceScale*20); Text_Delete(tx2); tx2 = Text_New(sdate,stime,EntryPrice-PriceScale*20,"틱 "+NumToStr(PriceScale*20,0)+" 수익"); Text_SetStyle(Tx2,2,2); TL_Delete(tl3); TL3 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*30,sdate,stime,EntryPrice-PriceScale*30); Text_Delete(tx3); tx3 = Text_New(sdate,stime,EntryPrice-PriceScale*30,"틱 "+NumToStr(PriceScale*30,0)+" 수익"); Text_SetStyle(Tx3,2,2); TL_Delete(tl4); TL4 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*40,sdate,stime,EntryPrice-PriceScale*40); Text_Delete(tx4); tx4 = Text_New(sdate,stime,EntryPrice-PriceScale*40,"틱 "+NumToStr(PriceScale*40,0)+" 수익"); Text_SetStyle(Tx4,2,2); TL_Delete(tl5); TL5 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*50,sdate,stime,EntryPrice-PriceScale*50); Text_Delete(tx5); tx5 = Text_New(sdate,stime,EntryPrice-PriceScale*50,"틱 "+NumToStr(PriceScale*50,0)+" 수익"); Text_SetStyle(Tx5,2,2); TL_Delete(tl6); TL6 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*60,sdate,stime,EntryPrice-PriceScale*60); Text_Delete(tx6); tx6 = Text_New(sdate,stime,EntryPrice-PriceScale*60,"틱 "+NumToStr(PriceScale*60,0)+" 수익"); Text_SetStyle(Tx6,2,2); TL_Delete(tl7); TL7 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*70,sdate,stime,EntryPrice-PriceScale*70); Text_Delete(tx7); tx7 = Text_New(sdate,stime,EntryPrice-PriceScale*70,"틱 "+NumToStr(PriceScale*70,0)+" 수익"); Text_SetStyle(Tx7,2,2); TL_Delete(tl8); TL8 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*80,sdate,stime,EntryPrice-PriceScale*80); Text_Delete(tx8); tx4 = Text_New(sdate,stime,EntryPrice-PriceScale*80,"틱 "+NumToStr(PriceScale*80,0)+" 수익"); Text_SetStyle(Tx8,2,2); TL_Delete(tl9); TL9 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*90,sdate,stime,EntryPrice-PriceScale*90); Text_Delete(tx9); tx9 = Text_New(sdate,stime,EntryPrice-PriceScale*90,"틱 "+NumToStr(PriceScale*90,0)+" 수익"); Text_SetStyle(Tx9,2,2); TL_Delete(tl10); TL10 = TL_New(EntryDate,entrytime,EntryPrice-PriceScale*100,sdate,stime,EntryPrice-PriceScale*100); Text_Delete(tx10); tx10 = Text_New(sdate,stime,EntryPrice-PriceScale*100,"틱 "+NumToStr(PriceScale*100,0)+" 수익"); Text_SetStyle(Tx10,2,2); } if date != date[1] Then{ DD = sdate[1]; TT = stime[1]; } TL_Delete(TL11); TL_Delete(TL12); TL_Delete(TL13); TL_Delete(TL14); TL_Delete(TL15); TL_Delete(TL16); TL_Delete(TL17); TL_Delete(TL18); TL11 = TL_New(dd,tt,dayopen,sdate,stime,dayopen); TL12 = TL_New(dd,tt,dayopen(1),sdate,stime,dayopen(1)); TL13 = TL_New(dd,tt,DayHigh(1),sdate,stime,DayHigh(1)); TL14 = TL_New(dd,tt,daylow(1),sdate,stime,daylow(1)); TL15 = TL_New(dd,tt,DayClose(1),sdate,stime,DayClose(1)); TL16 = TL_New(dd,tt,pivot,sdate,stime,pivot); TL17 = TL_New(dd,tt,var3,sdate,stime,var3); TL18 = TL_New(dd,tt,(dayhigh+daylow)/2,sdate,stime,(dayhigh+daylow)/2); Text_Delete(tx11); Text_Delete(tx12); Text_Delete(tx13); Text_Delete(tx14); Text_Delete(tx15); Text_Delete(tx16); Text_Delete(tx17); Text_Delete(tx18); tx11 = Text_New(sdate,stime,dayopen,"당일시가:"+NumToStr(dayopen,2)); tx12 = Text_New(sdate,stime,dayopen(1),"전일시가:"+NumToStr(dayopen(1),2)); tx13 = Text_New(sdate,stime,DayHigh(1),"전일고가:"+NumToStr(DayHigh(1),2)); tx14 = Text_New(sdate,stime,daylow(1),"전일저가:"+NumToStr(daylow(1),2)); tx15 = Text_New(sdate,stime,DayClose(1),"전일종가:"+NumToStr(DayClose(1),2)); tx16 = Text_New(sdate,stime,pivot,"피봇:"+NumToStr(pivot,2)); tx17 = Text_New(sdate,stime,var3,"디마크중심:"+NumToStr(var3,2)); tx18 = Text_New(sdate,stime,(dayhigh+daylow)/2,"당일중심:"+NumToStr((dayhigh+daylow)/2,2)); Text_SetStyle(Tx11,2,2); Text_SetStyle(Tx12,2,2); Text_SetStyle(Tx13,2,2); Text_SetStyle(Tx14,2,2); Text_SetStyle(Tx15,2,2); Text_SetStyle(Tx16,2,2); Text_SetStyle(Tx17,2,2); Text_SetStyle(Tx18,2,2); 즐거운 하루되세요 > 강남쏠라 님이 쓴 글입니다. > 제목 : 수익수식검증 요청 및 추가사항[매도진입부분10틱~100틱까지] > ===>100틱까지 매수진입후-->수익표시 수식을 만들었는되요 무엇이 잘못되었는지 검증이 아니되옵니다요 수식을 검정하여 주시고요 repeat---반드시 "매도진입후"~"매수진입후"는빼시고===>오직"틱"만 --> 현재 오른쪽에나오는것을 챠트왼쪽에 나오게 하여주세요 감사합니당~!!! ===>그리고 숫자뒤에30.00에서 30만나오게하여주시고 ===>매도진입후는 40틱까지만되어있는데 이것도 100틱까지해야하는지요-- 매수진입식과 매도진입식 똑같이해야 되는지요---> ===>매도와 매수진입후 100틱까지 수식을 "틱"표시되게 할려구요 항상 수고넘넘 많이 하시어 감사합니다 ================================================================= Input&nbsp;:&nbsp;Period1(3),Period2(3),&nbsp;shortPeriod(5),&nbsp;longPeriod(12),&nbsp;Period(5),Length1(14),Length2(3),Length3(3),rsiperiod(12),trixperiod(7); &nbsp;Inputs:&nbsp;Length(7),&nbsp;Pval(0.01); &nbsp;Variables:&nbsp;Mom(0),Tl(0),tx(0); &nbsp;Var&nbsp;:&nbsp;Pivot(0),R1(0),R2(0),S1(0),S2(0); &nbsp;var&nbsp;:&nbsp;DD(0),TT(0),TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0); &nbsp;var&nbsp;:&nbsp;Tx11(0),Tx12(0),Tx13(0),Tx14(0),Tx15(0),Tx16(0),Tx17(0),Tx18(0); &nbsp;Pivot&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1))/3; &nbsp;R1&nbsp;=&nbsp;2*Pivot-DayLow(1); &nbsp;R2&nbsp;=&nbsp;Pivot+DayHigh(1)-DayLow(1); &nbsp;S1&nbsp;=&nbsp;2*Pivot-DayHigh(1); &nbsp;S2&nbsp;=&nbsp;Pivot-DayHigh(1)+DayLow(1); &nbsp;If&nbsp;DayClose(1)&nbsp;>&nbsp;DayOpen(1)&nbsp;Then&nbsp; &nbsp;{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var1&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/2-DayLow(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var2&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/2-DayHigh(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var3&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; &nbsp;} &nbsp;Else&nbsp;&nbsp;If&nbsp;DayClose(1)&nbsp;<&nbsp;DayOpen(1)&nbsp;Then&nbsp; &nbsp;{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var1&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayLow(1))/2-DayLow(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var2&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayLow(1))/2-DayHigh(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var3&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; &nbsp;} &nbsp;Else&nbsp; &nbsp;{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var1&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayClose(1))/2-DayLow(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var2&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayClose(1))/2-DayHigh(1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;var3&nbsp;=&nbsp;(DayHigh(1)+DayLow(1)+DayClose(1)+DayHigh(1))/4; &nbsp;} &nbsp;Mom&nbsp;=&nbsp;C-&nbsp;C[Length]; &nbsp;value1&nbsp;=&nbsp;ema(&nbsp;c,period1); &nbsp;value2&nbsp;=&nbsp;ma(macd(shortperiod,longperiod),period); &nbsp;value3&nbsp;=&nbsp;StochasticsD(Length1,Length2,Length3); &nbsp;value4&nbsp;=&nbsp;rsi(rsiperiod); &nbsp;value5&nbsp;=&nbsp;trix(trixperiod); &nbsp;value6&nbsp;=&nbsp;highest(H,&nbsp;Period2); &nbsp;value7&nbsp;=&nbsp;lowest(l,period2); &nbsp;if&nbsp;value1-&nbsp;value1[1]&nbsp;>&nbsp;0&nbsp;and&nbsp;value2&nbsp;>&nbsp;value2[1]&nbsp;and&nbsp;value3&nbsp;-&nbsp;value3[1]&nbsp;>&nbsp;0&nbsp;and&nbsp;value4&nbsp;-&nbsp;value4[1]&nbsp;>&nbsp;0&nbsp;and&nbsp;value5&nbsp;-&nbsp;value5[1]&nbsp;>&nbsp;0&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;and&nbsp;(value6&nbsp;+&nbsp;value7)/2&nbsp;-&nbsp;(value6&nbsp;+&nbsp;value7[1])/2&nbsp;>0&nbsp;and&nbsp;Mom&nbsp;>&nbsp;0&nbsp;AND&nbsp;Mom&nbsp;>=&nbsp;Mom[1]&nbsp;AND&nbsp;MarketPosition()&nbsp;<>&nbsp;1&nbsp;then &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;#&nbsp;매수/매도청산&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Buy("매수",onclose);&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;} &nbsp;&nbsp;#&nbsp;매도/매수청산 If&nbsp;&nbsp;value1-&nbsp;value1[1]&nbsp;<&nbsp;0&nbsp;and&nbsp;value2&nbsp;<&nbsp;value2[1]&nbsp;and&nbsp;value3&nbsp;-&nbsp;value3[1]&nbsp;<&nbsp;0&nbsp;and&nbsp;value4&nbsp;-&nbsp;value4[1]&nbsp;<&nbsp;0&nbsp;and&nbsp;value5&nbsp;-&nbsp;value5[1]&nbsp;<&nbsp;0&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;and&nbsp;(value6&nbsp;+&nbsp;value7)/2&nbsp;-&nbsp;(value6&nbsp;+&nbsp;value7[1])/2&nbsp;<&nbsp;0&nbsp;and&nbsp;Mom&nbsp;<&nbsp;0&nbsp;AND&nbsp;Mom&nbsp;<=&nbsp;Mom[1]&nbsp;AND&nbsp;MarketPosition()&nbsp;<>&nbsp;-1&nbsp;Then&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sell("매도",onclose);&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;var&nbsp;:&nbsp;TL1(0),TL2(0),TL3(0),TL4(0); &nbsp;var&nbsp;:&nbsp;TX1(0),TX2(0),TX3(0),TX4(0); &nbsp;if&nbsp;MarketPosition&nbsp;==&nbsp;1&nbsp;Then{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL1&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*10,sdate,stime,EntryPrice+PriceScale*10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx1&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*10,"틱&nbsp;"+NumToStr(PriceScale*10,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx1,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL2&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*20,sdate,stime,EntryPrice+PriceScale*20); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx2&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*20,"틱&nbsp;"+NumToStr(PriceScale*20,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx2,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL3&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*30,sdate,stime,EntryPrice+PriceScale*30); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx3&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*30,"틱&nbsp;"+NumToStr(PriceScale*30,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx3,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL4&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*40,sdate,stime,EntryPrice+PriceScale*40); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx4&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*40,"틱&nbsp;"+NumToStr(PriceScale*40,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx4,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl5); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL5&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*50,sdate,stime,EntryPrice+PriceScale*50); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx5); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx5&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*50,"틱&nbsp;"+NumToStr(PriceScale*50,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx5,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl6); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL6&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*60,sdate,stime,EntryPrice+PriceScale*60); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx6); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx6&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*60,"틱&nbsp;"+NumToStr(PriceScale*60,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx6,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl7); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL7&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*70,sdate,stime,EntryPrice+PriceScale*70); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx7); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx7&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*70,"틱&nbsp;"+NumToStr(PriceScale*70,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx7,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl8); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL8&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*80,sdate,stime,EntryPrice+PriceScale*80); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx8); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx8&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*80,"틱&nbsp;"+NumToStr(PriceScale*80,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx8,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl9); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL9&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*90,sdate,stime,EntryPrice+PriceScale*90); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx9); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx9&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*90,"틱&nbsp;"+NumToStr(PriceScale*90,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx9,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL10&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice+PriceScale*100,sdate,stime,EntryPrice+PriceScale*100); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx10&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice+PriceScale*100,"틱&nbsp;"+NumToStr(PriceScale*100,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx10,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;} &nbsp;if&nbsp;MarketPosition&nbsp;==&nbsp;-1&nbsp;Then{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL1&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*10,sdate,stime,EntryPrice-PriceScale*10); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx1); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx1&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*10,"틱&nbsp;"+NumToStr(PriceScale*10,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx1,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL2&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*20,sdate,stime,EntryPrice-PriceScale*20); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx2&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*20,"틱&nbsp;"+NumToStr(PriceScale*20,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx2,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL3&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*30,sdate,stime,EntryPrice-PriceScale*30); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx3); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx3&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*30,"틱&nbsp;"+NumToStr(PriceScale*30,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx3,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL_Delete(tl4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TL4&nbsp;=&nbsp;TL_New(EntryDate,entrytime,EntryPrice-PriceScale*40,sdate,stime,EntryPrice-PriceScale*40); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_Delete(tx4); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;tx4&nbsp;=&nbsp;Text_New(sdate,stime,EntryPrice-PriceScale*40,"틱&nbsp;"+NumToStr(PriceScale*40,2)+"&nbsp;수익");&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Text_SetStyle(Tx4,2,2); &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;} &nbsp;if&nbsp;date&nbsp;!=&nbsp;date[1]&nbsp;Then{ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DD&nbsp;=&nbsp;sdate[1]; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TT&nbsp;=&nbsp;stime[1]; &nbsp;} &nbsp;TL_Delete(TL11); &nbsp;TL_Delete(TL12); &nbsp;TL_Delete(TL13); &nbsp;TL_Delete(TL14); &nbsp;TL_Delete(TL15); &nbsp;TL_Delete(TL16); &nbsp;TL_Delete(TL17); &nbsp;TL_Delete(TL18); &nbsp;TL11&nbsp;=&nbsp;TL_New(dd,tt,dayopen,sdate,stime,dayopen); &nbsp;TL12&nbsp;=&nbsp;TL_New(dd,tt,dayopen(1),sdate,stime,dayopen(1)); &nbsp;TL13&nbsp;=&nbsp;TL_New(dd,tt,DayHigh(1),sdate,stime,DayHigh(1)); &nbsp;TL14&nbsp;=&nbsp;TL_New(dd,tt,daylow(1),sdate,stime,daylow(1)); &nbsp;TL15&nbsp;=&nbsp;TL_New(dd,tt,DayClose(1),sdate,stime,DayClose(1)); &nbsp;TL16&nbsp;=&nbsp;TL_New(dd,tt,pivot,sdate,stime,pivot); &nbsp;TL17&nbsp;=&nbsp;TL_New(dd,tt,var3,sdate,stime,var3); &nbsp;TL18&nbsp;=&nbsp;TL_New(dd,tt,(dayhigh+daylow)/2,sdate,stime,(dayhigh+daylow)/2); &nbsp;Text_Delete(tx11); &nbsp;Text_Delete(tx12); &nbsp;Text_Delete(tx13); &nbsp;Text_Delete(tx14); &nbsp;Text_Delete(tx15); &nbsp;Text_Delete(tx16); &nbsp;Text_Delete(tx17); &nbsp;Text_Delete(tx18); &nbsp;tx11&nbsp;=&nbsp;Text_New(sdate,stime,dayopen,"당일시가:"+NumToStr(dayopen,2));&nbsp; &nbsp;tx12&nbsp;=&nbsp;Text_New(sdate,stime,dayopen(1),"전일시가:"+NumToStr(dayopen(1),2));&nbsp; &nbsp;tx13&nbsp;=&nbsp;Text_New(sdate,stime,DayHigh(1),"전일고가:"+NumToStr(DayHigh(1),2));&nbsp; &nbsp;tx14&nbsp;=&nbsp;Text_New(sdate,stime,daylow(1),"전일저가:"+NumToStr(daylow(1),2));&nbsp; &nbsp;tx15&nbsp;=&nbsp;Text_New(sdate,stime,DayClose(1),"전일종가:"+NumToStr(DayClose(1),2));&nbsp; &nbsp;tx16&nbsp;=&nbsp;Text_New(sdate,stime,pivot,"피봇:"+NumToStr(pivot,2));&nbsp; &nbsp;tx17&nbsp;=&nbsp;Text_New(sdate,stime,var3,"디마크중심:"+NumToStr(var3,2));&nbsp; &nbsp;tx18&nbsp;=&nbsp;Text_New(sdate,stime,(dayhigh+daylow)/2,"당일중심:"+NumToStr((dayhigh+daylow)/2,2));&nbsp; &nbsp;Text_SetStyle(Tx11,2,2); &nbsp;Text_SetStyle(Tx12,2,2); &nbsp;Text_SetStyle(Tx13,2,2); &nbsp;Text_SetStyle(Tx14,2,2); &nbsp;Text_SetStyle(Tx15,2,2); &nbsp;Text_SetStyle(Tx16,2,2); &nbsp;Text_SetStyle(Tx17,2,2); &nbsp;Text_SetStyle(Tx18,2,2);
등록