Mercurial > hg > Members > kono > nitros9-code

annotate level1/cmds/unlink.asm @ 2514:7828af6e1b59

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Adding startup.dw
author boisy
date Tue, 06 Apr 2010 13:09:10 +0000
parents 2b6d9d391bcc
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
1 ********************************************************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
2 * Unlink - Unlink memory module
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
3 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
4 * $Id$
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
5 *
1325
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 924
diff changeset
6 * Edt/Rev YYYY/MM/DD Modified by
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 924
diff changeset
7 * Comment
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
8 * ------------------------------------------------------------------
1325
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 924
diff changeset
9 * 2 ????/??/??
1349
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
10 * Original Tandy/Microware version
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12 nam Unlink
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13 ttl Unlink memory module
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15 * Disassembled 02/04/03 22:32:26 by Disasm v1.6 (C) 1988 by RML
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
16
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 ifp1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
18 use defsfile
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 endc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21 tylg set Prgrm+Objct
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
22 atrv set ReEnt+rev
1325
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 924
diff changeset
23 rev set $00
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 0
diff changeset
24 edition set 2
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
25
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
26 mod eom,name,tylg,atrv,start,size
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27
924
c155aac72190 Made cosmetic changes
boisy
parents: 200
diff changeset
28 org 0
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 u0000 rmb 512
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
30 size equ .
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
31
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
32 name fcs /Unlink/
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 0
diff changeset
33 fcb edition
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
34
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
35 start clra
1349
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
36 IFGT Level-1
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
37 os9 F$UnLoad
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
38 ELSE
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
39 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
40 os9 F$Link
1349
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
41 bcs exit
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
42 os9 F$UnLink
1349
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
43 bcs exit
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
44 os9 F$UnLink
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
45 ENDC
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
46 bcs exit
1538
2b6d9d391bcc Rodney DOES IT AGAIN!
boisy
parents: 1349
diff changeset
47 lda ,x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
48 cmpa #C$CR
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
49 bne start
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
50 clrb
1349
b9df6b3f2eef Rolled Level 2 unlink into here.
boisy
parents: 1325
diff changeset
51 exit os9 F$Exit
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
52
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
53 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
54 eom equ *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
55 end
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
56