#11 Article 62 Posted at 1987/01/26 02:22:28 by SHINOBU (MAP055) [PRG.PACK]

Subject: アシュク・プログラム BASIC

10 CLEAR ,&H1FFF
20 LOADM"G4",,R
30 POKE &H2053,PEEK(&H2504)
40 POKE &H2054,PEEK(&H2505)
50 POKE &H2500,PEEK(&H2504)
60 POKE &H2501,PEEK(&H2505)
65 POKE &H2004,&H40
70 EXEC&H2000
80 POKE &H2053,PEEK(&H2504)
90 POKE &H2054,PEEK(&H2505)
100 POKE &H2502,PEEK(&H2504)
110 POKE &H2503,PEEK(&H2505)
115 POKE &H2004,&H80
120 EXEC&H2000