Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/packages/os9l2bbs/cmds/Uloada.asm @ 2538:f87ec0b216c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Enabled automatic string detection in the disassembler.
author lothan
date Tue, 11 May 2010 05:45:21 +0000
parents c491d9c9a4fd
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
1 nam Uloada
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
2 ttl program module
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
3
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
4 ifp1
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
5 use defsfile
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
6 endc
2400
75ba2a80a4e3 OS-9 L2 BBS Commands disassembled
boisy
parents:
diff changeset
7
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
8 tylg set Prgrm+Objct
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
9 atrv set ReEnt+rev
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
10 rev set $01
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
11
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
12 mod eom,name,tylg,atrv,start,size
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
13
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
14 U0000 rmb 1
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
15 U0001 rmb 200
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
16 U00C9 rmb 1
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
17 U00CA rmb 599
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
18 size equ .
2400
75ba2a80a4e3 OS-9 L2 BBS Commands disassembled
boisy
parents:
diff changeset
19
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
20 name fcs /Uloada/ * 000D 55 6C 6F 61 64 E1 Uloada
2538
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
21 L0013 fcc "Enter filename to upload" * 0013 45 6E 74 65 72 20 66 69 6C 65 6E 61 6D 65 20 74 6F 20 75 70 6C 6F 61 64 Enter filename to upload
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
22 L002B fcc "Press <CTRL><T> to terminal upload" * 002B 50 72 65 73 73 20 3C 43 54 52 4C 3E 3C 54 3E 20 74 6F 20 74 65 72 6D 69 6E 61 6C 20 75 70 6C 6F 61 64 Press <CTRL><T> to terminal upload
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
23 fcb $0A * 004D 0A .
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
24 fcb $0D * 004E 0D .
2538
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
25 fcc "Press <CTRL><X> to cancel" * 004F 50 72 65 73 73 20 3C 43 54 52 4C 3E 3C 58 3E 20 74 6F 20 63 61 6E 63 65 6C Press <CTRL><X> to cancel
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
26 fcb $0A * 0068 0A .
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
27 fcb $0D * 0069 0D .
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
28 L006A fcb $0A * 006A 0A .
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
29 fcb $3A * 006B 3A :
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
30 start lda 0,X * 006C A6 84 &.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
31 cmpa #13 * 006E 81 0D ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
32 bne L008B * 0070 26 19 &.
2538
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
33 leax >L0013,PC * 0072 30 8D FF 9D 0...
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
34 ldy #24 * 0076 10 8E 00 18 ....
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
35 lda #1 * 007A 86 01 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
36 os9 I$Write * 007C 10 3F 8A .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
37 leax U0001,U * 007F 30 41 0A
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
38 ldy #200 * 0081 10 8E 00 C8 ...H
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
39 clra * 0085 4F O
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
40 os9 I$ReadLn * 0086 10 3F 8B .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
41 leax U0001,U * 0089 30 41 0A
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
42 L008B lda #3 * 008B 86 03 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
43 ldb #27 * 008D C6 1B F.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
44 os9 I$Create * 008F 10 3F 83 .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
45 lbcs L00F0 * 0092 10 25 00 5A .%.Z
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
46 sta U0000,U * 0096 A7 C4 'D
2538
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
47 leax >L002B,PC * 0098 30 8D FF 8F 0...
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
48 ldy #63 * 009C 10 8E 00 3F ...?
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
49 lda #1 * 00A0 86 01 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
50 os9 I$Write * 00A2 10 3F 8A .?.
2538
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
51 leax >L006A,PC * 00A5 30 8D FF C1 0..A
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
52 ldy #2 * 00A9 10 8E 00 02 ....
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
53 lda #1 * 00AD 86 01 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
54 os9 I$Write * 00AF 10 3F 8A .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
55 L00B2 clra * 00B2 4F O
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
56 ldb #1 * 00B3 C6 01 F.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
57 os9 I$GetStt * 00B5 10 3F 8D .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
58 bcs L00B2 * 00B8 25 F8 %x
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
59 ldy #1 * 00BA 10 8E 00 01 ....
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
60 leax >U00C9,U * 00BE 30 C9 00 C9 0I.I
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
61 os9 I$Read * 00C2 10 3F 89 .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
62 lda 0,X * 00C5 A6 84 &.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
63 cmpa #20 * 00C7 81 14 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
64 beq L00EF * 00C9 27 24 '$
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
65 cmpa #24 * 00CB 81 18 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
66 beq L00EB * 00CD 27 1C '.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
67 lda U0000,U * 00CF A6 C4 &D
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
68 os9 I$Write * 00D1 10 3F 8A .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
69 lda 0,X * 00D4 A6 84 &.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
70 cmpa #13 * 00D6 81 0D ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
71 beq L00DC * 00D8 27 02 '.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
72 bra L00B2 * 00DA 20 D6 V
2538
f87ec0b216c8 Enabled automatic string detection in the disassembler.
lothan
parents: 2537
diff changeset
73 L00DC leax >L006A,PC * 00DC 30 8D FF 8A 0...
2537
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
74 ldy #2 * 00E0 10 8E 00 02 ....
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
75 lda #1 * 00E4 86 01 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
76 os9 I$Write * 00E6 10 3F 8A .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
77 bra L00B2 * 00E9 20 C7 G
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
78 L00EB lda #1 * 00EB 86 01 ..
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
79 bra L00F0 * 00ED 20 01 .
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
80 L00EF clrb * 00EF 5F _
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
81 L00F0 os9 F$Exit * 00F0 10 3F 06 .?.
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
82
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
83 emod
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
84 eom equ *
c491d9c9a4fd Tagged data areas and disassembled again.
lothan
parents: 2402
diff changeset
85 end