Newton Building - GameCreators Forum

Author

Message

NeX the Fairly Fast Ferret

19

Years of Service

User Offline

Joined: 10th Apr 2005

Location: The Fifth Plane of Oblivion

Posted: 4th Apr 2006 23:28

Link

WARNING! CREATES .PNGS AT ABOUT A MB EVERY 100 FRAMES!

Rem Project: cityscape
Rem Created: 02/04/2006 18:39:23

Rem ***** Main Source File *****
sync rate 60 : sync on
NDB_NewtonCreate

NDB_SetVector 0.0, -50.0, 0.0
NDB_SetStandardGravity

col = NDB_NewtonCreateBox( 128, 1.0, 128 )
   Floored = NDB_NewtonCreateBody( col )
   NDB_BuildMatrix 0.0, 0.0, 0.0, 0, -1, 0
   NDB_NewtonBodySetMAtrix Floored
   make object box 1,128,1,128
   position object 1, 0, -1.0, 0
   scale object texture 1, 10.0, 10.0
   texture object 1, 1
   NDB_NewtonBodySetDestructorCallback Floored
   NDB_BodySetDBProData Floored, 1
   FloorObj = 1

col = NDB_NewtonCreateBox( 128, 1.0, 128 )
   Floored = NDB_NewtonCreateBody( col )
   NDB_BuildMatrix 45.0, 0.0, 0.0, 0, -1, -64
   NDB_NewtonBodySetMAtrix Floored
   make object box 2,128,1,128
   position object 2, 0, -1.0, -64
   rotate object 2,45,0,0

NDB_NewtonBodySetDestructorCallback Floored
   NDB_BodySetDBProData Floored, 2

col = NDB_NewtonCreatesphere( 16, 16, 16 )
   Floored = NDB_NewtonCreateBody( col )
   NDB_BuildMatrix 0.0, 0.0, 0.0, 0, 17, -48
   NDB_NewtonBodySetMAtrix Floored
   NDB_CalculateMIsphereSolid 275, 16
   NDB_NewtonBodySetMassMatrix floored, 275

NDB_NewtonReleaseCollision Col
   make object sphere 3,32
   position object 3, 0, 17, -48

NDB_NewtonBodySetDestructorCallback Floored
   NDB_BodySetDBProData Floored, 3

NDB_BodySetGravity floored, 1
NDB_SetVector 0, 0,1000
NDB_NewtonBodySetVelocity floored
   autocam off
b=3
for fl = 0 to 3

make object box b+1,30,1,2 : position object b+1,0,fl*8,20 : newtonbox(b+1,0,fl*8,20,30,1,2,25)
make object box b+2,30,1,2 : position object b+2,0,fl*8,-20 : newtonbox(b+2,0,fl*8,-20,30,1,2,25)
make object box b+3,2,1,30 : position object b+3,20,fl*8,0 : newtonbox(b+3,20,fl*8,0,2,1,30,25)
make object box b+4,2,1,30 : position object b+4,-20,fl*8,0 : newtonbox(b+4,-20,fl*8,0,2,1,30,25)

make object box b+5,5,7,5 : position object b+5,18,(fl+0.5)*8,18 : newtonbox(b+5,18,(fl+0.5)*8,18,5,7,5,25)
make object box b+6,5,7,5 : position object b+6,18,(fl+0.5)*8,-18 : newtonbox(b+6,18,(fl+0.5)*8,-18,5,7,5,25)
make object box b+7,5,7,5 : position object b+7,-18,(fl+0.5)*8,18 : newtonbox(b+7,-18,(fl+0.5)*8,18,5,7,5,25)
make object box b+8,5,7,5 : position object b+8,-18,(fl+0.5)*8,-18 : newtonbox(b+8,-18,(fl+0.5)*8,-18,5,7,5,25)

make object box b+9,6,1,6 : position object b+9,18,(fl)*8,18 : newtonbox(b+9,18,(fl)*8,18,6,1,6,25)
make object box b+10,6,1,6 : position object b+10,18,(fl)*8,-18 : newtonbox(b+10,18,(fl)*8,-18,6,1,6,25)
make object box b+11,6,1,6 : position object b+11,-18,(fl)*8,18 : newtonbox(b+11,-18,(fl)*8,18,6,1,6,25)
make object box b+12,6,1,6 : position object b+12,-18,(fl)*8,-18 : newtonbox(b+12,-18,(fl)*8,-18,6,1,6,25)

