π
<-
Chat plein-écran
[^]

News 2024
Avril (1)

News 2023
Août (2)
Juin (3)
Mai (7)
Avril (2)
Mars (3)

News 2022
Août (3)
Juin (4)
Mai (1)
Avril (6)
Mars (4)
Janvier (12)

News 2021
Août (8)
Juillet (28)
Juin (20)
Mai (19)
Avril (25)
Mars (15)

News 2020
Août (16)
Juillet (13)
Juin (17)
Mai (38)
Avril (21)
Mars (17)

News 2019
Août (10)
Juin (4)
Mai (11)
Avril (8)
Mars (18)
Janvier (14)

News 2018
Août (5)
Juin (9)
Mai (10)
Avril (2)
Mars (14)
Janvier (12)

News 2017
Août (10)
Juillet (14)
Juin (14)
Mai (11)
Avril (9)
Mars (12)
Janvier (11)

News 2016
Octobre (10)
Août (8)
Juin (8)
Mai (14)
Avril (9)
Mars (13)
Janvier (11)

News 2015
Octobre (15)
Août (11)
Juin (7)
Mai (12)
Avril (6)
Mars (11)

News 2014
Août (2)
Juin (2)
Mai (5)
Avril (4)
Mars (5)

News 2013
Août (6)
Juin (8)
Mai (14)
Avril (24)
Mars (16)
Janvier (10)

News 2012
Octobre (11)
Août (6)
Juin (8)
Mai (16)
Avril (16)
Mars (6)

News 2011
Août (4)
Juin (11)
Mai (5)
Avril (2)
Mars (6)

News 2010
Juin (1)
Mai (2)
Avril (1)

News 2009
Août (2)
Avril (1)

Jour 12 : Programme de l'Avent TI-83 Premium CE

Nouveau messagede critor » 12 Déc 2016, 17:13

