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
.word fbb2
.word fbb6
.word fe49
-\1a
\ No newline at end of file
+\1a