_SMOOTH bug? [SOLVED]

[Petr]

Hi try this source code:

Code: QB64: [Select]

1.  
2.  
3. i = _SCREENIMAGE
4.  
5. SCREEN _NEWIMAGE(800, 600, 32)
6. VIRTUAL& = _NEWIMAGE(600, 600, 32)
7. _PUTIMAGE , i, VIRTUAL&
8. pieces = 66
9.  
10.  
11. uhel = _PI
12.  
13.  
14. DO
15.     uhel = uhel + n
16.     CLS
17.     FOR B = 1 TO pieces
18.         X = 400 + COS(uhel) * 400
19.         Y = 300 + SIN(uhel) * 300
20.  
21.         X3 = 400 + COS(uhel + _PI / pieces) * 400
22.         Y3 = 300 + SIN(uhel + _PI / pieces) * 300
23.  
24.  
25.         PSET (X, Y)
26.         uhel = uhel + _PI / pieces
27.         '   SLEEP
28.  
29.         X2 = B * (800 / pieces)
30.         xx = 800 / pieces
31.  
32.  
33.         _MAPTRIANGLE (X2, 0)-(X2 + xx, 0)-(X2, 599), VIRTUAL& TO(X, Y)-(X3, Y3)-(X2, 599), _SMOOTH
34.         _MAPTRIANGLE (X2 + xx, 0)-(X2, 599)-(X2 + xx, 599), VIRTUAL& TO(X3, Y3)-(X2, 599)-(X2 + xx, 599), _SMOOTH
35.     NEXT
36.     _DISPLAY
37.     _LIMIT 20
38.     uhel = _PI: n = n + .1
39. LOOP
40.  

Works? OK! Press twice ALt + Enter!  Invalid handle error occur. Why?

Then comment _SMOOTH in source code, recompile and run it again. Now all works fine also after twice press Alt + Enter.

[Ashish]

Hi Petr! How are you?
The mistake is that you are using _SMOOTH at the place of destination handle. So, at initial condition the value of _SMOOTH is 0 (because there is no anti-aliasing). When we press ALT+ENTER twice, smooth is being enable and therefore, _SMOOTH function return -1. And QB64 treat -1 as an invalid handle.
 
Replace

Code: QB64: [Select]

1. _MAPTRIANGLE (X2, 0)-(X2 + xx, 0)-(X2, 599), VIRTUAL& TO(X, Y)-(X3, Y3)-(X2, 599), _SMOOTH
2.  

To

Code: QB64: [Select]

1. _MAPTRIANGLE (X2, 0)-(X2 + xx, 0)-(X2, 599), VIRTUAL& TO(X, Y)-(X3, Y3)-(X2, 599), , _SMOOTH
2.  

Notice the double comma at the last? I think you must have understood what I wanted to say.

[Petr]

Oh man! Thank you Ashish! I didn't realize it at all! So a mistake on my side.
To your question:  how am I? Well, it's not good now. Did not only us national singer Karel Gott die (of which I wrote in my forum signature and on the day of his funeral), but also the neighbor died and, to make matters worse, a colleague from work is  hanged himself. Well, it was really too bad now.
I'm slowly returning to programming. Very slowly, because there is not much time and there is a lot of work around.

Thank you for your help.