mirror of
https://github.com/PDP-10/its.git
synced 2026-01-23 10:59:24 +00:00
Minor update for the Midas hello world example.
This commit is contained in:
parent
65091b1a09
commit
20ce9c6481
@ -5,12 +5,12 @@ b==2 ;A and B.
|
||||
ch==1 ;Output channel number.
|
||||
|
||||
start: .open ch,[.uao,,'tty] ;Open channel to TTY, for ASCII output.
|
||||
.lose
|
||||
.lose %lssys
|
||||
move a,[440700,,hello] ;Load A with byte pointer to string.
|
||||
loop: ildb b,a ;Load B from string.
|
||||
jumpe b,[.logout 2,] ;End on zero byte.
|
||||
jumpe b,[.logout 1,] ;End on zero byte.
|
||||
.iot ch,b ;Print byte.
|
||||
jrst loop
|
||||
jrst loop
|
||||
|
||||
hello: asciz /hello world/
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user