10 REM PROGRAM WRITTEN BY: JIM PETERSEN
20 REM DATE              : DECEMBER 9, 1978
30 REM PROGRAM GENERATES PRIMES FROM X TO Y WITHOUT LARGE DIMENSIONS,
        AND A LOT FASTER, TOO...
40 REM
50 PRINT CHR$(26):REM SCREEN CLEAR CHARACTER
60 INPUT "PLEASE INPUT THE LOWER AND UPPER LIMITS";L,U
70 S=0
80 PRINT:PRINT"THE PRIME NUMBERS BETWEEN";L;"AND";U;"ARE:":PRINT:PRINT
90 FOR I=L TO U
100 FOR J=1 TO SQR(I)
110 IF I=1 THEN 170
120 IF I/J=INT(I/J) THEN S=S+1
130 IF S>1 THEN 160
140 NEXT J
150 IF S=1 THEN PRINT I,
160 S=0
170 NEXT I
180 INPUT "DO YOU WANT TO RUN THIS PROGRAM AGAIN";A$
190 IF LEFT$(A$,1)="Y" THEN 50
200 END
 PRINT I,
160 S=0
170 NEXT I
180 INPUT "DO YOU WANT TO RUN THIS PROGRAM AGAIN";A$
190 IF LEFT$(A$,1)="Y" THEN 50