Flip a 3D object - GameCreators Forum

Author

Message

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 06:31

Link

Is it possible (Without mesh memblocks) to flip an object?
Like flipping a sprite

Back to top

Profile PM

fubarpk

Retired Moderator

19

Years of Service

User Offline

Joined: 11th Jan 2005

Playing: AGK is my friend

Posted: 22nd Feb 2019 08:03

Link

do you mean like SetObjectMeshUVOffset( objID, meshIndex, textureStage, offsetU, offsetV )

fubar

Back to top

Profile PM Email Website

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 08:06

Link

I need it to flip everything. Textures, normals, verts. The whole box and dice

Back to top

Profile PM

fubarpk

Retired Moderator

19

Years of Service

User Offline

Joined: 11th Jan 2005

Playing: AGK is my friend

Posted: 22nd Feb 2019 08:10

Link

unless theres a new command not in the help the only way I can think of is using a memblock

fubar

Back to top

Profile PM Email Website

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 08:12

Link

Yeah. I think so. Maybe i'll just flip it in my 3D proggy

Back to top

Profile PM

fubarpk

Retired Moderator

19

Years of Service

User Offline

Joined: 11th Jan 2005

Playing: AGK is my friend

Posted: 22nd Feb 2019 08:14

Link

I wonder what would happen if SetObjectScale( objID, -1,-1,-1 )

fubar

Back to top

Profile PM Email Website

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 08:17

Link

Yeah this is the way!
Setobjectscale(obj,-1,-1,-1)

I'm not a grumpy grandpa

Back to top

Profile PM Email

fubarpk

Retired Moderator

19

Years of Service

User Offline

Joined: 11th Jan 2005

Playing: AGK is my friend

Posted: 22nd Feb 2019 08:21

Link

just tried

+ Code Snippet


Box=CreateObjectBox( 2, 4, 2 )
SetObjectScale(box,-1,1,-1)
do
 RotateObjectLocalY( Box, 2 )
 Sync()
loop

It isn't really noticeable being a box but it didn't error what I noticed tho the edges seemed darker
perhaps because its showing inside faces but if the texture is set to texture stage 1 instead of 0 it might work

fubar

Back to top

Profile PM Email Website

fubarpk

Retired Moderator

19

Years of Service

User Offline

Joined: 11th Jan 2005

Playing: AGK is my friend

Posted: 22nd Feb 2019 08:55

Link

Box=CreateObjectBox( 2, 4, 2 )
SetObjectScale(box,-1,1,-1)
SetObjectImage(box,createImg(),1)
Box2=CreateObjectBox( 2, 4, 2 )
SetObjectScale(box2,1,1,1)
SetObjectImage(box2,createImg(),1)
SetObjectPosition(box2,5,0,0)
do
 RotateObjectLocalY( Box, 2 )
 RotateObjectLocalY( Box2, 2 )
 
 Sync()
loop

function createImg()
	local data as integer [144] = [
	       0,0,0,0,0,0,0,0,0,0,0,0,
	       0,0,0,0,1,1,1,1,0,0,0,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,0,0,0,1,1,1,1,0,0,0,0,
	       0,0,0,0,0,0,0,0,0,0,0,0]
	       
	dataCount=0
	ClearScreen()
	for y = 0 to 11
		for x = 0 to 11
			if data[datacount]=1 then DrawLine(x,y,x,y,255,255,255)
			inc dataCount,1
		next x
	next y	
	
	render()
    img = getImage(0,0,12,12)
    SetImageTransparentColor(img,0,0,0)
endfunction img

+ Code Snippet

Box=CreateObjectBox( 2, 4, 2 )
SetObjectScale(box,-1,1,-1)
SetObjectImage(box,createImg(),1)
Box2=CreateObjectBox( 2, 4, 2 )
SetObjectScale(box2,1,1,1)
SetObjectImage(box2,createImg(),1)
SetObjectPosition(box2,5,0,0)
do
 RotateObjectLocalY( Box, 2 )
 RotateObjectLocalY( Box2, 2 )
 
 Sync()
loop

