Unexpected gaps between cubes - GameCreators Forum

Author

Message

Circumdederunt

7

Years of Service

User Offline

Joined: 9th Apr 2017

Location:

Posted: 6th Jun 2017 13:33

Link

Hello. This code:

+ Code Snippet

#include "template.h"
using namespace std;
app App;
void app::Begin(void)
{
	agk::SetScissor(0, 0, 0, 0);
	agk::SetSyncRate(0, 1);
	agk::SetCameraRotation(1, 0, 0, 0);
	agk::SetCameraPosition(1, 0, 0, -50);
	for(int y=0; y<10; y++) 
		for (int x = 0; x<10; x++)
			agk::SetObjectPosition(agk::CreateObjectBox(1, 1, 1), x, y, 0); //create 10x10x1 of 1x1x1 cubes 
}
int app::Loop(void)
{
	agk::MoveCameraLocalX(1, 0.01); //move camera right, so cubes "move" left
	agk::Sync();
	return 0;
}
void app::End(void)
{
}

Gives this result: https://media.giphy.com/media/3ohzdQMkTCZlU57obu/giphy.gif
As you can see, black gaps appear between cubes as they move left. Is there a way to fix this issue?

Back to top

Profile PM

nz0

AGK Developer

17

Years of Service

User Offline

Joined: 13th Jun 2007

Location: Cheshire,UK

Posted: 6th Jun 2017 22:48

Link

Hi.

I had a similar problem recently here - https://forum.thegamecreators.com/thread/219159

I decided I would make the array of cubes at the point I needed them, as it seemed a lot of bother to try (might not even work) to fix this.

My Robotron remake
My I,Robot remake WIP
My Defender remake

Back to top

Profile PM Email Website

Golelorn

8

Years of Service

User Offline

Joined: 20th Nov 2016

Location:

Posted: 6th Jun 2017 23:51 Edited at: 6th Jun 2017 23:56

Link

I'm having this problem, as well.

Really bummed to see there is no solution. I had planned to add a texture to the blocks.

Nz0, do you think if I made boxes in blender and textured them there I would still get the "lines"? Its pretty essential that I have them as blocks and not joined as an object, so I can randomly create decor.

Below is code to my mini-not-so-random dungeon generator(its not complete I have yet to add decor or textures). You can see the lines are pretty horrific, and zooming in does not work.

Setvirtualresolution(640,480)
ResetTimer()

type tiles
	room as integer
	roomx as integer
	roomy as integer
	roomz as integer
	wall as integer
	door as integer
	corridor as integer
	chest as integer
endtype
	
dim cloneIDs[20, 100, 100] as tiles
dim GPS[20] as tiles

global wallObjID
global floorObjID
global corridorObjID
global doorObjID
global chestObjID
global dng_gen_rooms

GPS[1].roomx = 0
GPS[1].roomy = 0
GPS[1].roomz = 0
dng_gen_rooms = 6

function restartdungeon()
	if GetObjectExists( wallObjID ) then DeleteObject( wallObjID )
	if GetObjectExists( floorObjID ) then DeleteObject( floorObjID )
	if GetObjectExists( corridorObjID ) then DeleteObject( corridorObjID )
	if GetObjectExists( doorObjID ) then DeleteObject( doorObjID )
	if GetObjectExists( doorObjID ) then DeleteObject( chestObjID )
	if GetImageExists( level_texture ) then DeleteImage ( level_texture )
	for t = 0 to 20
		for n = 0 to 100
			for x = 0 to 100
				if GetObjectExists( cloneIDs[t, n, x].room ) then DeleteObject( cloneIDs[t, n, x].room )
				if GetObjectExists( cloneIDs[t, n, x].wall ) then DeleteObject( cloneIDs[t, n, x].wall )
				if GetObjectExists( cloneIDs[t, n, x].door ) then DeleteObject( cloneIDs[t, n, x].door )
				if GetObjectExists( cloneIDs[t, n, x].corridor ) then DeleteObject( cloneIDs[t, n, x].corridor )
				if GetObjectExists( cloneIDs[t, n, x].chest ) then DeleteObject( cloneIDs[t, n, x].chest )
			next x
		next n
	next t
	floorObjID = CreateObjectBox( 2, .25, 2 )
	wallObjID = CreateObjectBox( 2, 7, 2 )
	corridorObjID = createobjectbox( 2, 1, 2 )
	doorObjID = createobjectbox( 2, 4.8, 2 )
	chestObjID = LoadObject( "Chest_A.obj" )
	level_texture = LoadImage( "FG_Assets01_Low_D.png" )
	SetObjectImage ( chestObjID, level_texture, 0 )
	SetObjectColor( corridorObjID, 75, 155, 75, 255 )
	SetObjectColor( wallObjID, 155, 100, 200, 255 )
	SetObjectColor( doorObjID, 255, 0, 0, 255 )
	SetObjectPosition( floorObjID, 3000, 8000, 3000 )
	SetObjectPosition( wallObjID, 3000, 8000, 3000 )
	SetObjectPosition( corridorObjID, 3000, 8000, 3000 )
	SetObjectPosition( doorObjID, 3000, 8000, 3000 )
	SetObjectPosition( chestObjID, 3000, 8000, 3000 )
	undim GPS[]
	undim cloneIDs[]
	dim GPS[20] as tiles
	dim cloneIDs[20, 100, 100] as tiles
