Poster un nouveau sujet Poster une réponse
texte sur écran
Auteur Message
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Dim 04 Juil 2010, 12:42   Citer 

un programme tout con que chaque programmeur à fait dans sa carrière mais je le poste quand même pour amuser les non programmeurs:

ce texte fait rebondir un mot que vous rentrez sur votre écran.
Il faut rentrer un mot de moins de 15 caractères.


Code

2->A
1->B
1->C
1->D
Input "TEXTE? ",Chaine0
longueur(Chaine0)->N
EffEcr
Lbl 1
A->E
A+C->A:B+D->B
Output(A,B,Chaine0
Output(E,1,"                "
If A=1:1->C
If A=8:-1->C
If B=1:1->D
If B=17-N:-1->D
If codetouche=0:Goto 1
Effvar Chaine0
Effvar AEffvar BEffvar CEffvar DEffvar EEffvar N





 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Dim 04 Juil 2010, 15:13   Citer 

comme les economiseur d'ecran de windows...
manque plus que la 3D.......

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Dim 04 Juil 2010, 16:10   Citer 

yep.
pour la 3D il faudrait faire en mode graph et j'ai la flemme.
en plus ça alourdirait énormément ce petit prog.

 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Dim 04 Juil 2010, 20:19   Citer 

surtout si tu met les vrilles et tout...

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Lun 05 Juil 2010, 10:43   Citer 

Akmdad, tu peux essayer de le faire. ça te ferait une occupation pendant les vacances.

pour te donner une idée, si tu fais sans les vrilles:

-il faut dessiner la face des lettres avec des lignes.
-pour la perspective, tu refais les mêmes lignes mais avec +3 en ordonnée et en abscisse +4.
-tu relies les deux faces des lettres aux arêtes, et tu obtiens une lettre en 3D transparente.

J'espère que ça va te brancher! crazy.gif

 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Lun 05 Juil 2010, 16:01   Citer 

Astuce: Si vous voulez écrire du texte en gras sur le graphique, faites ça:

Code
"Votre texte à afficher ici
For(A,1,longueur(Rép
For(B,0,1
Text(0,5A+B,sous-Chaîne(Rép,A,1
End
End



Sur le tableur, si vous souhaitez écrire de couleur inversée, (C'est à dire blanc sur fond noir.) faites ça:

ZTEXT: (Ne faites pas d'erreurs !)

Code
FDCB05DEC9
End
0000
End



TEXT:

Code
EffEcr
Envoi(9prgmZTEXT
Output(4,6,"ALEXIS
Output(1,1,"



Source du programme ASM:

Citer
.NOLIST
#define equ .equ
#define EQU .equ
#define end .end
#include "ti83asm.inc"
#include "tokens.inc"
.LIST
.org 9327h
set textinverse,(iy+textflags)
ret
.end



----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Lun 05 Juil 2010, 18:00   Citer 

a quoi sert #include?
ce sont des bibliothèques?
et #define?

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Lun 05 Juil 2010, 19:58   Citer 

Les fichiers includes contiennent la valeur héxadécimale d'une fonction ASM.
Les delfine euh je sais pas mais il faut toujours les mettre au début de la source.

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Lun 05 Juil 2010, 20:10   Citer 

la valeur hexa?

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Lun 05 Juil 2010, 20:25   Citer 

C'est à dire que quand la calculatrice lit cette valeur héxadécimal, alors elle exécute la fonction qui est attribuée à cette valeur, exemple de fichier include:

Citer
_CLRLCDFULL .EQU 4755H
_CLRSCRNFULL .EQU 475DH
_CLRTXTSHD .EQU 4765H
_DISPDONE .EQU 47F1H
_DISPHL .EQU 4709H
_DISPOP1A .EQU 51D4H
_ERASEEOL .EQU 476DH
_FORMDCPLX .EQU 4D2EH
_FORMREAL .EQU 4D32H
_GDISPTOKEN .EQU 4B20H
_HOMEUP .EQU 4775H
_LCD_BUSY .EQU 4066H
_MOVEUP .EQU 474DH
_NEWLINE .EQU 473DH



----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Lun 05 Juil 2010, 20:30   Citer 

le prog pour écrire en gras souligné:


Code

Effdessin
Input Chaine0
longueur(Chaine0)->M
For(A,1,M
For(B,0,1
Texte(0,5A+B,sous-Chaine(Chaine0,A,1
End
End
Ligne(5,55,5M+5,55



godgrace.gif

 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Lun 05 Juil 2010, 20:33   Citer 

si j'écris

Code

47F1H
end
0000
end


ça va me mettre "Done"
?

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Lun 05 Juil 2010, 20:34   Citer 

quel rapport?

j'ai peur si tu te mets à l'ASM... frozen.gif

 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Lun 05 Juil 2010, 20:42   Citer 

c'est génial l'ASM!

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Lun 05 Juil 2010, 22:30   Citer 

surtout l'ASM sur Wii.

 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Lun 05 Juil 2010, 22:33   Citer 

c'est sur...

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Mar 06 Juil 2010, 11:17   Citer 

pourriez vous me le traduire version TI-82 basique svp car je n'ai pas de chaine...sniff

  Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Mar 06 Juil 2010, 13:23   Citer 

sans chaine??

ouhhhh....
désolé, j'ai la flemme. demande à Akmdad si il est motivé.

 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Mar 06 Juil 2010, 14:06   Citer 


Citer : Akmdad
si j'écris

Code

47F1H
end
0000
end


ça va me mettre "Done"
?



Mais non, 47F1H signifie que 47F1 est en héxadécimal. Il faut un assembleur pour créer le code, tu ne peux pas le faire comme ça.

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Mar 06 Juil 2010, 15:13   Citer 

ah ok...
et puis je suis sur wii et psp donc je n'écrierais rien du tout

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Mer 07 Juil 2010, 8:44   Citer 

Ca serait sympa car en language prgm de calto non merci; xHTML , css , php ok mais calto non !

  Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Ven 09 Juil 2010, 16:07   Citer 

désolé quelqu'un a vu ma réponse svp

  Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Ven 09 Juil 2010, 16:12   Citer 

On a vu mais sans chaîne c'est pour ainsi dire très chiant à faire et si les autres sont aussi fénéants que moi, ça donne rien du tout.

Sangohan38

 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Ven 09 Juil 2010, 16:42   Citer 

Je veux bien te le faire mais il faut que tu m'indique le mot que tu souhaite faire rebondire, car sinon c'est c*****.

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Sam 10 Juil 2010, 17:32   Citer 

Tu es braiment sympa Alexis ,je peux toujours compter sur toi
je voudrais comme mot (si c'est possible) N3(V de racine carré)(le petit E de 2nde+virgule)R/M(O barré)R(le petit E de 2nde+virgule)
en tout ça donne N3VER/MORE

c'est possible sinon tu Marques Windows 7

  Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Dim 11 Juil 2010, 14:55   Citer 

Voilà:

{->} = [sto->]
{V(} = [2nde] + [x²]
{&} = [alpha] + [3]
{E} = [2nde] + [,]
{-} = [( - )]


Code
ClrHome
1+int 7rand{->}A
1+int 7rand{->}B
1{->}C
1{->}D
1{->}E
1{->}F
Repeat getKey
Output(C,D,("         
Output(A,B,"N3{V(}
Output(A,B+3,"{E}R/M{&}R{E}
A{->}C
B{->}D
A+E{->A
B+F{->}B
If A<2 or A>7
{-}E{->}E
If B<2 or B>6
{-}F{->}F
End
ClrHome
Output(4,6,"ALEXIS
Output(1,1,"



Si tu as un problème n'hésite pas.

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Lun 12 Juil 2010, 13:20   Citer 

excuser moi merci alex' mais la je suis a quatre pate avec mon ordi devant p***** de livebox qui mavait desactiver ma cle wifi....Merci alex merci merci

  Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Lun 12 Juil 2010, 14:25   Citer 

Est-il possible de faire en sorte que tous les never/more precedents s'effacent un peu comme ta balle rebondissante d'ailleur elle est extra!

  Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Lun 12 Juil 2010, 19:09   Citer 

Normalement il le fait, il faut que tu mettes dix espaces derrières Output(C,D,".

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Bartiste
Invité
Posté le : Mar 13 Juil 2010, 10:35   Citer 

Merci je n'avais pas vu

Serait il possible Alex de faire une fonction taper a la main des programmes des internautes sur ton site

  Haut de page Bas de page 
 
metallica



Autorisation : Membre
Nb de messages : 108
Inscrit le : Lun 28 Jui 2010, 11:14
Posté le : Mar 13 Juil 2010, 10:44   Citer 

sur le forum, certains membres ont postés leurs programmes à taper à la main regarde ici

----------------------
 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Mar 13 Juil 2010, 14:22   Citer 


Citer : Bartiste
Merci je n'avais pas vu

Serait il possible Alex de faire une fonction taper a la main des programmes des internautes sur ton site




Citer
Désolé, mais cela me prend beaucoup de temps de retranscrire le code pour le mettre à taper à la main, c'est pourquoi je ne compte le faire qu'avec mes programmes.



En effet il y a toujours le forum, ou télécharge les programmes.

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
fatal error



Autorisation : Membre
Nb de messages : 33
Inscrit le : Sam 10 Avr 2010, 17:36
Posté le : Dim 25 Juil 2010, 13:13   Citer 

est-ce que tu airait le programme permettant de repasser au noir sur blanc? parce que pour des programmes plus long ce serait pas mal.

----------------------
Bill Gates voulait créer un logiciel pour l'agriculture. C'est fait! Windows Plante!
 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Dim 25 Juil 2010, 14:49   Citer 

c'est le meme

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
fatal error



Autorisation : Membre
Nb de messages : 33
Inscrit le : Sam 10 Avr 2010, 17:36
Posté le : Dim 25 Juil 2010, 18:45   Citer 

non pas du tout, j'ai essayé...

----------------------
Bill Gates voulait créer un logiciel pour l'agriculture. C'est fait! Windows Plante!
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Lun 26 Juil 2010, 21:04   Citer 


Citer : fatal error
est-ce que tu airait le programme permettant de repasser au noir sur blanc? parce que pour des programmes plus long ce serait pas mal.



Tu parles de ce programme ?

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
fatal error



Autorisation : Membre
Nb de messages : 33
Inscrit le : Sam 10 Avr 2010, 17:36
Posté le : Mar 27 Juil 2010, 11:53   Citer 

non, mais plutôt de celui que je viens de découvrir en modifiant le code héxadécimal:

Code
:FDCB059EC9
:End
:0000
:End



Il fait l'effet inverse de ton programme ZTEXT, qui permet donc de repasser au noir sur blanc.

----------------------
Bill Gates voulait créer un logiciel pour l'agriculture. C'est fait! Windows Plante!
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Page générée en 9 requêtes