FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Une autre façon de terminer une application.
par Francis-mr Aujourd'hui à 12:07

» Compilateur FBPano
par jean_debord Aujourd'hui à 10:09

» Copier / coller du texte à partir de la fenêtre de commandes
par jean_debord Aujourd'hui à 9:46

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par papydall Aujourd'hui à 5:01

» Mettre en windows en veille
par papydall Aujourd'hui à 4:15

» Stretch_on ne stretch plus...
par papydall Hier à 15:22

» Pb 18 (en analyse): RESTORE_LABEL avec DATA à la fin
par Jack Hier à 13:21

» Problème de traitement des opérateurs avec le compilateur.
par Pedro Alvarez Sam 19 Aoû 2017 - 20:01

» Pb 17 (résolu): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

» Pb 16 (résolu): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (résolu): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 cube avec belle texture

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
bleunounet



Nombre de messages : 150
Date d'inscription : 26/10/2007

MessageSujet: cube avec belle texture   Mer 14 Avr 2010 - 16:35

telecharger l'image

dl.free.fr/dqua8b70p

Echap pour quitter.

Code:


width 0,900:height 0,500:left 0,200
dim x,y,z
full_space 0
scene3d 1
full_space 1
3d_cube 1,2
3d_load_texture 1,"texture.jpg"
for z=0 to 263
3d_x_rotate 1,50
3d_y_rotate 1,X
3d_z_rotate 1,Z:wait 5
cam_position 0,2.8,-3
light_position 0,2.8,-3
next z
color 1,0,0,0
PRINT "écran"
width 0,170:height 0,165:left 0,10
print "largeur ";screen_x
print "hauteur ";screen_y
WAIT 1000
width 0,170:height 0,165:left 0,1140
WAIT 1000
width 0,170:height 0,165:left 0,1140:top 0,600
WAIT 1000
width 0,170:height 0,165:left 0,1:top 0,600
WAIT 1000
width 0,170:height 0,165:left 0,600:top 0,300
WAIT 1000
color 0,0,0,0
HIDE 1
label a
dim a
a:
color 1,0,0,0
PRINT "écran"
print "largeur ";screen_x:print "hauteur ";screen_y
print "....................."
print "date":print date$
print "....................."
print "heures":print time$:wait 1000
print_locate 1,1
Font_Color 0,0,0,255
if inkey$=chr$(27)then terminate
goto a
nex a
return
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



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

MessageSujet: Re: cube avec belle texture   Mer 14 Avr 2010 - 17:39

Pas mal, mais...
1) l'écriture bleu sur noir est illisible.
2) comment on en sort (à part Ctl/Alt/Suppr) ? ah oui, Escape, mais il faut deviner.
Ton code est bizarre, pas de End, et à la fin c'est quoi nex a, return ?
On reste dans la boucle a... goto a qui tourne en permanence, tu aurais pu te mettre en attente de clic ou de touche (On_Click...) et attendre sur un End.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
bleunounet



Nombre de messages : 150
Date d'inscription : 26/10/2007

MessageSujet: Re: cube avec belle texture   Mer 14 Avr 2010 - 18:21

oui exat j'ai cafouiller , je les fait en vitesse pour quitter je les préciser
il et vrai que j'aurai pu dire d'attendre que sa fini avant d'appuyer sur
echap ou escape comme tu veut.
tu dit illisible bleu sur noir? moi je voie tres bien se qui et marquer? de toute façons se n'es qu'un inutilitaire
et il fonctionne meme si il n'es pas terrible a cause du cafouillage sa arrive.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



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

MessageSujet: Re: cube avec belle texture   Mer 14 Avr 2010 - 18:41

C'est vrai tu avais précisé pour Echap.
Mais c'est vrai que chez moi le bleu sur noir est complètement illisible, ça doit dépendre des réglages écran.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
bleunounet



Nombre de messages : 150
Date d'inscription : 26/10/2007

MessageSujet: Re: cube avec belle texture   Mer 14 Avr 2010 - 18:50

oui je supose que sa doit etre le reglage de l'écran car je le voie super bien.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

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

MessageSujet: +++   Jeu 15 Avr 2010 - 0:14

C'est vrai que le cube qui tourne, c'est très joli.
Pas mal du tout !
jocolor
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
bleunounet



Nombre de messages : 150
Date d'inscription : 26/10/2007

MessageSujet: Re: cube avec belle texture   Jeu 15 Avr 2010 - 9:47

merci je trouve aussi pour sa que je les mis ,j'en avez fait un autre mais celui la etais mieux avec la meme texture mais mon pc et mort je vais devoir acheter un boitier externe pour tout transferé dans mon pc portable
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: cube avec belle texture   

Revenir en haut Aller en bas
 
cube avec belle texture
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» 00 "Faire un cube décoré, avec des images ou des photos"
» cadre forum avec une texture
» Belle texture Et C4D
» Une Pomme de Terre dans vos assiètes ? [ 23/09 ]
» probleme avec une texture

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC 32 bits :: Les inutilitaires-
Sauter vers: