ClearOne Writing StreamNet - Manual (Page 59)

Audio Driver Example
D-7
All specifications subject to change without notification. All rights reserved. Copyright © 2007 NetStreams
Main +1 512.977-9393 / fax +1 512.977.9398 / Toll Free Technical Support +1 866-353-3496
3600 W. Parmer Lane, Suite 100; Austin, TX 78727 / www.netstreams.com.
local dot = command.params[1]:find("[.]")
if( bIsV2 == true ) then
AsciiMessage = "W 1 7 "
else
AsciiMessage = "W 1 6 "
end
if( dot ~= nil) then
-- FM --
AsciiMessage = AsciiMessage..command.params[1]:sub(1,dot-1)
if( bIsV2 ) then
AsciiMessage = AsciiMessage.."."
else
AsciiMessage = AsciiMessage.." "
end
AsciiMessage = AsciiMessage..command.params[1]:sub(dot+1,-1)
-- Check to see if we need a trailing zero
if( command.params[1]:len() < dot + 2 ) then
AsciiMessage = AsciiMessage.."0"
end
AsciiMessage = AsciiMessage.."%0D"
else
-- AM --
if( bIsV2 ) then
AsciiMessage = AsciiMessage..command.params[1]
else
if( command.params[1]:len() < 4 ) then
AsciiMessage =
AsciiMessage..command.params[1]:sub( 1, 1 ).." "..command.params[1]:sub( 2, 4 )
else
AsciiMessage =
AsciiMessage..command.params[1]:sub( 1, 2 ).." "..command.params[1]:sub( 3, 5 )
end
end
AsciiMessage = AsciiMessage.."%0D"
end
end
WriteMessage(AsciiMessage)
-- if we are a V1 we need to update the frequency
if( false == bIsV2 ) then