Mercurial > hg > Members > kono > nitros9-code

annotate level1/modules/term_mc6850.asm @ 3132:9bb0c42d9fc6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rename remaining Makefiles to makefile for consistency
author Neal Crook <foofoobedoo@gmail.com>
date Fri, 13 Jan 2017 19:52:26 +0000
parents 460fdd304adf
children 0116eacf444a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3114
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
1 ********************************************************************
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
2 * Term - mc6850 Device Descriptor
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
3 *
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
4 * $Id$
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
5 *
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
6 * Edt/Rev YYYY/MM/DD Modified by
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
7 * Comment
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
8 * ------------------------------------------------------------------
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
9
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
10 nam Term
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
11 ttl mc6850 Device Descriptor
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
12
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
13 * Disassembled 98/08/23 21:16:50 by Disasm v1.6 (C) 1988 by RML
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
14
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
15 ifp1
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
16 use defsfile
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
17 endc
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
18
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
19 tylg set Devic+Objct
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
20 atrv set ReEnt+rev
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
21 rev set $00
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
22
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
23 mod eom,name,tylg,atrv,mgrnam,drvnam
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
24
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
25 fcb UPDAT. mode byte
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
26 fcb HW.Page extended controller address
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
27
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
28 IFNE mc09
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
29 IFDEF HwBASE from makefile
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
30 fdb HwBASE
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
31 ELSE
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
32 fdb VDUSTA virtual UART physical controller address
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
33 ENDIF
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
34 ELSE
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
35 fdb $FF68 physical controller address
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
36 ENDC
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
37
3115
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
38 fcb initsize-*-1 initialization table size
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
39 fcb DT.SCF IT.DVC device type:0=scf,1=rbf,2=pipe,3=scf
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
40 fcb $00 IT.UPC case:0=up&lower,1=upper only
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
41 fcb $01 IT.BSO backspace:0=bsp,1=bsp then sp & bsp
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
42 fcb $00 IT.DLO delete:0=bsp over line,1=return
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
43 fcb $01 IT.EKO echo:0=no echo
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
44 fcb $01 IT.ALF auto line feed:0=off
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
45 fcb $00 IT.NUL end of line null count
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
46 fcb $01 IT.PAU pause:0=no end of page pause
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
47 fcb 24 IT.PAG lines per page
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
48 fcb C$BSP IT.BSP backspace character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
49 fcb C$DEL IT.DEL delete line character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
50 fcb C$CR IT.EOR end of record character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
51 fcb C$EOF IT.EOF end of file character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
52 fcb C$RPRT IT.RPR reprint line character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
53 fcb C$RPET IT.DUP duplicate last line character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
54 fcb C$PAUS IT.PSC pause character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
55 fcb C$INTR IT.INT interrupt character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
56 fcb C$QUIT IT.QUT quit character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
57 fcb C$BSP IT.BSE backspace echo character
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
58 fcb C$BELL IT.OVF line overflow character (bell)
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
59 fcb PARNONE IT.PAR parity
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
60 fcb STOP1+WORD8+B9600 IT.BAU stop bits/word size/baud rate
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
61 fdb name IT.D2P copy of descriptor name address
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
62 fcb C$XON IT.XON acia xon char
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
63 fcb C$XOFF IT.XOFF acia xoff char
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
64 fcb 80 IT.COL (szx) number of columns for display
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
65 fcb 24 IT.ROW (szy) number of rows for display
460fdd304adf term_mc6850: Include the matching IT.xxx symbols in the comments
Neal Crook <foofoobedoo@gmail.com>
parents: 3114
diff changeset
66 fcb $00 IT.XTYP 0 => NOT extended type
3114
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
67 initsize equ *
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
68
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
69 IFDEF TNum from makefile
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
70 IFEQ TNum
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
71 name fcs /T0/
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
72 ENDIF
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
73 IFEQ TNum-1
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
74 name fcs /T1/
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
75 ENDIF
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
76 ELSE
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
77 name fcs /Term/
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
78 ENDIF match IFDEF TNum
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
79
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
80 mgrnam fcs /SCF/
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
81 drvnam fcs /mc6850/
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
82
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
83 emod
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
84 eom equ *
61a8ce1200ed New mc6850 driver, based on existing sc6551 driver
Neal Crook <foofoobedoo@gmail.com>
parents:
diff changeset
85 end