Mercurial > hg > Members > kono > os9 > sbc09
view src/os9/level2/cmds/loop.asm @ 86:4967d1acd34a
add sbc09.asm
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 20 Aug 2018 00:48:11 +0900 |
parents | 02d742bf52e5 |
children |
line wrap: on
line source
******************************************************************** * loop dummy loader * * $Id$ * * Edt/Rev YYYY/MM/DD Modified by * Comment * ------------------------------------------------------------------ * 1 2018/07/30 S. Kono nam Loop ttl Dummy loop ifp1 use defsfile endc * Module header definitions tylg set Prgrm+Objct atrv set ReEnt+rev rev set $00 edition set 1 mod eom,name,tylg,atrv,start,size org 0 count rmb 2 size equ . name fcs /Loop/ fcb edition start ldy #4000 l1 ldx #0 l0 leax -1,x bne l0 leay -1,y bne l1 Exit clrb os9 F$Exit emod eom equ * end