Forum Communauté
Des lignes de basic...
Citation de Jerres12 le 24 juillet 2019, 21 h 36 minL'idée m'est venue, en faisant n'importe quoi sur le chat, de lancer une nouvelle expérience participative. Pour que ce soit intéressant, il faut quand même fixer quelques règles (qui pourront évoluer au fil du temps):
- V Il n'est possible de programmer qu'en BASIC
- V Il n'est possible de poster qu'une seule ligne à la fois
- X Il est interdit d'écraser une ligne déjà existante
- V Il autorisé d'insérer des lignes entre celles déjà poster
- X Il est interdit de faire deux posts de suite
- X Il est interdit de discuter du sujet avec les autres participants
- V Il est possible de corriger une ligne renvoyant un message d'erreur (mais en gardant l'esprit dans l'esprit initial)
- X Il est interdit d'empêcher l'exécution d'autres lignes
On verra bien si ça prend...
Et pour commencer, sans surprise (parce que je suis nul et parce que...):
L'idée m'est venue, en faisant n'importe quoi sur le chat, de lancer une nouvelle expérience participative. Pour que ce soit intéressant, il faut quand même fixer quelques règles (qui pourront évoluer au fil du temps):
- V Il n'est possible de programmer qu'en BASIC
- V Il n'est possible de poster qu'une seule ligne à la fois
- X Il est interdit d'écraser une ligne déjà existante
- V Il autorisé d'insérer des lignes entre celles déjà poster
- X Il est interdit de faire deux posts de suite
- X Il est interdit de discuter du sujet avec les autres participants
- V Il est possible de corriger une ligne renvoyant un message d'erreur (mais en gardant l'esprit dans l'esprit initial)
- X Il est interdit d'empêcher l'exécution d'autres lignes
On verra bien si ça prend...
Et pour commencer, sans surprise (parce que je suis nul et parce que...):
Citation de Jerres12 le 24 juillet 2019, 21 h 36 min10 CLS: BORDER 0
10 CLS: BORDER 0
Citation de RetroPoke le 26 juillet 2019, 9 h 27 minDonc :
10 CLS: BORDER 0
100 cls: locate 0,0 : print "MENU"
RUN
Improper argument in 100
La commande 'Locate' débute à 1... Exemple: LOCATE 1, 1
🙄 On fait comment de ce cas ?
Donc :
10 CLS: BORDER 0
100 cls: locate 0,0 : print "MENU"
RUN
Improper argument in 100
La commande 'Locate' débute à 1... Exemple: LOCATE 1, 1
🙄 On fait comment de ce cas ?
Citation de Solorenzero le 26 juillet 2019, 12 h 38 minfaire en sorte que la ligne ne soit jamais exécutée 😮
99 DEF FN rc(x,y)=SQR(x*x+y*y):DEF FN tc(x,y)=ATN(y/x):DEF FN xc(r,t)=r*COS(t):DEF FN yc(r,t)=r*SIN(t):DEG:FOR n=0 to 23:r=4+RND*16:ORIGIN RND*640,RND*400:FOR t=0 to 359 step 80\r:PLOT 0,0,1+n\8:DRAW FNxc(r,t),FNyc(r,t):NEXT t,n:ORIGIN 320,200:GOTO 101
à écouter avec la musique d'EXOLON lol
faire en sorte que la ligne ne soit jamais exécutée 😮
99 DEF FN rc(x,y)=SQR(x*x+y*y):DEF FN tc(x,y)=ATN(y/x):DEF FN xc(r,t)=r*COS(t):DEF FN yc(r,t)=r*SIN(t):DEG:FOR n=0 to 23:r=4+RND*16:ORIGIN RND*640,RND*400:FOR t=0 to 359 step 80\r:PLOT 0,0,1+n\8:DRAW FNxc(r,t),FNyc(r,t):NEXT t,n:ORIGIN 320,200:GOTO 101
à écouter avec la musique d'EXOLON lol
Citation de Jerres12 le 27 juillet 2019, 13 h 23 minIl semble y avoir quelques cas que je n'avais pas identifiés:
- le cas où une ligne renvoie un message d'erreur (ligne 100 de @monos)
- le cas où une ligne empêche l'exécution d'une autre ligne (ligne 99 de @solorenzero)
Il convient donc de rajouter quelques règles:
- V Il est possible de corriger une ligne renvoyant un message d'erreur (mais en gardant l'esprit dans l'esprit initial)
- X Il est interdit d'empêcher l'exécution d'autres lignes
Il semble y avoir quelques cas que je n'avais pas identifiés:
- le cas où une ligne renvoie un message d'erreur (ligne 100 de @monos)
- le cas où une ligne empêche l'exécution d'une autre ligne (ligne 99 de @solorenzero)
Il convient donc de rajouter quelques règles:
- V Il est possible de corriger une ligne renvoyant un message d'erreur (mais en gardant l'esprit dans l'esprit initial)
- X Il est interdit d'empêcher l'exécution d'autres lignes
Citation de Jerres12 le 27 juillet 2019, 13 h 25 minPetit récapitulatif donc après correction des lignes 99 et 100:
10 CLS: BORDER 0
99 DEF FN rc(x,y)=SQR(x*x+y*y):DEF FN tc(x,y)=ATN(y/x):DEF FN xc(r,t)=r*COS(t):DEF FN yc(r,t)=r*SIN(t):DEG:FOR n=0 to 23:r=4+RND*16:ORIGIN RND*640,RND*400:FOR t=0 to 359 step 80\r:PLOT 0,0,1+n\8:DRAW FNxc(r,t),FNyc(r,t):NEXT t,n:ORIGIN 320,200
100 cls: locate 1,1 : print "MENU"
Petit récapitulatif donc après correction des lignes 99 et 100:
10 CLS: BORDER 0
99 DEF FN rc(x,y)=SQR(x*x+y*y):DEF FN tc(x,y)=ATN(y/x):DEF FN xc(r,t)=r*COS(t):DEF FN yc(r,t)=r*SIN(t):DEG:FOR n=0 to 23:r=4+RND*16:ORIGIN RND*640,RND*400:FOR t=0 to 359 step 80\r:PLOT 0,0,1+n\8:DRAW FNxc(r,t),FNyc(r,t):NEXT t,n:ORIGIN 320,200
100 cls: locate 1,1 : print "MENU"
Citation de Solorenzero le 27 juillet 2019, 14 h 37 minRajouter une ligne de code, c'est pas en option ^^
Règle n°5 : Il est interdit de faire deux posts de suite 😮
J'imagine que ça ne m'autorise pas à continuer le programme !
Rajouter une ligne de code, c'est pas en option ^^
Règle n°5 : Il est interdit de faire deux posts de suite 😮
J'imagine que ça ne m'autorise pas à continuer le programme !
Citation de Jerres12 le 27 juillet 2019, 23 h 42 minEt non @solorenzero, tu ne peux pas 🙂
Mais pour t'aider à avancer je propose une ligne 20 dans laquelle je peux exprimer tout mon talent créatif :
20 MODE 1 : LOCATE 16,12 : PRINT "DE L'EAU" : FOR I=1 TO 64 : INK 1,24 : DRAW RND*640,RND*400 : NEXT : LOCATE 8,13 : PRINT "DES SPAGHETTI DANS L'EAU"
Et non @solorenzero, tu ne peux pas 🙂
Mais pour t'aider à avancer je propose une ligne 20 dans laquelle je peux exprimer tout mon talent créatif :
20 MODE 1 : LOCATE 16,12 : PRINT "DE L'EAU" : FOR I=1 TO 64 : INK 1,24 : DRAW RND*640,RND*400 : NEXT : LOCATE 8,13 : PRINT "DES SPAGHETTI DANS L'EAU"