FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» Logiciel de planétarium.
Mes premier test vers le 3D Emptypar Pedro Aujourd'hui à 8:08

» Un autre pense-bête...
Mes premier test vers le 3D Emptypar Froggy One Jeu 21 Nov 2024 - 15:54

» Récupération du contenu d'une page html.
Mes premier test vers le 3D Emptypar Pedro Sam 16 Nov 2024 - 14:04

» Décompilation
Mes premier test vers le 3D Emptypar JL35 Mar 12 Nov 2024 - 19:57

» Un album photos comme du temps des grands-mères
Mes premier test vers le 3D Emptypar jjn4 Mar 12 Nov 2024 - 17:23

» traitement d'une feuille excel
Mes premier test vers le 3D Emptypar jjn4 Jeu 7 Nov 2024 - 3:52

» Aide-mémoire mensuel
Mes premier test vers le 3D Emptypar jjn4 Lun 4 Nov 2024 - 18:56

» Des incomprèhension avec Timer
Mes premier test vers le 3D Emptypar Klaus Mer 30 Oct 2024 - 18:26

» KGF_dll - nouvelles versions
Mes premier test vers le 3D Emptypar Klaus Mar 29 Oct 2024 - 17:58

» instructions panoramic
Mes premier test vers le 3D Emptypar maelilou Lun 28 Oct 2024 - 19:51

» Figures fractales
Mes premier test vers le 3D Emptypar Marc Ven 25 Oct 2024 - 12:18

» Panoramic et Scanette
Mes premier test vers le 3D Emptypar Yannick Mer 25 Sep 2024 - 22:16

» Editeur d étiquette avec QR évolutif
Mes premier test vers le 3D Emptypar JL35 Lun 23 Sep 2024 - 22:40

» BUG QR Code DelphiZXingQRCode
Mes premier test vers le 3D Emptypar Yannick Dim 22 Sep 2024 - 11:40

» fichier.exe
Mes premier test vers le 3D Emptypar leclode Ven 20 Sep 2024 - 19:02

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Novembre 2024
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier
Le Deal du moment :
Boutique Nike : -25% dès 50€ sur TOUT le ...
Voir le deal

 

 Mes premier test vers le 3D

Aller en bas 
4 participants
AuteurMessage
Invité
Invité




Mes premier test vers le 3D Empty
MessageSujet: Mes premier test vers le 3D   Mes premier test vers le 3D EmptyMer 14 Avr 2010 - 23:31

Voici mes premier exemple que j'ai fait avec le 3D...

1. Je verse !
Code:
dim i
scene3d 1:color 1,233,232,218
3d_teapot 1
3d_move 1,2
3d_z_rotate 1,10
3d_color 1,255,0,0
3d_cylinder 2,0.8,0.4,0.8:3d_color 2,10,100,100
3d_y_position 2,-0.7:3d_x_position 2,0.4
3d_y_position 1,0.2
for i=10 to -50 step -1
  3d_z_rotate 1,i
  3d_color 1,rnd(255),rnd(255),rnd(255)
  wait 20
next i

2. Petit cube
Code:
dim y,x
label suit
scene3d 1:full_space 1:color 1,233,232,218
3d_cube 1,1
on_key_down 0,suit
end
suit:
if key_down_code=38 then x=x+1:3d_x_rotate 1,x
if key_down_code=39 then y=y+1:3d_y_rotate 1,y
if key_down_code=40 then x=x-1:3d_x_rotate 1,x
if key_down_code=37 then y=y-1:3d_y_rotate 1,y
return

3. 3d_text(e)
Code:
dim y,x
label suit,ok
edit 2
on_key_up 2,ok
end
suit:
if key_down_code=38 then x=x+1:3d_x_rotate 1,x
if key_down_code=39 then y=y+1:3d_y_rotate 1,y
if key_down_code=40 then x=x-1:3d_x_rotate 1,x
if key_down_code=37 then y=y-1:3d_y_rotate 1,y
return
ok:
if key_up_code=13
  hide 2
  scene3d 1:full_space 1:color 1,233,232,218
  3d_text 1,text$(2)
  on_key_down 0,suit
end_if
return