endfunction

function room(t as integer) //create rooms
	x_dir = 1
	z_dir = 1
	z_offset = 0
	x_offset = 0
	if t > 1
		GPS[t].roomx = GetobjectX( cloneIDs[t,1,0].door )
		GPS[t].roomz = GetobjectZ( cloneIDs[t,1,0].door )
		rm_x_axis_dir = (GetobjectX( cloneIDs[t,1,0].door ) - GetobjectX( cloneIDs[t-1,2,0].door ))
		rm_z_axis_dir = (GetobjectZ( cloneIDs[t,1,0].door ) - GetobjectZ( cloneIDs[t-1,2,0].door ))
		if rm_x_axis_dir < 0 or rm_z_axis_dir < 0
			x_dir = -1
			z_dir = -1
		endif
		if rm_x_axis_dir <> 0 and x_dir = 1
			z_offset = 4
		elseif rm_z_axis_dir <> 0 and z_dir = 1
			x_offset = 4
		elseif rm_x_axis_dir <> 0 and x_dir = -1
			z_offset = -4
		elseif rm_z_axis_dir <> 0 and z_dir = -1
			x_offset = -4		
		endif
	endif
	x=1
	z=0	
	w = random2(5,10)
	h = random2(5,10)
	For x = 1 to w+2 //w
		if z <> 0 and x <> w+2
			cloneIDs[t,x,z].room = CloneObject( floorObjID )
			SetObjectPosition( cloneIDs[t,x,z].room, GPS[t].roomx+((x*2)*x_dir)-x_offset, 0, GPS[t].roomz-z_offset )
		endif
		For z = 1 to h+1
		cloneIDs[t,x,z].room = CloneObject( floorObjID )
		SetObjectPosition( cloneIDs[t,x,z].room, GPS[t].roomx+((x*2*x_dir)-(x_dir*2))-x_offset, 0, GPS[t].roomz+(z*(z_dir*2))-z_offset )
		Next z
	Next x
	
	//wall
	x=0
	z=0
	For x = 0 to w //bottom //w
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx+(x*2*x_dir)-x_offset, 3.5, GPS[t].roomz-z_offset )
	Next x	
	x = w+1 //w+1
	For z = 0 to h+1 //right side // h+1
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx+(x*2*x_dir)-x_offset, 3.5, GPS[t].roomz+(z*2*z_dir)-z_offset )
	Next z
	z=w+1 //w+1
	x=w+2 //w+2
	For z = w+1 to w+h+1 //left w+1 to w+h+1
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx-x_offset, 3.5, GPS[t].roomz+((z-w-1)*2*z_dir)-z_offset )
	Next z	
	z = w+h+2 //top w+h+2
	For x = w+3 to w+w+4 //w+3 to w+3+w+1
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx+((x-w-3)*2*x_dir)-x_offset, 3.5, GPS[t].roomz+((z-w-1)*2*z_dir)-z_offset )
	Next x
	if t >= 1 and t < dng_gen_rooms
		corridorfill( w, h, t, rm_x_axis_dir, rm_z_axis_dir )
		chest_chance = Random2(1,100)
			if chest_chance >= 20 and chest_chance <= 25
				x = random2( 2, w )
				z= random2( 2, h )
				cloneIDs[t,1,1].chest = CloneObject( chestObjID )
				SetObjectPosition( cloneIDs[t,1,1].chest, GetObjectX( cloneIDs[t,x,z].room ), 1, GetObjectZ( cloneIDs[t,x,z].room ) )
			endif
	endif
	
	if t = dng_gen_rooms 
		//chest_chance = Random2(1,100)
			//if chest_chance >= 20 and chest_chance <= 40
		x = random2( 2, w )
		z= random2( 2, h )
		SetObjectPosition( chestObjID, GetObjectX( cloneIDs[t,x,z].room ), 1, GetObjectZ( cloneIDs[t,x,z].room ) )
	endif 
	
		
	wallID = objectspherecast(0, GetObjectX( cloneIDs[t,1,0].door ), 5.5, GetObjectZ( cloneIDs[t,1,0].door ), GetObjectX( cloneIDs[t,1,0].door ), 5.5, GetObjectZ( cloneIDs[t,1,0].door ), 1)
	if GetObjectExists(wallID) then DeleteObject(wallID)
	
