home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 18 / 18.iso / w / w417 / 1.ddi / ZH.BAS (.txt) < prev    next >
Encoding:
GW-BASIC  |  1979-12-31  |  110 b   |  2 lines
  1. 10  FOR I=1 TO 16:LPRINT CHR$(&H1B);"I";CHR$(&H40+I);CHR$(&H40+I);"TAB(<0xE5!>WHILELOCATEUSINGSTRING$USRTHENOPENOPENUSINGSTRING$WHILE<0xE0!>BSAVE*WRITEMERGELINEOPTIONOPENNOTSOUNDSTEPLOCATEELSESTRING$USRTAB(SOUNDUSRBEEPSTEPTRONCOLORAUTOWRITETRONSTRING$USRUSRSOUNDSCREEN^LOAD<UNK! {FEBF}>AUTOWRITETRONWENDCOLOR":NEXT
  2.