_MAPTRIANGLE 3D -question

[MasterGy]

Hi !
I would need to draw a picture with 3D _MAPTRIANGLE. Not on the screen, but on an image created with _NEWIMAGE, but not on the screen!
Unfortunately, it already fails there that if SCREEN is not equal to _maptriangle “destination” it will not draw.
How do I draw so that it does not appear on the screen but only on a background image?
Do you know any tricks to this?

It would also be a good solution to be able to open multiple windows on the screen.

Thanks !

[Petr]

Hi. In 3D you MUST copying HARDWARE images to HARDWARE images:

Code: QB64: [Select]

1. virtual = _NEWIMAGE(800, 600, 32)
2. HARDWARE_virtual = _COPYIMAGE(virtual, 33)
3. _FREEIMAGE virtual 'software image is not need now
4.  
5. SCREEN _NEWIMAGE(800, 600, 32)
6. 'save something to unvisible image using 3D MAPTRIANGLE:
7.  
8. img = _SCREENIMAGE
9. HARDWAREimg = _COPYIMAGE(img, 33)
10. _FREEIMAGE img
11.  
12. _MAPTRIANGLE (0, 0)-(_DESKTOPWIDTH, 0)-(0, _DESKTOPHEIGHT), HARDWAREimg TO(-1, 1, -3)-(1, 1, -3)-(-1, -1, -3), HARDWARE_virtual, _SMOOTH 'copy triangle to virtual screen
13.  
14. PRINT "This is software screen. Press key..."
15. SLEEP
16.  
17. 'place it to your screen: (PUTIMAGE know do it with hardware images)
18. DO UNTIL _KEYHIT = 27
19.     _PUTIMAGE (0, 0), HARDWARE_virtual
20.     _DISPLAY
21. LOOP
22.  

[MasterGy]

Thank you with a grateful heart! I always thought that if an image is already in "33", so it's hardware, you can't change it anymore. You showed that another 33 can be placed on a 33 image with maptriangle3d! It is very good ! Thank you for showing me !!!

[MasterGy]

I put in my program, it does its job nicely, but after a while it crashes. If I end the cycle you write, it crashes with me after about half a minute. How could this be applied safely?

Code: QB64: [Select]

1. virtual = _NEWIMAGE(800, 600, 32)
2. HARDWARE_virtual = _COPYIMAGE(virtual, 33)
3. _FREEIMAGE virtual 'software image is not need now
4.  
5. SCREEN _NEWIMAGE(800, 600, 32)
6. 'save something to unvisible image using 3D MAPTRIANGLE:
7.  
8. DO
9.     img = _SCREENIMAGE
10.     HARDWAREimg = _COPYIMAGE(img, 33)
11.     _FREEIMAGE img
12.  
13.     _MAPTRIANGLE (0, 0)-(_DESKTOPWIDTH, 0)-(0, _DESKTOPHEIGHT), HARDWAREimg TO(-1, 1, -3)-(1, 1, -3)-(-1, -1, -3), HARDWARE_virtual, _SMOOTH 'copy triangle to virtual screen
14.  
15.  
16.     'place it to your screen: (PUTIMAGE know do it with hardware images)
17.  
18.     _PUTIMAGE (0, 0), HARDWARE_virtual
19.     _DISPLAY
20.  
21. LOOP
22.  
23.  
24.  

[Petr]

Hi. Try it so:

Code: QB64: [Select]

1. virtual = _NEWIMAGE(800, 600, 32)
2. HARDWARE_virtual = _COPYIMAGE(virtual, 33)
3. _FREEIMAGE virtual 'software image is not need now
4.  
5. SCREEN _NEWIMAGE(800, 600, 32)
6. 'save something to unvisible image using 3D MAPTRIANGLE:
7.  
8. img = _SCREENIMAGE
9. HARDWAREimg = _COPYIMAGE(img, 33)
10. _FREEIMAGE img
11. _MAPTRIANGLE (0, 0)-(_DESKTOPWIDTH, 0)-(0, _DESKTOPHEIGHT), HARDWAREimg TO(-1, 1, -3)-(1, 1, -3)-(-1, -1, -3), HARDWARE_virtual, _SMOOTH 'copy triangle to virtual screen
12.  
13. DO
14.     'place it to your screen: (PUTIMAGE know do it with hardware images)
15.  
16.     _PUTIMAGE (0, 0), HARDWARE_virtual
17.     _DISPLAY
18. LOOP
19.  

