5 REM TEST FOR LOGICAL OPERATORS
6 REM USE EXTENDED MODE FEATURES
10 PRINT "AND TRUTH TABLE"
15 PRINT " A"," B","AND"
20 FOR A=0 TO 1
30 	FOR B=0 TO 1
40		PRINT A,B,(A AND B)
50 	NEXT B
60 NEXT A
70 PRINT
110 PRINT "OR TRUTH TABLE"
115 PRINT " A"," B","OR"
120 FOR A=0 TO 1
130 	FOR B=0 TO 1
140		PRINT A,B,(A OR B)
150 	NEXT B
160 NEXT A
170 PRINT
210 PRINT "XOR TRUTH TABLE"
215 PRINT " A"," B","XOR"
220 FOR A=0 TO 1
230 	FOR B=0 TO 1
240		PRINT A,B,(A XOR B)
250 	NEXT B
260 NEXT A
270 PRINT
310 PRINT "IMP TRUTH TABLE"
315 PRINT " A"," B","IMP"
320 FOR A=0 TO 1
330 	FOR B=0 TO 1
340		PRINT A,B,(A IMP B)
350 	NEXT B
360 NEXT A
370 PRINT
410 PRINT "EQV TRUTH TABLE"
415 PRINT " A"," B","EQV"
420 FOR A=0 TO 1
430 	FOR B=0 TO 1
440		PRINT A,B,(A EQV B)
450 	NEXT B
460 NEXT A
470 PRINT
500 PRINT "NOT TEST"
510 LET A=3
520 PRINT "NOT ";A;"=";NOT A
530 LET A=0
540 PRINT "NOT ";A;"=";NOT A
550 PRINT 2 AND 3 OR NOT 0
600 END
