Mercurial > hg > Members > kono > nitros9-code

changeset 1804:6e5fa42c2fb1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Cleaned up defs files
author boisy
date Thu, 14 Apr 2005 17:10:37 +0000
parents 6b0d1027e4e0
children beba50d7ac3e
files defs/cciodefs defs/dgndefs defs/vdgdefs
diffstat 3 files changed, 115 insertions(+), 99 deletions(-) [+]
line wrap: on
line diff
--- a/defs/cciodefs	Thu Apr 14 01:41:06 2005 +0000
+++ b/defs/cciodefs	Thu Apr 14 17:10:37 2005 +0000
@@ -1,3 +1,4 @@
+	IFNE	CCIODEFS-1
                          
 CCIODEFS set   1         
                          
@@ -10,16 +11,16 @@
 * Comment
 * ------------------------------------------------------------------
 *
-* 2004/11/29, P.Harvey-Smith.
+*          2004/11/29  P.Harvey-Smith.
 * Added symbolic defines for bits in V.CoLoad.
 *
-* 2004/12/02, P.Harvey-Smith.
-* moved over all variables from co51.asm
+*          2004/12/02  P.Harvey-Smith.
+* Moved over all variables from co51.asm
 *
-* 2005/04/09, P.Harvey-Smith.
-* decoded rest of the co51 memory locations.
+*          2005/04/09  P.Harvey-Smith.
+* Decoded rest of the CO51 memory locations.
 *
-                         
+
          nam   CCIODefs  
          ttl   CoCo 1/2 I/O Definitions
                          
@@ -105,7 +106,9 @@
 V.CO32E  rmb   2          CO32 entry point
 V.CO80E  rmb   2          CO80 entry point
 V.CO51E  rmb   2          CO51 entry point
-;Co51 vars
+
+* CO51 vars
+
 V.51ScrnA rmb   2          * Screen address.
 V.51XPos rmb   1          * X co-ordinate
 V.51YPos rmb   1          * Y co-ordinate
@@ -121,9 +124,9 @@
 V.51XORFlag rmb   1          * and data to screen (0) or Xor (1)  		       
 V.51ScreenMask1 rmb   1          * screen masks for drawing characters on screen         
 V.51ScreenMask2 rmb   1         
-; End of c051 vars
-; **** Note these have to come at the end of the defs, or the keyboard ****
-; **** code can clobber variables defined after these !                ****
+* End of CO51 vars
+**** Note these have to come at the end of the defs, or the keyboard ****
+**** code can clobber variables defined after these !                ****
 V.IBufH  rmb   1          input buffer head
 V.IBufT  rmb   1          input buffer tail
 V.InBuf  rmb   1          input buffer tail
@@ -145,12 +148,12 @@
 *VD.Palet rmb   16 (16) current palette values
 *VD.PlFlg rmb   1  initialized to $08 by L00DB, and then unused!
                          
-;
-; Defs for V.COLoad flags.
-; 
+*
+* Defs for V.COLoad flags.
+* 
                          
-ModCo32  equ   %00000010  ; Co32, normal VDG 32x16.
-ModCo80  equ   %00000100  ; Co80, wordpak rs, 80x25
-ModCo51  equ   %00001000  ; Co51, pmode 4 51x25 text
-                         
-                         
+ModCO32  equ   %00000010  CO32, normal VDG 32x16.
+ModCO80  equ   %00000100  CO80, wordpak rs, 80x25
+ModCO51  equ   %00001000  CO51, pmode 4 51x25 text
+
+	ENDC
--- a/defs/dgndefs	Thu Apr 14 01:41:06 2005 +0000
+++ b/defs/dgndefs	Thu Apr 14 17:10:37 2005 +0000
@@ -1,12 +1,29 @@
+	IFNE	DGNDEFS-1
+                         
+DGNDEFS set   1         
+                         
+********************************************************************
+* DgnDefs - Dragon I/O Definitions
 *
