#pragma Library("XbtNetW.lib")
PROCEDURE Main
cls
QOut(NnetWhoAmI())
QOut(nNetStaId())
QOut(nNetSName())
Sleep(200)
RETURN