RosettaCodeData/Task/Greatest-common-divisor/LiveCode/greatest-common-divisor.livecode

function gcd x,y
   repeat until y = 0
      put x mod y into z
      put y into x
      put z into y
   end repeat
   return x
end gcd