11 lines
156 B
Ucode
11 lines
156 B
Ucode
# Move value in GR to HR and increment PCL
|
|
|
|
lcset 16
|
|
|
|
$LOOP
|
|
incpc; declc
|
|
bls @END # Branch to micro-address 0 if L-flag is set
|
|
bra @LOOP
|
|
$END
|
|
HALT
|