FAQ.How to get the Mac OS system version?
Feedback.

Answer: The following code queries the value and displays the version number:
Example:

dim first as integer
dim second as integer
dim third as integer
dim l as integer

if System.Gestalt("sysv",l) then
  
  Third=Bitwiseand(l,15)
  second=Bitwiseand(l\16,15)
  first=Bitwiseand(l\256,15)+10*Bitwiseand(l\256\16,15)
end if

if First>=10 then
  msgbox "Mac OS X "+str(First)+"."+str(Second)+"."+str(third)
else
  msgbox "Mac OS "+str(First)+"."+str(Second)+"."+str(third)
end if