0 ? :? "   LINE LISTER   "⌡1 ? :? "TO ADVANCE PRESS 'SELECT'":? :? "TO BACKUP PRESS 'OPTION'"⌡2 ? :? "PRESS BREAK FOR EDIT MODE":? :? "TYPE 'CONT' AND PRESS 'RETURN' WHEN YOU HAVE FINISHED YOUR EDIT"⌡3 ? :? "HOW MANY LINES PER SELECT";:INPUT LIN:? :? ⌡4 FOR LST=9 TO 50000 STEP LIN⌡5 LIST LST+1,LST+LIN⌡6 IF PEEK(53279)=5 THEN GOTO 9⌡7 IF PEEK(53279)=3 THEN LST=LST-LIN:GOTO 5⌡8 GOTO 6⌡9 NEXT LST:GOTO 5:REM усе═╒ентер╒═то═мерге═тхис═прог═витх═ыоур═басиц═прог╝═══тыпе═╒рун╒═то═утилизе═лине═листер╝⌡