10 POKE 53280,11:POKE 53281,11:POKE 646,15
20 PRINT"[147]THE EASY FULL-SCREEN ANIMATION ARTICLE"
30 PRINT"HAS FOUR ACCOMPANYING PROGRAMS. SINCE"
40 PRINT"TWO OF THE PROGRAMS WRITE FILES TO DISK,";
50 PRINT"WE SUGGEST YOU SAVE ALL FOUR FILES TO"
60 PRINT"ANOTHER DISK. PLEASE CONSULT THE ARTICLE";
70 PRINT"BEFORE ATTEMPTING TO USE THEM."
80 PRINT"THE FILES ARE SAVED ON THIS DISK WITH"
90 PRINT"THE FOLLOWING NAMES:[152]"
100 PRINTSPC(13)"ANIMATOR.BASIC"
110 PRINTSPC(13)"ANIMATOR"
120 PRINTSPC(13)"LOVE.DATA"
130 PRINTSPC(13)"CUBE.DATA"
140 PRINT"[144]   PRESS ANY KEY TO RELOAD THE MENU    [146]"
150 POKE198,0:WAIT198,1:GETDH$
160 PRINT"[147]":S$="L[207]"+CHR$(34)+"MN"+CHR$(34)+",8:"+CHR$(131)
170 FORI=1TOLEN(S$):POKE630+I,ASC(MID$(S$,I)):NEXT:POKE198,I
180 POKE53281,15:POKE53280,15
190 PRINTCHR$(142)"[145]          RELOADING THE MENU[155]":END