Re: readmouse

[ Follow Ups ] [ Post Followup ] [ Signature.net Forum ]

Posted by Barbara Brazil on June 28, 2012 at 06:56:46:

In Reply to: Re: readmouse posted by Neil Badger on June 27, 2012 at 21:31:33:

Neil:

This is a tough one! I dug deep down into the oldies but goodies and I found somebody's program that does something like this. Here's a subroutine that supposedly gets the mouse coordinates:


! GET MOUSE INFORMATION
MOUSE.INFO:
MOUSESET = 0
SCANACTION = ASC(SUB(STS(0),8,1))
IF SCANACTION EQ 6 OR SCANACTION EQ 14
.....PRINT (0) (READMOUSE)
.....INPUT (0,MOUSE.INFO) !Badge< This is the FORMAT you show above
.....ROW = ASC(SUB(MOUSECURSOR$,1,1)) - 1
.....COLUMN= ASC(SUB(MOUSECURSOR$,2,1))
.....MOUSESET = 1
.....RETURN
ENDIF
RETURN


Follow Ups:


Post a Followup

Name:
E-Mail:

Subject:

What is the name of the main Signature System's Product?  

Comments:

Optional Link URL:
Link Title:
Optional Image URL:

You may attach up to 5 files to your followup (see below):





Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.

[ Follow Ups ] [ Post Followup ] [ Signature.net Forum ]