Example

   // ----------------------------------------------------
  // User name (OS): Phil
  // Date and time: 01/15/10, 15:32:49
  // ----------------------------------------------------
  // Method: FRSave
  // Description
  // 
  //
  // Parameters
  // ----------------------------------------------------
  //{$1} = Optional Path to Footrunner Document, Pass "" to prompt
C_TEXT($1;$ttDocPath;$ttDocContents)
C_TIME($rDoc)
C_LONGINT($0)
$0:=0
$ttDocPath:=""
$ttDocContents:=Get text from pasteboard

If (Count parameters>0)
$ttDocPath:=$1
End if 
If (Length($ttDocPath)=0)  // no document specified
$rDoc:=Create document("")
$fGo:=(OK=1)
Else 
If (Test path name($ttDocPath)=Is a document )
DELETE DOCUMENT($ttDocPath)
End if 
$rDoc:=Create document($ttDocPath)
$fGo:=(OK=1)
End if 

If ($fGo)  // no document specified
$0:=FRAppendChecksum ($ttDocContents)
SEND PACKET($rDoc;$ttDocContents)
CLOSE DOCUMENT($rDoc)
End if