Planète Casio
Les membres ayant 30 points peuvent parler sur les canaux annonces, projets et hs du chat.
La shoutbox n'est pas chargée par défaut pour des raisons de performances. Cliquez pour charger.
Menu
Calculatrices
Graph 35 à 100
Graph 25+Pro/25+E/25+E II
Graph 35+USB/75(+E)/85/95 SD
Graph 100(+)
Classpad 300/330(+)
fx-CG 10/20 (Prizm)
Classpad 400(+E)
Graph 90+E
fx-92+ SC
Liens
¤ Transférer un programme sur
sa calculatrice
¤ Vous cherchez une fonction ?
Jeux >> Graph 35 à 100 >> Divers >> Ecran de veille
Ecran de veille
Version : 1.0 Taille : 666 octets Ajouté le : 2005-07-01 Modifié le : 2005-07-01
Auteur et posteur :
LenainnoirHors ligneAncien administrateurPoints: 5186 Défis: 24 Message
 Planète Casio - Jeu Casio - Ecran de veille - lenainnoir - Calculatrices
Nombre de visites sur cette page : 6537
Score au progrank : 37
Pas encore de note !
Vous devez être connecté(e) pour noter (inscription).
1629 téléchargements | Soumettre un test

Description :

Un écran de veille qui sert à rien sauf à vous remplir l'écran et à épater les copains et à faire style en controle de maths...
Cela peut aussi servir d'exemples au débutants en programmation...
Commentaires :


MuelsacoHors ligneFondateurPoints: 9335 Défis: 175 Message
Posté le 01-07-2005 à 00:00 | #
mdr je comprends tout à fait lenainnoir Ce programme sert plus d'exemple qu'autres choses
EltoredoHors ligneModérateurPoints: 4301 Défis: 35 Message
Posté le 10-05-2014 à 23:45 | #
Désolé pour le SUPER déterrage mais puis-je l'avoir en g1r svp ?
BtlHors ligneAncien modérateurPoints: 3879 Défis: 107 Message
Posté le 10-05-2014 à 23:49 | #
\ClrText
Lbl 0
For 1->Z To 7
Locate 1,Z,"o"
Next
For 1->Z To 21
Locate Z,7,"o"
Next
For 7->Z To 1 Step -1
Locate 21,Z,"o"
Next
For 21->Z To 1 Step -1
Locate Z,1,"o"
Next
For 2->Z To 6
Locate 2,Z,"o"
Next
For 2->Z To 20
Locate Z,6,"o"
Next
For 6->Z To 2 Step -1
Locate 20,Z,"o"
Next
For 20->Z To 2 Step -1
Locate Z,2,"o"
Next
For 3->Z To 5
Locate 3,Z,"o"
Next
For 3->Z To 19
Locate Z,5,"o"
Next
For 5->Z To 4 Step -1
Locate 19,Z,"o"
Next
For 19->Z To 4 Step -1
Locate Z,3,"o"
Next
For 4->Z To 18
Locate Z,4,"o"
Next
For 1->Z To 7
Locate 1,Z," "
Next
For 1->Z To 21
Locate Z,7," "
Next
For 7->Z To 1 Step -1
Locate 21,Z," "
Next
For 21->Z To 1 Step -1
Locate Z,1," "
Next
For 2->Z To 6
Locate 2,Z," "
Next
For 2->Z To 20
Locate Z,6," "
Next
For 6->Z To 2 Step -1
Locate 20,Z," "
Next
For 20->Z To 2 Step -1
Locate Z,2," "
Next
For 3->Z To 5
Locate 3,Z," "
Next
For 3->Z To 19
Locate Z,5," "
Next
For 5->Z To 4 Step -1
Locate 19,Z," "
Next
For 19->Z To 4 Step -1
Locate Z,3," "
Next
For 4->Z To 18
Locate Z,4," "
Next
Goto0


En clair, ce code est encore plus néophyte qu'un code de plus ou moins.
EltoredoHors ligneModérateurPoints: 4301 Défis: 35 Message
Posté le 10-05-2014 à 23:53 | #
Merci mais je ne le comprend pas (les goto ok mais les For, j'ai du mal a cerner sa fonction)
GollumHors ligneMembrePoints: 1262 Défis: 2 Message
Posté le 11-05-2014 à 00:00 | #
For 21->Z To 1 Step -1
Locate Z,1,"o"
Next 


21->Z
Do
Locate Z,1,"o"
Dsz Z
LpWhile Z≠1
TotoyoHors ligneMembre d'honneurPoints: 16102 Défis: 102 Message
Posté le 11-05-2014 à 11:01 | #
N'empêche, son code est optimisable...
BtlHors ligneAncien modérateurPoints: 3879 Défis: 107 Message
Posté le 11-05-2014 à 14:39 | #
carrément

Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 199 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements

Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd