THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 TABBING TO A POSITION < COLUMNAR POSITION FORCES A NEW LINE: THE FIRST TWO LINES (1 & 2) FOLLOWING THE COLUMN NUMBERS SHOULD BE IDENTICAL TO THE NEXT TWO (3 & 4), CASE # 1 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 A B A B TABBING TO A POSITION >= COLUMNAR POSITION DOES NOT THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 CD TABBING TO A POSITION, N > MARGIN, M, CAUSES TAB TO THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 SECTION 203.3: MARGIN OVERFLOW. BEGIN TEST. IF A PRINT-ITEM DOESN'T FIT IN REMAINDER OF CURRENT LINE, THE FIRST TWO LINES (1 & 2) FOLLOWING THE COLUMN NUMBERS SHOULD BE IDENTICAL TO THE NEXT TWO (3 & 4), CASE # 1 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 BC BC FULL LENGTH OF MARGIN IS USED BEFORE FORCING NEW LINE: THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE A Α THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 IF COLUMNAR POSITION IS IN LAST ZONE, A COMMA FORCES A NEW LINE: THE FIRST TWO LINES (1 & 2) FOLLOWING THE COLUMN NUMBERS SHOULD BE IDENTICAL TO THE NEXT TWO (3 & 4), CASE # 4 00000000011111111112222222222333333333344444444445555555555666666666677 12345678901234567890123456789012345678901234567890123456789012345678901 H G G 10 PRINT "PROGRAM FILE 204: ERROR - PRINT-STATEMENTS CONTAINING" 20 PRINT " ANSI STANDARD 3.2, 3.4, 12.2" 60 PRINT "THIS PROGRAM TESTS TO SEE IF THE PROCESSOR ACCEPTS PROGRAMS" 70 PRINT "CONTAINING LOWER CASE CHARACTERS IN A PRINT-STATEMENT." 80 PRINT 90 PRINT "THIS IS A TEST FOR A NON-STANDARD FEATURE OF MINIMAL BASIC." 100 PRINT "TO PASS THIS TEST, THE PROCESSOR MUST EITHER:" 110 PRINT 120 PRINT " 1) ACCEPT THE PROGRAM AND BE ACCOMPANIED BY DOCUMENTATION" 130 PRINT " ACCURATELY DESCRIBING THE FEATURE'S INTERPRETATION" BY THE PROCESSOR, OR" 140 PRINT " 150 PRINT 160 PRINT " 2) REJECT THE PROGRAM WITH AN APPROPRIATE ERROR MESSAGE" 170 PRINT 180 PRINT "SEE THE NBS MINIMAL BASIC TEST PROGRAMS USER'S MANUAL" 190 PRINT "FOR DETAILED CRITERIA." 200 PRINT 210 PRINT " 220 print BEGIN TEST." 230 PRINT "IF A BLANK LINE IMMEDIATELY PRECEDES THIS SENTENCE, THEN" 240 PRINT "THE PROCESSOR EXECUTED A PRINT STATEMENT IN WHICH THE" 250 PRINT "WORD 'PRINT' APPEARS IN LOWERCASE LETTERS." 260 PRINT 270 PRINT 280 PRINT "this sentence is generated by a quoted-string print-item" 290 PRINT "containing lower-case characters." 320 PRINT 330 PRINT " 340 PRINT 350 PRINT "END PROGRAM 204" 360 END END TEST." ? ILLEGAL KEYWORD IN LINE 220 ? ILLEGAL FORMULA IN LINE 280 ? ILLEGAL FORMULA IN LINE 290 *** 10 PRINT "PROGRAM FILE 205: ERROR - ASSIGNED STRING CONTAINING" 15 PRINT " LOWERCASE CHARACTERS." 20 PRINT " ANSI STANDARD 3.2, 3.4, 9.2" 30 PRINT 40 PRINT "SECTION 205.1: ERROR ASSIGNED STRING CONTAINING" 60 PRINT "THIS PROGRAM TESTS TO SEE IF THE PROCESSOR ACCEPTS PROGRAMS" 90 PRINT 100 PRINT "THIS IS A TEST FOR A NON-STANDARD FEATURE OF MINIMAL BASIC." 110 PRINT "TO PASS THIS TEST, THE PROCESSOR MUST EITHER:" 120 PRINT 130 PRINT " 1) ACCEPT THE PROGRAM AND BE ACCOMPANIED BY DOCUMENTATION" 150 PRINT " 160 PRINT 170 PRINT " 2) REJECT THE PROGRAM WITH AN APPROPRIATE ERROR MESSAGE" 180 PRINT 190 PRINT "SEE THE NBS MINIMAL BASIC TEST PROGRAMS USER'S MANUAL" 200 PRINT "FOR DETAILED CRITERIA." 210 PRINT 220 PRINT " 230 PRINT 240 LET A$="abcdefghijklmnopqr" BEGIN TEST." 250 PRINT "AN ASSIGNMENT STATEMENT HAS ATTEMPTED TO ASSOCIATE A STRING" 260 PRINT "CONSISTING OF THE FIRST 18 CHARACTERS OF THE ALPHABET, (A-R)" 270 PRINT "IN LOWERCASE, WITH A$." 10 PRINT "PROGRAM FILE 206: ERROR ORDERING RELATIONS BETWEEN STRINGS." 20 PRINT " ANSI STANDARD 3.2, 3.4, 3.6, 10.2" 30 PRINT 40 PRINT "THIS PROGRAM TESTS WHETHER, AS AN ENHANCEMENT, THE COMPARISON" 70 PRINT "THIS IS A TEST FOR A NON-STANDARD FEATURE OF MINIMAL BASIC." 90 PRINT 100 PRINT " 1) ACCEPT THE PROGRAM AND BE ACCOMPANIED BY DOCUMENTATION" 120 PRINT " 130 PRINT 140 PRINT " 150 PRINT 2) REJECT THE PROGRAM WITH AN APPROPRIATE ERROR MESSAGE" *** 160 PRINT "SEE THE NBS MINIMAL BASIC TEST PROGRAMS USER'S MANUAL" 170 PRINT "FOR DETAILED CRITERIA." 180 PRINT 190 PRINT "SECTION 206.1: COLLATING SEQUENCE." 200 PRINT 210 PRINT "IF THIS IMPLEMENTATION ALLOWS THE ORDERING RELATIONS," 220 PRINT "AN INFORMATIVE SORT IS DONE TO DISPLAY THE IMPLICIT" 230 PRINT "COLLATING SEQUENCE OF THE CHARACTERS (ASSUMING THE NATURAL" 240 PRINT "INTERPRETATION IS GIVEN TO THESE RELATIONS)." 280 PRINT "COLLATING SEQUENCE OF SELECTED CHARACTERS IS:" 290 PRINT "(CHARACTERS SURROUNDED BY PERIODS)" 300 PRINT 310 REM SORT 30 CHARACTERS, 15 AT A TIME BECAUSE OF NAME SPACE LIMITS 320 LET L=15 480 REM READ NEXT L CHARACTERS. FOR EACH, COMPARE TO HIGHEST IN TABLE. 490 REM IF THIS ONE HIGHEST, REPLACE HIGHEST WITH IT, AND THEN 500 REM FIND NEW HIGHEST. 510 FOR I=1 TO L 520 READ W$ 530 REM IF THIS > HIGHEST, SKIP 540 IF W$ > Z$ THEN 660 550 LET N=H1 560 GOSUB 4000 570 LET H1=1 580 LET Z$=A$ 590 REM SCAN FOR NEW HIGHEST 600 FOR N=2 TO L 610 GOSUB 3000 620 IF W$<Z$ THEN 650 630 LET Z$=W$ 640 LET H1=N 650 NEXT N 660 NEXT I |