Cette maison ne doit pas être très confortable ainsi exposée aux éléments déchaînés...
Vite, couvrons-là avec un toît ! ;)
Code: Tout sélectionner
EnrBDG BDG0
ZDécimal
AxesNAff
FoncNAff
QuadNAff
GraphNAff
40Xmax→Xmax
40Ymax→Ymax
0→Xmin
0→Ymin
ArrPlanAff NOIR
CouleurBord 1
EffDess
131→Y
77→L
9→X
For(I,0,Y,2
Ligne(X,I,L,I,BLEU MRN,2
End
For(I,16,Y,16
Ligne(X,I,L,I,GRIS FON,1
For(J,­14,­4,2
Ligne(X+7,I+J,X+14,I+J,ORANGE,2
End
Pt-Aff(X+12,I-10,GRIS,1
End
X+2→X
{0,3,3,1,6,0,2,7,6,2,4,0,3,7,6,3,4,0,4,6,0,5,3,3,8,23,23,8,15,0,9,23,23,9,15,0,10,23,0,11,23,22,11,20,0,12,23,22,12,20,20,12,17,0,13,23,22,13,20,20,13,17,0,14,23,22,14,20,0,15,23,0,16,23,0,17,23,22,17,20,0,18,23,22,18,20,20,18,17,0,19,23,22,19,20,20,19,17,0,20,23,22,20,20,0,21,23,0,22,23,23,22,15,0,23,23,23,23,15,0,24,15,0,25,15,0,26,15,0,27,15,0,28,15,0,29,15,0,30,15,0,31,15,0,32,15,0,33,15,0,34,15,0,35,15,0,36,15,0,37,15,0,38,15,0,39,15,0,40,7,0,41,7,0,42,7,0,43,7,0,44,9,9,44,7,0,45,10,10,45,7,0,46,11,11,46,8,0,47,12,11,47,9,9,47,7,0,48,13,13,48,11,10,49,14,14,49,11,11,50,12,11,51,16,16,51,13,13,51,11,10,52,18,18,52,16,16,52,11,0,53,18,18,53,16,16,53,11,9,54,19,10,55,18,18,55,16,16,55,10,10,55,8,8,56,18,18,56,16,16,56,10,9,57,16,16,57,10,10,57,8,8,58,11,9,59,12,12,59,10,10,60,11,11,61,12,12,59,3,3,60,6,0,61,7,6,61,4,0,62,7,6,62,4,0,63,6,0,64,3,3
For(I,1,dim(Rep),3
Ligne(X+Rep(I),Y+Rep(I+1),X+Rep(I),Y+Rep(I+2),BLEU MRN,1
End
For(I,3,Xmax,8
Ligne(I,0,I,3,VERT,2
End
For(I,3+8,Xmax,16
For(J,1,3
Ligne(I-J,3+J,I+J+1,3+J,VERT,1
End
For(J,1,4
partEnt(2.75-J/2
Ligne(I-Rep,6+J,I+Rep+1,6+J,VERT,1
End
End
219→M
For(I,0,28,2
Ligne(M-25,I,M+25,I,BLANC,2
If I≤14
Ligne(M-5,I,M+5,I,MARRON,2

End
For(I,28,42
I-28
Ligne(M-25+Rep,I,M+25-Rep,I,ROUGE,1
End

While non(getKey

End
ArrPlanNAff
RappelBDG BDG0
DelVar BDG0
Lien vers le sujet sur le forum: Jour 12 : Programme de l'Avent TI-83 Premium CE (Commentaires: 0)

Votez pour le POTY 2016 sur Ticalc.org (partie 2)

Nouveau messagede noelnadal » 12 Déc 2016, 23:09

Dans un article précédent, nous vous annoncions le lancement de l'élection du programme de l'année 2016 (POTY, Program Of The Year en anglais), organisé comme tous les ans par la communauté anglophone TI-Calc.

Après la catégorie TI-84 Plus C Silver Edition, c'est au tour de la catégorie TI-83 Premium CE / TI-84 Plus CE de continuer le bal ! Vous pouvez dès à présent voter pour le meilleur programme de cette année, parmi les projets suivants :


Tu as eu l'occasion de tester ces programmes ? Tu es alors invité à aller voter sur ticalc.org. Attention, il faut un compte sur le site (c'est gratuit). Une fois inscrit, le sondage est sur la page principale du site, dans la barre de droite un peu plus bas. L'élection est purement honorifique, mais c'est une chance pour tous d'être reconnaissants envers tous ces programmeurs qui se donnent du mal pour publier des programmes bien souvent utiles à plus d'un. :bj:

Dans environ une semaine, viendra le dernier sondage, celui des TI-Nspire (CX) ! :)
Lien vers le sujet sur le forum: Votez pour le POTY 2016 sur Ticalc.org (partie 2) (Commentaires: 3)

Jour 13 : Programme de l'Avent TI-83 Premium CE

Nouveau messagede critor » 13 Déc 2016, 00:02

C'est mieux, mais maintenant on n'y voit plus rien dans cette maison... Ouvrons vite une fenêtre ! :)
Comme c'est mignon, on dirait que la maison nous fait un clin d'oeil... ;)
Code: Tout sélectionner
...
For(I,0,28,2
...
If I≥18 et I≤25
Then
Ligne(M-8,I,M-16,I,BLEU CLR,2
End
End
...

Show/Hide spoilerAfficher/Masquer le spoiler
Code: Tout sélectionner
EnrBDG BDG0
ZDécimal
AxesNAff
FoncNAff
QuadNAff
GraphNAff
40Xmax→Xmax
40Ymax→Ymax
0→Xmin
0→Ymin
ArrPlanAff NOIR
CouleurBord 1
EffDess
131→Y
77→L
9→X
For(I,0,Y,2
Ligne(X,I,L,I,BLEU MRN,2
End
For(I,16,Y,16
Ligne(X,I,L,I,GRIS FON,1
For(J,­14,­4,2
Ligne(X+7,I+J,X+14,I+J,ORANGE,2
End
Pt-Aff(X+12,I-10,GRIS,1
End
X+2→X
{0,3,3,1,6,0,2,7,6,2,4,0,3,7,6,3,4,0,4,6,0,5,3,3,8,23,23,8,15,0,9,23,23,9,15,0,10,23,0,11,23,22,11,20,0,12,23,22,12,20,20,12,17,0,13,23,22,13,20,20,13,17,0,14,23,22,14,20,0,15,23,0,16,23,0,17,23,22,17,20,0,18,23,22,18,20,20,18,17,0,19,23,22,19,20,20,19,17,0,20,23,22,20,20,0,21,23,0,22,23,23,22,15,0,23,23,23,23,15,0,24,15,0,25,15,0,26,15,0,27,15,0,28,15,0,29,15,0,30,15,0,31,15,0,32,15,0,33,15,0,34,15,0,35,15,0,36,15,0,37,15,0,38,15,0,39,15,0,40,7,0,41,7,0,42,7,0,43,7,0,44,9,9,44,7,0,45,10,10,45,7,0,46,11,11,46,8,0,47,12,11,47,9,9,47,7,0,48,13,13,48,11,10,49,14,14,49,11,11,50,12,11,51,16,16,51,13,13,51,11,10,52,18,18,52,16,16,52,11,0,53,18,18,53,16,16,53,11,9,54,19,10,55,18,18,55,16,16,55,10,10,55,8,8,56,18,18,56,16,16,56,10,9,57,16,16,57,10,10,57,8,8,58,11,9,59,12,12,59,10,10,60,11,11,61,12,12,59,3,3,60,6,0,61,7,6,61,4,0,62,7,6,62,4,0,63,6,0,64,3,3
For(I,1,dim(Rep),3
Ligne(X+Rep(I),Y+Rep(I+1),X+Rep(I),Y+Rep(I+2),BLEU MRN,1
End
For(I,3,Xmax,8
Ligne(I,0,I,3,VERT,2
End
For(I,3+8,Xmax,16
For(J,1,3
Ligne(I-J,3+J,I+J+1,3+J,VERT,1
End
For(J,1,4
partEnt(2.75-J/2
Ligne(I-Rep,6+J,I+Rep+1,6+J,VERT,1
End
End
219→M
For(I,0,28,2
Ligne(M-25,I,M+25,I,BLANC,2
If I≤14
Ligne(M-5,I,M+5,I,MARRON,2
If I≥18 et I≤25
Then
Ligne(M-8,I,M-16,I,BLEU CLR,2

End
End
For(I,28,42
I-28
Ligne(M-25+Rep,I,M+25-Rep,I,ROUGE,1
End

While non(getKey

End
ArrPlanNAff
RappelBDG BDG0
DelVar BDG0
Lien vers le sujet sur le forum: Jour 13 : Programme de l'Avent TI-83 Premium CE (Commentaires: 3)

Nouvelle démo gLib : après les personnages, le manoir Croft!

Nouveau messagede critor » 13 Déc 2016, 00:15

Dans deux articles précédents, nous te parlions de la bibliothèque de modélisation 3D gLib en cours de développement par TheMachine02 pour ta TI-83 Premium CE.
Au cours de son cycle de développement, TheMachine02 nous avait produit plusieurs démos très sympa, te permettant de rentrer et animer dans ta calculatrice des modèles 3D de personnages issus de la culture du jeu vidéo, personnages qu'il a par la suite progressivement habillés de textures. :bj:

Mais pour la démo de ce soir, tu peux oublier les petits personnages... car TheMachine02 pulvérise littéralement toute limite en te remodélisant en taille réelle une chambre du manoir de Lara Croft dans sa version Tomb Raider 3 ! :#tritop#:

Même si cela peut faire illusion, techniquement il s'agit bien du même moteur que dans les démos précédentes.
Au lieu d'avoir la forme d'un personnage, l'objet modélisé est ici beaucoup plus grand et a la forme d'une pièce, avec les mêmes textures affichées des deux côtés de chaque mur.
Et pour parfaire le tour, le programme au démarrage nous place cette fois-ci à l'intérieur de l'objet et non devant. ;)

D'ailleurs il n'y a pas de gestion des collisions, et à un moment sur l'animation ci-contre on sort de la pièce en passant à travers un mur, ce qui te permet de découvrir la véritable forme de l'objet, ainsi que la conception des fenêtres et portes par extrusion. ;)

Cela n'enlève toutefois rien à l'exploit - cela prouve au contraire l'excellente conception du moteur 3D si justement il est ainsi réutilisable dans différents contextes ! :bj:
Et les performances sur calculatrice sont particulièrement impressionnantes, ce qui pourrait être très intéressant dans le contexte de futurs jeux : ;)


Téléchargement : archives_voir.php?id=775926
Lien vers le sujet sur le forum: Nouvelle démo gLib : après les personnages, le manoir Croft! (Commentaires: 5)

Jour 14 : Programme de l'Avent TI-83 Premium CE

Nouveau messagede critor » 14 Déc 2016, 00:02

Et une autre... ;)
Code: Tout sélectionner
...
For(I,0,28,2
...
If I≥18 et I≤25
Then
...
Ligne(M+8,I,M+16,I,BLEU CLR,2
End
End
...

Show/Hide spoilerAfficher/Masquer le spoiler
Code: Tout sélectionner
EnrBDG BDG0
ZDécimal
AxesNAff
FoncNAff
QuadNAff
GraphNAff
40Xmax→Xmax
40Ymax→Ymax
0→Xmin
0→Ymin
ArrPlanAff NOIR
CouleurBord 1
EffDess
131→Y
77→L
9→X
For(I,0,Y,2
Ligne(X,I,L,I,BLEU MRN,2
End
For(I,16,Y,16
Ligne(X,I,L,I,GRIS FON,1
For(J,­14,­4,2
Ligne(X+7,I+J,X+14,I+J,ORANGE,2
End
Pt-Aff(X+12,I-10,GRIS,1
End
X+2→X
{0,3,3,1,6,0,2,7,6,2,4,0,3,7,6,3,4,0,4,6,0,5,3,3,8,23,23,8,15,0,9,23,23,9,15,0,10,23,0,11,23,22,11,20,0,12,23,22,12,20,20,12,17,0,13,23,22,13,20,20,13,17,0,14,23,22,14,20,0,15,23,0,16,23,0,17,23,22,17,20,0,18,23,22,18,20,20,18,17,0,19,23,22,19,20,20,19,17,0,20,23,22,20,20,0,21,23,0,22,23,23,22,15,0,23,23,23,23,15,0,24,15,0,25,15,0,26,15,0,27,15,0,28,15,0,29,15,0,30,15,0,31,15,0,32,15,0,33,15,0,34,15,0,35,15,0,36,15,0,37,15,0,38,15,0,39,15,0,40,7,0,41,7,0,42,7,0,43,7,0,44,9,9,44,7,0,45,10,10,45,7,0,46,11,11,46,8,0,47,12,11,47,9,9,47,7,0,48,13,13,48,11,10,49,14,14,49,11,11,50,12,11,51,16,16,51,13,13,51,11,10,52,18,18,52,16,16,52,11,0,53,18,18,53,16,16,53,11,9,54,19,10,55,18,18,55,16,16,55,10,10,55,8,8,56,18,18,56,16,16,56,10,9,57,16,16,57,10,10,57,8,8,58,11,9,59,12,12,59,10,10,60,11,11,61,12,12,59,3,3,60,6,0,61,7,6,61,4,0,62,7,6,62,4,0,63,6,0,64,3,3
For(I,1,dim(Rep),3
Ligne(X+Rep(I),Y+Rep(I+1),X+Rep(I),Y+Rep(I+2),BLEU MRN,1
End
For(I,3,Xmax,8
Ligne(I,0,I,3,VERT,2
End
For(I,3+8,Xmax,16
For(J,1,3
Ligne(I-J,3+J,I+J+1,3+J,VERT,1
End
For(J,1,4
partEnt(2.75-J/2
Ligne(I-Rep,6+J,I+Rep+1,6+J,VERT,1
End
End
219→M
For(I,0,28,2
Ligne(M-25,I,M+25,I,BLANC,2
If I≤14
Ligne(M-5,I,M+5,I,MARRON,2
If I≥18 et I≤25
Then
Ligne(M-8,I,M-16,I,BLEU CLR,2
Ligne(M+8,I,M+16,I,BLEU CLR,2
End
End
For(I,28,42
I-28
Ligne(M-25+Rep,I,M+25-Rep,I,ROUGE,1
End

While non(getKey

End
ArrPlanNAff
RappelBDG BDG0
DelVar BDG0
Lien vers le sujet sur le forum: Jour 14 : Programme de l'Avent TI-83 Premium CE (Commentaires: 0)

Nouvelle démo gLib : Midna dans sa skybox !

Nouveau messagede critor » 14 Déc 2016, 00:16

Nous nous retrouvons ce soir pour une nouvelle démo de gLib, la bibliothèque de modélisation 3D en cours de développement pour TI-83 Premium CE.

Nous avions au départ eu droit à plusieurs démos de personnages issus de la culture du jeu vidéo, dont Midna de Zelda Twilight Princess.
Dans l'article précédent, TheMachine02 te montrait la grande polyvalence de son moteur, en nous modélisant l'intérieur d'une pièce du manoir de Lara Croft.

TheMachine02 continue dans la même lancée avec une nouvelle démo de Midna qui cette fois-ci semble apparemment partie en voyage quelque part dans le nord canadien : ;)
(accéléré pour que toute la boucle tienne)

Et oui, grande avancée, les personnages modélisés ne sont plus tout seuls et peuvent maintenant être intégrés dans un environnement ! :bj:

Le fond panoramique obtenu ici, même si il n'en a pas l'air, est bien géré par le même moteur 3D que pour la démo Midna précédente.

Il s'agit de la technique dite de la skybox qui consiste à enfermer le personnage dans une grande boîte dont les parois internes sont tapissées de textures représentant le fond, et à placer bien évidemment la caméra dans la boîte.
Pour un meilleur réalisme, la boîte sera de préférence sphérique. Selon les mouvements autorisés ou pas, une boîte cylindrique peut également permettre de bons résulats à moindres frais. ;)

C'est une astuce notamment utilisée dans le domaine du jeu vidéo, et qui donne l'illusion que les espaces modélisés sont beaucoup plus étendus qu'ils ne sont en réalité. ;)
En pratique, l'illusion fonctionne assez bien tant que l'on empêche le joueur de trop se rapprocher des parois de la skybox... :P



Téléchargement : archives_voir.php?id=767333
Lien vers le sujet sur le forum: Nouvelle démo gLib : Midna dans sa skybox ! (Commentaires: 0)

Jour 15 : Programme de l'Avent TI-83 Premium CE

Nouveau messagede critor » 15 Déc 2016, 00:00

Oh, il neige ! :o
Code: Tout sélectionner
EnrBDG BDG0
ZDécimal
AxesNAff
FoncNAff
QuadNAff
GraphNAff
40Xmax→Xmax
40Ymax→Ymax
0→Xmin
0→Ymin
ArrPlanAff NOIR
CouleurBord 1
EffDess
131→Y
77→L
9→X
For(I,0,Y,2
Ligne(X,I,L,I,BLEU MRN,2
End
For(I,16,Y,16
Ligne(X,I,L,I,GRIS FON,1
For(J,­14,­4,2
Ligne(X+7,I+J,X+14,I+J,ORANGE,2
End
Pt-Aff(X+12,I-10,GRIS,1
End
X+2→X
{0,3,3,1,6,0,2,7,6,2,4,0,3,7,6,3,4,0,4,6,0,5,3,3,8,23,23,8,15,0,9,23,23,9,15,0,10,23,0,11,23,22,11,20,0,12,23,22,12,20,20,12,17,0,13,23,22,13,20,20,13,17,0,14,23,22,14,20,0,15,23,0,16,23,0,17,23,22,17,20,0,18,23,22,18,20,20,18,17,0,19,23,22,19,20,20,19,17,0,20,23,22,20,20,0,21,23,0,22,23,23,22,15,0,23,23,23,23,15,0,24,15,0,25,15,0,26,15,0,27,15,0,28,15,0,29,15,0,30,15,0,31,15,0,32,15,0,33,15,0,34,15,0,35,15,0,36,15,0,37,15,0,38,15,0,39,15,0,40,7,0,41,7,0,42,7,0,43,7,0,44,9,9,44,7,0,45,10,10,45,7,0,46,11,11,46,8,0,47,12,11,47,9,9,47,7,0,48,13,13,48,11,10,49,14,14,49,11,11,50,12,11,51,16,16,51,13,13,51,11,10,52,18,18,52,16,16,52,11,0,53,18,18,53,16,16,53,11,9,54,19,10,55,18,18,55,16,16,55,10,10,55,8,8,56,18,18,56,16,16,56,10,9,57,16,16,57,10,10,57,8,8,58,11,9,59,12,12,59,10,10,60,11,11,61,12,12,59,3,3,60,6,0,61,7,6,61,4,0,62,7,6,62,4,0,63,6,0,64,3,3
For(I,1,dim(Rep),3
Ligne(X+Rep(I),Y+Rep(I+1),X+Rep(I),Y+Rep(I+2),BLEU MRN,1
End
For(I,3,Xmax,8
Ligne(I,0,I,3,VERT,2
End
For(I,3+8,Xmax,16
For(J,1,3
Ligne(I-J,3+J,I+J+1,3+J,VERT,1
End
For(J,1,4
partEnt(2.75-J/2
Ligne(I-Rep,6+J,I+Rep+1,6+J,VERT,1
End
End
219→M
For(I,0,28,2
Ligne(M-25,I,M+25,I,BLANC,2
If I≤14
Ligne(M-5,I,M+5,I,MARRON,2
If I≥18 et I≤25
Then
Ligne(M-8,I,M-16,I,BLEU CLR,2
Ligne(M+8,I,M+16,I,BLEU CLR,2
End
End
For(I,28,42
I-28
Ligne(M-25+Rep,I,M+25-Rep,I,ROUGE,1
End

5→N
0→dim(⌊N
N→dim(⌊N
While non(getKey
For(I,1,N
If NbrAléat>.95 et 0≥imag(⌊N(I
Then
nbrAléatEnt(0,Xmax
If non(pxl-Test(0,Rep
Ymax+Rep→⌊N(I
End
⌊N(I)-4
If 0≤imag(Rep
Then
If pxl-Test(Ymax-imag(Rep),réel(Rep
Then

­→⌊N(I
End
If 0≤imag(Rep
Then
Pt-NAff(réel(⌊N(I)),imag(⌊N(I)),3
Pt-Aff(réel(Rep),imag(Rep),3,GRIS CLR
Rep→⌊N(I
End
End
End
End
ArrPlanNAff
RappelBDG BDG0
DelVar BDG0
Lien vers le sujet sur le forum: Jour 15 : Programme de l'Avent TI-83 Premium CE (Commentaires: 16)

Nouvelle démo gLib : le manoir Croft encore plus complet !

Nouveau messagede critor » 15 Déc 2016, 00:08

Dans sa dernière démo de sa bibliothèque gLib pour TI-83 Premium CE, TheMachine02 te modélisait en 3D une petite chambre issue du manoir Croft dans Tomb Raider 3.

Aujourd'hui TheMachine02 va encore et toujours plus loin, avec cette fois-ci tout le hall d'accueil du manoir ! :bj:

Et si tu fais bien attention ci-dessous, tu verras que tu n'es pas seul(e) dans ce hall... ;)



Téléchargement : archives_voir.php?id=778063
Lien vers le sujet sur le forum: Nouvelle démo gLib : le manoir Croft encore plus complet ! (Commentaires: 4)

-
Rechercher
-
Social TI-Planet
-
Sujets à la une
Comparaisons des meilleurs prix pour acheter sa calculatrice !
Aidez la communauté à documenter les révisions matérielles en listant vos calculatrices graphiques !
Phi NumWorks jailbreak
123
-
Faire un don / Premium
Pour plus de concours, de lots, de tests, nous aider à payer le serveur et les domaines...
Faire un don
Découvrez les avantages d'un compte donateur !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partenaires et pub
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
1137 utilisateurs:
>1093 invités
>40 membres
>4 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Autres sites intéressants
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)