Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!bpa!temvax!pacsbb!ebray
From: ebray@pacsbb.UUCP (Eric Bray)
Newsgroups: comp.sys.ti
Subject: MOUSE ABASIC DEMO
Keywords: ABASIC 6/29/89
Message-ID: <647@pacsbb.UUCP>
Date: 2 Jul 89 14:15:08 GMT
Organization: PACS - Philadelphia Area Computer Society, Penna.
Lines: 10



100 CALL GRAPHICS(3,3)
110 CALL CHAR(255,"E0C0A01")
120 CALL SEEMOUSE(100,100,3)
130 MOUSE ON 
140 CALL MOUSEDRAG( ON ,16)
150 CALL MKEY(B1,B2,B3,J,K)
160 DISPLAY AT(24,1):B1,B2,B3,J,K
170 GOTO 150