annotate level1/modules/t0_scdwt.asm @ 2910:87f2133301b0

Remove execute permissions from files that should not have it
author Tormod Volden <debian.tormod@gmail.com>
date Sat, 11 Jan 2014 21:52:42 +0100
parents a7b20230e9c0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2242
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
1 ********************************************************************
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
2 * T0 - Drivewire Virtual Serial Port on T0
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
3 *
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
4 * mostly copied or slightly changed from other OS9/DriveWire code
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
5 *
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
6 * Aaron Wolfe
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
7 * version 0.3 - 12/17/09 - added SHARE bit to mode
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
8 *
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
9 * This descriptor has slightly different defaults, intended to be used as
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
10 * the channel for the DriveWire utilities
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
11 *
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
12
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
13 nam T0
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
14 ttl CoCo DriveWire Virtual Serial Device Descriptor
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
15
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
16 ifp1
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
17 use defsfile
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
18 endc
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
19
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
20 tylg set Devic+Objct
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
21 atrv set ReEnt+rev
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
22 rev set $00
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
23
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
24 mod eom,name,tylg,atrv,mgrnam,drvnam
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
25
2257
a7b20230e9c0 Fixed issue where uninitalized device might receive data from server, causing crash.
boisy
parents: 2242
diff changeset
26 fcb UPDAT. mode byte (share set to prevent multiple access)
2242
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
27 fcb HW.Page extended controller address
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
28 fdb $FF00 physical controller address
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
29 fcb initsize-*-1 initilization table size
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
30 fcb DT.SCF device type:0=scf,1=rbf,2=pipe,3=scf
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
31 fcb $00 case:0=up&lower,1=upper only
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
32 fcb $00 backspace:0=bsp,1=bsp then sp & bsp
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
33 fcb $01 delete:0=bsp over line,1=return
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
34 fcb $00 echo:0=no echo
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
35 fcb $00 auto line feed:0=off
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
36 fcb $00 end of line null count
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
37 fcb $00 pause:0=no end of page pause
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
38 fcb 66 lines per page
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
39 fcb C$BSP backspace character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
40 fcb C$DEL delete line character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
41 fcb $00 end of record character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
42 fcb $00 end of file character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
43 fcb C$RPRT reprint line character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
44 fcb C$RPET duplicate last line character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
45 fcb C$PAUS pause character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
46 fcb $00 interrupt character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
47 fcb $00 quit character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
48 fcb C$BSP backspace echo character
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
49 fcb C$BELL line overflow character (bell)
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
50 fcb $00 init value for dev ctl reg
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
51 fcb B600 baud rate
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
52 fdb name copy of descriptor name address
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
53 fcb $00 acia xon char
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
54 fcb $00 acia xoff char
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
55 fcb 80 (szx) number of columns for display
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
56 fcb 24 (szy) number of rows for display
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
57 initsize equ *
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
58
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
59 name fcs /T0/
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
60 mgrnam fcs /SCF/
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
61 drvnam fcs /scdwt/
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
62
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
63 emod
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
64 eom equ *
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
65 end
2a889a511f0a Adding Aaron Wolfe's DriveWire work
boisy
parents:
diff changeset
66