Why is in neverending loop in your program created SCREENIMAGE, placed to virtual hardware image and then viewed?

[MasterGy]

I set the example because I need it. 4 continuously changing images created from 3d maptriangles should be displayed on 1 screen.

"HARDWARE_virtual" always changes in my case.

it’s like making a 3d game, but I want to see the space in real time in 4 different views.

[Petr]

I see! So it is also possible to do so. You will take four hardware pictures. You have to keep in mind that they are not overwritted so as software images, so it is optimal to always draw everyone from the beginning to update them. After drawing and displaying, you release it from the memory with the FREEIMAGE command, but before that you copy the result to the next image, which will be displayed during the update of the original one. I read it badly before, so I wrote you a sample with 2D to 3D. But you want 3D to 3D. Good. I'll try it too ... So first I add  2D images to 3D, I'll bounce back from it and rewrite it to 3D to 3D.


2D to 3D

Code: QB64: [Select]

1. DIM SHARED imageA, imageB, imageC, imageD
2.  
3. imageA = _NEWIMAGE(320, 240, 32)
4. imageB = _NEWIMAGE(320, 240, 32)
5. imageC = _NEWIMAGE(320, 240, 32)
6. imageD = _NEWIMAGE(320, 240, 32)
7. _DEST imageB
8. CLS , &HFFFFFF00
9. _DEST imageC
10. CLS , &HFF111111
11. _DEST imageD
12. CLS , &HFFAAAAAA
13.  
14.  
15.  
16. my = _NEWIMAGE(1024, 768, 32)
17. SCREEN my
18. DO
19.     DrawA
20.     DrawB
21.     drawC
22.     drawD
23.     _DEST my
24.  
25.     place3D -5, -2, -7, -3, -2, -9, -5, 0, -7, -3, 0, -9, imageA
26.     place3D 1, -2, -7, 3, -2, -4, 1, 0, -7, 3, 0, -4, imageB
27.     place3D 1, 1, -7, 3, 1, -4, 1, 3, -7, 3, 3, -4, imageC
28.     place3D -5, 3, -7, -3, 3, -9, -5, 1, -7, -3, 1, -9, imageD
29.  
30.     _DISPLAY
31.     _LIMIT 30
32. LOOP
33.  
34.  
35. SUB place3D (x1, y1, z1, x2, y2, z2, x3, y3, z3, x4, y4, z4, source)
36.     i = _COPYIMAGE(source, 33)
37.     _MAPTRIANGLE (0, 0)-(319, 0)-(0, 239), i TO(x1, y1, z1)-(x2, y2, z2)-(x3, y3, z3), 0
38.     _MAPTRIANGLE (319, 0)-(0, 239)-(319, 239), i TO(x2, y2, z2)-(x3, y3, z3)-(x4, y4, z4), 0
39.     _FREEIMAGE i
40. END SUB
41.  
42. SUB DrawA
43.     _DEST imageA
44.     x = 320 * RND
45.     y = 240 * RND
46.     r = 50 * RND
47.     c = RND * 255
48.     CIRCLE (x, y), r, _RGB32(c)
49. END SUB
50.  
51. SUB DrawB
52.     STATIC xl, yl
53.     _DEST imageB
54.     xl = 320 * RND
55.     yl = 240 * RND
56.     r = 50 * RND
57.     c = RND * 255
58.     LINE -(xl, yl), _RGB32(c)
59. END SUB
60.  
61. SUB drawC
62.     _DEST imageC
63.     x = 320 * RND
64.     y = 240 * RND
65.     r = 50 * RND
66.     c = RND * 255
67.     PSET (x, y), _RGB32(c)
68.  
69. END SUB
70.  
71. SUB drawD
72.     _DEST imageD
73.     LOCATE 1
74.     PRINT TIME$
75. END SUB
76.  

