0 MODE0:REM ADDED BY CJR
   10  REM PRIM8BS. K2K (Peter Davy's) modification of D6E's (R. Harker's) program in Issue No.50 for listing PRIME NUMBERS.
   20  PRINT 2;" is prime number ";1:PRINT 3;" is prime number ";2
   30  number%=5
   40  try%=1
   50  order%=2
   60  REPEAT
   70  REPEAT
   80  try%=try%+2
   90  IF (number% MOD try%)=0 THEN factorfound=TRUE ELSE factorfound=FALSE
  100  UNTIL factorfound OR try%>SQR(number%)
  110  IF NOT factorfound AND try%>SQR(number%) THEN order%=order%+1:PRINT number%;" is prime number ";order%
  120  number%=number%+2:try%=1
  130  UNTIL 2=3