window 1, @"Generic Swap", (0,0,480,270)

text ,,,,, 60

long        i, j
double      x, y
CFStringRef a, b

i = 1059 : j = 62
print i, j
swap i, j
print i, j

print

x = 1.23 : y = 4.56
print x, y
swap x, y
print x, y

print

a = @"Hello" : b = @"World!"
print a, b
swap a, b
print a, b

HandleEvents