Mercurial > hg > Members > kono > nitros9-code
changeset 1178:900ceed1880a
Added standard headers
| author | boisy |
|---|---|
| date | Sun, 25 May 2003 15:50:20 +0000 |
| parents | b1a826c854f0 |
| children | 787a9c92be18 |
| files | 3rdparty/subrtns/cpu.asm 3rdparty/subrtns/hires.asm 3rdparty/subrtns/joystk.asm 3rdparty/subrtns/makefile |
| diffstat | 4 files changed, 56 insertions(+), 17 deletions(-) [+] |
line wrap: on
line diff
--- a/3rdparty/subrtns/cpu.asm Sun May 25 15:49:45 2003 +0000 +++ b/3rdparty/subrtns/cpu.asm Sun May 25 15:50:20 2003 +0000 @@ -1,4 +1,8 @@ -*=========================================================================== +******************************************************************** +* CPU - CPU Determiner Subroutine Module +* +* $Id$ +* * Basic09 subroutine module to determine the CPU type of the computer * Test via: * @@ -15,9 +19,13 @@ * * returns: CPUType: 6809 or 6309 (decimal integer) * Mode: 0=emulation mode, 1=native mode -*=========================================================================== +* +* Ed. Comments Who YY/MM/DD +* ------------------------------------------------------------------ +* 1 Created ADK ??/??/?? nam CPU + ttl CPU Determiner Subroutine Module ifp1 use defsfile
--- a/3rdparty/subrtns/hires.asm Sun May 25 15:49:45 2003 +0000 +++ b/3rdparty/subrtns/hires.asm Sun May 25 15:50:20 2003 +0000 @@ -1,15 +1,27 @@ -Level equ 2 +******************************************************************** +* HiRes - HiRes Joystick Subroutine Module +* +* $Id$ +* +* Ed. Comments Who YY/MM/DD +* ------------------------------------------------------------------ +* 1 Created for Coyota project BGP 98/??/?? + + nam HiRes + ttl HiRes Joystick Subroutine Module ifp1 use os9defs endc +edition set 1 + mod eom,name,Sbrtn+Objct,Reent+0,HiRes,size size equ . name fcs /HiRes/ - fcb $01 + fcb edition * Hi-Res Read Routine * @@ -87,15 +99,15 @@ * D = value * Delays for CoCo 3 OS-9 Level Two vs. CoCo 2 OS-9 Level One - ifgt Level-1 -SETTLDLY equ $5E -POLLDLY equ $0329 + IFGT Level-1 +SETTLDLY equ 94 +POLLDLY equ 809 HIVAL equ 640 - else -SETTLDLY equ $5E*2 -POLLDLY equ $0194 + ELSE +SETTLDLY equ 94*2 +POLLDLY equ 404 HIVAL equ 320 - endc + ENDC HiResHW pshs a lda $FF01
--- a/3rdparty/subrtns/joystk.asm Sun May 25 15:49:45 2003 +0000 +++ b/3rdparty/subrtns/joystk.asm Sun May 25 15:50:20 2003 +0000 @@ -1,15 +1,27 @@ -Level equ 2 +******************************************************************** +* JoyStk - Joystick Subroutine Module +* +* $Id$ +* +* Ed. Comments Who YY/MM/DD +* ------------------------------------------------------------------ +* 1 Created for Coyota project BGP 98/??/?? + + nam JoyStk + ttl Joystick Subroutine Module ifp1 use os9defs endc +edition set 1 + mod eom,name,Sbrtn+Objct,Reent+0,Joy,size size equ . name fcs /JoyStk/ - fcb $01 + fcb edition * Joystick Read Routine * @@ -27,7 +39,6 @@ * 16,s = addr of 4th param (joystick button) * 18,s = size of 4th param - Joy ldd 2,s get param count cmpd #4 4 params? bne error
--- a/3rdparty/subrtns/makefile Sun May 25 15:49:45 2003 +0000 +++ b/3rdparty/subrtns/makefile Sun May 25 15:50:20 2003 +0000 @@ -2,17 +2,25 @@ DEPENDS = ./Makefile -CMDS = cpu hires joystk +CMDS = cpu hires_l1 hires_l2 joystk ALLOBJS = $(CMDS) -all: $(ALLOBJS) $(DEPENDS) +all: banner $(ALLOBJS) $(DEPENDS) + +banner: @$(ECHO) "*********************************************" @$(ECHO) "* *" @$(ECHO) "* 3rd Party Subroutine Modules *" @$(ECHO) "* *" @$(ECHO) "*********************************************" - + +hires_l1: hires.asm + $(AS) $(ASOUT)$@ $< $(AFLAGS) -aLevel=1 + +hires_l2: hires.asm + $(AS) $(ASOUT)$@ $< $(AFLAGS) -aLevel=2 + clean: $(RM) $(ALLOBJS)