14 lines
346 B
Plaintext
14 lines
346 B
Plaintext
/JOANNES I:I - IN PRINCIPIO ERAT VERBUM
|
|
/VERB3 - PRINT FROM MEMORY WITH SAS
|
|
CLA
|
|
TAD (COUNT)
|
|
SAS
|
|
JMP .-2
|
|
HLT
|
|
COUNT, -32 /CHAR. COUNT * -1
|
|
PTR, . /ADDR. OF STR. - 1
|
|
STRING, "I; "N; " ; "P; "R; "I; "N; "C; "I; "P; "I; "O
|
|
" ; "E; "R; "A; "T; " ; "V; "E; "R; "B; "U; "M
|
|
215; 212
|
|
$
|