jamesio@pro-europa.cts.com (James Faircloth) (03/12/90)
I am looking for a program that will split a large ascii file (in excess of 2.8 megs) into smaller files. (i.e. split file xxx into files xxx.001, xxx.002, etc) The program needs to be able to split the original file into smaller files of a certain size (10k, 20k, or xk). Anybody have an idea??? For *SMALL* mail only: | For regular mail and FILES: UUCP : crash!pro-europa!jamesio | UUCP: jamesio@nuchat.UUCP ARPA : crash!pro-europa!jamesio@nosc.mil | INET: jamesio@nuchat.sccsi.com INET : jamesio@pro-europa.cts.com |
toddpw@tybalt.caltech.edu (Todd P. Whitesel) (03/12/90)
jamesio@pro-europa.cts.com (James Faircloth) writes: >I am looking for a program that will split a large ascii file (in excess of >2.8 megs) into smaller files. (i.e. split file xxx into files xxx.001, >xxx.002, etc) >The program needs to be able to split the original file into smaller files of >a certain size (10k, 20k, or xk). >Anybody have an idea??? I assume this is on a prodos volume because if so then you can use BASIC.SYSTEM and Applesoft to do it. 10 s=20 : REM this is how many K you want the small pieces to be 20 f$="filename" : REM replace lines 10 & 20 with INPUT statements if you want 30 d$=chr$(4) 40 i=0 50 print d$"bload "f$",t4,A$1000,L"s*1024",B"i*s*1024 60 print d$"bsave "f$"."i",t4,A$1000" 70 i=i+1:goto 50 this program will bomb with and "END OF FILE" error when it is finished. other that that, it should work as long as s is not more than 32 or so. unless there's something about the BI I forgot... Todd Whitesel toddpw @ tybalt.caltech.edu