-* Deinitions for ports on Dragon 32/64/Alpha.
+* $Id$
 *
-* 2004/11/16. P.Harvey-Smith.
-* 	Fixed the stupid error I made in the defines below
-*	that made all the non DPxxxxx defines equal to FF00 !!!
+* Edt/Rev  YYYY/MM/DD  Modified by
+* Comment
+* ------------------------------------------------------------------
+*          2004/11/16  P.Harvey-Smith.
+* Fixed the stupid error I made in the defines below that made all the
+* non DPxxxxx defines equal to FF00 !!!
+
+         nam   DgnDefs  
+         ttl   Dragon I/O Definitions
+                         
+********************
+* CCIO Static Memory
 *
-
-IO		equ		$ff00		; IO page on Dragon
+* Definitions for ports on Dragon 32/64/Alpha.
+*
+*
+IO		equ		$ff00		IO page on Dragon
 
 *
 * Most of these symbols will be defined twice, as some 
@@ -16,90 +33,85 @@
 * The versions starting DP must be used with DP=$FF.
 *
 
-*Pia 0 and 1 standard on all Dragons.
-
-DPPIA0DA	EQU		$00		; Side A Data/DDR
-DPPIA0CRA	EQU		$01		; Side A Control.
-DPPIA0DB	EQU		$02		; Side B Data/DDR
-DPPIA0CRB	EQU		$03		; Side B Control.
+* PIA 0 and 1 standard on all Dragons.
+DPPIA0DA	EQU		$00		Side A Data/DDR
+DPPIA0CRA	EQU		$01		Side A Control.
+DPPIA0DB	EQU		$02		Side B Data/DDR
+DPPIA0CRB	EQU		$03		Side B Control.
 
-PIA0DA		EQU		DPPIA0DA+IO	; Side A Data/DDR
-PIA0CRA		EQU		DPPIA0CRA+IO	; Side A Control.
-PIA0DB		EQU		DPPIA0DB+IO	; Side A Data/DDR
-PIA0CRB		EQU		DPPIA0CRB+IO	; Side A Control.
+PIA0DA		EQU		DPPIA0DA+IO	Side A Data/DDR
+PIA0CRA		EQU		DPPIA0CRA+IO	Side A Control.
+PIA0DB		EQU		DPPIA0DB+IO	Side A Data/DDR
+PIA0CRB		EQU		DPPIA0CRB+IO	Side A Control.
 
-DPPIA1DA	EQU		$20		; Side A Data/DDR
-DPPIA1CRA	EQU		$21		; Side A Control.
-DPPIA1DB	EQU		$22		; Side B Data/DDR
-DPPIA1CRB	EQU		$23		; Side B Control.
+DPPIA1DA	EQU		$20		Side A Data/DDR
+DPPIA1CRA	EQU		$21		Side A Control.
+DPPIA1DB	EQU		$22		Side B Data/DDR
+DPPIA1CRB	EQU		$23		Side B Control.
 
-PIA1DA		EQU		DPPIA1DA+IO	; Side A Data/DDR
-PIA1CRA		EQU		DPPIA1CRA+IO	; Side A Control.
-PIA1DB		EQU		DPPIA1DB+IO	; Side A Data/DDR
-PIA1CRB		EQU		DPPIA1CRB+IO	; Side A Control.
+PIA1DA		EQU		DPPIA1DA+IO	Side A Data/DDR
+PIA1CRA		EQU		DPPIA1CRA+IO	Side A Control.
+PIA1DB		EQU		DPPIA1DB+IO	Side A Data/DDR
+PIA1CRB		EQU		DPPIA1CRB+IO	Side A Control.
 
