changeset 45:8af580d56e9f

Various improved comments.
author William Astle <lost@l-w.ca>
date Sat, 27 Dec 2014 01:27:00 -0700
parents 0fb9772b77fc
children e8eee008ad42
files dod.s
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/dod.s	Sat Dec 27 01:23:13 2014 -0700
+++ b/dod.s	Sat Dec 27 01:27:00 2014 -0700
@@ -3651,17 +3651,17 @@
 LD7B6		rts				; return to caller
 cmd_zload	bsr LD7BC			; parse the file name
 		dec V2B8			; flag ZLOAD
-		rts
+		rts				; return to caller
 LD7BC		ldx #wordbuff			; get start address to set to $ff
 		leau $20,x			; set $20 bytes
 		setblock			; go clear block to $ff
-		jmp LCB96
+		jmp LCB96			; go parse a word off command
 cmd_zsave	bsr LD7BC			; parse the file name
-		stx CBUFAD			
-		ldd #$0f
-		std BLKTYP
+		stx CBUFAD			; point buffer to file name
+		ldd #$0f			;* set block type to header, length to 15
+		std BLKTYP			;*
 		inc V2B8			; flag ZSAVE
-		rts
+		rts				; return to caller
 ; Objects in backpack for demo game
 startobjdemo	fcb 13				; iron sword
 		fcb 15				; pine torch