From 75fb9020ba04f3abc16a5dd2cfd6857a102a0961 Mon Sep 17 00:00:00 2001
From: mgcaret <mgcaret@users.noreply.github.com>
Date: Mon, 11 Jun 2018 22:36:41 -0700
Subject: [PATCH] deschw: display Apple IIc Plus hidden slot 6 SmartPort info

---
 deschw.s | 29 +++++++++++++++++++++++++++--
 1 file changed, 27 insertions(+), 2 deletions(-)

diff --git a/deschw.s b/deschw.s
index fe0cebd..0e94ec5 100644
--- a/deschw.s
+++ b/deschw.s
@@ -894,13 +894,37 @@ desSp1:	lda slot
 	ora #$c0
 	sta rom+1
 	jsr chk_smport
-	bcs desNotSP
-	jsr Descr1SP
+	bcs chk_hiddenSP
+	jsr Descr1SP	
 desNotSP:	inc slot
 	lda slot
 	cmp #8
 	bcc desSp1
 	rts
+; look for IIc Plus hidden smartport
+chk_hiddenSP:	
+	lda $fbbf
+	cmp #5
+	bne desNotSP
+	lda slot
+	cmp #6
+	bne desNotSP
+	lda $c64e
+	cmp #$38 ; sec
+	bne desNotSP
+	lda $c651
+	cmp #$18 ; clc
+	bne desNotSP
+	jsr xmess
+	asc "IIc Plus hidden SmartPort in slot 6."
+	.byte $8d,$00
+	lda #$c6
+	sta SpTrick+2
+	lda #$51
+	sta SpTrick+1
+	jsr SpDescr
+	jmp desNotSP
+	
 ;
 Descr1SP:
 	jsr xmess
@@ -923,6 +947,7 @@ Descr1SP:
 	lda rom+1
 	sta SpTrick+2
 ;
+SpDescr:
 	jsr SpStatus
 	jsr EachStatus
 	rts