0 'PAGER.BA - Richard Hanson 28-Jul-87 1 'CLUB 100 Library - 415/939-1246 BBS, 937-5039 NEWSLETTER, 932-8856 VOICE 2 CLS:PRINT@9,"---==( PAGER.100 )==---" 3 PRINT@125,"How many page feeds? (1-9)":PRINT@165,"Hit any other key to abort..." 4 T$=INKEY$:IFT$=""THENGOTO4 5 V=VAL(T$):IFV=0THENMENUELSE6 6 IFV<1ORV>9THENGOTO4 7 CLS 8 PRINT@130,"One moment please..." 9 FORX=1TOV 10 LPRINTCHR$(12) 11 NEXTX 12 MENU