[HTS]請好心人幫忙，如何在高低點連線呢（附程式碼）？

km009

小弟是菜鳥，請幫幫我吧

Parameter: RHStren(1), RLStren(1), Decimal(2)

variables: TxtView(0)



If SwingHighPoint( High, RHStren) Then
       
        TxtView = TXT_New( Date[RHStren], Time[RHStren], High[RHStren],
               
                RightStr(cDate(Date[RHStren]),5) + "|n" + NumToStr(High[RHStren], Decimal))
       
        TXT_SetStyle( TxtView, 2, 1 )
       

ElseIf SwingLowPoint( Low, RLStren) Then
       
        TxtView = TXT_New( Date[RLStren], Time[RLStren], Low[RLStren],
               
                NumToStr(Low[RLStren], Decimal) + "|n" + RightStr(cDate(Date[RHStren]),5))
       
        TXT_SetStyle( TxtView, 2, 0 )


End if