home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / comdore / 64apps / cad30.arc / WCMND (.txt) < prev    next >
Commodore BASIC  |  1988-11-13  |  115b  |  5 lines
  1. 1 A=USR(33),1:A=USR(33),2:A=USR(33),3
  2. 2 B$="ABC"
  3. 3 FORT=1TOLEN(B$):IFA$<>MID$(B$,T,1)THENNEXT:LOAD"MENU",D0
  4. 4 A$="W"+A$:LOADA$,D0
  5.