make object box b+13,4,7,4 : position object b+13,9,(fl+0.5)*8,9 : newtonbox(b+13,9,(fl+0.5)*8,9,4,7,4,25)
make object box b+14,4,7,4 : position object b+14,9,(fl+0.5)*8,-9 : newtonbox(b+14,9,(fl+0.5)*8,-9,4,7,4,25)
make object box b+15,4,7,4 : position object b+15,-9,(fl+0.5)*8,9 : newtonbox(b+15,-9,(fl+0.5)*8,9,4,7,4,25)
make object box b+16,4,7,4 : position object b+16,-9,(fl+0.5)*8,-9 : newtonbox(b+16,-9,(fl+0.5)*8,-9,4,7,4,25)
make object box b+17,30,1,30 : position object b+17,0,(fl)*8,0 : newtonbox(b+17,0,(fl)*8,0,40,1,30,10)

inc b,20
for a=-16 to 12 step 4
if a>-16
make object box b,1,7,1 : position object b,a,(fl+0.5)*8,20 : newtonbox(b,a,(fl+0.5)*8,20,1,7,1,15)
make object box b+1,1,7,1 : position object b+1,a,(fl+0.5)*8,-20 : newtonbox(b+1,a,(fl+0.5)*8,-20,1,7,1,15)
make object box b+2,1,7,1 : position object b+2,20,(fl+0.5)*8,a : newtonbox(b+2,20,(fl+0.5)*8,a,1,7,1,15)
make object box b+3,1,7,1 : position object b+3,-20,(fl+0.5)*8,a : newtonbox(b+3,-20,(fl+0.5)*8,a,1,7,1,15)
endif
make object box b+4,3,7,0.25 : position object b+4,a+2,(fl+0.5)*8,20 : ghost object on b+4 : newtonbox(b+4,a+2,(fl+0.5)*8,20,3,7,0.25,5)
make object box b+5,3,7,0.25 : position object b+5,a+2,(fl+0.5)*8,-20 : ghost object on b+5 : newtonbox(b+5,a+2,(fl+0.5)*8,-20,3,7,0.25,5)
make object box b+6,0.25,7,3 : position object b+6,20,(fl+0.5)*8,a+2 : ghost object on b+6 : newtonbox(b+6,20,(fl+0.5)*8,a+2,3,7,0.25,5)
make object box b+7,0.25,7,3 : position object b+7,-20,(fl+0.5)*8,a+2 : ghost object on b+7 : newtonbox(b+7,-20,(fl+0.5)*8,a+2,3,7,0.25,5)

inc b,8
next a

next fl
time# = NDB_GetElapsedTimeInSec()
time# = NDB_GetElapsedTimeInSec()

do

time# = NDB_GetElapsedTimeInSec()
      NDB_NewtonUpdate time#

position camera 64,8,-16
point camera object position x(3),8,object position z(3)
get image 50,0,0,320,240,1
save image str$(frames)+".PNG",50
inc frames
set cursor 1,1
print frames

sync
loop

