Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
Générateur de smileys par made2kill
made2kill le 03/11/2011 à 16:08
Voici un programme complètement déuné d'intérêt créée en 30 minutes à mon lycée
Il afficha une liste de smileys et permet de créér le vôtre... Aucun intérêt donc...
Code
If not(Str2:" "ü ( 
) Str2
In not(Str3:" "ü ( ) Str3
ClrHome
Output(4,1,"GENERATEUR DE
Output(5,1,"SMILEYS :)
Pause
ClrHome
Menu("SMILEYS","AFFICHER",A,"CREER",B,"QUITTER",C
Lbl A
ClrDraw
0ü ( ) Xmin
0ü ( ) Ymin
92ü ( ) Xmax
64ü ( ) Ymax
AxesOff
Text(1,1,":)
Text(8,1,":(
Text(15,1,":?
Text(22,1,":]
Text(29,1,":[
Text(36,1,":}
Text(43,1,":{
Text(50,1,":e (le e minuscule en faisant [2nde] + [Signe diviser]
Text(57,1,":P
Text(1,40,":T
Text(8,40,":J
Text(15,40,":O
Text(22,40,":L
Text(29,40,":S
Text(36,40,":Q
Text(43,40,":X
Text(50,40,"XD
Text(57,40,"XP
Text(1,80,"X)
Text(8,80,"X(
Text(15,80,":[THETA]
Text(22,80,":R
Text(29,50,"TON SMILEY:
Text(36,80,Str2
Repeat K
getKeyü ( ) K
End
Goto C
Lbl B
ClrHome
Input "YEUX (:,=,X):",Str2
Input "BOUCHE:",Str3
Str2+Str3ü ( ) Str2
ClrHome
Disp "TON SMILEY:",Str2
Lbl C
Output(1,1,"
made2kill aka M2K
Persalteas le 03/11/2011 à 16:54
WAW... effectivement. Là, j'espère que tu nous excuses si on a pas trop de commentaires à faire...
sandro le 03/11/2011 à 18:54
excuse moi, mais les deux premières lignes sont totalement inutiles : si Str2 et 3 existent, ça sert à rien, et si ça existe pas, ça te met une erreure indéfinit.
SandroThe K le 03/11/2011 à 18:54
Wow !
Alors la je suis bluffé ... T'avais que ça a faire de ton cours
?
Enfin après ... Pourquoi pas hein ...
XD
made2kill le 04/11/2011 à 11:22
C'était pas en cours, mais en perm'...
Et oui, je m'emmerdais vraiment...
Et je n'avais aucune idée de prog alors j'ai fait ce truc...
Et effectivement, il n'y a aucun commentaire à faire sur ce machin indéfinissable...sandro le 04/11/2011 à 18:48
Si, celui que j'ai déjà fait : les deux premières lignes sont innutiles, car si les chaînes n'existent pas, ça plante, et si elles existent ça ne fait rien.
Sandromade2kill le 05/11/2011 à 09:30
Heu, c'est bon, t'es lourd là, j'avais compris la première fois...
En plus, comme j'étais pas connecté quand j'ai posté ce truc, je peux pas éditer et enlever les 2 premières lignes...sandro le 05/11/2011 à 20:58
Pardon, je pensais que tu avais raté le message à cause du fait que The K à posté moins d'une minute après moi et que tu avais écrit :
Citation
Et effectivement, il n'y a aucun commentaire à faire sur ce machin indéfinissable...
Sandro
The K le 05/11/2011 à 21:18
Citation
Pardon, je pensais que tu avais raté le message à cause du fait que The K à posté moins d'une minute après moi
Mort de rire
Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
