UNIVAC SYSTEM
INSTRUCTIONS
Am (m) -rXi (rX)+(rA)- rA Bm (m) - rA, rX
Cm (rA)-m; O-rA
Om (m) -rAj (rA)+(rL) .... rA(ROUNDED) - rX (UN ROUNDED) Em (rF) EXTRACTS (m) -rA
Fm (m) -rF
Gm (rF) - m; (rF) UNALTERED Hm (rA)-m; (rA) UNALTERED Jm (rX)-m; (rX) UNALTERED Km* (rA)-rL, O-rA Lm (m) - rL, rX
Mm (m)-rX; (rL)x(rX)-rA(ROUNDED) Nm -em) - rX; (rLlx(rX) .... rA (ROUNDED) Pm (m) - rX; (rL)x(rX) - rA, rX (22 DIGITS) Om IF (rA)= (rU, TRANSFER CONTROL TO m Rm ON LINE c, RECORD [00 000 U(c+1)) IN m Sm -em) - rX; (rX)+(rA)- rA
Tm IF (rA»(rLl, TRANSFER CONTROL TO m Um TRANSFER CONTROL TO m
Vm (m), (m+1) - rV Wm (rV)- m, m+l Xm"" (rX)+(rA)-rA Ym m THRU m+9-rY Zm (rY)-m THRU m+9 OOm*SKIP
.nmlt SHIFT (rA) RIGHT, WITH SIGN, n PLACES
;nm* SHIFT (rA) LEFT, WITH SIGN, n PLACES -nm* SHIFT (rA) RIGHT, EXC. SIGN, n PLACES Onm* SHIFT (rA) LEFT, EXC. SIGN, n PLACES t 1 nm* SO WORDS FROM TAPE TO rI, FORWARD t2nm* SO WORDS FROM TAPE TO rI, BACKWARD t3nm (rl) -m THRU m+59; SO WORDS -rI, FORWARD t4nm (rn - m THRU m+59; SO WORDS -rl, BACKWARD t5nm m THRU mt59 TO TAPE, 100 PULSES/INCH tSnm* REWIND TAPE
t7nm m THRU m+59 TO TAPE, 20 PULSES/INCH tSnm* REWIND TAPE; SET INTERLOCK
10m TYPE ONE WORD INTO m 30m (d) - m THRU mt59 40m (r1) -m THRU mt59 50m PRINT ONE WORD FROM m 90m* STOP UNIVAC
,m"" BREAKPOINT STOP
Onm CONDITIONAL TRANSFER BREAKPOINT STOP Tnm CONDITIONAL TRANSFER BREAKPOINT STOP
*
IGNORE mPULSE CODE
ZONE EX 3
00 01 0000
I Vl
0001
!::. , ,
0010 -
-
0011 ) : 0 ; 0100
'12 , A
"
0101 2 B
0110
'"
3 C 01 11$
04 1000 %
5 E 1001
*
S F1010 8
7 G
,
101 I
S H 1100 ( I
9 1101
" ' 0 1111
'I =
PRINTER IGNOREf::,. = PRINTER SPACE
10
1
?
J K
L M N 0 P Q R
~
}:1
~ = CARRIAGE RETURN
1 =
TABULATORJl
= SHIFT LOCK!d
= UNSHIFT/
¢
= ONE CHARACTER SHIFT¢
=
PRINTER STOPII
,-
~
@ +
S T U V W X Y Z
¢
J!I = PRINTER BREAKPOINT STOP BLANK SQUARES NOT USED t n = UNISERVO INDEX NO. (', 2, ..• 9, -) COPYRIGHT 1951 - ECKERT-MAUCHLY COMPUTER CORP.