home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / canada-remote-systems / c64 / graphutl / cad.arc / WCMND (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  115 b   |  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.