Mercurial > hg > Members > kono > os9 > sbc09

comparison os9/level2/cmds/loop.asm @ 94:f20bf9874697

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix os9 dir
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 25 Dec 2018 15:57:05 +0900
parents src/os9/level2/cmds/loop.asm@4967d1acd34a
children
comparison
equal deleted inserted replaced
93:03a26438ab8d 94:f20bf9874697
1 ********************************************************************
2 * loop dummy loader
3 *
4 * $Id$
5 *
6 * Edt/Rev YYYY/MM/DD Modified by
7 * Comment
8 * ------------------------------------------------------------------
9 * 1 2018/07/30 S. Kono
10
11 nam Loop
12 ttl Dummy loop
13
14 ifp1
15 use defsfile
16 endc
17
18 * Module header definitions
19 tylg set Prgrm+Objct
20 atrv set ReEnt+rev
21 rev set $00
22 edition set 1
23
24 mod eom,name,tylg,atrv,start,size
25
26 org 0
27 count rmb 2
28 size equ .
29
30 name fcs /Loop/
31 fcb edition
32
33 start ldy #4000
34 l1 ldx #0
35 l0 leax -1,x
36 bne l0
37 leay -1,y
38 bne l1
39 Exit clrb
40 os9 F$Exit
41
42
43 emod
44 eom equ *
45 end