function createImg()
	local data as integer [144] = [
	       0,0,0,0,0,0,0,0,0,0,0,0,
	       0,0,0,0,1,1,1,1,0,0,0,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,1,1,1,1,1,1,1,1,1,1,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,0,1,1,1,1,1,1,1,1,0,0,
	       0,0,0,0,1,1,1,1,0,0,0,0,
	       0,0,0,0,0,0,0,0,0,0,0,0]
	       
	dataCount=0
	ClearScreen()
	for y = 0 to 11
		for x = 0 to 11
			if data[datacount]=1 then DrawLine(x,y,x,y,255,255,255)
			inc dataCount,1
		next x
	next y	
	
	render()
    img = getImage(0,0,12,12)
    SetImageTransparentColor(img,0,0,0)
endfunction img

this demonstrates difference
i

fubar

Back to top

Profile PM Email Website

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 09:04 Edited at: 22nd Feb 2019 09:05

Link

Yes it works but somehow we have to invet the normals, and will need to use memblock...but that is easier than we think.

Here's my example without memblock .

+ Code Snippet

loadimage(1,"agk.png")
createobjectbox(1,20,8,15)
setobjectimage(1,1,0)
cloneobject(2,1)
setobjectscale(2,-1,-1,-1)
setobjectposition(2,30,0,0)
SetObjectCullMode(2,0)
setcameraposition(1,15,10,-50)
SetCameraLookAt(1,15,0,0,0)
do
    g=g+1
    setobjectrotation(1,0,g,0)
    setobjectrotation(2,0,g,0)
    Print( ScreenFPS() )
    Sync()
loop

I'm not a grumpy grandpa

Attachments

Login to view attachments

Back to top

Profile PM Email

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 09:09

Link

Thanks guys. That is awesome!!

Back to top

Profile PM

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 09:12 Edited at: 22nd Feb 2019 09:14

Link

You are welcome !

Here's the code that fix the normals .

+ Code Snippet

loadimage(1,"agk.png")
createobjectbox(1,20,8,15)
setobjectimage(1,1,0)
cloneobject(2,1)
setobjectscale(2,-1,-1,-1)
setobjectposition(2,30,0,0)
SetObjectCullMode(2,0)

normal(2)

setcameraposition(1,15,10,-50)
SetCameraLookAt(1,15,0,0,0)
do
    g=g+1
    setobjectrotation(1,0,g,0)
    setobjectrotation(2,0,g,0)

    Print( ScreenFPS() )
    Sync()
