Ah, bonne question! En fait j'utilise la routine PLOTXY parue dans la revue des Sharpentiers n°20 p.5. Donc j'ignore quel appel est réalisé par ce programme.
Code : Tout sélectionner
10 POKE &4001,&88,&10,&65,&09,&57,&11,&0A,&58,&66,&01,&38,&0A,&02,&0A,&DB,&57
20 POKE &4011,&64,&0F,&44,&2C,&06,&57,&58,&64,&0F,&DB,&89,&10,&65,&11,&57,&58
30 POKE &4021,&11,&12,&66,&02,&38,&14,&02,&64,&DB,&57,&64,&0F,&43,&34,&70,&0A
40 POKE &4031,&2F,&03,&11,&13,&57,&58,&44,&2C,&18,&66,&01,&38,&11,&57,&64,&0F
50 POKE &4041,&DB,&57,&58,&64,&0F,&43,&34,&70,&0A,&2F,&03,&2C,&04,&57,&58,&DB
60 POKE &4051,&59,&67,&3C,&3A,&0C,&75,&3C,&43,&84,&DB,&50,&02,&28,&DB,&2C,&08
70 POKE &4061,&43,&84,&DB,&50,&02,&20,&DB,&88,&59,&67,&07,&3A,&09,&75,&07,&DB
80 POKE &4071,&84,&59,&74,&40,&DB,&04,&88,&02,&06,&DB,&45,&59,&34,&02,&80,&D2
90 POKE &4081,&2F,&02,&DB,&57,&47,&53,&37
100 CLS : CALL &43B: FOR X=0 TO 119: FOR Y=0 TO 13: CALL &4001:NEXT Y: NEXT X: FOR I=0 TO 1000: NEXT I
105:END