1 REM ********************************************************************************PARTIE I DE L'AFFICHAGE DE LA TABLE 10 CLS : KEY OFF: RANDOMIZE TIMER 20 COLOR 1, 4, 2: CLS 30 LOCATE 3, 22: PRINT "- Tableau des El‚ments P‚riodiques -" 40 LOCATE 4, 22: PRINT " - Affichage des Elements -" 41 LOCATE 5, 22: PRINT " HydrogŠne I … Krypton IV " 50 COLOR 14: A$ = CHR$(205) 60 LOCATE 2, 20: PRINT CHR$(201) 70 LOCATE 2, 59: PRINT CHR$(187) 80 LOCATE 3, 20: PRINT CHR$(186) 90 LOCATE 3, 59: PRINT CHR$(186) 100 LOCATE 4, 20: PRINT CHR$(186) 110 LOCATE 4, 59: PRINT CHR$(186) 111 LOCATE 5, 20: PRINT CHR$(186) 112 LOCATE 5, 59: PRINT CHR$(186) 120 LOCATE 6, 20: PRINT CHR$(200) 130 LOCATE 6, 59: PRINT CHR$(188) 160 FOR A = 1 TO 38 170 LOCATE 2, 20 + A: PRINT A$ 180 LOCATE 6, 20 + A: PRINT A$ 190 NEXT A 195 PLAY "A": PLAY "A": PLAY "B": PLAY "E" 200 REM ****************************************************************