loop
function normal(obj)
mesh = CreateMemblockFromObjectMesh(obj,1)
`getting vertex quantity
 verts= GetMemblockInt( mesh, 0 )
 for i= 0 to verts-1
	 nx#=GetMeshMemblockVertexNormalX(mesh,i)
	 ny#=GetMeshMemblockVertexNormalY(mesh,i)
	 nz#=GetMeshMemblockVertexNormalZ(mesh,i)
	 SetMeshMemblockVertexnormal(mesh,i,-nx#,-ny#,-nz#)
 next i
 //fixing mesh
SetObjectMeshFromMemblock(obj,1,mesh)
endfunction

I'm not a grumpy grandpa

Attachments

Login to view attachments

Back to top

Profile PM Email

fubarpk

Retired Moderator

19

Years of Service

User Offline

Joined: 11th Jan 2005

Playing: AGK is my friend

Posted: 22nd Feb 2019 09:21

Link

great code chafari
I also noticed if you don't want it flipped on y the following changes works
setobjectscale(2,-1,1,-1)
SetMeshMemblockVertexnormal(mesh,i,-nx#,ny#,-nz#)

fubar

Back to top

Profile PM Email Website

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 10:05

Link

Thanks fubarpk for testing

Quote: "I also noticed if you don't want it flipped on y the following changes works
setobjectscale(2,-1,1,-1)
SetMeshMemblockVertexnormal(mesh,i,-nx#,ny#,-nz#)"

Yeah...the same tha Dbpro ....but just tested here with Agk and if I do what you suggested it won't reverse the box....I suppose it must be the way different Graphic Cards work. So we never know what user finally will see on screen

I'm not a grumpy grandpa

Back to top

Profile PM Email

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 20:32

Link

Super awesome guys. Thanks so much

Back to top

Profile PM

Santman

13

Years of Service

User Offline

Joined: 15th Sep 2011

Location: Inverness

Posted: 22nd Feb 2019 21:07

Link

If you invert it, aren't you technically showing the backs of the faces? If so, raycasting and Collison may not work as the help says only front faces will be detected, something to be aware of.

Back to top

Profile PM

puzzler2018

User Banned

Posted: 22nd Feb 2019 21:12 Edited at: 22nd Feb 2019 21:13

Link

i agree.. the normals will need to be changed opposite too

nx#=-nx#
ny#=-ny#
nz#=-nz#

Or negative normals too, Will Paul be able to create a function and implement it on the next round or make the function ourselves.

Who is up for that challenge lol!!!

Tier 1 Developer

Back to top

Profile

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 21:26

Link

Unfortunately flipping the normals doesn't seem to work for my .3ds model.
I have attached the project if anyone wants to have a crack at fixing it

Attachments

Login to view attachments

Back to top

Profile PM

puzzler2018

User Banned

Posted: 22nd Feb 2019 21:31 Edited at: 22nd Feb 2019 21:32

Link

Awesome tank wheels lol

Ill quickly take a look tomorrow 21:30 here and need to chill - getting tired- sorry

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 21:36

Link

Try

// Project: tank 
// Created: 2019-02-22

#option_explicit

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "tank" )
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts
SetAmbientColor(0x80, 0x80, 0x80)
SetSunColor(0x80, 0x80, 0x80)

iti	as integer
oti as integer
tki as integer
tkm as integer
irtm as integer
iltm as integer
ortm as integer
oltm as integer

tkm = CreateObjectBox(1, 1, 1)

iti = LoadImage("its.png")
oti = LoadImage("ot.png")
SetImageWrapV(oti, 1)
SetImageWrapV(iti, 1)

irtm = LoadObject("irtrack.3ds")
ortm = LoadObject("ortrack.3ds")
SetObjectImage(ortm, oti, 0)
SetObjectImage(irtm, iti, 0)
SetObjectUVScale(irtm, 0, 1, 0.25)
SetObjectLightMode(irtm, 0)

iltm = CloneObject(irtm)
oltm = CloneObject(ortm)
SetObjectScale(iltm, -1, 1, 1)
SetObjectScale(oltm, 1, 1, 1)

FlipNormals(iltm)
FlipNormals(oltm)

SetObjectPosition(iltm, 1.1, 0, 0)
SetObjectPosition(oltm, 1.1, 0, 0)

SetObjectPosition(irtm, -1.1, 0, 0)
SetObjectPosition(ortm, -1.1, 0, 0)

FixObjectToObject(ortm, tkm)
FixObjectToObject(irtm, tkm)
FixObjectToObject(oltm, tkm)
FixObjectToObject(iltm, tkm)

oo as float = 0
io as float = 0

t as float

/*
RotateObjectLocalY(ortm, -45)
RotateObjectLocalY(irtm, -45)
*/
RotateObjectLocalY(tkm, -45)

t = Timer()

MoveCameraLocalZ(1, 10)

do
	RotateObjectLocalY(tkm, -1)
//	RotateObjectLocalY(irtm, -1)
	if Timer() - t > .05
		t = Timer()
		inc io, 1
		if io > 3
			io = 0
		endif		
		SetObjectUVOffset(irtm, 0, 0, io)
		SetObjectUVOffset(iltm, 0, 0, io)		
	endif
    inc oo, 0.02
    SetObjectUVOffset(ortm, 0, 0, oo)
    SetObjectUVOffset(oltm, 0, 0, oo)

Print( ScreenFPS() )
    Sync()
loop

function FlipNormals(obj)
	mesh as integer
	verts as integer
	nx	as float
	ny	as float
	nz	as float
	i	as integer
	
	mesh = CreateMemblockFromObjectMesh(obj,1)

verts= GetMemblockInt( mesh, 0 )
	for i= 0 to verts-1
		nx=GetMeshMemblockVertexNormalX(mesh,i)
		ny=GetMeshMemblockVertexNormalY(mesh,i)
		nz=GetMeshMemblockVertexNormalZ(mesh,i)
		SetMeshMemblockVertexnormal(mesh, i, -nx, -ny, -nz)
	next i
	 //fixing mesh
	SetObjectMeshFromMemblock(obj,1,mesh)
	
	DeleteMemblock(mesh)
endfunction obj

+ Code Snippet


// Project: tank 
// Created: 2019-02-22

#option_explicit

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "tank" )
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts
SetAmbientColor(0x80, 0x80, 0x80)
SetSunColor(0x80, 0x80, 0x80)


iti	as integer
oti as integer
tki as integer
tkm as integer
irtm as integer
iltm as integer
ortm as integer
oltm as integer


tkm = CreateObjectBox(1, 1, 1)

iti = LoadImage("its.png")
oti = LoadImage("ot.png")
SetImageWrapV(oti, 1)
SetImageWrapV(iti, 1)


irtm = LoadObject("irtrack.3ds")
ortm = LoadObject("ortrack.3ds")
SetObjectImage(ortm, oti, 0)
SetObjectImage(irtm, iti, 0)
SetObjectUVScale(irtm, 0, 1, 0.25)
SetObjectLightMode(irtm, 0)

iltm = CloneObject(irtm)
oltm = CloneObject(ortm)
SetObjectScale(iltm, -1, 1, 1)
SetObjectScale(oltm, 1, 1, 1)

FlipNormals(iltm)
FlipNormals(oltm)

SetObjectPosition(iltm, 1.1, 0, 0)
SetObjectPosition(oltm, 1.1, 0, 0)

SetObjectPosition(irtm, -1.1, 0, 0)
SetObjectPosition(ortm, -1.1, 0, 0)


FixObjectToObject(ortm, tkm)
FixObjectToObject(irtm, tkm)
FixObjectToObject(oltm, tkm)
FixObjectToObject(iltm, tkm)

oo as float = 0
io as float = 0

t as float 

/*
RotateObjectLocalY(ortm, -45)
RotateObjectLocalY(irtm, -45)
*/
RotateObjectLocalY(tkm, -45)

t = Timer()

MoveCameraLocalZ(1, 10)

do
	RotateObjectLocalY(tkm, -1)
//	RotateObjectLocalY(irtm, -1)
	if Timer() - t > .05
		t = Timer()
		inc io, 1
		if io > 3
			io = 0
		endif		
		SetObjectUVOffset(irtm, 0, 0, io)
		SetObjectUVOffset(iltm, 0, 0, io)		
	endif
    inc oo, 0.02
    SetObjectUVOffset(ortm, 0, 0, oo)
    SetObjectUVOffset(oltm, 0, 0, oo)    

    Print( ScreenFPS() )
    Sync()
loop

function FlipNormals(obj)
	mesh as integer
	verts as integer
	nx	as float
	ny	as float
	nz	as float
	i	as integer
	
	mesh = CreateMemblockFromObjectMesh(obj,1)

	verts= GetMemblockInt( mesh, 0 )
	for i= 0 to verts-1
		nx=GetMeshMemblockVertexNormalX(mesh,i)
		ny=GetMeshMemblockVertexNormalY(mesh,i)
		nz=GetMeshMemblockVertexNormalZ(mesh,i)
		SetMeshMemblockVertexnormal(mesh, i, -nx, -ny, -nz)
	next i
	 //fixing mesh
	SetObjectMeshFromMemblock(obj,1,mesh)
	
	DeleteMemblock(mesh)
endfunction obj

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 21:38

Link

+ Code Snippet

from

SetObjectScale(iltm, -1, 1, 1)
SetObjectScale(oltm, -1, 1, 1)

to
SetObjectScale(iltm, -1, 1, 1)
SetObjectScale(oltm, 1, 1, 1)

Tier 1 Developer

Back to top

Profile

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 21:47

Link

Almost. The cogs (iltm) still need to be flipped

Back to top

Profile PM

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 22:10

Link

Try this one....I think works Ok here.

//SetObjectScale(iltm, -1, 1, 1)
//SetObjectScale(oltm, -1, 1, 1)

//FlipNormals(iltm)
//FlipNormals(oltm)

SetObjectPosition(iltm, 1.1, 0, 0)
setobjectrotation(iltm,0,180,0)
SetObjectPosition(oltm, 1.1, 0, 0)
SetObjectRotation(oltm,0,180,0)

SetObjectPosition(irtm, -1.1, 0, 0)
SetObjectPosition(ortm, -1.1, 0, 0)

FixObjectToObject(ortm, tkm)
FixObjectToObject(irtm, tkm)
FixObjectToObject(oltm, tkm)
FixObjectToObject(iltm, tkm)

oo as float = 0
io as float = 0

t as float

/*
RotateObjectLocalY(ortm, -45)
RotateObjectLocalY(irtm, -45)
*/
RotateObjectLocalY(tkm, -45)

t = Timer()

MoveCameraLocalZ(1, 10)

do
	RotateObjectLocalY(tkm, -1)
//	RotateObjectLocalY(irtm, -1)
	if Timer() - t > .05
		t = Timer()
		inc io, 1
		if io > 3
			io = 0
		endif		
		SetObjectUVOffset(irtm, 0, 0, io)
		SetObjectUVOffset(iltm, 0, 0, -io)		
	endif
    inc oo, 0.02
    SetObjectUVOffset(ortm, 0, 0, oo)
    SetObjectUVOffset(oltm, 0, 0, -oo)

Print( ScreenFPS() )
    Sync()
loop

remstart
function FlipNormals(obj)
	mesh as integer
	verts as integer
	nx	as float
	ny	as float
	nz	as float
	i	as integer
	
	mesh = CreateMemblockFromObjectMesh(obj,1)

verts= GetMemblockInt( mesh, 0 )
	for i= 0 to verts-1
		nx=GetMeshMemblockVertexNormalX(mesh,i)
		ny=GetMeshMemblockVertexNormalY(mesh,i)
		nz=GetMeshMemblockVertexNormalZ(mesh,i)
		SetMeshMemblockVertexnormal(mesh, i, -nx, -ny, -nz)
	next i
	 //fixing mesh
	SetObjectMeshFromMemblock(obj,1,mesh)
	
	DeleteMemblock(mesh)
endfunction obj
remend

+ Code Snippet

//SetObjectScale(iltm, -1, 1, 1)
//SetObjectScale(oltm, -1, 1, 1)

//FlipNormals(iltm)
//FlipNormals(oltm)

SetObjectPosition(iltm, 1.1, 0, 0)
setobjectrotation(iltm,0,180,0)
SetObjectPosition(oltm, 1.1, 0, 0)
SetObjectRotation(oltm,0,180,0)

SetObjectPosition(irtm, -1.1, 0, 0)
SetObjectPosition(ortm, -1.1, 0, 0)


FixObjectToObject(ortm, tkm)
FixObjectToObject(irtm, tkm)
FixObjectToObject(oltm, tkm)
FixObjectToObject(iltm, tkm)

oo as float = 0
io as float = 0

t as float 

/*
RotateObjectLocalY(ortm, -45)
RotateObjectLocalY(irtm, -45)
*/
RotateObjectLocalY(tkm, -45)

t = Timer()

MoveCameraLocalZ(1, 10)

do
	RotateObjectLocalY(tkm, -1)
//	RotateObjectLocalY(irtm, -1)
	if Timer() - t > .05
		t = Timer()
		inc io, 1
		if io > 3
			io = 0
		endif		
		SetObjectUVOffset(irtm, 0, 0, io)
		SetObjectUVOffset(iltm, 0, 0, -io)		
	endif
    inc oo, 0.02
    SetObjectUVOffset(ortm, 0, 0, oo)
    SetObjectUVOffset(oltm, 0, 0, -oo)    

    Print( ScreenFPS() )
    Sync()
loop

remstart
function FlipNormals(obj)
	mesh as integer
	verts as integer
	nx	as float
	ny	as float
	nz	as float
	i	as integer
	
	mesh = CreateMemblockFromObjectMesh(obj,1)

	verts= GetMemblockInt( mesh, 0 )
	for i= 0 to verts-1
		nx=GetMeshMemblockVertexNormalX(mesh,i)
		ny=GetMeshMemblockVertexNormalY(mesh,i)
		nz=GetMeshMemblockVertexNormalZ(mesh,i)
		SetMeshMemblockVertexnormal(mesh, i, -nx, -ny, -nz)
	next i
	 //fixing mesh
	SetObjectMeshFromMemblock(obj,1,mesh)
	
	DeleteMemblock(mesh)
endfunction obj
remend

I'm not a grumpy grandpa

Back to top

Profile PM Email

blink0k

Moderator

11

Years of Service

User Offline

Joined: 22nd Feb 2013

Location: the land of oz

Posted: 22nd Feb 2019 22:20

Link

Ok
Thanks
I will look at it later in

Back to top

Profile PM

puzzler2018

User Banned

Posted: 22nd Feb 2019 22:27

Link

Its a little tough cookie - get one with something else whilst we figure it out

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 22:27 Edited at: 22nd Feb 2019 22:30

Link

Quote: "If you invert it, aren't you technically showing the backs of the faces?"

Not really....front or back faces deppend on how they where made clockwise or anticlockwise . The normals are only for the lights....setobjectcullmode works in the same way ...we can decide if the faces must be seeing from inside or outside ...collisision keep working correctly .

Edit

Quote: "Its a little tough cookie - get one with something else whilst we figure it out"

doesn't it work on your computer ?

I'm not a grumpy grandpa

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 22nd Feb 2019 22:29

Link

No- I think Blin0K requires the outside tracker wheels to appear as welll as the inner wheels too

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 22:33

Link

puzzler ...have you tried my last code?

I'm not a grumpy grandpa

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 22nd Feb 2019 22:39

Link

Nothing to with normals - its the vertexes mainly

eg Left

Vertex 1
Vertex 2
Vertex 3

Vertex 3
Vertex 1
Vertex 4

We need to swap

Right

Vertex 1
Vertex 3 // swap
Vertex 2 // swap

Vertex 3
Vertex 4 // swap
Vertex 1 // swap

A little tough one for the time we have

Again - who would like this challenge unless paul can do something quick for you

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 22:41

Link

Yes chafari and there should be wheels where the yellow patch is on this screen shot

Tier 1 Developer

Attachments

Login to view attachments

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 22:47 Edited at: 22nd Feb 2019 22:48

Link

Unless you make 2 objeects for the wheels loaded

1 set rotated at 0 and applied to left of each track

1 set rotated at 180 and applied to right of each track - but the UV offset is negative amount

that would be the finest and fastest solution

Im knackered so will send something in the morning along these lines

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 22:49 Edited at: 22nd Feb 2019 22:50

Link

I know what you mean puzzler but it must be something about the different graphic cards...this is what I see here .

I'm not a grumpy grandpa

Attachments

Login to view attachments

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 22nd Feb 2019 22:55

Link

I get the same - do you see a blank space inside the track wheels?

I think want here is a double wheeled track. instead of blank space in the in the wheels

like this (attahced)- Sorry its a really shabby drawing

Swap vertexes!!

Tier 1 Developer

Attachments

Login to view attachments

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 23:00

Link

What I see in screen is exactly like the animated gif

I'm not a grumpy grandpa

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:02 Edited at: 22nd Feb 2019 23:04

Link

exactly - i think required here is wheels showing on each side of a single track and then double the track up to make tank wheels

for the minute just think of one tank track.. with wheels showing on left and right of it

Lets do that first...

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:14

Link

Who knows how to flip vertexes on an object to have face in front instead of behind... Advised a bit back - Cause i need sleep shortly so cant do it right now

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 23:17 Edited at: 22nd Feb 2019 23:23

Link

To flip a 3D object we just need to scale object -1-1-1 then set object cullmode 0

Edit
What I did here, is just rotate some pieces of the tank to see it correctly. I made an animated gif showing the same as Blink0k but without the culled faced in second caterpillar .

I'm not a grumpy grandpa

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:21

Link

Spot on - that will work - i must not forget that blooming command - you done for internal spheres made for own skyboxes -dam cull mode

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:25

Link

Just tried it...

You Try it....

Enjoy the challenge.

Music time now

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 22nd Feb 2019 23:28 Edited at: 22nd Feb 2019 23:29

Link

let's try

I'm not a grumpy grandpa

Attachments

Login to view attachments

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:30 Edited at: 22nd Feb 2019 23:32

Link

You mean lets try an

FlipObject(objID, Horizontal, Vertical)

command you mean......

Yeah for sure.....
Bring it on

when do we need it by - Yesterday lololol

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:33 Edited at: 22nd Feb 2019 23:37

Link

nope... Still no inner wheels on the inside of the tracks.

Chafari.... We need to swap vertexes - please listen.... please. please

It cannot be done with the commands we have..

We can see the inner wheels of this tank... I beleive Blink0K wishes the same

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:41

Link

Who is up for the challenge...

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:45 Edited at: 22nd Feb 2019 23:48

Link

To invert a triangle is

Triangle point 1
Triangle point 2
Triangle point 3

inverted is

Triangle point 1
Triangle point 3
Triangle point 2

Dont forget the UVs

If I just did it then wouldnt be an exciting learning experience. - so im not going to

Instead im going to learn you the methods of memblocks

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 22nd Feb 2019 23:53

Link

Anyone interested????

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 23rd Feb 2019 00:10

Link

I'm on it...

I'm not a grumpy grandpa

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 23rd Feb 2019 00:13

Link

Awesome.. my good fellow - i know you wont let us down, your a great programmer.

Tier 1 Developer

Back to top

Profile

puzzler2018

User Banned

Posted: 23rd Feb 2019 00:16

Link

Where is the achievements if some poor soul did it for us.

Tier 1 Developer

Back to top

Profile

chafari

Valued Member

18

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 23rd Feb 2019 00:29 Edited at: 23rd Feb 2019 00:30

Link

Here's my last update .

// Project: tank 
// Created: 2019-02-22

#option_explicit

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "tank" )
SetWindowSize( 640, 480, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 640, 480 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts
SetAmbientColor(0x80, 0x80, 0x80)
SetSunColor(0x80, 0x80, 0x80)

iti	as integer
oti as integer
tki as integer
tkm as integer
irtm as integer
iltm as integer
ortm as integer
oltm as integer

tkm = CreateObjectBox(1, 0.1, 1)

iti = LoadImage("its.png")
oti = LoadImage("ot.png")
SetImageWrapV(oti, 1)
SetImageWrapV(iti, 1)

irtm = LoadObject("irtrack.3ds")
ortm = LoadObject("ortrack.3ds")
SetObjectImage(ortm, oti, 0)
SetObjectImage(irtm, iti, 0)
SetObjectUVScale(irtm, 0, 1, 0.25)
SetObjectLightMode(irtm, 0)

iltm = CloneObject(irtm)
oltm = CloneObject(ortm)

SetObjectPosition(iltm, 1.1, 0, 0)
setobjectrotation(iltm,0,180,0)
SetObjectPosition(oltm, 1.1, 0, 0)
SetObjectRotation(oltm,0,180,0)

SetObjectPosition(irtm, -1.1, 0, 0)
SetObjectPosition(ortm, -1.1, 0, 0)

FixObjectToObject(ortm, tkm)
FixObjectToObject(irtm, tkm)
FixObjectToObject(oltm, tkm)
FixObjectToObject(iltm, tkm)

cloneobject(40,iltm)
FixObjectToObject(40,iltm)
setobjectposition(40,0.01,0,0)

cloneobject(41,irtm)
fixobjecttoobject(41,irtm)
setobjectrotation(41,0,180,0)
setobjectposition(41,0.01,0,0)

oo as float = 0
io as float = 0

t as float

RotateObjectLocalY(tkm, -45)

t = Timer()

MoveCameraLocalZ(1, 17)
f as integer
frame as integer
do
	RotateObjectLocalY(tkm, -1)
//	RotateObjectLocalY(irtm, -1)
	if Timer() - t > .05
		t = Timer()
		inc io, 1
		if io > 3
			io = 0
		endif		
		SetObjectUVOffset(irtm, 0, 0, io)
		SetObjectUVOffset(40, 0, 0, io)	
		SetObjectUVOffset(iltm, 0, 0, -io)	
		SetObjectUVOffset(41, 0, 0, -io)		
	endif
    inc oo, 0.02
    SetObjectUVOffset(ortm, 0, 0, oo)
    SetObjectUVOffset(oltm, 0, 0, -oo)

Print( ScreenFPS() )
    Sync()
loop

+ Code Snippet

// Project: tank 
// Created: 2019-02-22

#option_explicit

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "tank" )
SetWindowSize( 640, 480, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 640, 480 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts
SetAmbientColor(0x80, 0x80, 0x80)
SetSunColor(0x80, 0x80, 0x80)


iti	as integer
oti as integer
tki as integer
tkm as integer
irtm as integer
iltm as integer
ortm as integer
oltm as integer


tkm = CreateObjectBox(1, 0.1, 1)

iti = LoadImage("its.png")
oti = LoadImage("ot.png")
SetImageWrapV(oti, 1)
SetImageWrapV(iti, 1)


irtm = LoadObject("irtrack.3ds")
ortm = LoadObject("ortrack.3ds")
SetObjectImage(ortm, oti, 0)
SetObjectImage(irtm, iti, 0)
SetObjectUVScale(irtm, 0, 1, 0.25)
SetObjectLightMode(irtm, 0)

iltm = CloneObject(irtm)
oltm = CloneObject(ortm)

SetObjectPosition(iltm, 1.1, 0, 0)
setobjectrotation(iltm,0,180,0)
SetObjectPosition(oltm, 1.1, 0, 0)
SetObjectRotation(oltm,0,180,0)

SetObjectPosition(irtm, -1.1, 0, 0)
SetObjectPosition(ortm, -1.1, 0, 0)


FixObjectToObject(ortm, tkm)
FixObjectToObject(irtm, tkm)
FixObjectToObject(oltm, tkm)
FixObjectToObject(iltm, tkm)

cloneobject(40,iltm)
FixObjectToObject(40,iltm)
setobjectposition(40,0.01,0,0)

cloneobject(41,irtm)
fixobjecttoobject(41,irtm)
setobjectrotation(41,0,180,0)
setobjectposition(41,0.01,0,0)

oo as float = 0
io as float = 0

t as float 


RotateObjectLocalY(tkm, -45)

t = Timer()

MoveCameraLocalZ(1, 17)
f as integer
frame as integer
do
	RotateObjectLocalY(tkm, -1)
//	RotateObjectLocalY(irtm, -1)
	if Timer() - t > .05
		t = Timer()
		inc io, 1
		if io > 3
			io = 0
		endif		
		SetObjectUVOffset(irtm, 0, 0, io)
		SetObjectUVOffset(40, 0, 0, io)	
		SetObjectUVOffset(iltm, 0, 0, -io)	
		SetObjectUVOffset(41, 0, 0, -io)		
	endif
    inc oo, 0.02
    SetObjectUVOffset(ortm, 0, 0, oo)
    SetObjectUVOffset(oltm, 0, 0, -oo)    

    Print( ScreenFPS() )
    Sync()
loop

I'm not a grumpy grandpa

Attachments

Login to view attachments

Back to top

Profile PM Email

puzzler2018

User Banned

Posted: 23rd Feb 2019 00:33

Link

congratulations - you onto the winner

Tier 1 Developer

Back to top

Profile

Sorry your browser is not supported!

AppGameKit Classic Chat / Flip a 3D object

Attachments

Attachments

Attachments

Attachments

Attachments

Attachments

Attachments

Attachments