10 REM 'PDL' TEST PROGRAM
15 DEF PDL(X)=146 - 133 * (X MOD 2)
20 A=PDL(0)
30 B=PDL(1)
40 PRINT "THE VALUE OF PDL(0) IS";A
50 PRINT "THE VALUE OF PDL(1) IS";B
60 PRINT "CHANGE THE CONTROL UNIT SETTINGS AND (RUN) AGAIN"
99 END
