[Simh] Interdata OS/32: hello-world in CAL32

Don Stalkowski dstalk at execulink.com
Mon Feb 15 13:58:26 EST 2016


For those following the Interdata OS/32 saga, here's an example
of "HELLO WORLD" in CAL32 and how to assemble/link it.

---

"HELLO WORLD" in CAL32

The spacing in the .CAL file is important! I don't know what the exact
spacing requirements are, but this worked.

The "os32st" directory on bitsavers contains a "Program Reference"
manual that proved helpful in writing this.

*L EDIT32
TSKID = EDIT32
*ST
*13:19:38   EDIT32:PERKIN-ELMER OS/32 EDIT 03-145 R04-01
*EDIT32>GET HELLO.CAL
*EDIT32>T 1-12
*13:19:48   EDIT32:    1             SVC   1,SAY
*13:19:48   EDIT32:    2             SVC   3,0
*13:19:48   EDIT32:    3             ALIGN ADC
*13:19:48   EDIT32:    4    SAY      DB    X'28'
*13:19:48   EDIT32:    5             DB    X'00'
*13:19:48   EDIT32:    6             DS    2
*13:19:48   EDIT32:    7             DC    A(SAY1)
*13:19:48   EDIT32:    8             DC    A(SAY2)
*13:19:48   EDIT32:    9             DAS   2
*13:19:48   EDIT32:   10    SAY1     DC    C'HELLO WORLD '
*13:19:48   EDIT32:   11    SAY2     EQU   *-1
*13:19:48   EDIT32:   12             END
*EDIT32>END
*13:19:59   EDIT32:END OF TASK     0
*
Simulation stopped, PC: 22C9A (BAL R12,19064)
sim> as lpt cal02
LPT: creating new file
sim> c
L CAL32
TSKID = CAL32
*AS 1,HELLO.CAL
AL HELLO.OBJ,IN,126
*AS 2,HELLO.OBJ
*AS 3,PR:
*ST
*13:27:19   CAL32:CAL/32 03-338R01-01
*13:27:19   CAL32:              NO ERRORS   TABLE SPACE USED :     1K
*13:27:19   CAL32:END OF TASK     0
*L LINK
TSKID = LINK
*ST
*13:27:32   LINK:PERKIN-ELMER OS/32 LINKAGE EDITOR 03-242 R01-03        
*LINK>IN HELLO.OBJ
*LINK>BU
*13:27:40   LINK:ENTER FILE DESCRIPTOR FOR IMAGE*LINK>HELLO.TSK
*13:27:46   LINK:MAP?*LINK>NO
*LINK>END
*13:27:53   LINK:END OF TASK     0
*L HELLO
TSKID = HELLO
*AS 0,CON:
*ST
*13:28:15   HELLO:HELLO WORLD
*13:28:15   HELLO:END OF TASK     0
*


More information about the Simh mailing list