FEB 4, 1982 OCTAL PROGRAM, WRITTEN BY BOHDEN CMAYLO, CONVERTS BINARY, OCTAL, DECIMAL, HEXIDECIMAL NUMBERS (MAX 80 DIGITS) TO BINARY, OCTAL, DECIMAL, HEXIDECIMAL NUMBERS (MAX 132 DIGITS) OR PERFORMS BINARY, OCTAL, DECIMAL OR HEXIDECIMAL ARITHMETIC. TO USE, EITHER: RUN SX:[5,10]OCTAL ENTER n#n OR OR n#arith#{n} OR WHERE n is B O D H= 'user input' NOTE: n = B is BINARY, O is OCTAL, D is DECIMAL, H is HEXIDECMAL arith: + - * / ^ is plus, minus, multiply, divide, exponent. # is a 1 to 80 digit positive number in correct base. {n} is optional n. EXAMPLES: B101D (CONVERT BINARY 101 TO DECIMAL) H12FFO (CONVERT HEXIDECIMAL 12FF TO OCTAL) O17765432D (CONVERT OCTAL 17765432 TO DECIMAL) O12345+12345 ADD OCTAL 12345 TO 12345 H1234FF/EE DIVIDE HEXIDECIMAL 1234FF BY EE B101010*1010 MULTIPLY BINARY 101010 BY 1010 D123456-6543 SUBTRACT 123456 BY 6543 D123^10H RAISE 123 TO POWER 10 + CONVERT RESULT TO HEX ETC... OR BY PUTTING THE FOLLOWING IN SX:[5,10]SYSCCL.CCL (IF YOU HAVE 'CCL', 'MCR' PATCH AND 'INS' PATCH) $1500OCTAL *RUN SX:[5,10]OCTAL/PRM="O%1%%2%"%S $1600BINARY *RUN SX:[5,10]OCTAL/PRM="B%1%%2%"%S $1700DECIMAL *RUN SX:[5,10]OCTAL/PRM="D%1%%2%"%S $1700HEXIDEC *RUN SX:[5,10]OCTAL/PRM="H%1%%2%"%S YOU CAN ENTER ON YOUR TERMINAL: O 12345 D (CONVERT 12345 OCTAL TO DECIMAL) AND GET THE CONVERSION RIGHT AWAY. OR D 12345*12345 (MULTIPLY 12345 BY 12345 DECIMAL) AND GET THE RESULT RIGHT AWAY.