Variation(Number1, Number2) as Number

Variation returns the percentage difference between two numbers, for example closing prices...

 

This function has two parameters:
Number1   First number to compare
Number2   Second number to compare

 

Example:

' This is a report
Sub Main()
  ClP = Close(Last)
  ClP1 = Close(Last - 1)
  TakeThisStock
  DiffPer = Variation(ClP, ClP1)
  Header 1, "Last Close"
  Header 2, "Percent difference last day"

  PutInGrid 1, ClP
  PutInGrid 2, DiffPer
End Sub