I have a question on the old QuickBasic Mouse Driver.
First, here it is for refrence:
DECLARE SUB MouseDriver (AX%, bx%, CX%, DX%)
DECLARE FUNCTION MouseInit% ()
DECLARE SUB Mouseshow ()
DECLARE SUB Mousestatus (LB%, RB%, Xmouse%, Ymouse%)
DIM SHARED mouse$
RESTORE
SCREEN 13
mouse$ = SPACE$(57)
FOR I% = 1 TO 57
READ A$
H$ = CHR$(VAL("&H" + A$))
MID$(mouse$, I%, 1) = H$
NEXT I%
DATA 55,89,E5,8B,5E,0C,8B,07,50,8B,5E,0A,8B,07,50,8B
DATA 5E,08,8B,0F,8B,5E,06,8B,17,5B,58,1E,07,CD,33,53
DATA 8B,5E,0C,89,07,58,8B,5E,0A,89,07,8B,5E,08,89,0F
DATA 8B,5E,06,89,17,5D,CA,08,00
CLS
MS% = MouseInit%
IF NOT MS% THEN PRINT "Mouse not found": LET AMOUSE$ = "NO":
PRINT "Mouse found and initialized":
AMOUSE$ = "YES"
Mouseshow
LOCATE 24, 23: PRINT "any key to exit";
DO
Mousestatus LB%, RB%, Xmouse%, Ymouse%
LOCATE 5, 1
PRINT "Mouse STUFF: LB:"; LB%, "RB:"; RB%, "X:"; Xmouse%, "Y:"; Ymouse%
LOOP WHILE INKEY$ = ""
SUB MouseDriver (AX%, bx%, CX%, DX%)
DEF SEG = VARSEG(mouse$)
mouse% = SADD(mouse$)
CALL Absolute(AX%, bx%, CX%, DX%, mouse%)
END SUB
SUB MouseHide
AX% = 2
MouseDriver AX%, 0, 0, 0
END SUB
FUNCTION MouseInit%
AX% = 0
MouseDriver AX%, 0, 0, 0
MouseInit% = AX%
END FUNCTION
SUB MousePut
AX% = 4
CX% = X%
DX% = Y%
MouseDriver AX%, 0, CX%, DX%
END SUB
SUB Mouseshow
AX% = 1
MouseDriver AX%, 0, 0, 0
END SUB
SUB Mousestatus (LB%, RB%, Xmouse%, Ymouse%)
AX% = 3
MouseDriver AX%, bx%, CX%, DX%
LB% = ((bx% AND 1) <> 0)
RB% = ((bx% AND 2) <> 0)
Xmouse% = CX%
Ymouse% = DX%
END SUB
Heres my question, does anyone have any idea or remember what all the DATA is? I've been trying to figure it out myself. Im not sure if it signals a DOS interrupt or what. This really confuses me beacause I have no idea what it is supposted to represent. Anything would be great thanks.
This isn’t just limited to American manufacturers. It’s for all vehicles sold in the US regardless of who makes it. Others will do the same thing.
Boeing certified their own planes and we saw what came of that.
Question what’s the best way to share large data between a pc and a MacBook? Is something like a home cloud work efficiently. Originally I thought of setting up Serv-u in my pc and ftp into to transfer the files back and forth. But wondering what the best method is.
Looking at maybe streaming and using obs which saves the files as .mkv on the pc. Then I would upload to the mac to edit. Can I transfer usb c to usb c, what is the best method. All suggestions or ideas are welcome.
thank you
Ads weren't built-in to TVs by the manufacturers you bought the TV from, they came with the separate cable TV services, which were always optional AFAIA. Apple Pay comes built-in with device purchased and can't be uninstalled.
Either way, just 'cause it was being done scott-free in the past doesn't make it acceptable. Simple regulation requiring ANY form of further monetization be explicitly disclosed to end users up front on the product page will make significant difference.
Question
XST1
I have a question on the old QuickBasic Mouse Driver.
First, here it is for refrence:
Heres my question, does anyone have any idea or remember what all the DATA is? I've been trying to figure it out myself. Im not sure if it signals a DOS interrupt or what. This really confuses me beacause I have no idea what it is supposted to represent. Anything would be great thanks.
Link to comment
https://www.neowin.net/forum/topic/133759-quickbasic-mouse-driver-question/Share on other sites
5 answers to this question
Recommended Posts