Novembre 2024 | Lun | Mar | Mer | Jeu | Ven | Sam | Dim |
---|
| | | | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | | Calendrier |
|
|
| projet d'imprimante 3D | |
| | Auteur | Message |
---|
mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| 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 | |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| 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 | |
| | | Jicehel
Nombre de messages : 5947 Age : 52 Localisation : 77500 Date d'inscription : 18/04/2011
| 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 ... | |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| Sujet: Re: projet d'imprimante 3D Jeu 21 Nov 2013 - 12:22 | |
| Merci jichel rien ne presse Pour moi aussi le temps est compte
| |
| | | Jicehel
Nombre de messages : 5947 Age : 52 Localisation : 77500 Date d'inscription : 18/04/2011
| 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 ... | |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| 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 | |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| 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 | |
| | | Contenu sponsorisé
| Sujet: Re: projet d'imprimante 3D | |
| |
| | | | projet d'imprimante 3D | |
|
Sujets similaires | |
|
| Permission de ce forum: | Vous ne pouvez pas répondre aux sujets dans ce forum
| |
| |
| |