Problem generating mesh from memblock

Author

Message

Image All

20

Years of Service

User Offline

Joined: 30th Dec 2005

Location: Home

Posted: 4th Oct 2010 22:45 Edited at: 4th Oct 2010 22:57

Link

i can't seem to get this right. i've looked over the numbers and i think they should work. when i run this program i'm supposed to see a large flat plane with many subdivides but i see nothing. halp

//memblock and vertexdata terrain editor demo
//perhaps will become level editor for stickman game
//hopefully if i ever get that far.

sync on
sync rate 0
set display mode display width(),display height(),display depth(), 1
//autocam off

terrain = 1
size = 64

polys = size^2 * 2
verts = polys*3

memsize = 12+36*verts
make memblock terrain, memsize

write memblock dword terrain, 0, 338
write memblock dword terrain, 4, 36
write memblock dword terrain, 8, verts

for i=1 to size
    for j=1 to size
        vert = 6*size*(i-1)+6*(j-1)
        pos = vert*36+12
        r# = 10*(i-1)
        c# = 10*(j-1)
        h# = 0.0
        write memblock dword terrain, pos, r#
        write memblock dword terrain, pos+4, h#
        write memblock dword terrain, pos+8, c#
        write memblock dword terrain, pos+12, 0
        write memblock dword terrain, pos+16, 1
        write memblock dword terrain, pos+20, 0
        write memblock dword terrain, pos+24, 0xFF888888
        write memblock dword terrain, pos+28, c#/10.0
        write memblock dword terrain, pos+32, r#/10.0
    next j
next i

make mesh from memblock terrain,terrain
delete memblock terrain
make object 1,terrain

position camera 0, 0,10*(size*0.5),-10*size
point camera 0, 0,0,0

while not escapekey()
      
      sync
      
endwhile
end

+ Code Snippet

//memblock and vertexdata terrain editor demo
//perhaps will become level editor for stickman game
//hopefully if i ever get that far.


sync on
sync rate 0
set display mode display width(),display height(),display depth(), 1
//autocam off


terrain = 1
size = 64

polys = size^2 * 2
verts = polys*3

memsize = 12+36*verts
make memblock terrain, memsize

write memblock dword terrain, 0, 338
write memblock dword terrain, 4, 36
write memblock dword terrain, 8, verts

for i=1 to size
    for j=1 to size
        vert = 6*size*(i-1)+6*(j-1)
        pos = vert*36+12
        r# = 10*(i-1)
        c# = 10*(j-1)
        h# = 0.0
        write memblock dword terrain, pos, r#
        write memblock dword terrain, pos+4, h#
        write memblock dword terrain, pos+8, c#
        write memblock dword terrain, pos+12, 0
        write memblock dword terrain, pos+16, 1
        write memblock dword terrain, pos+20, 0
        write memblock dword terrain, pos+24, 0xFF888888
        write memblock dword terrain, pos+28, c#/10.0
        write memblock dword terrain, pos+32, r#/10.0
    next j
next i

make mesh from memblock terrain,terrain
delete memblock terrain
make object 1,terrain

position camera 0, 0,10*(size*0.5),-10*size
point camera 0, 0,0,0



while not escapekey()
      
      sync
      
endwhile
end

edit: o wait i just realized this only makes one vertex per grid square. i'mma fix it and see if i see anything then.

re-edit: nope, it didn't fix it. this is the new code, that should make 2 polys per loop (6 verts):

//memblock and vertexdata terrain editor demo
//perhaps will become level editor for stickman game
//hopefully if i ever get that far.

sync on
sync rate 0
set display mode display width(),display height(),display depth(), 1
//autocam off

terrain = 1
size = 64

polys = size^2 * 2
verts = polys*3

memsize = 12+36*verts
make memblock terrain, memsize

write memblock dword terrain, 0, 338
write memblock dword terrain, 4, 36
write memblock dword terrain, 8, verts

