prototype BOOL KERNEL32.GetComputerName(BYREF STRING, BYREF NUMBER);
function OnBegin()
STRING szCmpName;
NUMBER nLength;
begin
//Using Win32 API
nLength = MAX_PATH;
GetComputerName(szCmpName, nLength);
MessageBox(szCmpName, INFORMATION);
end;