function newtonbox(obj,posx#,posy#,posz#,sizex#,sizey#,sizez#,mass#)
   Col = NDB_NewtonCreateBox(sizex#, sizey#, sizez#)
   Body = NDB_NewtonCreateBody(Col)

NDB_BuildMatrix 0, 0, 0, posx#, posy#, posz#
   NDB_NewtonBodySetMatrix Body

NDB_CalculateMIBoxSolid mass#, sizeX#, sizey#, sizez#
   NDB_NewtonBodySetMassMatrix Body, mass#

NDB_NewtonReleaseCollision Col

NDB_BodySetDBProData Body, obj

NDB_NewtonBodySetDestructorCallback Body

NDB_BodySetGravity Body, 1

endfunction

+ Code Snippet

Rem Project: cityscape
Rem Created: 02/04/2006 18:39:23

Rem ***** Main Source File *****
sync rate 60 : sync on
NDB_NewtonCreate


NDB_SetVector 0.0, -50.0, 0.0
NDB_SetStandardGravity

   col = NDB_NewtonCreateBox( 128, 1.0, 128 )
   Floored = NDB_NewtonCreateBody( col )
   NDB_BuildMatrix 0.0, 0.0, 0.0, 0, -1, 0
   NDB_NewtonBodySetMAtrix Floored
   make object box 1,128,1,128
   position object 1, 0, -1.0, 0
   scale object texture 1, 10.0, 10.0
   texture object 1, 1
   NDB_NewtonBodySetDestructorCallback Floored
   NDB_BodySetDBProData Floored, 1
   FloorObj = 1

   col = NDB_NewtonCreateBox( 128, 1.0, 128 )
   Floored = NDB_NewtonCreateBody( col )
   NDB_BuildMatrix 45.0, 0.0, 0.0, 0, -1, -64
   NDB_NewtonBodySetMAtrix Floored
   make object box 2,128,1,128
   position object 2, 0, -1.0, -64
   rotate object 2,45,0,0

   NDB_NewtonBodySetDestructorCallback Floored
   NDB_BodySetDBProData Floored, 2


   col = NDB_NewtonCreatesphere( 16, 16, 16 )
   Floored = NDB_NewtonCreateBody( col )
   NDB_BuildMatrix 0.0, 0.0, 0.0, 0, 17, -48
   NDB_NewtonBodySetMAtrix Floored
   NDB_CalculateMIsphereSolid 275, 16
   NDB_NewtonBodySetMassMatrix floored, 275


   NDB_NewtonReleaseCollision Col
   make object sphere 3,32
   position object 3, 0, 17, -48


   NDB_NewtonBodySetDestructorCallback Floored
   NDB_BodySetDBProData Floored, 3

   NDB_BodySetGravity floored, 1
NDB_SetVector 0, 0,1000
NDB_NewtonBodySetVelocity floored
   autocam off
b=3
for fl = 0 to 3

make object box b+1,30,1,2 : position object b+1,0,fl*8,20 : newtonbox(b+1,0,fl*8,20,30,1,2,25)
make object box b+2,30,1,2 : position object b+2,0,fl*8,-20 : newtonbox(b+2,0,fl*8,-20,30,1,2,25)
make object box b+3,2,1,30 : position object b+3,20,fl*8,0 : newtonbox(b+3,20,fl*8,0,2,1,30,25)
make object box b+4,2,1,30 : position object b+4,-20,fl*8,0 : newtonbox(b+4,-20,fl*8,0,2,1,30,25)

make object box b+5,5,7,5 : position object b+5,18,(fl+0.5)*8,18 : newtonbox(b+5,18,(fl+0.5)*8,18,5,7,5,25)
make object box b+6,5,7,5 : position object b+6,18,(fl+0.5)*8,-18 : newtonbox(b+6,18,(fl+0.5)*8,-18,5,7,5,25)
make object box b+7,5,7,5 : position object b+7,-18,(fl+0.5)*8,18 : newtonbox(b+7,-18,(fl+0.5)*8,18,5,7,5,25)
make object box b+8,5,7,5 : position object b+8,-18,(fl+0.5)*8,-18 : newtonbox(b+8,-18,(fl+0.5)*8,-18,5,7,5,25)

make object box b+9,6,1,6 : position object b+9,18,(fl)*8,18 : newtonbox(b+9,18,(fl)*8,18,6,1,6,25)
make object box b+10,6,1,6 : position object b+10,18,(fl)*8,-18 : newtonbox(b+10,18,(fl)*8,-18,6,1,6,25)
make object box b+11,6,1,6 : position object b+11,-18,(fl)*8,18 : newtonbox(b+11,-18,(fl)*8,18,6,1,6,25)
make object box b+12,6,1,6 : position object b+12,-18,(fl)*8,-18 : newtonbox(b+12,-18,(fl)*8,-18,6,1,6,25)

make object box b+13,4,7,4 : position object b+13,9,(fl+0.5)*8,9 : newtonbox(b+13,9,(fl+0.5)*8,9,4,7,4,25)
make object box b+14,4,7,4 : position object b+14,9,(fl+0.5)*8,-9 : newtonbox(b+14,9,(fl+0.5)*8,-9,4,7,4,25)
make object box b+15,4,7,4 : position object b+15,-9,(fl+0.5)*8,9 : newtonbox(b+15,-9,(fl+0.5)*8,9,4,7,4,25)
make object box b+16,4,7,4 : position object b+16,-9,(fl+0.5)*8,-9 : newtonbox(b+16,-9,(fl+0.5)*8,-9,4,7,4,25)
make object box b+17,30,1,30 : position object b+17,0,(fl)*8,0 : newtonbox(b+17,0,(fl)*8,0,40,1,30,10)

inc b,20
for a=-16 to 12 step 4
if a>-16
make object box b,1,7,1 : position object b,a,(fl+0.5)*8,20 : newtonbox(b,a,(fl+0.5)*8,20,1,7,1,15)
make object box b+1,1,7,1 : position object b+1,a,(fl+0.5)*8,-20 : newtonbox(b+1,a,(fl+0.5)*8,-20,1,7,1,15)
make object box b+2,1,7,1 : position object b+2,20,(fl+0.5)*8,a : newtonbox(b+2,20,(fl+0.5)*8,a,1,7,1,15)
make object box b+3,1,7,1 : position object b+3,-20,(fl+0.5)*8,a : newtonbox(b+3,-20,(fl+0.5)*8,a,1,7,1,15)
endif
make object box b+4,3,7,0.25 : position object b+4,a+2,(fl+0.5)*8,20 : ghost object on b+4 : newtonbox(b+4,a+2,(fl+0.5)*8,20,3,7,0.25,5)
make object box b+5,3,7,0.25 : position object b+5,a+2,(fl+0.5)*8,-20 : ghost object on b+5 : newtonbox(b+5,a+2,(fl+0.5)*8,-20,3,7,0.25,5)
make object box b+6,0.25,7,3 : position object b+6,20,(fl+0.5)*8,a+2 : ghost object on b+6 : newtonbox(b+6,20,(fl+0.5)*8,a+2,3,7,0.25,5)
make object box b+7,0.25,7,3 : position object b+7,-20,(fl+0.5)*8,a+2 : ghost object on b+7 : newtonbox(b+7,-20,(fl+0.5)*8,a+2,3,7,0.25,5)

inc b,8
next a

next fl
time# = NDB_GetElapsedTimeInSec()
time# = NDB_GetElapsedTimeInSec()

do

   time# = NDB_GetElapsedTimeInSec()
      NDB_NewtonUpdate time#


position camera 64,8,-16
point camera object position x(3),8,object position z(3)
get image 50,0,0,320,240,1
save image str$(frames)+".PNG",50
inc frames
set cursor 1,1
print frames

sync
loop

function newtonbox(obj,posx#,posy#,posz#,sizex#,sizey#,sizez#,mass#)
   Col = NDB_NewtonCreateBox(sizex#, sizey#, sizez#)
   Body = NDB_NewtonCreateBody(Col)

   NDB_BuildMatrix 0, 0, 0, posx#, posy#, posz#
   NDB_NewtonBodySetMatrix Body

   NDB_CalculateMIBoxSolid mass#, sizeX#, sizey#, sizez#
   NDB_NewtonBodySetMassMatrix Body, mass#


   NDB_NewtonReleaseCollision Col






   NDB_BodySetDBProData Body, obj

   NDB_NewtonBodySetDestructorCallback Body

   NDB_BodySetGravity Body, 1


endfunction

Requires Newton Wrapper.

To watch saved video, sort the images by modified date, use the XP image previewer, and hold right.

Creates a building and destroys it with a cannonball. No media.

At least farting ferrets are better than stinky stoats.

Back to top

Profile PM Website

Jedi Lord

20

Years of Service

User Offline

Joined: 11th Jun 2004

Location: Jedi Temple

Posted: 9th Apr 2006 02:04

Link

: / I have newton collision system... but it don't work on my all 3 verison... fix your verison on newton to verison 4.2.

Whoa... I like a shiny thing...

Back to top

Profile PM

NeX the Fairly Fast Ferret

19

Years of Service

User Offline

Joined: 10th Apr 2005

Location: The Fifth Plane of Oblivion

Posted: 24th Apr 2006 21:53 Edited at: 24th Apr 2006 21:54

Link

Anyone got it working?
Jedi Lord: I think the problem is that your pc is running out of memory.

At least farting ferrets are better than stinky stoats.

Back to top

Profile PM Website

Doctor Duddits

19

Years of Service

User Offline

Joined: 9th Feb 2005

Location:

Posted: 25th Apr 2006 15:38

Link

Can you check your code snippets?

I see you...I think...with me anything is possible...and you can do anything...anything...

Back to top

Profile PM

NeX the Fairly Fast Ferret

19

Years of Service

User Offline

Joined: 10th Apr 2005

Location: The Fifth Plane of Oblivion

Posted: 28th Apr 2006 21:30

Link

I have and on mine it works perfectly (although at 5FPS)

At least farting ferrets are better than stinky stoats.

Back to top

Profile PM Website

3Nigma

18

Years of Service

User Offline

Joined: 23rd Apr 2006

Location: RoManiA

Posted: 12th May 2006 23:21 Edited at: 12th May 2006 23:22

Link

yeah...the code works for me

Nice windows !

Anyway...for those who can't see Nex's code in action...here's a link with a movie that i made that "captures" Nex's code in action

!

Link: http://www.filefactory.com/get/feed/begin.php?f=534883&b=5&c=de83974c481a72078

Knowledge belongs to the world...but not this time

Back to top

Profile PM Website

Hawkeye

21

Years of Service

User Offline

Joined: 19th Sep 2003

Location: SC, USA

Posted: 13th May 2006 00:33

Link

Make sure that you -
a) save the code (.dba AND .dbpro) in a directory somewhere
b) put Newton.dll (you can find it in the Program Announcements board) into that directory

Works fine with me, good work making the building thingee

I am but mad north north-west; when the wind is southerly I know a hawk from a handsaw - Hamlet, Hamlet

Back to top

Profile PM Email Website

CuCuMBeR

21

Years of Service

User Offline

Joined: 11th Jan 2003

Location: Turkey

Posted: 16th May 2006 12:38

Link

whats the point of making images? why not watch it real time?

Too Sexy

Back to top

Profile PM

NeX the Fairly Fast Ferret

19

Years of Service

User Offline

Joined: 10th Apr 2005

Location: The Fifth Plane of Oblivion

Posted: 17th May 2006 21:01

Link

Because realtime you get 1-2FPS.

<OMG>

</OMG>
NeX, you cant be serious - CattleRustler.

Back to top

Profile PM Website

CuCuMBeR

21

Years of Service

User Offline

Joined: 11th Jan 2003

Location: Turkey

Posted: 17th May 2006 23:15

Link

no i get high enough. 39-59 fps

geforce fx 5200, p4.2400, 766 DDR ram 400mhz, XP SP2, dx9c latest version

Too Sexy

Back to top

Profile PM

3Nigma

18

Years of Service

User Offline

Joined: 23rd Apr 2006

Location: RoManiA

Posted: 17th May 2006 23:53

Link

Yes...you got a point there...YOU get enough ... but what about others?

Knowledge belongs to the world...but not this time

Back to top

Profile PM Website

CuCuMBeR

21

Years of Service

User Offline

Joined: 11th Jan 2003

Location: Turkey

Posted: 18th May 2006 09:35

Link

why do i believe NeX the Fairly Fast Ferret and 3Nigma are the same person...

geforce fx 5200, p4.2400, 766 DDR ram 400mhz, XP SP2, dx9c latest version is an underaverage computer nowadays..
anyways

Too Sexy

Back to top

Profile PM

3Nigma

18

Years of Service

User Offline

Joined: 23rd Apr 2006

Location: RoManiA

Posted: 19th May 2006 00:28

Link

CuCuMBer

Nope...I am I and NeX is Nex.What gave you that impression?

Knowledge belongs to the world...but not this time

Back to top

Profile PM Website

Sorry your browser is not supported!

Code Snippets / Newton Building