Pulled changes from OPDLab5
This commit is contained in:
@@ -0,0 +1,28 @@
|
||||
org 0x10
|
||||
|
||||
start: in 0x19 ;проверка готовности
|
||||
and #0x40
|
||||
beq start
|
||||
|
||||
in 0x18 ;загрузка числа
|
||||
st buf
|
||||
|
||||
cmp #0xA ;завершение
|
||||
bne tr
|
||||
hlt
|
||||
|
||||
tr: add #0x80 ;перевод
|
||||
and mask
|
||||
|
||||
out 0xC ;вывод
|
||||
|
||||
swab ;сохранение
|
||||
add buf
|
||||
swab
|
||||
st (res)+
|
||||
jump start
|
||||
|
||||
buf: word ? ;память
|
||||
mask: word 0x00FF
|
||||
res: word $result
|
||||
result: word 16 dup (?)
|
||||
Reference in New Issue
Block a user