Sorry your browser is not supported!

You are using an outdated browser that does not support modern web technologies, in order to use this site please update to a new browser.

Browsers supported include Chrome, FireFox, Safari, Opera, Internet Explorer 10+ or Microsoft Edge.

developer forums

Dark Physics & Dark A.I. & Dark Dynamix / [STICKY] Dark Physics Materials

Author

Message

BatVink

Moderator

21

Years of Service

User Offline

Joined: 4th Apr 2003

Location: Gods own County, UK

Posted: 11th Aug 2006 14:03

Following from Mike's lead, I think it would be good for people to post Material settings they have found to work well. For example, you may have a combination that replicates plastic, polished steel or rubber to perfection. I would start the ball rolling, but I haven't worked out the best material for a rolling ball yet

Back to top

Profile PM Email

HowDo

21

Years of Service

User Offline

Joined: 28th Nov 2002

Location: United Kingdom

Posted: 11th Aug 2006 14:12 Edited at: 11th Aug 2006 14:27

Quote: "but I haven't worked out the best material for a rolling ball yet "

Maybe because they are all diffrent.

I did start a thread but the word Material got spelt wrong in the title.

so heres a re-post of them.
So to start these are some I have found going through the demos.
(Thanks to TGC Team for the ones they have made below.)

`'hardplastic' (fairly bouncy low friction rating)

  phy make material id,"hardsmooth"
   phy set material dynamic friction id,0.2
   phy set material static friction id,0.2
   phy set material restitution id,0.2
   phy build material id

`brick

phy make material brickmaterial, "brick"
 phy set material static friction id, 25.0
 phy set material restitution id, 0.0
 phy set material dynamic friction id, 1.0
 phy build material id

make non-bouncy material

phy make material id,"brick"
phy set material restitution id,0
phy build material id

make material no bounce

nobouncematerial=1
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,0.1
phy build material nobouncematerial

Create a testball

matid=1  
phy make material matid,"bouncy"
phy set material restitution matid,1
phy build material matid

make sticky

