1 A=USR(33),1:A=USR(33),2:A=USR(33),3
2 B$="ABC"
3 FORT=1TOLEN(B$):IFA$<>MID$(B$,T,1)THENNEXT:LOAD"MENU",D0
4 A$="W"+A$:LOADA$,D0