wait, writing 3D to 3D...

[Petr]

So I converted the 2D images to 3D, then copied them to another hardware image using MAPTRIANGLE and displayed it. It works, there is a problem with the text and it does not update. The graphics are being updated. I'll try something else, but not until later.

Code: QB64: [Select]

1. DIM SHARED imageA, imageB, imageC, imageD, HFull_Image
2.  
3. imageA = _NEWIMAGE(320, 240, 32)
4. imageB = _NEWIMAGE(320, 240, 32)
5. imageC = _NEWIMAGE(320, 240, 32)
6. imageD = _NEWIMAGE(320, 240, 32)
7. FullImage = _NEWIMAGE(1024, 768, 32)
8. _DEST FullImage
9. CLS
10. HFull_Image = _COPYIMAGE(FullImage, 33) '  create new EMPTY hardware image
11. _FREEIMAGE FullImage
12.  
13. _DEST imageB
14. CLS , &H00FFFF00
15. _DEST imageC
16. CLS , &H00111111
17. _DEST imageD
18. CLS , &H00AAAAAA
19.  
20.  
21.  
22. my = _NEWIMAGE(1024, 768, 32)
23. SCREEN my
24. ON TIMER(10) GOSUB clearIT
25. TIMER ON
26.  
27. DO
28.     drawD
29.     drawC
30.     DrawB
31.     DrawA
32.  
33.     place3D -5, -2, -7, -3, -2, -9, -5, 0, -7, -3, 0, -9, imageA
34.     place3D 1, -2, -7, 3, -2, -4, 1, 0, -7, 3, 0, -4, imageB
35.     place3D 1, 1, -7, 3, 1, -4, 1, 3, -7, 3, 3, -4, imageC
36.     place3D -5, 3, -7, -3, 3, -9, -5, 1, -7, -3, 1, -9, imageD
37.  
38.     _PUTIMAGE (0, 0), HFull_Image
39.     _DISPLAY
40.     _LIMIT 30
41. LOOP
42.  
43. clearIT:
44. _FREEIMAGE HFull_Image
45. _FREEIMAGE imageA
46. _FREEIMAGE imageB
47. _FREEIMAGE imageC
48. _FREEIMAGE imageD
49. HFull_Image = _COPYIMAGE(FullImage, 33) '  create new EMPTY hardware image
50. imageA = _NEWIMAGE(320, 240, 32)
51. imageB = _NEWIMAGE(320, 240, 32)
52. imageC = _NEWIMAGE(320, 240, 32)
53. imageD = _NEWIMAGE(320, 240, 32)
54.  
55. RETURN
56.  
57. SUB place3D (x1, y1, z1, x2, y2, z2, x3, y3, z3, x4, y4, z4, source)
58.     i = _COPYIMAGE(source, 33)
59.     _MAPTRIANGLE (0, 0)-(319, 0)-(0, 239), i TO(x1, y1, z1)-(x2, y2, z2)-(x3, y3, z3), HFull_Image, _SMOOTH 'copy HARDWARE content to new empty HARDWARE image
60.     _MAPTRIANGLE (319, 0)-(0, 239)-(319, 239), i TO(x2, y2, z2)-(x3, y3, z3)-(x4, y4, z4), HFull_Image, _SMOOTH
61.     _FREEIMAGE i
62. END SUB
63.  
64. SUB DrawA
65.     _DEST imageA
66.     x = 320 * RND
67.     y = 240 * RND
68.     r = 50 * RND
69.     c = RND * 255
70.     CIRCLE (x, y), r, _RGB32(c)
71. END SUB
72.  
73. SUB DrawB
74.     STATIC xl, yl
75.     _DEST imageB
76.     xl = 320 * RND
77.     yl = 240 * RND
78.     r = 50 * RND
79.     c = RND * 255
80.     LINE -(xl, yl), _RGB32(c)
81. END SUB
82.  
83. SUB drawC
84.     _DEST imageC
85.     LINE (0, 0)-(319, 239), , B
86.     x = 320 * RND
87.     y = 240 * RND
88.     r = 50 * RND
89.     c = RND * 255
90.     PSET (x, y), _RGB32(c)
91. END SUB
92.  
93. SUB drawD
94.     _DEST imageD
95.     LOCATE 1
96.     PRINT TIME$
97. END SUB
98.  

