' ----------------------------- 
' Demonstrates the SWAP command 
' ----------------------------- 

DIM a$
DIM b$

DIM c!
DIM d!

a$ = "12345"
b$ = "67890"

SWAP a$, b$ : PRINT a$ : PRINT b$

c! = 3.3
d! = 4.4

SWAP c!, d! : PRINT c! : PRINT d!

Result:

67890
12345
 4.4
 3.3