Mercurial > hg > Members > kono > nitros9-code

changeset 1840:b66fa207b9fe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Paralell printer descriptor for Dragon 32/64/Alpha
author afra
date Thu, 16 Jun 2005 22:19:19 +0000
parents 613d93786303
children 9ee7316fb6d3
files level1/modules/p_dpp.asm
diffstat 1 files changed, 59 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/level1/modules/p_dpp.asm	Thu Jun 16 22:19:19 2005 +0000
@@ -0,0 +1,59 @@
+*
+* Dragon 32/64/Alpha printer device descriptor.
+*
+* Disassembled from the Alpha OS-9 2005-06-16, P.Harvey-Smith.
+*
+
+	nam   	p
+        ttl   	Dragon paralell printer device discriptor
+	
+        ifp1
+        use   	defsfile
+        endc
+
+tylg	set   	Devic+Objct   
+atrv    set   	ReEnt+rev
+rev     set   	$01
+        mod   	eom,name,tylg,atrv,mgrnam,drvnam
+        
+	fcb   	$03 		mode byte
+        fcb   	$FF 		extended controller address
+        fdb   	$0000  		physical controller address
+        fcb   	initsize-*-1  	initilization table size
+        fcb   	$00 		device type:0=scf,1=rbf,2=pipe,3=scf
+        fcb   	$00 		case:0=up&lower,1=upper only
+        fcb   	$00 		backspace:0=bsp,1=bsp then sp & bsp
+        fcb   	$00 		delete:0=bsp over line,1=return
+        fcb   	$00 		echo:0=no echo
+        fcb   	$01 		auto line feed:0=off
+        fcb   	$00 		end of line null count
+        fcb   	$00 		pause:0=no end of page pause
+        fcb   	$42 		lines per page
+        fcb   	$08 		backspace character
+        fcb   	$18 		delete line character
+        fcb   	$0D 		end of record character
+        fcb   	$00 		end of file character
+        fcb   	$04 		reprint line character
+        fcb   	$01 		duplicate last line character
+        fcb   	$17 		pause character
+        fcb   	$00 		interrupt character
+        fcb   	$00 		quit character
+        fcb   	$5F 		backspace echo character
+        fcb   	$07 		line overflow character (bell)
+        fcb   	$00 		init value for dev ctl reg
+        fcb   	$00 		baud rate
+        fdb   	name 		copy of descriptor name address
+        fcb   	$00 		acia xon char
+        fcb   	$00 		acia xoff char
+
+initsize 	equ   	*
+name    	equ   	*
+        fcs   	/P/
+mgrnam  equ  	*
+        fcs   	/SCF/
+drvnam  equ   	*
+        fcs   	/PRINTER/
+	
+        emod
+eom     equ   	*
+        end