home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / Pascal / Applications / P4⁄Mac 1.0 / test programs / hello.pcode < prev    next >
Encoding:
Text File  |  1994-07-28  |  254 b   |  21 lines  |  [TEXT/JOHN]
  1. l   3
  2.  ent   1   l   4
  3.  ent   2   l   5
  4.  lca'Hello, World!   '
  5.  ldci       13
  6.  ldci       13
  7.  lda   0       6
  8.  csp         wrs
  9. i   10
  10.  lda   0       6
  11.  csp         wln
  12.  retp
  13. l   4=       9
  14. l   5=       9
  15. q
  16. i    0
  17.  mst           0
  18.  cup   0   l   3
  19.  stp
  20. q
  21.