Routine: LAFUNC

Information

LAFUNC ;SLC/DLG - GENERIC FUNCTIONS USED BY LA ROUTINES ;7/20/90 08:28 ;

Source file <LAFUNC.m>

Name	Comments	DBIA/ICR reference
AND	;AND AL CHAR IN STRING
NAND	;NOT AND OF STRING OF CHAR
OR	;OR AL CHAR IN STRING
NOR	;NOT OR OF STRING
XOR	;XOR AL CHAR IN STRING
XNOR	;EXCLUSIVE NOT OR OF STRING
BTOO	;BINARY STRING TO OCTAL
BTOD	;BINARY STRING TO DECIMAL
BTOH	;BINARY STRING TO HEX
OTOB	;OCTAL TO BINARY STRING
OTOD	;OCTAL TO DECIMAL
OTOH	;OCTAL TO HEX
DTOB	;DECIMAL VALUE TO BINARY STRING
DTOO	;DECIMAL TO OCTAL
DTOH	;CHANGE DECIMAL VALUE TO 6 HEX CHARACTERS
HTOB	;HEX VALUE TO BINARY STRING
HTOO	;HEX TO OCTAL
HTOD	;CHANGE HEX TO DECIMAL VALUE
NUM
NUM1
PRT
TABLE	;PRINT TABLE OF CONVERSIONS FOR 0 TO 256 DECIMAL
HDR
EXIT0
EXIT

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ENTER NUMBER WITH BASE AS LAST CHAR. IE 0101B FOR BINARY: " Line Location: NUM+0
Function Call: READ	Variable: LAX Timeout: DTIME Line Location: NUM+1
Function Call: WRITE	Prompt: !!,"ENTER THE NUMBER FOLLOWED BY STARTING BASE. IE 3FH FOR 3F HEX." Line Location: NUM+2
Function Call: WRITE	Prompt: !,"INVALID NUMBER",! Line Location: NUM1+5
Function Call: WRITE	Prompt: !," BINARY: ",LAY(1),!," OCTAL: ",LAY(2),!,"DECIMAL: ",LAY(3),!," HEX: ",LAY(4),! Line Location: PRT+0
Function Call: WRITE	Prompt: $J(LAY,9) Line Location: TABLE+2
Function Call: WRITE	Prompt: ?11,$J(LAY,3) Line Location: TABLE+2
Function Call: WRITE	Prompt: ?11,$J(LAY,3) Line Location: TABLE+2
Function Call: WRITE	Prompt: ?11,$J(LAY,3) Line Location: TABLE+2
Function Call: WRITE	Prompt: ?27,$C(I) Condition for execution: ((I>31)&(I<128)) Line Location: TABLE+2
Function Call: WRITE	Prompt: ! Line Location: TABLE+2
Function Call: WRITE	Prompt: @IOF,"NUMBER BASE CONVERSION TABLE",?(IOM-10),"PAGE: ",$J(PAGE,2),!," BINARY OCT DEC HEX ASC",! Line Location: HDR+0
Function Call: WRITE	Prompt: "-" Line Location: HDR+1
Function Call: WRITE	Prompt: !! Line Location: HDR+2