LOAD "file.test"

dim i as int
dim d as double
dim s[32] as char

remove "test.dat"
rename "teset.dat", "test.dat"
print exists("test.dat")
print i*i
print d*d
sprint s, i*i, d*d
printxy 0, 0, i*i, d*d
print# 1, i*i, d*d

print len(s)
print stringwidth(s)
print stringheight(s)