!//IB// LENGTH 5.2 & LOCAL TEST1.1 ! LENGTH 12.4 & LOCAL TEST2.124A,TEST2.124B,TEST2.124C LENGTH 9.2 & LOCAL TEST2.92A,TEST2.92B ! LENGTH 12.4 & LOCAL TEST3.124A,TEST3.124B LENGTH 9.2 & LOCAL TEST3.92 LENGTH 7.3 & LOCAL TEST3.73A,TEST3.73B LENGTH 6.0 & LOCAL TEST3.60 ! LENGTH 12.4 & LOCAL TEST4.124A,TEST4.124B LENGTH 9.2 & LOCAL TEST4.92 LENGTH 7.3 & LOCAL TEST4.73A,TEST4.73B LENGTH 6.0 & LOCAL TEST4.60 ! LENGTH 7.3 & LOCAL TEST5.73A,TEST5.73B,TEST5.73C,TEST5.73D,TEST5.73E,TEST5.73F ! 100 FORMAT (CS);(ET) ! CLEAR PRINT (0,100) ! PRINT (0) "TEST ONE - DECOMPILER PROBLEMS" TEST1.1 = 123.45 ! PRINT (0) "TEST TWO" TEST2.92A = 1092.00 TEST2.92B = 1.50 TEST2.124B = TEST2.92A TEST2.124C = TEST2.92B * .01 TEST2.124A = (TEST2.124B * TEST2.124C) + .005 PRINT (0) "TEST TWO WITH CORRECTION" TEST2.124C = TEST2.92B * .0001 TEST2.124A = (TEST2.124B * TEST2.124C) + .005 ! PRINT (0) "TEST THREE" TEST3.73A = ((TEST3.92 + TEST3.73B) * (TEST3.124B + .01)) + (TEST3.73B + TEST3.60) ! PRINT (0) "TEST FOUR" TEST4.73A = ((TEST4.92 + TEST4.73B) * (TEST4.124B + .01)) * (TEST4.73B + TEST4.60) ! PRINT (0) "TEST FIVE - DECOMPILER PROBLEMS" TEST5.73A = ((TEST5.73B + TEST5.73C) + (TEST5.73D + .01)) + (TEST5.73E + TEST5.73F) ! PRINT (0) "TESTS COMPLETE" INPUT (0) "" RUN "QMONITOR"