10 SCREEN 5: COLOR 15,0,0: M$="National": M=LEN(M$)
20 FOR X=1 TO M
30    CD=&H2300+ASC(MID$(M$,X,1)) 'Видимо, &H2300 - адрес?!
40    PUT KANJI (X*16-5,20),CD,11
50    PUT KANJI (X*16-5,70),CD,11
60    PUT KANJI (X*16-8,90),CD,11
70 NEXT: A$=INPUT$(1): SCREEN 0: LIST