Normalement, ce programme Basic devrait l'afficher correctement (pas besoin d'écrire les commentaires):
Code:
10 DIM T%(10000)
20 DEFFNC(R)=MAX(-R-1,R) Pour la bonne valeur de couleur
30 LOADP "DESSIN",T%(10000)
40 T=T%(10000) Pointe sur la fin du fichier
50 T=T+1 : IF T%(T)<>-23206 THEN END Vérifie si format TO-SNAP
60 FOR I=15 TO 0 STEP -1:T=T+1:PALETTE I,FNC(T%(T)):NEXT Initialise la palette
70 T=T+1 : CONSOLE,,,,T%(T) Commute sur le bon mode d 'affichage
80 T=T+1 : SCREEN,,T%(T) Fixe la couleur de tour d'écran
90 T=T+1 : POKE &H605F,T%(T) Fixe le SCRMOD
100 PUT(0,0),T%(10000) Affiche le graphique
110 A$=INPUT$(1) Attend l'appui d'une touche
... parce que la palette est comprise dans le fichier du graphique. C'est ça, l'avantage du format TO-SNAP : pas besoin de recréer la palette à la main !
Ce serait dommage de se priver du plaisir de voir ça. Surtout que le logo est canon.
Connexion
M’enregistrer
FAQ
Rechercher
