5 'SAVE "B"
100 KEY OFF: CLS
200 WIDTH 40: DEF SEG=0: A=PEEK(&H410): POKE &H410,A OR &H30
210 WIDTH  80: LOCATE ,,1,12,13
215 KEY ON
220 CHAIN "MENU"