안녕하세요 예스스탁입니다. Input : Period(60),sig(9); var : RSIV(0),T(0),TL1(0),TL2(0),TL3(0); RSIV = RSI(Period); Plot1(RSIV, "RSI"); iF CrossUp(RSIV,50) Then { T = 1; var1 = sDate; Var2 = sTime; Var3 = RSIV-50; Var4 = 0; //TL1 = TL_New_Self(var1,Var2,50,var1,Var2,Var3+50); // TL2 = TL_New_Self(var1,Var2,Var3+50,NextBarSdate,NextBarStime,Var3+50); // TL3 = TL_New_Self(NextBarSdate,NextBarStime,50,NextBarSdate,NextBarStime,Var3+50); } else iF CrossDown(RSIV,50) Then { T = -1; var1 = sDate; Var2 = sTime; Var3 = 50-RSIV; Var4 = 0; //TL1 = TL_New_Self(var1,Var2,50,var1,Var2,50-Var3); //TL2 = TL_New_Self(var1,Var2,50-Var3,NextBarSdate,NextBarStime,50-Var3); //TL3 = TL_New_Self(NextBarSdate,NextBarStime,50,NextBarSdate,NextBarStime,50-Var3); } Else { Var4 = var4 + 1; if T == 1 Then { var3 = var3 + (RSIV-50); //TL_SetEnd(TL1,var1,Var2,Var3+50); //TL_SetBegin(TL2,var1,Var2,Var3+50); // TL_SetEnd(TL2,sDate,sTime,Var3+50); //TL_SetBegin(TL3,sDate,sTime,50); // TL_SetEnd(TL3,sDate,sTime,Var3+50); } if T == -1 Then { Var3 = Var3 + (50-RSIV); // TL_SetEnd(TL1,var1,Var2,50-var3); // TL_SetBegin(TL2,var1,Var2,50-Var3); // TL_SetEnd(TL2,sDate,sTime,50-Var3); // TL_SetBegin(TL3,sDate,sTime,50); //TL_SetEnd(TL3,sDate,sTime,50-Var3); } } if T == 1 Then Plot2(((Var3/Var4)+50),"누적"); Else Plot2((50-(Var3)/Var4),"누적"); PlotBaseLine1(50, "기준선 50"); 즐거운 하루되세요 > yes 님이 쓴 글입니다. > 제목 : 부탁 드립니다. > 도움에 감사 드립니다. 아래의 수식은 73365에서 답변 하신 수식의 일부 입니다. 그림과 같이 부탁 드립니다. 미리 감사 드립니다. Input : Period(60),sig(9); var : RSIV(0),T(0),TL1(0),TL2(0),TL3(0); RSIV = RSI(Period); //Plot1(RSIV, "RSI"); iF CrossUp(RSIV,50) Then { T = 1; var1 = sDate; Var2 = sTime; Var3 = RSIV-50; //TL1 = TL_New_Self(var1,Var2,50,var1,Var2,Var3+50); // TL2 = TL_New_Self(var1,Var2,Var3+50,NextBarSdate,NextBarStime,Var3+50); // TL3 = TL_New_Self(NextBarSdate,NextBarStime,50,NextBarSdate,NextBarStime,Var3+50); } else iF CrossDown(RSIV,50) Then { T = -1; var1 = sDate; Var2 = sTime; Var3 = 50-RSIV; //TL1 = TL_New_Self(var1,Var2,50,var1,Var2,50-Var3); //TL2 = TL_New_Self(var1,Var2,50-Var3,NextBarSdate,NextBarStime,50-Var3); //TL3 = TL_New_Self(NextBarSdate,NextBarStime,50,NextBarSdate,NextBarStime,50-Var3); } Else { if T == 1 Then { var3 = var3 + (RSIV-50); //TL_SetEnd(TL1,var1,Var2,Var3+50); //TL_SetBegin(TL2,var1,Var2,Var3+50); // TL_SetEnd(TL2,sDate,sTime,Var3+50); //TL_SetBegin(TL3,sDate,sTime,50); // TL_SetEnd(TL3,sDate,sTime,Var3+50); } if T == -1 Then { Var3 = Var3 + (50-RSIV); // TL_SetEnd(TL1,var1,Var2,50-var3); // TL_SetBegin(TL2,var1,Var2,50-Var3); // TL_SetEnd(TL2,sDate,sTime,50-Var3); // TL_SetBegin(TL3,sDate,sTime,50); //TL_SetEnd(TL3,sDate,sTime,50-Var3); } } if T == 1 Then Plot2(Var3+50,"누적"); Else Plot2(50-Var3,"누적"); PlotBaseLine1(50, "기준선 50");