changeset 2589:e134044fd755

Added code to handle SS.KySns (untested!)
author boisy
date Tue, 04 Oct 2011 15:11:45 +0000
parents d5a5b6b89fb1
children 17d43fd29ee2
files level1/modules/scdwn.asm
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/level1/modules/scdwn.asm	Tue Oct 04 15:07:00 2011 +0000
+++ b/level1/modules/scdwn.asm	Tue Oct 04 15:11:45 2011 +0000
@@ -433,6 +433,15 @@
                cmpa      #SS.KySns
                bne       UnSvcErr            ; no, we have no more answers, report error
 * Get key sense byte from server and return to caller
+               pshs      u
+               ifgt      Level-1
+               ldu       <D.DWSubAddr
+               else      
+               ldu       >D.DWSubAddr
+               jsr       3,u
+               endc      
+               puls      u
+               sta       R$A,x
 
                puls      cc,dp,pc            ; restore Carry status, system DP, return