10 NOTRACE :ND = 24: DIM A$(ND): FOR I = 0 TO ND: READ A$(I): NEXT : TEXT : PRINT CHR$(21): HOME : SPEED= 255: INVERSE : PRINT A$(0);: POKE 34,1
11 FOR B = 1 TO ND: INVERSE :V = V +1: IF B = 18 THEN PRINT : PRINT "PRESS A KEY FOR MORE";: GET X$: VTAB 1: HTAB 27: PRINT " PAGE 2 ": HOME :V = 1
20 INVERSE : VTAB V +1: PRINT SPC( 40): FOR J = 1 TO 99: NEXT : NORMAL : FOR H = 40 TO 1 STEP -3: CALL -998: HTAB H: PRINT LEFT$(A$(B),41 -H);: NEXT : NEXT
30 DATA " BEAGLE BROS APPLE DISKS--NOVEMBER 1985 "
40 DATA "ALPHA PLOT...... HI-RES GRAPHICS..$39.50"
50 DATA "BEAGLE BAG...... 12 GREAT GAMES... 29.50"
60 DATA "BEAGLE BASIC.... BASIC ENHANCER... 34.95"
70 DATA "BEAGLE GRAPHICS. DOUBLE HI-RES.... 59.95"
75 DATA "BIG U........... PRODOS ENHANCER.. 34.95"
80 DATA "D CODE.......... BASIC DE-BUGGER.. 39.95"
90 DATA "DISKQUIK........ DISK EMULATOR.... 29.50"
100 DATA "DOS BOSS........ COMMAND EDITOR... 24.00"
110 DATA "DOUBLE-TAKE..... 2-WAY SCROLLER... 34.95"
120 DATA "EXTRA-K......... MORE MEMORY...... 39.95"
130 DATA "FATCAT.......... DISK LIBRARY..... 34.95"
140 DATA "FLEX TYPE....... FLEXIBLE TEXT.... 29.50"
150 DATA "FONT MECHANIC... FONTS & UTILITIES 29.95"
160 DATA "FRAME-UP........ APPLE SLIDE SHOWS 29.50"
170 DATA "GPLE............ APPLESOFT EDITOR. 49.95"
180 DATA "I. O. SILVER.... ARCADE GAME...... 29.95"
185 DATA "MINIPIX......... 200 CLIP-ART PIX. 29.95"
190 DATA "PRO-BYTER....... DISK ZAP UTILITY. 34.95"
200 DATA "PRONTO-DOS...... TRIPLE-SPEED DOS. 29.50"
210 DATA "SHAPE MECHANIC.. HI-RES ANIMATION. 39.95"
220 DATA "SILICON SALAD... TIPS & UTILITIES. 24.95"
230 DATA "TIP DISK #1..... 100 TIPS ON DISK. 20.00"
240 DATA "TRIPLE-DUMP..... PICTURE PRINTER.. 39.95"
250 DATA "UTILITY CITY.... 21 UTILITIES..... 29.50"
260 VTAB 24: HTAB 1: INVERSE : PRINT "SELECT:";: PRINT " <M> MAIN MENU <Q> QUIT NOW";: POKE 2039,32: NORMAL : VTAB 24: HTAB 10: GET A$: IF A$ = "M" OR A$ = "m" THEN PRINT CHR$(4)"-/PRO.BYTER/STARTUP"
