From: Mark Tearle <mtearle@ucc.asn.au>
Date: Fri, 28 Sep 2001 08:22:51 +0000 (+0000)
Subject: Annotated reset
X-Git-Tag: ROMW~161
X-Git-Url: https://git.ucc.asn.au/?p=uccvend-snackrom.git;a=commitdiff_plain;h=daf56fb074864b9fcf25a3e6977176e754fca4cc

Annotated reset
---

diff --git a/ROM/vend.asm b/ROM/vend.asm
index 7753b9a..a07eac6 100644
--- a/ROM/vend.asm
+++ b/ROM/vend.asm
@@ -15546,23 +15546,24 @@ FE47 6E 00           n.    jmp 00,x
 	reset:
 
 FE49 86 40           .@    ldaa #40
-FE4B B7 10 24        ..$   sta 1024
+FE4B B7 10 24        ..$   sta 1024	;40 -> 1024
 FE4E 86 A0           ..    ldaa #a0
-FE50 B7 10 39        ..9   sta 1039
+FE50 B7 10 39        ..9   sta 1039	;a0 -> 1024
 FE53 8E 00 EF        ...   lds #00ef
-FE56 CE 00 00        ...   ldx #0000
-FE59 8C 00 80        ...   cpx #0080	;wipe 0000-007f
-FE5C 24 05           $.    bcc fe63
-FE5E 6F 00           o.    clr 00,x
-FE60 08              .     inx 
-FE61 20 F6            .    bra fe59
-FE63 BD F7 D6        ...   jsr f7d6
-FE66 7E FE 6D        ~.m   jmp fe6d
+FE56 CE 00 00        ...   ldx #0000	;wipe 0000-007f  X=0000
+FE59 8C 00 80        ...   cpx #0080	;loop: if X = 0080
+FE5C 24 05           $.    bcc fe63	;        finished
+FE5E 6F 00           o.    clr 00,x	;      else: load addr X with 0
+FE60 08              .     inx 		;        increment X
+FE61 20 F6            .    bra fe59	;repeat
+FE63 BD F7 D6        ...   jsr f7d6	;goto main:
+FE66 7E FE 6D        ~.m   jmp fe6d	; 
 
-FE69 0F              .     sei 
-FE6A 7E FE 49        ~.I   jmp fe49
+FE69 0F              .     sei 		;inhibit interrupts
+FE6A 7E FE 49        ~.I   jmp fe49	;goto reset:
 
 FE6D 20 FE            .    bra fe6d	;loop forever
+					;[SAF] - wait for interrupts?
 
 FE6F FF FF FF        ...   stx ffff
 FE72 FF FF FF        ...   stx ffff
@@ -15707,4 +15708,4 @@ FFD6	;vectors
 	.word	fbb2
 	.word	fbb6
 	.word	fe49
-
\ No newline at end of file
+