(le premier est pour jjn4)
(le deuxième pour JL35)
(le troisième est pour le premier qui répond à ce sujet...)

Laughing Laughing Laughing Laughing Laughing
Revenir en haut Aller en bas
jjn4

jjn4


Nombre de messages : 2747
Date d'inscription : 13/09/2009

Mes premier test vers le 3D Empty
MessageSujet: +++   Mes premier test vers le 3D EmptyMer 14 Avr 2010 - 23:59

Le voilà, le premier !
Chouette, la cafetière qui verse !
(surtout à côté de la cafetière qui vole de JL35)

Le troisième est pas mal aussi, avec les 3d_texte
(je suis d'autant plus admiratif que j'ai très peu fait dans la 3d jusqu'à présent)
Bravo, Nicolas !
cheers

Par contre, le 2°, je ne vois pas le cube tourner,
peut-être est-ce que je ne fais pas la manipulation qu'il faut pour cela ?
scratch
Revenir en haut Aller en bas
http://jjn4.e-monsite.com
JL35




Nombre de messages : 7112
Localisation : 77
Date d'inscription : 29/11/2007

Mes premier test vers le 3D Empty
MessageSujet: Re: Mes premier test vers le 3D   Mes premier test vers le 3D EmptyJeu 15 Avr 2010 - 0:21

Pas mal Nicolas, moi non plus je n'ai pas fait de 3D (à part la cafetière volante) mais il y a plein de possibilités intéressantes, et tu nous en donnes de beaux exemples.
C'est spectaculaire en très peu de lignes de code. Merci

@jjn4 pour voir tourner le cube il faut agir sur les 4 flèches du clavier.
Revenir en haut Aller en bas
Invité
Invité




Mes premier test vers le 3D Empty
MessageSujet: Re: Mes premier test vers le 3D   Mes premier test vers le 3D EmptyJeu 15 Avr 2010 - 0:27

C'est avec les flèches !

(à jjn4 le troisième)

Et le texte bouge aussi avec les flèches.
Revenir en haut Aller en bas
jjn4

jjn4


Nombre de messages : 2747
Date d'inscription : 13/09/2009

Mes premier test vers le 3D Empty
MessageSujet: +++   Mes premier test vers le 3D EmptyJeu 15 Avr 2010 - 0:35

Ah oui, fabuleux, avec les flèches qui font tourner !
Surtout le texte, superbe !
Bravo, Nicolas !
(tu as raison, ça montre que tu es très fort en math)
Wink
Revenir en haut Aller en bas
http://jjn4.e-monsite.com
Jean Claude

Jean Claude


Nombre de messages : 5950
Age : 70
Localisation : 83 Var
Date d'inscription : 07/05/2009

Mes premier test vers le 3D Empty
MessageSujet: Re: Mes premier test vers le 3D   Mes premier test vers le 3D EmptyJeu 15 Avr 2010 - 11:07

Bravo Nicolas,

Le 3ème code est super pour une présentation, et on peut faire des anagrammes en untilisant des caratères symétriques. (Ex: OUI )

Encore des exemples intéressants..
Revenir en haut Aller en bas
659_minifly




Nombre de messages : 590
Age : 76
Localisation : Valenciennes Nord
Date d'inscription : 29/04/2010

Mes premier test vers le 3D Empty
MessageSujet: Très bien Nicolas   Mes premier test vers le 3D EmptyVen 30 Avr 2010 - 18:42

Merci pour ce bon travail.
J'aime beaucoup faire de la 3D; j'utilise Anim8or pour la conception 3D.
facile a utiliser ( beaucoup que d'autres tel que Blender. il y a aussi un bon forum animanon avec pas mal de tutos.
peut on aller plus loin avec Panoramic en 3D ?
C'est deja très bien ce que tu a fait.
Revenir en haut Aller en bas
Contenu sponsorisé





Mes premier test vers le 3D Empty
MessageSujet: Re: Mes premier test vers le 3D   Mes premier test vers le 3D Empty

Revenir en haut Aller en bas
 
Mes premier test vers le 3D
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Lancement officiel de GPP
» Convertisseur UTF-8 vers ANSI et ANSI vers UTF-8
» Premier Pas en 3D
» robotique et Panoramic
» partage de code - facteur premier

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: