mirror of
https://github.com/PDP-10/its.git
synced 2026-02-04 07:43:02 +00:00
Minor update for the Midas hello world example.
This commit is contained in:
@@ -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/
|
||||
|
||||
|
||||
Reference in New Issue
Block a user