home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p029 / xl.img / DOSXX.ARJ / BN.BAS < prev    next >
Encoding:
BASIC Source File  |  1980-01-01  |  512 b   |  7 lines
  1. ___________________________________________________________";:RETURN
  2. 3110 LOCATE 10,5:PRINT "╝∞▓Θ─·╡─╩Σ╚δ!";:FOR JXJ=1 TO 9:NEXT JXJ:LOCATE 10,5:PRINT "             ";:RETURN
  3. 3120 REM var1$,var2$,m-1
  4. 3130 FOR III=1 TO M-1:A$(III)=MID$(VAR1$,III,1):BB$(III)=MID$(VAR2$,III,1):NEXT III:RETURN
  5. 3140 PRINT "________________________________________________________________________________";
  6. 3150 PRINT "                     ░┤'┐╒╕±'╝ⁿ╝╠╨°, ░┤'E'╝ⁿ╖╡╗╪╫╙▓╦╡Ñ5.1, ░┤'R'╝ⁿ╖╡╗╪╓≈▓╦╡Ñ";
  7. 3160 B$=INKEY$:IF B$="" THEN