Mercurial > hg > Members > kono > nitros9-code

view level1/cmds/echo.asm @ 1912:37fd74e6fad8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Now assembles with rma, uses os9defs.d in c3
author boisy
date Fri, 11 Nov 2005 12:41:12 +0000
parents 84ea83668304
children
line wrap: on
line source

********************************************************************
* Echo - Echo text
*
* $Id$
*
* Edt/Rev  YYYY/MM/DD  Modified by
* Comment
* ------------------------------------------------------------------
*   5      ????/??/??
* From Tandy OS-9 Level One VR 02.00.00.

         nam   Echo
         ttl   Echo text

* Disassembled 98/09/10 22:44:14 by Disasm v1.6 (C) 1988 by RML

         ifp1
         use   defsfile
         endc

tylg     set   Prgrm+Objct   
atrv     set   ReEnt+rev
rev      set   $01
edition  set   5

         mod   eom,name,tylg,atrv,start,size

         org   0
u0000    rmb   450
size     equ   .

name     fcs   /Echo/
         fcb   edition

start    tfr   d,y
         lda   #1
         os9   I$WritLn 
         bcs   Exit
         clrb  
Exit     os9   F$Exit   

         emod
eom      equ   *
         end