endfunction

function corridorfill( w as integer, h as integer, t as integer, rm_x_axis_dir as integer, rm_z_axis_dir as integer )
	
	if Last_Corridor_Direction = 1 or Last_Corridor_Direction = 3
		if Prvs_Last_Corridor_Direction = 2 or Prvs_Last_Corridor_Direction = 4
			repeat
				Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction and Current_Corridor_Direction <> 2 and Current_Corridor_Direction <> 4
		elseif Prvs_Last_Corridor_Direction = 1
			repeat
				Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction and Current_Corridor_Direction <> 2
		else
			repeat
				Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction
		endif
	elseif Last_Corridor_Direction = 2 or Last_Corridor_Direction = 4
		if Prvs_Last_Corridor_Direction = 1 or Prvs_Last_Corridor_Direction = 3
			repeat
			Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction-1 and Current_Corridor_Direction <> Prvs_Last_Corridor_Direction - 1 and Current_Corridor_Direction <> Prvs_Last_Corridor_Direction
		else
			repeat
			Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction-1 and Current_Corridor_Direction <> Prvs_Last_Corridor_Direction-1
		endif
	else
		Current_Corridor_Direction = random2(1,4)
	endif
	
	cloneIDs[t,2,0].door = CloneObject( doorObjID )
	
	if Current_Corridor_Direction = 1 //south
		x = random2(2,w-1)
		z = 0
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		z_dir = 1
	elseif Current_Corridor_Direction = 2 //north
		x = random2(w+4,w+w+3)
		z = w+h+2
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		z_dir = -1
	elseif Current_Corridor_Direction = 3 //west
		x = w+2
		z= random2(w+2,w+h)
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		x_dir = 1
	elseif Current_Corridor_Direction = 4 //east
		x = w+1
		z= random2(1,h)
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		x_dir = -1
	endif
	counter = random2(4,7) //corridor length
	if rm_x_axis_dir < 0 or rm_z_axis_dir < 0
		x_dir = x_dir*-1
		z_dir = z_dir*-1
	endif
	z=0
	x=0
	n = 1
	repeat 
		select Current_Corridor_Direction
			case 1: //south
				cloneIDs[t,x,z+n].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x,z+n].corridor, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*(n*2)) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*((n+1)*2)) )
				endif
			endcase
			case 2: //north
				cloneIDs[t,x,z+n].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x,z+n].corridor, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*(n*2)) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*((n+1)*2)) )
				endif
			endcase
			case 3: //west
				cloneIDs[t,x+n,z].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x+n,z].corridor, GetObjectX( cloneIDs[t,2,0].door )-x_dir*(n*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door )-x_dir*((n+1)*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				endif
			endcase
			case 4: //east
				cloneIDs[t,x+n,z].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x+n,z].corridor, GetObjectX( cloneIDs[t,2,0].door )-x_dir*(n*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door )-x_dir*((n+1)*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				endif
			endcase
		endselect
		n=n+1
	until n = counter
	Prvs_Last_Corridor_Direction = Last_Corridor_Direction
	Last_Corridor_Direction = Current_Corridor_Direction
	
	if GetObjectExists( cloneIDs[6,1,0].door )  then SetObjectColor( cloneIDs[6,1,0].door, 255, 150, 75, 255 )
	global Current_Corridor_Direction
	global Last_Corridor_Direction
	global Prvs_Last_Corridor_Direction
	dim crd[20] as tiles
	crd[t].room = Current_Corridor_Direction
endfunction

restartdungeon()
for t = 1 to dng_gen_rooms
	room(t)
next t

do
	PrintC(Current_Corridor_Direction)
	Printc(Last_Corridor_Direction)
	Print(Prvs_Last_Corridor_Direction)
	t=1
	for t =1 to dng_gen_rooms
		PrintC(t)
		PrintC(": ")
		Print(crd[t].room)
		next t
	
	SetCameraPosition( 1, GPS[5].roomx, 150, GPS[5].roomz)
	SetCameraLookAt( 1, GPS[5].roomx, 0, GPS[5].roomz, 0 )
    Sync()

loop

+ Code Snippet

Setvirtualresolution(640,480)
ResetTimer()

type tiles
	room as integer
	roomx as integer
	roomy as integer
	roomz as integer
	wall as integer
	door as integer
	corridor as integer
	chest as integer
endtype
	
dim cloneIDs[20, 100, 100] as tiles
dim GPS[20] as tiles

global wallObjID
global floorObjID
global corridorObjID
global doorObjID
global chestObjID
global dng_gen_rooms

GPS[1].roomx = 0
GPS[1].roomy = 0
GPS[1].roomz = 0
dng_gen_rooms = 6

function restartdungeon()
	if GetObjectExists( wallObjID ) then DeleteObject( wallObjID )
	if GetObjectExists( floorObjID ) then DeleteObject( floorObjID )
	if GetObjectExists( corridorObjID ) then DeleteObject( corridorObjID )
	if GetObjectExists( doorObjID ) then DeleteObject( doorObjID )
	if GetObjectExists( doorObjID ) then DeleteObject( chestObjID )
	if GetImageExists( level_texture ) then DeleteImage ( level_texture )
	for t = 0 to 20
		for n = 0 to 100
			for x = 0 to 100
				if GetObjectExists( cloneIDs[t, n, x].room ) then DeleteObject( cloneIDs[t, n, x].room )
				if GetObjectExists( cloneIDs[t, n, x].wall ) then DeleteObject( cloneIDs[t, n, x].wall )
				if GetObjectExists( cloneIDs[t, n, x].door ) then DeleteObject( cloneIDs[t, n, x].door )
				if GetObjectExists( cloneIDs[t, n, x].corridor ) then DeleteObject( cloneIDs[t, n, x].corridor )
				if GetObjectExists( cloneIDs[t, n, x].chest ) then DeleteObject( cloneIDs[t, n, x].chest )
			next x
		next n
	next t
	floorObjID = CreateObjectBox( 2, .25, 2 )
	wallObjID = CreateObjectBox( 2, 7, 2 )
	corridorObjID = createobjectbox( 2, 1, 2 )
	doorObjID = createobjectbox( 2, 4.8, 2 )
	chestObjID = LoadObject( "Chest_A.obj" )
	level_texture = LoadImage( "FG_Assets01_Low_D.png" )
	SetObjectImage ( chestObjID, level_texture, 0 )
	SetObjectColor( corridorObjID, 75, 155, 75, 255 )
	SetObjectColor( wallObjID, 155, 100, 200, 255 )
	SetObjectColor( doorObjID, 255, 0, 0, 255 )
	SetObjectPosition( floorObjID, 3000, 8000, 3000 )
	SetObjectPosition( wallObjID, 3000, 8000, 3000 )
	SetObjectPosition( corridorObjID, 3000, 8000, 3000 )
	SetObjectPosition( doorObjID, 3000, 8000, 3000 )
	SetObjectPosition( chestObjID, 3000, 8000, 3000 )
	undim GPS[]
	undim cloneIDs[]
	dim GPS[20] as tiles
	dim cloneIDs[20, 100, 100] as tiles
endfunction

function room(t as integer) //create rooms
	x_dir = 1
	z_dir = 1
	z_offset = 0
	x_offset = 0
	if t > 1
		GPS[t].roomx = GetobjectX( cloneIDs[t,1,0].door )
		GPS[t].roomz = GetobjectZ( cloneIDs[t,1,0].door )
		rm_x_axis_dir = (GetobjectX( cloneIDs[t,1,0].door ) - GetobjectX( cloneIDs[t-1,2,0].door ))
		rm_z_axis_dir = (GetobjectZ( cloneIDs[t,1,0].door ) - GetobjectZ( cloneIDs[t-1,2,0].door ))
		if rm_x_axis_dir < 0 or rm_z_axis_dir < 0
			x_dir = -1
			z_dir = -1
		endif
		if rm_x_axis_dir <> 0 and x_dir = 1
			z_offset = 4
		elseif rm_z_axis_dir <> 0 and z_dir = 1
			x_offset = 4
		elseif rm_x_axis_dir <> 0 and x_dir = -1
			z_offset = -4
		elseif rm_z_axis_dir <> 0 and z_dir = -1
			x_offset = -4		
		endif
	endif
	x=1
	z=0	
	w = random2(5,10)
	h = random2(5,10)
	For x = 1 to w+2 //w
		if z <> 0 and x <> w+2
			cloneIDs[t,x,z].room = CloneObject( floorObjID )
			SetObjectPosition( cloneIDs[t,x,z].room, GPS[t].roomx+((x*2)*x_dir)-x_offset, 0, GPS[t].roomz-z_offset )
		endif
		For z = 1 to h+1
		cloneIDs[t,x,z].room = CloneObject( floorObjID )
		SetObjectPosition( cloneIDs[t,x,z].room, GPS[t].roomx+((x*2*x_dir)-(x_dir*2))-x_offset, 0, GPS[t].roomz+(z*(z_dir*2))-z_offset )
		Next z
	Next x
	
	//wall
	x=0
	z=0
	For x = 0 to w //bottom //w
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx+(x*2*x_dir)-x_offset, 3.5, GPS[t].roomz-z_offset )
	Next x	
	x = w+1 //w+1
	For z = 0 to h+1 //right side // h+1
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx+(x*2*x_dir)-x_offset, 3.5, GPS[t].roomz+(z*2*z_dir)-z_offset )
	Next z
	z=w+1 //w+1
	x=w+2 //w+2
	For z = w+1 to w+h+1 //left w+1 to w+h+1
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx-x_offset, 3.5, GPS[t].roomz+((z-w-1)*2*z_dir)-z_offset )
	Next z	
	z = w+h+2 //top w+h+2
	For x = w+3 to w+w+4 //w+3 to w+3+w+1
		cloneIDs[t,x,z].wall = CloneObject( wallObjID )
		SetObjectPosition( cloneIDs[t,x,z].wall, GPS[t].roomx+((x-w-3)*2*x_dir)-x_offset, 3.5, GPS[t].roomz+((z-w-1)*2*z_dir)-z_offset )
	Next x
	if t >= 1 and t < dng_gen_rooms
		corridorfill( w, h, t, rm_x_axis_dir, rm_z_axis_dir )
		chest_chance = Random2(1,100)
			if chest_chance >= 20 and chest_chance <= 25
				x = random2( 2, w )
				z= random2( 2, h )
				cloneIDs[t,1,1].chest = CloneObject( chestObjID )
				SetObjectPosition( cloneIDs[t,1,1].chest, GetObjectX( cloneIDs[t,x,z].room ), 1, GetObjectZ( cloneIDs[t,x,z].room ) )
			endif
	endif
	
	if t = dng_gen_rooms 
		//chest_chance = Random2(1,100)
			//if chest_chance >= 20 and chest_chance <= 40
		x = random2( 2, w )
		z= random2( 2, h )
		SetObjectPosition( chestObjID, GetObjectX( cloneIDs[t,x,z].room ), 1, GetObjectZ( cloneIDs[t,x,z].room ) )
	endif 
	
		
	wallID = objectspherecast(0, GetObjectX( cloneIDs[t,1,0].door ), 5.5, GetObjectZ( cloneIDs[t,1,0].door ), GetObjectX( cloneIDs[t,1,0].door ), 5.5, GetObjectZ( cloneIDs[t,1,0].door ), 1)
	if GetObjectExists(wallID) then DeleteObject(wallID)
	
