projet d'imprimante 3D

Sujet: projet d'imprimante 3D Jeu 7 Nov 2013 - 22:32

premiere etape:
scanner l'objet 3D pour le reproduire

Code:: dim i,y
rem créer un monde 3D
scene3d 1 :full_space 1

3D_teapot 10
3d_color 10,2,2,2

for i=1 to 400
pause 10
3D_x_rotate 10,i
next i

daccord, je ne code pas vite et le palpeur n'est pas encore en place.
Mais l'idee est là
palper point par point l'objet
a suivre

Sujet: Re: projet d'imprimante 3D Mer 20 Nov 2013 - 19:45

bonsoir a tous
je suis desolé mais je coince sur la detection de la surface de l'objet
tout est dans "a l'aide " comment se fait la collision
si quelqu un a une idee
pourtant le principe fonctionne et je touche au but
merci

Sujet: Re: projet d'imprimante 3D Mer 20 Nov 2013 - 23:36

Désolé mais je ne pourrais toujours pas aider pour le moment, faute de temps, comme vous pouvez le constater, je suis obligé de mettre Panoramic en standby ...

Sujet: Re: projet d'imprimante 3D Jeu 21 Nov 2013 - 12:22

Merci jichel
rien ne presse
Pour moi aussi le temps est compte

Sujet: Re: projet d'imprimante 3D Jeu 21 Nov 2013 - 18:09

Merci pour ta compréhension, je ne vais sans doute pas faire grand chose en Panoramic avant le mois de Février. Ce n'est pas que je boude, mais je suis sur un projet pour le travail qui me consomme beaucoup de temps et ce jusqu'à la fin de l'année. Début d'année prochaine pareil mais avec des voyages en plus après un peu de vacances sans internet et après on verra mais on sera déjà début Février.

J'essaye de passer souvent par le forum car vous faites pleins de trucs intéressants et Jack aussi, c'est pourquoi jz profite de ton post pour m'excuser de ma faible participation et de ma faible activité Panoramic pendant les 3 mois à venir ...

Sujet: Re: projet d'imprimante 3D Dim 24 Nov 2013 - 22:21

merci a treehouse
voici une version fonctionnel

Code:: dim i,y,a ,j
label testy , testcoll
rem créer un monde 3D
scene3d 1 :full_space 1
cam_position 4,0,0
point_position 0,0,0

3d_teapot 12
3d_color 12,2,2,2
3d_scale 12,2,2,2
3d_collision_as_faces 12
3d_transparent 12,200

3d_cube 11,0.05
3d_color 11,247,32,8
3d_position 11,0,1,0
3d_collision_as_cube 11

for i=1 to 30
pause 10
gosub testy
3D_x_rotate 12,(i*8)

next i
end

testy:
for j=1 to 4000
gosub testcoll
pause 100
if a =0
y=1.2+(0.05*(j*-2))
3d_y_position 11,y
else
message "contact"
pause 500
3d_y_position 11,1
return

end_if
next j

return

testcoll:
a=o3D_collision (12,11)
return

a suivre

Sujet: Re: projet d'imprimante 3D Jeu 28 Nov 2013 - 22:17

bonsoir a tous
voici la bonne version
il manque la partie commande car là, chacun a ça solution arduino ou autre.

Code:: dim i,y,a ,j
label testy , testcoll
rem créer un monde 3D
scene3d 1 :full_space 1
cam_position 4,2,3
point_position 0,0,0
form 2 :hide 2:left 2,500 :top 2,50

3d_teapot 12
3d_color 12,2,2,2
3d_scale 12,2,2,2
3d_collision_as_faces 12
3d_transparent 12,200

3d_cube 11,0.05
3d_color 11,247,32,8
3d_position 11,0,1,0
3d_collision_as_cube 11

for i=1 to 20
pause 10
gosub testy
3D_x_rotate 12,(i*8)

next i
end

testy:
for j=1 to 4000
gosub testcoll
pause 100
if a =0
y=1.2+(0.05*(j*-2))
3d_y_position 11,y
else
message "contact"
show 2 :print_target_is 2
print "angle="+str$ (i)+ " r="+str$ ( y )
pause 50
3d_y_position 11,1
return

end_if
next j

return

testcoll:
a=o3D_collision (12,11)
return

j'attends vos remarques
merci

» Mon non projet en panoramic ;)
» finaliser un projet
» Projet PanoLib sur SourceForge
» Projet de compilateur ouvert.
» Mon projet en cours