acls: xscreen 2: spset 0,0: vsync while !(button(2) and #b) touch out t,x,y if t then spofs 0,x,y ? format$("%6.2f %6.2f", x, y) endif vsync wend