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
» PANORAMIC V 1
Mes premier test vers le 3D Emptypar Marc Aujourd'hui à 19:51

» Gestion d'un système client-serveur.
Mes premier test vers le 3D Emptypar Klaus Aujourd'hui à 16:52

» Editeur EliP 6 : Le Tiny éditeur avec 25 onglets de travail
Mes premier test vers le 3D Emptypar Froggy One Aujourd'hui à 11:16

» @Jack
Mes premier test vers le 3D Emptypar Jack Mar 30 Avr 2024 - 20:40

» trop de fichiers en cours
Mes premier test vers le 3D Emptypar papydall Lun 29 Avr 2024 - 23:39

» Une calculatrice en une ligne de programme
Mes premier test vers le 3D Emptypar jean_debord Dim 28 Avr 2024 - 8:47

» Form(résolu)
Mes premier test vers le 3D Emptypar leclode Sam 27 Avr 2024 - 17:59

» Bataille navale SM
Mes premier test vers le 3D Emptypar jjn4 Ven 26 Avr 2024 - 17:39

» Les maths du crocodile
Mes premier test vers le 3D Emptypar jean_debord Jeu 25 Avr 2024 - 10:37

» Naissance de Crocodile Basic
Mes premier test vers le 3D Emptypar jean_debord Jeu 25 Avr 2024 - 8:45

» Dessine-moi une galaxie
Mes premier test vers le 3D Emptypar jjn4 Lun 22 Avr 2024 - 13:47

» Erreur END_SUB
Mes premier test vers le 3D Emptypar jjn4 Lun 22 Avr 2024 - 13:43

» Bug sur DIM_LOCAL ?
Mes premier test vers le 3D Emptypar papydall Dim 21 Avr 2024 - 23:30

» 2D_fill_color(résolu)
Mes premier test vers le 3D Emptypar leclode Sam 20 Avr 2024 - 8:32

» Consommation gaz électricité
Mes premier test vers le 3D Emptypar leclode Mer 17 Avr 2024 - 11:07

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Mai 2024
LunMarMerJeuVenSamDim
  12345
6789101112
13141516171819
20212223242526
2728293031  
CalendrierCalendrier
-29%
Le deal à ne pas rater :
PC portable – MEDION 15,6″ FHD Intel i7 – 16 Go / 512Go (CDAV : ...
499.99 € 699.99 €
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 : 2692
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 : 7095
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 : 2692
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 : 5948
Age : 69
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 : 75
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
» Premier pas en trigonométrie

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: