BBS: Inland Empire Archive Date: 02-13-93 (14:15) Number: 386 From: SCOTT WUNSCH Refer#: NONE To: ALL Recvd: NO Subj: MsgSplit 2.00 Conf: (2) Quik_Bas
Part 3 of MSGSPLIT.BAS - continued from last message... PRINT "Warning: Lines wrapped in message number"; STR$(OnMsgNumber); _ "." END IF CLOSE #2 IF NOT EOF(1) THEN OnMsgNumber = OnMsgNumber + 1 FileOutNum = FileOutNum + 1 LinesOut = 1 END IF LOOP UNTIL EOF(1) CLOSE PRINT "Complete!" END ________O_/________________________| SNIP |______________________\_O_______ O \ | HERE | / O Line wrapping and message splitted accomplished by MsgSplit 2.00, a Victor Yiu and Scott Wunsch creation. Whaddya think? :) /\ LLAP... > \ cott \\'unsch < \/ ... My programmes *never* have bugs... they just develop random features. --- * Origin: So? What's your point? -=- Regina, Sask, Canada (1:140/23.1701)
Books at Amazon:
Back to BASIC: The History, Corruption, and Future of the Language
Hackers: Heroes of the Computer Revolution (including Tiny BASIC)
Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution
The Advent of the Algorithm: The Idea that Rules the World
Moths in the Machine: The Power and Perils of Programming
Mastering Visual Basic .NET