53 lines
559 B
Plaintext
Executable file
53 lines
559 B
Plaintext
Executable file
read: :
|
|
read: .EXIT
|
|
read: ax
|
|
read: &h4c00
|
|
read: |
|
|
read: #
|
|
read: mov
|
|
read: &h21
|
|
read: int
|
|
read: ;
|
|
read: :
|
|
read: d"
|
|
read: begin
|
|
read: in@
|
|
read: dup
|
|
read: [
|
|
read: in@
|
|
read: lit
|
|
read: ]
|
|
read: !=
|
|
read: while
|
|
read: outb!
|
|
read: repeat
|
|
read: drop
|
|
read: ;
|
|
read: cs
|
|
read: push
|
|
read: \
|
|
read: ds
|
|
read: pop
|
|
read: tell
|
|
read: 1
|
|
read: +
|
|
read: dx
|
|
read: 0
|
|
read: #
|
|
read: mov
|
|
read: ah
|
|
read: 9
|
|
read: #
|
|
read: movb
|
|
read: &h21
|
|
read: int
|
|
read: 0
|
|
read: .EXIT
|
|
read: tell
|
|
read: d"
|
|
read: &h100
|
|
read: +
|
|
read: swap
|
|
read: seek
|
|
read: outw!
|