-* Dragon Alpha has a third PIA at FF24.
+* Dragon Alpha has a third PIA at $FF24.
+DPPIA2DA	EQU		$24		Side A Data/DDR
+DPPIA2CRA	EQU		$25		Side A Control.
+DPPIA2DB	EQU		$26		Side B Data/DDR
+DPPIA2CRB	EQU		$27		Side B Control.
 
-DPPIA2DA	EQU		$24		; Side A Data/DDR
-DPPIA2CRA	EQU		$25		; Side A Control.
-DPPIA2DB	EQU		$26		; Side B Data/DDR
-DPPIA2CRB	EQU		$27		; Side B Control.
+PIA2DA		EQU		DPPIA2DA+IO	Side A Data/DDR
+PIA2CRA		EQU		DPPIA2CRA+IO	Side A Control.
+PIA2DB		EQU		DPPIA2DB+IO	Side A Data/DDR
+PIA2CRB		EQU		DPPIA2CRB+IO	Side A Control.
 
-PIA2DA		EQU		DPPIA2DA+IO	; Side A Data/DDR
-PIA2CRA		EQU		DPPIA2CRA+IO	; Side A Control.
-PIA2DB		EQU		DPPIA2DB+IO	; Side A Data/DDR
-PIA2CRB		EQU		DPPIA2CRB+IO	; Side A Control.
-
-;WD2797 Floppy disk controler, used in Alpha Note registers in reverse order !
-DPCmdRegA	EQU		$2F		; command/status			
-DPTrkRegA	EQU		$2E		; Track register
-DPSecRegA	EQU		$2D		; Sector register
-DPDataRegA	EQU		$2C		; Data register
+* WD2797 Floppy disk controler, used in Alpha Note registers in reverse order !
+DPCmdRegA	EQU		$2F		command/status			
+DPTrkRegA	EQU		$2E		Track register
+DPSecRegA	EQU		$2D		Sector register
+DPDataRegA	EQU		$2C		Data register
 
-CmdRegA		EQU		DPCMDREG+IO	; command/status			
-TrkRegA		EQU		DPTRKREG+IO	; Track register
-SecRegA		EQU		DPSECREG+IO	; Sector register
-DataRegA	EQU		DPDATAREG+IO	; Data register
-
-; Constants for Alpha AY-8912 sound chip, which is used to control
-; Drive select and motor on the Alpha
+CmdRegA		EQU		DPCMDREG+IO	command/status			
+TrkRegA		EQU		DPTRKREG+IO	Track register
+SecRegA		EQU		DPSECREG+IO	Sector register
+DataRegA	EQU		DPDATAREG+IO	Data register
 
-AYIOREG		EQU		$0E			; AY-8912, IO Register number.
-AYIdle		EQU		$00			; Make AY Idle.
-AYWriteReg	EQU		$01			; Write AY Register
-AYReadReg	EQU		$02			; Read AY Register
-AYREGLatch	EQU		$03			; Latch register into AY
+* Constants for Alpha AY-8912 sound chip, which is used to control
+* Drive select and motor on the Alpha
+AYIOREG		EQU		$0E		AY-8912, IO Register number.
+AYIdle		EQU		$00		Make AY Idle.
+AYWriteReg	EQU		$01		Write AY Register
+AYReadReg	EQU		$02		Read AY Register
+AYREGLatch	EQU		$03		Latch register into AY
 
-DSMask		EQU		$03			; Drive select mask.
-MotorMask	EQU		$04			; Motor enable mask
-DDENMask	EQU		$08			; DDEN Mask
-ENPMask		EQU		$10			; Enable Precomp mask
-NMIMask		EQU		$20			; NMI enable Mask
+DSMask		EQU		$03		Drive select mask.
+MotorMask	EQU		$04		Motor enable mask
+DDENMask	EQU		$08		DDEN Mask
+ENPMask		EQU		$10		Enable Precomp mask
+NMIMask		EQU		$20		NMI enable Mask
 
