Data update

This commit is contained in:
Ingy döt Net 2026-04-30 12:34:36 -04:00
parent 4bb20c9b71
commit cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions

View file

@ -0,0 +1,13 @@
HELLO CSECT
PRINT NOGEN
BALR 12,0
USING *,12
OPEN LNPRNTR
LA 6,HW
PUT LNPRNTR
CLOSE LNPRNTR
EOJ
LNPRNTR DTFPR DEVADDR=SYSLST,IOAREA1=L1
L1 DS 0CL133
HW DC C'Hello World!'
END HELLO

View file

@ -0,0 +1,19 @@
HELLO CSECT
SAVE (14,12)
BASR 12,0
USING *,12
ST 13,SAVEA+4
LA 13,SAVEA
OPEN (SYSPRINT,OUTPUT)
PUT SYSPRINT,HELLOREC
CLOSE SYSPRINT
L 13,SAVEA+4
RETURN (14,12),RC=0
HELLOREC DC CL80'HELLO, WORLD!'
SYSPRINT DCB DDNAME=SYSPRINT, X
DSORG=PS, X
MACRF=PM, X
RECFM=FB, X
LRECL=80
SAVEA DS 18F
END