phy make material 1, "sticky"
sticky=1
phy set material static friction sticky, 25.0
phy set material restitution sticky, 0.0
phy set material dynamic friction stick, 1.0
phy build material stick
`

make hardrubber' (semi bouncy material high in friction)

hardrubber=1
  phy make material hardrubber,"hardrubber"
   phy set material dynamic friction hardrubber,0.0
   phy set material static friction hardrubber,0.0
   phy set material restitution hardrubber,1.0
   phy build material hardrubber

make hardwood

hardwood=1
phy make material hardwood,"hardwood"
phy set material static friction hardwood,0.4
phy set material dynamic friction hardwood,0.4
phy set material restitution hardwood,0.2
phy build material hardwood

make concrete

concrete=1
phy make material concrete,"concrete"
phy set material static friction concrete,0.75
phy set material dynamic friction 3concrete,0.75
phy set material restitution concrete,0.1
phy build material concrete

make a bouncy material very bouncy

vbouncy=1
phy make material vbouncy, "very bouncy"
phy set material restitution vbouncy, 1.0
phy build material vbouncy

make a less bouncy material

lbouncy=1
phy make material lbouncy, "less bouncy"
phy set material restitution lbouncy, 0.5
phy build material lbouncy

and finally a material with no bounce

nbounce=1
phy make material nbounce, "no bounce"
phy set material restitution nbounce, 0.0
phy build material nbounce

make a material with null name

id=1
phy make material id, ""
phy set material static friction id, 0.01
phy set material dynamic friction id, 0.01
phy build material id

make glass

glass=1
phy make material glass,"glass"
phy set material static friction glass,0.1
phy set material dynamic friction glass,0.1
phy set material restitution glass,0.25
phy build material glass

Dark Physics makes any hot drink go cold.

Back to top

Profile PM

HowDo

21

Years of Service

User Offline

Joined: 28th Nov 2002

Location: United Kingdom

Posted: 12th Aug 2006 20:33 Edited at: 17th Aug 2006 16:14

This might help in seeing what your material acts like.

Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=1000
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 125.0
phy set material restitution sticky, 0.0
phy set material dynamic friction sticky, 1.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,0.1
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,10,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4
do
center text screen width()/2,0,"Dark Physics Material Tester"
if spacekey()
   phy set rigid body position 2, 10, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
endif
control camera using arrowkeys 0,.1,.1
phy update
sync
loop

Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=1000
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 125.0
phy set material restitution sticky, 0.0
phy set material dynamic friction sticky, 1.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,0.1
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,10,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4
do
center text screen width()/2,0,"Dark Physics Material Tester"
if spacekey()
   phy set rigid body position 2, 10, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
endif
control camera using arrowkeys 0,.1,.1
phy update
sync
loop

edit
new improved version now has a launch trigger.

Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=100
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 10525.0
phy set material restitution sticky, 1.0
phy set material dynamic friction sticky, 10000.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,0.1
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,16,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4

make object box 5,100,1,6
rotate object 5,90,90,0
position object 5,11,15,0
color object 5,RGB(0,0,255)
phy make rigid body static box 5
do
center text screen width()/2,0,"Dark Physics Material Tester"
center text screen width()/2,10,"Press Return to launch - Spacebar to Reset."
text 5,25,"Mass# of sphere="+str$(mass#)
text 5,35,"first  material static friction="+str$(phy get material static friction(1))
text 5,45,"second material static friction="+str$(phy get material static friction(2))
text 5,55,"first  material material restitution="+str$(phy get material restitution(1))
text 5,65,"second material material restitution="+str$(phy get material restitution(2))
text 5,75,"first  material material dynamic friction="+str$(phy get material dynamic friction(1))
text 5,85,"second material material dynamic friction="+str$(phy get material dynamic friction(2))
text 5,95,"Sphere linear momentum x ="+str$(phy get rigid body linear momentum x ( 2 ))
text 5,105,"Sphere linear momentum y ="+str$(phy get rigid body linear momentum y ( 2 ))
text 5,115,"Sphere linear momentum z ="+str$(phy get rigid body linear momentum z ( 2 ))
text 5,125,"Sphere linear velocity x  ="+str$(phy get rigid body linear velocity x ( 2 ))
text 5,135,"Sphere linear velocity y  ="+str$(phy get rigid body linear velocity y ( 2 ))
text 5,145,"Sphere linear velocity z  ="+str$(phy get rigid body linear velocity z ( 2 ))

rem phy set material dynamic friction
if returnkey()
phy set rigid body position 5,11,50,0
endif
if spacekey()
phy set rigid body position 5,11,15,0
   phy set rigid body position 2, 16, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
endif
control camera using arrowkeys 0,.1,.1
phy update
sync
loop

Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=100
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 10525.0
phy set material restitution sticky, 1.0
phy set material dynamic friction sticky, 10000.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,0.1
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,16,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4

make object box 5,100,1,6
rotate object 5,90,90,0
position object 5,11,15,0
color object 5,RGB(0,0,255)
phy make rigid body static box 5
do
center text screen width()/2,0,"Dark Physics Material Tester"
center text screen width()/2,10,"Press Return to launch - Spacebar to Reset."
text 5,25,"Mass# of sphere="+str$(mass#)
text 5,35,"first  material static friction="+str$(phy get material static friction(1))
text 5,45,"second material static friction="+str$(phy get material static friction(2))
text 5,55,"first  material material restitution="+str$(phy get material restitution(1))
text 5,65,"second material material restitution="+str$(phy get material restitution(2))
text 5,75,"first  material material dynamic friction="+str$(phy get material dynamic friction(1))
text 5,85,"second material material dynamic friction="+str$(phy get material dynamic friction(2))
text 5,95,"Sphere linear momentum x ="+str$(phy get rigid body linear momentum x ( 2 ))
text 5,105,"Sphere linear momentum y ="+str$(phy get rigid body linear momentum y ( 2 ))
text 5,115,"Sphere linear momentum z ="+str$(phy get rigid body linear momentum z ( 2 ))
text 5,125,"Sphere linear velocity x  ="+str$(phy get rigid body linear velocity x ( 2 ))
text 5,135,"Sphere linear velocity y  ="+str$(phy get rigid body linear velocity y ( 2 ))
text 5,145,"Sphere linear velocity z  ="+str$(phy get rigid body linear velocity z ( 2 ))

rem phy set material dynamic friction
if returnkey()
phy set rigid body position 5,11,50,0
endif
if spacekey()
phy set rigid body position 5,11,15,0
   phy set rigid body position 2, 16, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
endif
control camera using arrowkeys 0,.1,.1
phy update
sync
loop

now with a sphere drop as well as roll.

Rem Project: phymaterialtest3
Rem Created: 16/08/2006 05:03:09

Rem ***** Main Source File *****
Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=100
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 105250000.0
phy set material restitution sticky, 0.0
phy set material dynamic friction sticky, 1000000000.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,1.0
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,16,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4

make object box 5,100,1,6
rotate object 5,90,90,0
position object 5,11,15,0
color object 5,RGB(0,0,255)
phy make rigid body static box 5

make object sphere 6,6
position object 6,-10,100,0
phy make rigid body dynamic sphere 6,2

make object box 7,10,1,10
position object 7,-10,99.9,0
phy make rigid body static box 7

do
center text screen width()/2,0,"Dark Physics Material Tester"
center text screen width()/2,10,"Press 'r' to roll - 'd' to drop sphere - 'b' do both - Spacebar to Reset."
text 5,25,"Mass# of sphere"
text 5,35,"      "+str$(mass#)

text 5,45,"ground  material"
text 5,55,"static friction = "+str$(phy get material static friction(1))
text 5,65,"restitution.... = "+str$(phy get material restitution(1))
text 5,75,"dynamic friction= "+str$(phy get material dynamic friction(1))

text 255,45,"Sphere 1 Material"
text 255,55,"static friction  ="+str$(phy get material static friction(2))
text 255,65,"restitution..... ="+str$(phy get material restitution(2))
text 255,75,"dynamic friction ="+str$(phy get material dynamic friction(2))

text 5,95,"Sphere linear momentum"
text 5,105,"x = "+str$(phy get rigid body linear momentum x ( 2 ))
text 5,115,"y = "+str$(phy get rigid body linear momentum y ( 2 ))
text 5,125,"z = "+str$(phy get rigid body linear momentum z ( 2 ))

text 205,95,"Sphere linear velocity"
text 205,105,"x = "+str$(phy get rigid body linear velocity x ( 2 ))
text 205,115,"y = "+str$(phy get rigid body linear velocity y ( 2 ))
text 205,125,"z = "+str$(phy get rigid body linear velocity z ( 2 ))

rem phy set material dynamic friction
if inkey$()="r"
   phy set rigid body position 5,11,50,0
endif
if inkey$()="d"
   phy set rigid body position 7,11,99.9,0
endif

if inkey$()="b"
 phy set rigid body position 5,11,50,0
 phy set rigid body position 7,11,99.9,0
 endif
if spacekey()
   phy set rigid body position 5,11,15,0
   phy set rigid body position 2, 16, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
   phy set rigid body position 6,-10,100,0
   phy set rigid body position 7,-10,99.9,0
   phy set rigid body linear momentum 6, 0.0, 0.0, 0.0
endif

if object in screen(2)=1 then center text object screen x(2),object screen y(2)-30,"Sphere 1"
if object in screen(6)=1 then center text object screen x(6),object screen y(6)-30,"Sphere 2"

control camera using arrowkeys 0,.1,.1
phy update
sync
loop

Rem Project: phymaterialtest3
Rem Created: 16/08/2006 05:03:09

Rem ***** Main Source File *****
Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=100
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 105250000.0
phy set material restitution sticky, 0.0
phy set material dynamic friction sticky, 1000000000.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,1.0
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,16,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4

make object box 5,100,1,6
rotate object 5,90,90,0
position object 5,11,15,0
color object 5,RGB(0,0,255)
phy make rigid body static box 5

make object sphere 6,6
position object 6,-10,100,0
phy make rigid body dynamic sphere 6,2

make object box 7,10,1,10
position object 7,-10,99.9,0
phy make rigid body static box 7

do
center text screen width()/2,0,"Dark Physics Material Tester"
center text screen width()/2,10,"Press 'r' to roll - 'd' to drop sphere - 'b' do both - Spacebar to Reset."
text 5,25,"Mass# of sphere"
text 5,35,"      "+str$(mass#)

text 5,45,"ground  material"
text 5,55,"static friction = "+str$(phy get material static friction(1))
text 5,65,"restitution.... = "+str$(phy get material restitution(1))
text 5,75,"dynamic friction= "+str$(phy get material dynamic friction(1))

text 255,45,"Sphere 1 Material"
text 255,55,"static friction  ="+str$(phy get material static friction(2))
text 255,65,"restitution..... ="+str$(phy get material restitution(2))
text 255,75,"dynamic friction ="+str$(phy get material dynamic friction(2))

text 5,95,"Sphere linear momentum"
text 5,105,"x = "+str$(phy get rigid body linear momentum x ( 2 ))
text 5,115,"y = "+str$(phy get rigid body linear momentum y ( 2 ))
text 5,125,"z = "+str$(phy get rigid body linear momentum z ( 2 ))

text 205,95,"Sphere linear velocity"
text 205,105,"x = "+str$(phy get rigid body linear velocity x ( 2 ))
text 205,115,"y = "+str$(phy get rigid body linear velocity y ( 2 ))
text 205,125,"z = "+str$(phy get rigid body linear velocity z ( 2 ))

rem phy set material dynamic friction
if inkey$()="r"
   phy set rigid body position 5,11,50,0
endif
if inkey$()="d"
   phy set rigid body position 7,11,99.9,0
endif

if inkey$()="b"
 phy set rigid body position 5,11,50,0
 phy set rigid body position 7,11,99.9,0
 endif
if spacekey()
   phy set rigid body position 5,11,15,0
   phy set rigid body position 2, 16, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
   phy set rigid body position 6,-10,100,0
   phy set rigid body position 7,-10,99.9,0
   phy set rigid body linear momentum 6, 0.0, 0.0, 0.0
endif

if object in screen(2)=1 then center text object screen x(2),object screen y(2)-30,"Sphere 1"
if object in screen(6)=1 then center text object screen x(6),object screen y(6)-30,"Sphere 2"

control camera using arrowkeys 0,.1,.1
phy update
sync
loop

Dark Physics makes any hot drink go cold.

Back to top

Profile PM

The Old Man

21

Years of Service

User Offline

Joined: 24th Aug 2003

Location: Ct., USA

Posted: 12th Aug 2006 21:32

HowDo - Nice Addition to Dark Physics Testing

Back to top

Profile PM

HowDo

21

Years of Service

User Offline

Joined: 28th Nov 2002

Location: United Kingdom

Posted: 12th Aug 2006 21:34 Edited at: 12th Aug 2006 21:48

Cheers , as a note change the mass and it will show up quicker what will happen.

If anyone could put a GUI thingy into it so you rise a lower the number on the objects, what ever you call them, then press space to see what happens

Dark Physics makes any hot drink go cold.

Back to top

Profile PM

HowDo

21

Years of Service

User Offline

Joined: 28th Nov 2002

Location: United Kingdom

Posted: 17th Aug 2006 16:31

Now with a clear? layout, no gui yet.

Rem Project: phymaterialtest3
Rem Created: 16/08/2006 05:03:09

Rem ***** Main Source File *****
Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=100
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 105250000.0
phy set material restitution sticky, 0.0
phy set material dynamic friction sticky, 1000000000.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,1.0
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,16,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4

make object box 5,100,1,6
rotate object 5,90,90,0
position object 5,11,15,0
color object 5,RGB(0,0,255)
phy make rigid body static box 5

make object sphere 6,6
position object 6,-10,100,0
phy make rigid body dynamic sphere 6,2

make object box 7,10,1,10
position object 7,-10,99.9,0
phy make rigid body static box 7

do
center text screen width()/2,0,"Dark Physics Material Tester"
center text screen width()/2,10,"Press 'r' to roll - 'd' to drop sphere - 'b' do both - Spacebar to Reset."
text 5,25,"Mass# of sphere"
text 5,35,"      "+str$(mass#)

text 5,45,"ground  material"
text 5,55,"static friction = "+str$(phy get material static friction(1))
text 5,65,"restitution.... = "+str$(phy get material restitution(1))
text 5,75,"dynamic friction= "+str$(phy get material dynamic friction(1))

text 255,45,"Sphere 1 Material"
text 255,55,"static friction  ="+str$(phy get material static friction(2))
text 255,65,"restitution..... ="+str$(phy get material restitution(2))
text 255,75,"dynamic friction ="+str$(phy get material dynamic friction(2))

text 455,45,"Sphere 2 Material"
text 455,55,"static friction  ="+str$(phy get material static friction(2))
text 455,65,"restitution..... ="+str$(phy get material restitution(2))
text 455,75,"dynamic friction ="+str$(phy get material dynamic friction(2))

text 5,95,"Sphere 1 linear momentum"
text 5,105,"x = "+str$(phy get rigid body linear momentum x ( 2 ))
text 5,115,"y = "+str$(phy get rigid body linear momentum y ( 2 ))
text 5,125,"z = "+str$(phy get rigid body linear momentum z ( 2 ))

text 205,95,"Sphere 1 linear velocity"
text 205,105,"x = "+str$(phy get rigid body linear velocity x ( 2 ))
text 205,115,"y = "+str$(phy get rigid body linear velocity y ( 2 ))
text 205,125,"z = "+str$(phy get rigid body linear velocity z ( 2 ))

text 5,135,"Sphere 2 linear momentum"
text 5,145,"x = "+str$(phy get rigid body linear momentum x ( 6 ))
text 5,155,"y = "+str$(phy get rigid body linear momentum y ( 6 ))
text 5,165,"z = "+str$(phy get rigid body linear momentum z ( 6 ))

text 205,135,"Sphere 2 linear velocity"
text 205,145,"x = "+str$(phy get rigid body linear velocity x ( 6 ))
text 205,155,"y = "+str$(phy get rigid body linear velocity y ( 6 ))
text 205,165,"z = "+str$(phy get rigid body linear velocity z ( 6 ))
rem phy set material dynamic friction
if inkey$()="r"
   phy set rigid body position 5,11,50,0
endif
if inkey$()="d"
   phy set rigid body position 7,11,99.9,0
endif

if inkey$()="b"
 phy set rigid body position 5,11,50,0
 phy set rigid body position 7,11,99.9,0
 endif
if spacekey()
   phy set rigid body position 5,11,15,0
   phy set rigid body position 2, 16, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
   phy set rigid body position 6,-10,100,0
   phy set rigid body position 7,-10,99.9,0
   phy set rigid body linear momentum 6, 0.0, 0.0, 0.0
endif

if object in screen(2)=1 then center text object screen x(2),object screen y(2)-30,"Sphere 1"
if object in screen(6)=1 then center text object screen x(6),object screen y(6)-30,"Sphere 2"

control camera using arrowkeys 0,.1,.1
phy update
sync
loop

  Rem Project: phymaterialtest3
Rem Created: 16/08/2006 05:03:09

Rem ***** Main Source File *****
Rem Project: phymaterialtester1
Rem Created: 12/08/2006 16:15:40

Rem ***** Main Source File *****
sync on
sync rate 60
phy start
autocam off
position camera 10,20,-95
point camera -35,10,0
make light 1
set directional light 1, -5,-5,5
mass#=100
sticky=1

rem add your materials here
phy make material 1, "sticky"
phy set material static friction sticky, 105250000.0
phy set material restitution sticky, 0.0
phy set material dynamic friction sticky, 1000000000.0
phy build material sticky

nobouncematerial=2
phy make material nobouncematerial, "little bounce"
phy set material restitution nobouncematerial,1.0
phy build material nobouncematerial

rem ground
make object box 1,100,1,100
position object 1,-50,0,0
phy make rigid body static box 1,sticky

rem make ball
make object sphere 2,6
position object 2,16,16,0
phy make rigid body dynamic sphere 2,nobouncematerial

rem change this to make heavier
phy set rigid body mass 2,mass#

rem slide box
make object box 3,100,1,50
rotate object 3,90,90,-50
color object 3,RGB(255,0,0)
phy make rigid body static box 3
rem stop box
make object box 4,100,1,50
rotate object 4,90,90,0
position object 4,-100,0,0
color object 4,rgb(0,255,0)
phy make rigid body static box 4

make object box 5,100,1,6
rotate object 5,90,90,0
position object 5,11,15,0
color object 5,RGB(0,0,255)
phy make rigid body static box 5

make object sphere 6,6
position object 6,-10,100,0
phy make rigid body dynamic sphere 6,2

make object box 7,10,1,10
position object 7,-10,99.9,0
phy make rigid body static box 7

do
center text screen width()/2,0,"Dark Physics Material Tester"
center text screen width()/2,10,"Press 'r' to roll - 'd' to drop sphere - 'b' do both - Spacebar to Reset."
text 5,25,"Mass# of sphere"
text 5,35,"      "+str$(mass#)

text 5,45,"ground  material"
text 5,55,"static friction = "+str$(phy get material static friction(1))
text 5,65,"restitution.... = "+str$(phy get material restitution(1))
text 5,75,"dynamic friction= "+str$(phy get material dynamic friction(1))

text 255,45,"Sphere 1 Material"
text 255,55,"static friction  ="+str$(phy get material static friction(2))
text 255,65,"restitution..... ="+str$(phy get material restitution(2))
text 255,75,"dynamic friction ="+str$(phy get material dynamic friction(2))

text 455,45,"Sphere 2 Material"
text 455,55,"static friction  ="+str$(phy get material static friction(2))
text 455,65,"restitution..... ="+str$(phy get material restitution(2))
text 455,75,"dynamic friction ="+str$(phy get material dynamic friction(2))

text 5,95,"Sphere 1 linear momentum"
text 5,105,"x = "+str$(phy get rigid body linear momentum x ( 2 ))
text 5,115,"y = "+str$(phy get rigid body linear momentum y ( 2 ))
text 5,125,"z = "+str$(phy get rigid body linear momentum z ( 2 ))

text 205,95,"Sphere 1 linear velocity"
text 205,105,"x = "+str$(phy get rigid body linear velocity x ( 2 ))
text 205,115,"y = "+str$(phy get rigid body linear velocity y ( 2 ))
text 205,125,"z = "+str$(phy get rigid body linear velocity z ( 2 ))

text 5,135,"Sphere 2 linear momentum"
text 5,145,"x = "+str$(phy get rigid body linear momentum x ( 6 ))
text 5,155,"y = "+str$(phy get rigid body linear momentum y ( 6 ))
text 5,165,"z = "+str$(phy get rigid body linear momentum z ( 6 ))

text 205,135,"Sphere 2 linear velocity"
text 205,145,"x = "+str$(phy get rigid body linear velocity x ( 6 ))
text 205,155,"y = "+str$(phy get rigid body linear velocity y ( 6 ))
text 205,165,"z = "+str$(phy get rigid body linear velocity z ( 6 ))
rem phy set material dynamic friction
if inkey$()="r"
   phy set rigid body position 5,11,50,0
endif
if inkey$()="d"
   phy set rigid body position 7,11,99.9,0
endif

if inkey$()="b"
 phy set rigid body position 5,11,50,0
 phy set rigid body position 7,11,99.9,0
 endif
if spacekey()
   phy set rigid body position 5,11,15,0
   phy set rigid body position 2, 16, 16, 0
   phy set rigid body linear momentum 2, 0.0, 0.0, 0.0
   phy set rigid body position 6,-10,100,0
   phy set rigid body position 7,-10,99.9,0
   phy set rigid body linear momentum 6, 0.0, 0.0, 0.0
endif

if object in screen(2)=1 then center text object screen x(2),object screen y(2)-30,"Sphere 1"
if object in screen(6)=1 then center text object screen x(6),object screen y(6)-30,"Sphere 2"

control camera using arrowkeys 0,.1,.1
phy update
sync
loop

ps
if you seen a post that has up down inputing by button on screen paste a link

Dark Physics makes any hot drink go cold.

Back to top

Profile PM

Freddix

AGK Developer

22

Years of Service

User Offline

Joined: 19th Sep 2002

Location: France

Posted: 18th Aug 2006 11:35

excellent idea to put the materials made from users and from TGC here

It may be cool to make a "material base" list

with a sample that demonstrate the differencies between each materials.

All we have to decide is what to do with the time that is given to us.

Back to top

Profile PM Email Website

Back to top

Login to post a reply

Server time is: 2024-11-24 10:53:34
Your offset time is: 2024-11-24 10:53:34