公式ムックより
ACLS
LOAD"PRG1:SYS/KANJITBL",0
COLOR #TCYAN
PRINT CHR$(&H65E5);CHR$(&H7D4C);"ソフトウェア"
COLOR #TMAGENTA
DIM K$[46]
USE 1
RESTORE "1:@SB_KANJITBL"
FOR I=0 TO 99
READ K$[I]
IF K$=="" THEN BREAK
NEXT
PRINT MID$(K$[21],11,1);MID$(K$[8],31,1);
PRINT "ソフトウェア"