-; Dragon 64/Alpha Serial port.
-DPAciaData	EQU		$04		; Acia Rx/Tx Register
-DPAciaStat	EQU		$05		; Acia status register
-DPAciaCmd	EQU		$06		; Acia command register
-DPAciaCtrl	EQU		$07		; Acia control register
-
-;DragonDos Cartrage IO for WD2797
+* Dragon 64/Alpha Serial port.
+DPAciaData	EQU		$04		ACIA Rx/Tx Register
+DPAciaStat	EQU		$05		ACIA status register
+DPAciaCmd	EQU		$06		ACIA command register
+DPAciaCtrl	EQU		$07		ACIA control register
 
-;WD2797 Floppy disk controler, used in DragonDos.
-DPCmdRegD	EQU		$40		; command/status			
-DPTrkRegD	EQU		$41		; Track register
-DPSecRegD	EQU		$42		; Sector register
-DPDataRegD	EQU		$43		; Data register
+* DragonDos Cartrage IO for WD2797
+* WD2797 Floppy disk controler, used in DragonDos.
+DPCmdRegD	EQU		$40		command/status			
+DPTrkRegD	EQU		$41		Track register
+DPSecRegD	EQU		$42		Sector register
+DPDataRegD	EQU		$43		Data register
 
-CmdRegD		EQU		DPCMDREG+IO	; command/status			
-TrkRegD		EQU		DPTRKREG+IO	; Track register
-SecRegD		EQU		DPSECREG+IO	; Sector register
-DataRegD	EQU		DPDATAREG+IO	; Data register
+CmdRegD		EQU		DPCMDREG+IO	command/status			
+TrkRegD		EQU		DPTRKREG+IO	Track register
+SecRegD		EQU		DPSECREG+IO	Sector register
+DataRegD	EQU		DPDATAREG+IO	Data register
 
-DPDSKCTL	EQU		$48			; Disk DS/motor control reg
+DPDSKCTL	EQU		$48		Disk DS/motor control reg
 DSKCTL		EQU		DPDSKCTL+IO		
 
-; Disk IO bitmasks (DragonDos).
-
+* Disk IO bitmasks (DragonDos).
 NMIEnD    	EQU		%00100000 
 WPCEnD    	EQU   	%00010000 
 SDensEnD  	EQU   	%00001000 
@@ -110,11 +122,10 @@
 Drive3D		EQU		%00000011
 
 
-; Disk IO bitmasks (Dragon Alpha).
-
-NMIEnA    	EQU		%10000000	; This is just a guess, but in current code just used as a flag 
-WPCEnA    	EQU   	%01000000 	; Acording to circuit trace by R.Harding.
-SDensEnA  	EQU   	%00000000 	; DDen is pulled low on the alpha, so always enabled.
+* Disk IO bitmasks (Dragon Alpha).
+NMIEnA    	EQU		%10000000	This is just a guess, but in current code just used as a flag 
+WPCEnA    	EQU   	%01000000 	According to circuit trace by R.Harding.
+SDensEnA  	EQU   	%00000000 	DDen is pulled low on the alpha, so always enabled.
 MotorOnA  	EQU   	%00010000 	
 Drive0A		EQU		%00000001
 Drive1A		EQU		%00000010
@@ -144,3 +155,4 @@
 DensMask 	EQU   	%00000001 
 T80Mask  	EQU   	%00000010 
 
+		ENDC
--- a/defs/vdgdefs	Thu Apr 14 01:41:06 2005 +0000
+++ b/defs/vdgdefs	Thu Apr 14 17:10:37 2005 +0000
@@ -1,4 +1,5 @@
          IFNE   VDGDEFS-1
+
 VDGDEFS  set    1
 
 ********************************************************************
@@ -10,7 +11,7 @@
 * Comment
 * ------------------------------------------------------------------
 *          1991/05/07  Alan DeKok
-* Wrote original from VDGint source.
+* Wrote original from VDGInt source.
 
 
          nam    VDGDefs