Text Only | Text with Attachments

QB64.org Forum

Active Forums => Programs => Topic started by: SierraKen on December 09, 2019, 12:26:56 am

Title: Mouse Trail
Post by: SierraKen on December 09, 2019, 12:26:56 am
I believe many months ago someone made something like this, but I thought I would freshen my memory. This is a small example of how to make your mouse pointer have a trail. Use your mouse wheel to increase and decrease the size of it. Thanks to b+ who once showed me how to make a fading trail.

Code: QB64: [Select]
  1. _TITLE "Mouse Trail - Use Mouse Wheel to change size."
  2. SCREEN _NEWIMAGE(800, 600, 32)
  4.     _LIMIT 50
  5.     mouseWheel = 0
  7.         mouseX = _MOUSEX
  8.         mouseY = _MOUSEY
  9.         mouseLeftButton = _MOUSEBUTTON(1)
  10.         mouseRightButton = _MOUSEBUTTON(2)
  11.         mouseMiddleButton = _MOUSEBUTTON(3)
  12.         mouseWheel = mouseWheel + _MOUSEWHEEL
  13.     LOOP
  14.     IF mouseWheel > 0 THEN mwheel = mwheel + 5
  15.     IF mouseWheel < 0 THEN mwheel = mwheel - 5
  16.     IF mwheel < 1 THEN mwheel = 1
  17.     IF mwheel > 300 THEN mwheel = 300
  18.     CIRCLE (mouseX, mouseY), mwheel, _RGB32(0, 255, 0)
  19.     PAINT (mouseX, mouseY), _RGB32(0, 255, 0)
  20.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGBA(0, 0, 0, 30), BF
  21.     _DISPLAY
  23.  
Title: Re: Mouse Trail
Post by: SMcNeill on December 09, 2019, 03:23:36 am
Wouldn’t this be an excellent case of using multiple screens for your work?

DisplayScreen = _NEWIMAGE(800, 600, 32)
WorkScreen = _NEWIMAGE(800, 600, 32)
MouseScreen = _NEWIMAGE(800, 600, 32)

SCREEN DisplayScreen

DO
    _SOURCE WorkScreen: _DEST WorkScreen
    ‘Draw on your work screen
    _SOURCE  MouseScreen
    ‘Draw the mouse trails
    _PUTIMAGE , WorkScreen, DisplayScreen
    _PUTIMAGE , MouseScreen, DisplayScreen
LOOP


Then you’d preserve the original screen while being able to fade out the trails that your mouse poops out behind itself.
Title: Re: Mouse Trail
Post by: OldMoses on December 09, 2019, 10:59:46 am
OMG! I CAN'T GET AWAY FROM IT!  ;)

Nice job there. I'll be studying this one for future reference.
Title: Re: Mouse Trail
Post by: bplus on December 09, 2019, 11:18:21 am
Ha, yeah learned that from Fellippe's fireworks I think and then warping through the stars. I was trying to do those trails without alpha fading (but I can do with different colors).
Title: Re: Mouse Trail
Post by: SierraKen on December 09, 2019, 04:16:53 pm
Thanks everyone. I just made my own Cats and Mouse game using this code. SMMcNeil, I also used your code, thanks! I'm going to make a new thread for my new game.
Text Only | Text with Attachments