

Code : Tout sélectionner
OpenConsole()
For ligne=0 To 3
For colonne=0 To4
Read sprite
ConsoleLocate(ligne*5,colonne*5)
If sprite:Print(Str(sprite)):EndIf
Next
Next
ConsoleLocate(0,25)
Print("Appuyez sur une touche pour quitter...")
Input()
End
DataSection
Data.l 1,1,1,1,1,1
Data.l 1,0,2,3,0,1
Data.l 1,0,1,0,1,0
Data.l 2,2,2,2,2,2
EndDataSection