Question about transparent images

[Raven_Singularity]

The use? Ah, humor. _INSTRREV() is the new reverse function to INSTR(). So, I thought if I inserted that at the end of your code, I could get the .png to reappear. :D

Pete

Lol!

[FellippeHeitor]

Is there an official place to submit feature requests?

Yes. Both for feature requests and bug reports: https://github.com/Galleondragon/qb64/issues

[Ashish]

The use? Ah, humor. _INSTRREV() is the new reverse function to INSTR(). So, I thought if I inserted that at the end of your code, I could get the .png to reappear. :D

Pete

Oh man! You are always happy and want to make everyone laugh with your jokes.

[Raven_Singularity]

Is this what you want?

Code: QB64: [Select]

1. SCREEN _NEWIMAGE(600, 600, 32)
2.  
3. img& = _LOADIMAGE("rainbow.png")
4.  
5. FOR i = 0 TO 255
6.     CLS
7.     addAlpha2Img img&, -1 'subtract 1 alpha value from each pixel.
8.     _PUTIMAGE (0, 0)-(600, 600), img&
9.     _LIMIT 40
10.     _DISPLAY
11. NEXT
12.  
13.  
14. SUB addAlpha2Img (img&, alpha AS INTEGER)
15.     IF img& >= -1 THEN EXIT SUB
16.     DIM buffer AS _MEM, o AS _OFFSET, o2 AS _OFFSET
17.     DIM b AS _UNSIGNED _BYTE
18.     $CHECKING:OFF
19.     buffer = _MEMIMAGE(img&)
20.     o = buffer.OFFSET
21.     o2 = o + _WIDTH(img&) * _HEIGHT(img&) * 4
22.     DO
23.         b = _MEMGET(buffer, o + 3, _UNSIGNED _BYTE)
24.         IF (b + alpha) > 0 AND (b + alpha) < 255 THEN
25.             _MEMPUT buffer, o + 3, (b + alpha) AS _UNSIGNED _BYTE
26.         END IF
27.         o = o + 4
28.     LOOP UNTIL o = o2
29.     _MEMFREE buffer
30.     $CHECKING:ON
31. END SUB
32.  

That code does do what I wanted.  I will go through your code later, and work out what exactly it's doing.

It also seems to be going pretty fast when I tried it over a background image, appears to maintain 60FPS without issue at 600x600.

Thank you kindly for your help.

[Pete]

While you fiddle with it, disable (REM out) the  $CHECKING lines.  $CHECKING:OFF makes it run faster, but it sacrifices the debugging messages. Only use  $CHECKING:OFF when you have debugged, ready to use code.

Would you believe Ashish is only 16? If you have time, search for some of his 3-D Open-GL projects on the boards.

Pete

[Raven_Singularity]

By debugging messages, do you mean things like error messages with line numbers, or what exactly?

[Pete]

Best described here: http://www.qb64.org/wiki/$CHECKING

[Jack002]

The use? Ah, humor. _INSTRREV() is the new reverse function to INSTR(). So, I thought if I inserted that at the end of your code, I could get the .png to reappear. :D

Pete

If I do a DIR listing with INSTRREV will I be able to see deleted files?
:D