mouse.bas

由一个古老的BASIC解释器改进而成, 保留了ANSI C固有的艺术美感.

      5 MODE 1
     10 REPEAT
     20 	a$= INKEY$
     30 	LOCATE 1, 1: PRINT using "###", XMOUSE
     40 	LOCATE 2, 1: PRINT using "###", YMOUSE
     50 UNTIL a$= "CLICK"