for i=1 to size
    for j=1 to size
        vert = 6*size*(i-1)+6*(j-1)
        pos = vert*36+12
        r# = 10*(i-1)
        c# = 10*(j-1)
        h# = 0.0
        makeVertex(terrain,pos, c#,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
    next j
next i

make mesh from memblock terrain,terrain
delete memblock terrain
make object 1,terrain

position camera 0, 5*size,5*size,0
point camera 0, 0,0,5*size

while not escapekey()
      
      sync
      
endwhile
end

function makeVertex(mem, p, x#,y#,z#, nx#,ny#,nz#, diffuse as dword, u#,v#)
        write memblock dword mem, p, x#
        write memblock dword mem, p+4, y#
        write memblock dword mem, p+8, z#
        write memblock dword mem, p+12, nx#
        write memblock dword mem, p+16, ny#
        write memblock dword mem, p+20, nz#
        write memblock dword mem, p+24, diffuse
        write memblock dword mem, p+28, x#/10.0
        write memblock dword mem, p+32, z#/10.0
endfunction

+ Code Snippet

//memblock and vertexdata terrain editor demo
//perhaps will become level editor for stickman game
//hopefully if i ever get that far.


sync on
sync rate 0
set display mode display width(),display height(),display depth(), 1
//autocam off


terrain = 1
size = 64

polys = size^2 * 2
verts = polys*3

memsize = 12+36*verts
make memblock terrain, memsize

write memblock dword terrain, 0, 338
write memblock dword terrain, 4, 36
write memblock dword terrain, 8, verts

for i=1 to size
    for j=1 to size
        vert = 6*size*(i-1)+6*(j-1)
        pos = vert*36+12
        r# = 10*(i-1)
        c# = 10*(j-1)
        h# = 0.0
        makeVertex(terrain,pos, c#,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
    next j
next i

make mesh from memblock terrain,terrain
delete memblock terrain
make object 1,terrain

position camera 0, 5*size,5*size,0
point camera 0, 0,0,5*size



while not escapekey()
      
      sync
      
endwhile
end



function makeVertex(mem, p, x#,y#,z#, nx#,ny#,nz#, diffuse as dword, u#,v#)
        write memblock dword mem, p, x#
        write memblock dword mem, p+4, y#
        write memblock dword mem, p+8, z#
        write memblock dword mem, p+12, nx#
        write memblock dword mem, p+16, ny#
        write memblock dword mem, p+20, nz#
        write memblock dword mem, p+24, diffuse
        write memblock dword mem, p+28, x#/10.0
        write memblock dword mem, p+32, z#/10.0
endfunction

Remember those old guys? They made epic renders, I think one of them was called DaVinci, and all they used was MS Paint. Sometimes it's just skill....

Back to top

Profile PM Email

Sven B

21

Years of Service

User Offline

Joined: 5th Jan 2005

Location: Belgium

Posted: 5th Oct 2010 12:55 Edited at: 5th Oct 2010 12:56

Link

Well, the first thing I noticed was: why are you wring DWORDS when the position, normals and uv data are floats? I'm not sure how DBP converts its floats to a DWORD, but I suspect that might give some problems.

Also, I'm not sure if this is intended, but the last 2 lines in 'makeVertex' use (x#, z#) instead of (u#, v#) (making u# and v# superfluous). They should range from 0.0 to 1.0, and you're only dividing by 10 instead of the total size of the mesh. Of course, if you plan to tile the texture per tile, this should work too.

Cheers!
Sven B

Back to top

Profile PM Email

Green Gandalf

VIP Member

21

Years of Service

User Offline

Joined: 3rd Jan 2005

Playing: Malevolence:Sword of Ahkranox, Skyrim, Civ6.

Posted: 5th Oct 2010 14:45

Link

Try this:

//memblock and vertexdata terrain editor demo
//perhaps will become level editor for stickman game
//hopefully if i ever get that far.

sync on
sync rate 0
set display mode display width(),display height(),display depth(), 1
//autocam off

terrain = 1
size = 64

polys = size^2 * 2
verts = polys*3

memsize = 12+36*verts
make memblock terrain, memsize

write memblock dword terrain, 0, 338
write memblock dword terrain, 4, 36
write memblock dword terrain, 8, verts

for i=1 to size
    for j=1 to size
        vert = 6*size*(i-1)+6*(j-1)
        pos = vert*36+12
        r# = 10*(i-1)
        c# = 10*(j-1)
        h# = 0.0
` syntax makeVertex(mem, p, x#,y#,z#, nx#,ny#,nz#, diffuse as dword, u#,v#)
        makeVertex(terrain,pos, c#,h#,r#, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+36, c#,h#,r#+10, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+72, c#+10,h#,r#, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+108, c#+10,h#,r#, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+144, c#,h#,r#+10, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+180, c#+10,h#,r#+10, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
    next j
next i

make mesh from memblock terrain,terrain
save mesh "terrain.x", terrain
delete memblock terrain
make object 1,terrain
set object cull 1, 0

position camera 0, 0,5*size,0
point camera 0, 5*size,0,5*size

while not escapekey()
      text 20, 20, str$(statistic(1))
      sync
      
endwhile
end

function makeVertex(mem, p, x#,y#,z#, nx#,ny#,nz#, diffuse as dword, u#,v#)
        write memblock float mem, p, x#
        write memblock float mem, p+4, y#
        write memblock float mem, p+8, z#
        write memblock float mem, p+12, nx#
        write memblock float mem, p+16, ny#
        write memblock dword mem, p+20, nz#
        write memblock dword mem, p+24, diffuse
        write memblock float mem, p+28, x#/10.0
        write memblock float mem, p+32, z#/10.0
endfunction

+ Code Snippet

//memblock and vertexdata terrain editor demo
//perhaps will become level editor for stickman game
//hopefully if i ever get that far.


sync on
sync rate 0
set display mode display width(),display height(),display depth(), 1
//autocam off


terrain = 1
size = 64

polys = size^2 * 2
verts = polys*3

memsize = 12+36*verts
make memblock terrain, memsize

write memblock dword terrain, 0, 338
write memblock dword terrain, 4, 36
write memblock dword terrain, 8, verts

for i=1 to size
    for j=1 to size
        vert = 6*size*(i-1)+6*(j-1)
        pos = vert*36+12
        r# = 10*(i-1)
        c# = 10*(j-1)
        h# = 0.0
` syntax makeVertex(mem, p, x#,y#,z#, nx#,ny#,nz#, diffuse as dword, u#,v#)
        makeVertex(terrain,pos, c#,h#,r#, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+36, c#,h#,r#+10, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+72, c#+10,h#,r#, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+108, c#+10,h#,r#, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+144, c#,h#,r#+10, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
        makeVertex(terrain,pos+180, c#+10,h#,r#+10, 0.0,1.0,0.0, 0xFF888888, 0.0,0.0)
    next j
next i

make mesh from memblock terrain,terrain
save mesh "terrain.x", terrain
delete memblock terrain
make object 1,terrain
set object cull 1, 0

position camera 0, 0,5*size,0
point camera 0, 5*size,0,5*size



while not escapekey()
      text 20, 20, str$(statistic(1))
      sync
      
endwhile
end



function makeVertex(mem, p, x#,y#,z#, nx#,ny#,nz#, diffuse as dword, u#,v#)
        write memblock float mem, p, x#
        write memblock float mem, p+4, y#
        write memblock float mem, p+8, z#
        write memblock float mem, p+12, nx#
        write memblock float mem, p+16, ny#
        write memblock dword mem, p+20, nz#
        write memblock dword mem, p+24, diffuse
        write memblock float mem, p+28, x#/10.0
        write memblock float mem, p+32, z#/10.0
endfunction

The main problem was this section:

+ Code Snippet

        makeVertex(terrain,pos, c#,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#,h#,r#+10, 0,1,0, 0xFF888888, 0,0)
        makeVertex(terrain,pos, c#+10,h#,r#+10, 0,1,0, 0xFF888888, 0,0)

You forgot to move the pos counter along by 36 for each of the 6 vertices.

Back to top

Profile PM Email

Image All

20

Years of Service

User Offline

Joined: 30th Dec 2005

Location: Home

Posted: 7th Oct 2010 00:50

Link

oh snap. treating verts like dwords. thanks GG

Remember those old guys? They made epic renders, I think one of them was called DaVinci, and all they used was MS Paint. Sometimes it's just skill....

Back to top

Profile PM Email

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Problem generating mesh from memblock