From ad26a747e2c7e8ce539672cd4df5c75bfbe12880 Mon Sep 17 00:00:00 2001
From: peterferrie <peter.ferrie@gmail.com>
Date: Mon, 16 Jun 2014 18:46:01 -0700
Subject: [PATCH] Update soscmd.pla

slightly faster dcitos
---
 src/vmsrc/soscmd.pla | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/src/vmsrc/soscmd.pla b/src/vmsrc/soscmd.pla
index f628c4d..4c72f07 100644
--- a/src/vmsrc/soscmd.pla
+++ b/src/vmsrc/soscmd.pla
@@ -391,12 +391,11 @@ asm dcitos
 	STA	SRCH
 	LDY	#$00
 -	LDA	(SRC),Y
-	INY
-	PHA
 	AND	#$7F
+	CMP	(SRC),Y
+	INY
 	STA	(DST),Y
-	PLA
-	BMI	-
+	BCS	-
 	TYA
 	LDY	#$00
 	STA	(DST),Y