'Non-UI application (console / server application)
#Region Project Attributes
#CommandLineArgs:
#MergeLibraries: True
#End Region
Sub Process_Globals
Dim MainLoop As Timer
Dim tools As BTCTools
End Sub
Sub AppStart (Args() As String)
tools.Initialize
MainLoop.Initialize("MainLoop", 333)
MainLoop.Enabled = True
StartMessageLoop
End Sub
Sub MainLoop_Tick
Log("1 BTC = " & tools.Value("USD") & " USD")
End Sub