endfunction



function corridorfill( w as integer, h as integer, t as integer, rm_x_axis_dir as integer, rm_z_axis_dir as integer )
	
	if Last_Corridor_Direction = 1 or Last_Corridor_Direction = 3
		if Prvs_Last_Corridor_Direction = 2 or Prvs_Last_Corridor_Direction = 4
			repeat
				Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction and Current_Corridor_Direction <> 2 and Current_Corridor_Direction <> 4
		elseif Prvs_Last_Corridor_Direction = 1
			repeat
				Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction and Current_Corridor_Direction <> 2
		else
			repeat
				Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction
		endif
	elseif Last_Corridor_Direction = 2 or Last_Corridor_Direction = 4
		if Prvs_Last_Corridor_Direction = 1 or Prvs_Last_Corridor_Direction = 3
			repeat
			Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction-1 and Current_Corridor_Direction <> Prvs_Last_Corridor_Direction - 1 and Current_Corridor_Direction <> Prvs_Last_Corridor_Direction
		else
			repeat
			Current_Corridor_Direction = random2(1,4)
			until Current_Corridor_Direction <> Last_Corridor_Direction-1 and Current_Corridor_Direction <> Prvs_Last_Corridor_Direction-1
		endif
	else
		Current_Corridor_Direction = random2(1,4)
	endif
	
	cloneIDs[t,2,0].door = CloneObject( doorObjID )
	
	if Current_Corridor_Direction = 1 //south
		x = random2(2,w-1)
		z = 0
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		z_dir = 1
	elseif Current_Corridor_Direction = 2 //north
		x = random2(w+4,w+w+3)
		z = w+h+2
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		z_dir = -1
	elseif Current_Corridor_Direction = 3 //west
		x = w+2
		z= random2(w+2,w+h)
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		x_dir = 1
	elseif Current_Corridor_Direction = 4 //east
		x = w+1
		z= random2(1,h)
		SetObjectPosition( cloneIDs[t,2,0].door, GetObjectX( cloneIDs[t,x,z].wall ), 2.4, GetObjectZ( cloneIDs[t,x,z].wall ) )
		DeleteObject( cloneIDs[t,x,z].wall )
		x_dir = -1
	endif
	counter = random2(4,7) //corridor length
	if rm_x_axis_dir < 0 or rm_z_axis_dir < 0
		x_dir = x_dir*-1
		z_dir = z_dir*-1
	endif
	z=0
	x=0
	n = 1
	repeat 
		select Current_Corridor_Direction
			case 1: //south
				cloneIDs[t,x,z+n].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x,z+n].corridor, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*(n*2)) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*((n+1)*2)) )
				endif
			endcase
			case 2: //north
				cloneIDs[t,x,z+n].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x,z+n].corridor, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*(n*2)) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door ), 2.4, GetObjectZ( cloneIDs[t,2,0].door )-(z_dir*((n+1)*2)) )
				endif
			endcase
			case 3: //west
				cloneIDs[t,x+n,z].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x+n,z].corridor, GetObjectX( cloneIDs[t,2,0].door )-x_dir*(n*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door )-x_dir*((n+1)*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				endif
			endcase
			case 4: //east
				cloneIDs[t,x+n,z].corridor = CloneObject( corridorObjID )
				SetObjectPosition( cloneIDs[t,x+n,z].corridor, GetObjectX( cloneIDs[t,2,0].door )-x_dir*(n*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				if n = counter-1
					cloneIDs[t+1,1,0].door = CloneObject( doorObjID )
					SetObjectPosition( cloneIDs[t+1,1,0].door, GetObjectX( cloneIDs[t,2,0].door )-x_dir*((n+1)*2), 2.4, GetObjectZ( cloneIDs[t,2,0].door ) )
				endif
			endcase
		endselect
		n=n+1
	until n = counter
	Prvs_Last_Corridor_Direction = Last_Corridor_Direction
	Last_Corridor_Direction = Current_Corridor_Direction
	
	if GetObjectExists( cloneIDs[6,1,0].door )  then SetObjectColor( cloneIDs[6,1,0].door, 255, 150, 75, 255 )
	global Current_Corridor_Direction
	global Last_Corridor_Direction
	global Prvs_Last_Corridor_Direction
	dim crd[20] as tiles
	crd[t].room = Current_Corridor_Direction
endfunction 


restartdungeon()
for t = 1 to dng_gen_rooms
	room(t)
next t

do
	PrintC(Current_Corridor_Direction)
	Printc(Last_Corridor_Direction)
	Print(Prvs_Last_Corridor_Direction)
	t=1
	for t =1 to dng_gen_rooms
		PrintC(t)
		PrintC(": ")
		Print(crd[t].room)
		next t
	
	SetCameraPosition( 1, GPS[5].roomx, 150, GPS[5].roomz)
	SetCameraLookAt( 1, GPS[5].roomx, 0, GPS[5].roomz, 0 )
    Sync()

loop

Back to top

Profile PM

Circumdederunt

7

Years of Service

User Offline

Joined: 9th Apr 2017

Location:

Posted: 7th Jun 2017 12:06

Link

Quote: "make the array of cubes at the point I needed them"

nz0, what do you mean? I tried to recreate cubes every step (decreasing their X) instead of moving the camera right, but gaps still appear.

Back to top

Profile PM

nz0

AGK Developer

17

Years of Service

User Offline

Joined: 13th Jun 2007

Location: Cheshire,UK

Posted: 8th Jun 2017 20:15

Link

Well, I'm not sure there's no solution. It probably involves messing with vertexes and/or edge shading. I noted that other 3D tools don't exhibit this behaviour though.
I did get the "lines" if I made the cubes externally, even though they looked fine in Lightwave, as shown in my thread linked above.

@Circumdederunt: I resorted to creating the cube array at the point I needed them to become cubes, otherwise I use a standard geometry model version.

You can see the same cube problem which I had in these examples so I assemble the cubes at the point of destruction.

and this

My Robotron remake
My I,Robot remake WIP
My Defender remake

Back to top

Profile PM Email Website

Circumdederunt

7

Years of Service

User Offline

Joined: 9th Apr 2017

Location:

Posted: 8th Jun 2017 20:50

Link

Quote: "otherwise I use a standard geometry model version"

So do you say that it's possible to display 3d arrays (not affected by physics) without using CreateObjectBox? This question is probably very noobish... but that's why I've come to the newcomers corner. Could you recreate my program (10x10 moving cubes) with "standard geometry model"? Also, examples are beautiful.

Back to top

Profile PM

nz0

AGK Developer

17

Years of Service

User Offline

Joined: 13th Jun 2007

Location: Cheshire,UK

Posted: 9th Jun 2017 01:36

Link

When I say standard geometry, I mean make the cube 10x10 size as a single model. At the point you need it to be smaller cubes, then swap over to the small ones.
I guess this may not work for what you are intending, but it does for me if I want to shatter the original model into smaller cubes.

I also expect if you want to make environments, then it's not going to work well.

In my example the model on the left isn't made out of small cubes, but I recreate it out of cubes for the purpose of it falling apart. Probably more economical that way anyway.

I don't know what your group of cubes is for and my example may not help you.

When I was trying to fix this issue, I noticed that not lighting the objects sort of solved the problem, so it appears that the lines are the edge face of the cube adjacent to the front face.
If this is the case, then it would probably need a shader to draw the non-facing edges differently. It was all starting to be too much effort for something which you'd think was basic.
I also tried slightly overlapping the cubes (partially successful). Maybe putting a plane in front would help? Other ways could be making your own cube with 6 separate meshes and only activate the mesh facing the camera... Of course you'd have issues with the cubes on the edge then, but could still be done.. just seems like a lot of effort hence why I didn't pursue it further.

My Robotron remake
My I,Robot remake WIP
My Defender remake

Back to top

Profile PM Email Website

Circumdederunt

7

Years of Service

User Offline

Joined: 9th Apr 2017

Location:

Posted: 9th Jun 2017 10:53

Link

I want to create program which reads txt file (first three numbers (width, height, length), then width*height*length groups of three numbers (r, g, b)) and then displays this 3D array using CreateObjectBox. All created cubes won't be affected by physics and won't move or rotate, only camera is movable (camera won't rotate too). So basically I need "draw rectangular parallelepiped of (W,H,L) at (X1,Y1,Z1) with camera being at (X2,Y2,Z2)" function and I tried to use AppGameKit camera and CreateObjectBox functions for this purpose, but black gaps are the problem. I've given 10x10 cubes example to illustrate gaps problem as simple as possible.
So uniting adjacent cells of the 3D array into single model won't work, because every cube could be of different color.
I tried using SetSunActive(0), and black gaps disappeared, but I need lighted cubes. So the only solution is to use shaders... That's a problem, because I have no idea how shaders work and how to create and use them. I would be grateful if you could explain this or link the explanation.

Back to top

Profile PM

nz0

AGK Developer

17

Years of Service

User Offline

Joined: 13th Jun 2007

Location: Cheshire,UK

Posted: 12th Jun 2017 00:58

Link

I reckon the easiest way would be the 6 mesh cube. Only enable meshes that are either facing the camera (this is a different problem) and meshes that don't have an adjacent face (i.e. the ones on the outer edge).

To work out if a cube face is facing the camera (or can be seen in this case) maybe you can check it's normal, but like I say it's starting to get more complicated the more you think about it.

When I ask what it is you are trying to do, I meant for what purpose are you trying to make an array of cubes like this?

My Robotron remake
My I,Robot remake WIP
My Defender remake

Back to top

Profile PM Email Website

Circumdederunt

7

Years of Service

User Offline

Joined: 9th Apr 2017

Location:

Posted: 13th Jun 2017 10:30

Link

So if I build cube from 6 meshes and hide some of them, which are currently not visible, black gaps will go away? If they will, that's good, then the only thing I need is to make boolean "mesh is visible" function. I want to create a simple voxel game, currently I'm working on voxel models editor.

Back to top

Profile PM

nz0

AGK Developer

17

Years of Service

User Offline

Joined: 13th Jun 2007

Location: Cheshire,UK

Posted: 13th Jun 2017 19:58

Link

I see.
Well, you don't have to make it out of individual cubes unless you want to do something with those cubes individually.

My guess was that the edge you see was the vertex of the "side" face (adjacent to the one facing the camera), even though it's theoretically 0 thickness.
Every other 3D tool I have doesn't do this - i.e. shows the separate cubes or whatever without that line, so I don't really know exactly what's wrong.

My initial link shows the robot character made out of blocks in Lightwave which looks fine - no gaps. Same if I then load the same model into Assimp, which I thought AppGameKit used (could be wrong there) and again no gaps/lines.

My Robotron remake
My I,Robot remake WIP
My Defender remake

Back to top

Profile PM Email Website

GarBenjamin

AGK Developer

7

Years of Service

User Offline

Joined: 30th Nov 2016

Location: USA

Posted: 14th Jun 2017 16:37 Edited at: 14th Jun 2017 18:01

Link

Hello. I am just getting back into AppGameKit again. I converted your code to AppGameKit BASIC and cannot reproduce the issue. It could be something that was auto-created (when I created the new project for the test) fixed the issue OR maybe an update to AppGameKit fixed the issue (do you have the latest version?) OR it only happens in Tier 2.

Initially I converted the code thinking I would get the same behavior and wanted to try using Fixed Joints between the objects to see if that would solve the issue.

When I get time later I'll remove all code that was auto-created line by line commenting out and see if the issue shows up. If so we'll know how to easily fix it.

TI/994a (BASIC) -> C64 (BASIC/PASCAL/ASM/Others) -> Amiga (AMOS/BLITZ/ASM/C/Gamesmith) -> DOS (C/C++/Allegro) -> Windows (C++/C#/Monkey X/GL Basic/Unity/Others)

Back to top

Profile PM

GarBenjamin

AGK Developer

7

Years of Service

User Offline

Joined: 30th Nov 2016

Location: USA

Posted: 14th Jun 2017 19:33 Edited at: 14th Jun 2017 19:36

Link

Well on lunch break I looked at this again. I was able to reproduce the behavior. It was there I just couldn't see it. Had to greatly reduce the resolution then I could notice an occasional slight flicker where the lines appear.

I found something much better so as to not have to mess around with physics (I hate the physics stuff in these modern engines & frameworks ha ha)... FixObjectToObject.

In Unity I have seen the same behavior you describe and if you parent the objects to a container object it fixes the issue. However, it did not fix it here.

+ Code Snippet

// Project: GapFixTest 
// Created: 2017-06-14
// Author:  Gar

// show all errors
SetErrorMode(2)

SetWindowTitle("GapFixTest")
SetWindowSize(640, 480, 1)
SetWindowAllowResize(0)

SetSyncRate(0, 0)
SetCameraRotation(1, 0, 0, 0)
SetCameraPosition(1, 0, 0, -50)


y as integer
x as integer
boxID as integer

boxID = 1
for y=0 to 9
	for x=0 to 9
		CreateObjectBox(boxID, 1, 1, 1)
		SetObjectPosition(boxID, x, y, 0) //create 10x10x1 of 1x1x1 cubes
		
		// link all other objects to the first object
		if boxID > 1
			FixObjectToObject(boxID, 1)
		endif
		
		boxID = boxID + 1
	next x
next y

// LOOP UNTIL ESCAPE KEY IS PRESSED
repeat
	MoveCameraLocalX(1, 0.005) 		// move camera
//	MoveObjectLocalX(1, -0.005)		// move object 1 and rest will move also because they are linked
    Sync()
until GetRawKeyState(27)

So... I am not sure. I really thought parenting them so they are locked to be updated at the same time would solve the problem.

Truthfully on my monitor it is so hard to see it is not a problem and only noticeable due to the white on black.

But you can try using the FixObjectToObject and see if it helps on your end.

TI/994a (BASIC) -> C64 (BASIC/PASCAL/ASM/Others) -> Amiga (AMOS/BLITZ/ASM/C/Gamesmith) -> DOS (C/C++/Allegro) -> Windows (C++/C#/Monkey X/GL Basic/Unity/Others)

Back to top

Profile PM

Circumdederunt

7

Years of Service

User Offline

Joined: 9th Apr 2017

Location:

Posted: 14th Jun 2017 22:02

Link

Hello, I tried using FixObjectToObject in Tier 2 and it didn't help. I think gaps appear because of insufficient accuracy of AGK's 3D display, so parenting won't help. I have a 1920x1080 monitor and gaps are clearly visible.

nz0, I'm working on voxel model editor, so I think I "want to do something with those cubes individually" (i.e. paint them)? Still I'm interested in how can I avoid using cubes in the game. Do I need to use 3D model? Is it better for the performance? Can I create model file from 3D RGB array? Indeed it's very strange that AppGameKit creates gaps. I'm still not sure if I need to look for a shader (since this problem has something to do with lighting) or try building cube from meshes...

Back to top

Profile PM

Kevin Picone

22

Years of Service

User Offline

Joined: 27th Aug 2002

Location: Australia

Posted: 15th Jun 2017 06:29

Link

in the z buffer the surface that's drawn first ends up with priority over other surfaces, so if a bottom/top face is drawn beforfe a front/back/size face it's show through . What you could do, is split the object into a mesh containing only front / side faces and another mesh with top/bottom faces that get drawn after the first mesh. You should be able to make it all one mesh, which should fix errors at least when the camera is face on / above..

PlayBASIC To HTML5/WEB - Convert PlayBASIC To Machine Code

Back to top

Profile PM Website

Sorry your browser is not supported!

Newcomers AppGameKit Corner / Unexpected gaps between cubes