I also found (I didn't realize that) that when I copied a hardware image to a hardware image, the original content in the target would be credited (so the original won't be deleted, but a new one will be drawn over it). Therefore, the target hardware image will always have to be discarded and a new one created, because there is no such thing as CLS for hardware images. And if I'm wrong, I'm asking anyone to correct me.

[Petr]

MasterGy, I've been thinking about your request and come up with the following. I don't think you need a copy of the hardware image to create 4 independent 3D views! What you really need are 4 independent drawings that differ in the angle of rotation of the model! This will create 4 3D images, which you will then place. Would that be a solution to your request?

[Petr]

I now made a quick adjustment to my program with a cube that has animation on the surface, stretched X axis so that it was not symmetrical, and made two views rotated 90 degrees. It is possible to continue in the same way for the view during the Z / Y rotation, only it is necessary to add the already performed Z / X rotation. I added the program to this thread:

https://www.qb64.org/forum/index.php?topic=3325.msg126224#msg126224

[MasterGy]

It is very kind of you to spend so much time on the problem.
It would be important to draw in separate windows. I'm experimenting with the maze program.
If you wanted to draw this all at once, it wouldn’t be perfect. Because I don’t want to look at something from the outside, it’s the whole inside view. It’s ugly to cut off the excess points because valuable triangles would be missing as well.
In the meantime, I came up with a solution, I also tried to have 2 open qb programs communicate with each other through a common RANDOM file. The signal transmission is immediate.
So there would be a “BOSS” program that, if launched, would launch 4 “3d viewer” programs, and in the RANDOM file, BOSS would give the viewers only the necessary coordinates in real time.

[MasterGy]

The point of the experiment, which I really want to see, is that:
Suppose the position of each point in the world is determined not by 3 but by 4 coordinate points. In vain 4, we can only perceive and see the projections of 3 planes.
The program creates a 4d maze. It doesn't matter what we fill the space with, I thought the maze was an ideal terrain. It could have been a building plan, anything.
Since four values ​​define 1 point, but we can only perceive a cross section of 3 values ​​visually, I wondered what it would be like to see the plot in real time from multiple perspectives. Each window is a cross section of a possible projection.
So we have the X, Y, Z, A planes. They record every point. We can see the XYZ projection from one window, but it is possible to jump to “hyperspace” by moving the A value. We see the same from another window, but from the projection of the X, Y, A planes. In this window, moving in the Z plane means a “hyperspace jump”. And so on.
Window 1: natural projection: XYZ, hyper-plane: A

Window 2: natural projection: XYA, hyper-plane: Z

Window 3: natural projection: XZA, hyper-plane: Y

Window 1: natural projection: YZA, hype-rplane: X

The interesting thing is:
Suppose we make a hyper-space jump in one of the windows. It looks like we’re going through a simple hallway in another window. And vice versa….
I want to see my 4 dimensional motion in real time in 4 different projections.

[MasterGy]

the video shows what I want.

Only the wall collision and the 4 windows thing are missing from the program. I already really want to see in 4 windows as I move from one plane to another.
One-window shows what's going on, but unfortunately qb64 doesn't want this 3D image re-editing.

The video shows me bouncing in the hyperspace of the current window and changing the perspective

[Petr]

MASTER Gy!

I'm trying to imagine what you want, and the only thing I've accomplished here is a big headache. But, definitely, 3D in four windows must be possible to do. The question is how to display 4 dimensions using three coordinates ... Then the images will never agree, because one dimension always missing.