XSCREEN 2 DISPLAY 1 WHILE 1 TOUCH OUT STTM,TX,TY IF STTM!=0 THEN GPUTCHR TX,TY,"●",1,1,#WHITE END IF VSYNC 1 WEND