� SRB3
� by H.R.Wall
� (c) The Micro User
(�N%=0 � 2 � 2
2P%=&6E00
<[OPT N%
FLDA #?&81 � 16:JSR ascii
PSTA savend
ZLDA #?&81 � 16:JSR ascii
dSTA savend+1
nLDA #?&80 � 16:JSR ascii:
xSTA savend+2
�LDA #?&80 � 16:JSR ascii
�STA savend+3
�LDX #savestr � 256
�LDY #savestr � 256
�
JSR &FFF7
�RTS
�
.ascii
�CMP #10:BCC ascz
�
ADC #6
�	.ascz
�ADC #&30
�RTS
�.savestr

EQUS "*SRSAVE "

EQUS $&900

EQUS " 8000 "

".savend

,
EQUD 0

6
EQUS " 5"

@EQUB 13

J]

T�

^
� !&86

h�
�

00000000  0d 00 0a 0a f4 20 53 52  42 33 0d 00 14 11 f4 20  |..... SRB3..... |
00000010  62 79 20 48 2e 52 2e 57  61 6c 6c 0d 00 1e 18 f4  |by H.R.Wall.....|
00000020  20 28 63 29 20 54 68 65  20 4d 69 63 72 6f 20 55  | (c) The Micro U|
00000030  73 65 72 0d 00 28 11 e3  4e 25 3d 30 20 b8 20 32  |ser..(..N%=0 . 2|
00000040  20 88 20 32 0d 00 32 0c  50 25 3d 26 36 45 30 30  | . 2..2.P%=&6E00|
00000050  0d 00 3c 0b 5b 4f 50 54  20 4e 25 0d 00 46 1c 4c  |..<.[OPT N%..F.L|
00000060  44 41 20 23 3f 26 38 31  20 81 20 31 36 3a 4a 53  |DA #?&81 . 16:JS|
00000070  52 20 61 73 63 69 69 0d  00 50 0e 53 54 41 20 73  |R ascii..P.STA s|
00000080  61 76 65 6e 64 0d 00 5a  1c 4c 44 41 20 23 3f 26  |avend..Z.LDA #?&|
00000090  38 31 20 83 20 31 36 3a  4a 53 52 20 61 73 63 69  |81 . 16:JSR asci|
000000a0  69 0d 00 64 10 53 54 41  20 73 61 76 65 6e 64 2b  |i..d.STA savend+|
000000b0  31 0d 00 6e 1d 4c 44 41  20 23 3f 26 38 30 20 81  |1..n.LDA #?&80 .|
000000c0  20 31 36 3a 4a 53 52 20  61 73 63 69 69 3a 0d 00  | 16:JSR ascii:..|
000000d0  78 10 53 54 41 20 73 61  76 65 6e 64 2b 32 0d 00  |x.STA savend+2..|
000000e0  82 1c 4c 44 41 20 23 3f  26 38 30 20 83 20 31 36  |..LDA #?&80 . 16|
000000f0  3a 4a 53 52 20 61 73 63  69 69 0d 00 8c 10 53 54  |:JSR ascii....ST|
00000100  41 20 73 61 76 65 6e 64  2b 33 0d 00 96 16 4c 44  |A savend+3....LD|
00000110  58 20 23 73 61 76 65 73  74 72 20 83 20 32 35 36  |X #savestr . 256|
00000120  0d 00 a0 16 4c 44 59 20  23 73 61 76 65 73 74 72  |....LDY #savestr|
00000130  20 81 20 32 35 36 0d 00  aa 0d 4a 53 52 20 26 46  | . 256....JSR &F|
00000140  46 46 37 0d 00 b4 07 52  54 53 0d 00 be 0a 2e 61  |FF7....RTS.....a|
00000150  73 63 69 69 0d 00 c8 14  43 4d 50 20 23 31 30 3a  |scii....CMP #10:|
00000160  42 43 43 20 61 73 63 7a  0d 00 d2 0a 41 44 43 20  |BCC ascz....ADC |
00000170  23 36 0d 00 dc 09 2e 61  73 63 7a 0d 00 e6 0c 41  |#6.....ascz....A|
00000180  44 43 20 23 26 33 30 0d  00 f0 07 52 54 53 0d 00  |DC #&30....RTS..|
00000190  fa 0c 2e 73 61 76 65 73  74 72 0d 01 04 13 45 51  |...savestr....EQ|
000001a0  55 53 20 22 2a 53 52 53  41 56 45 20 22 0d 01 0e  |US "*SRSAVE "...|
000001b0  0e 45 51 55 53 20 24 26  39 30 30 0d 01 18 11 45  |.EQUS $&900....E|
000001c0  51 55 53 20 22 20 38 30  30 30 20 22 0d 01 22 0b  |QUS " 8000 "..".|
000001d0  2e 73 61 76 65 6e 64 0d  01 2c 0a 45 51 55 44 20  |.savend..,.EQUD |
000001e0  30 0d 01 36 0d 45 51 55  53 20 22 20 35 22 0d 01  |0..6.EQUS " 5"..|
000001f0  40 0b 45 51 55 42 20 31  33 0d 01 4a 05 5d 0d 01  |@.EQUB 13..J.]..|
00000200  54 05 ed 0d 01 5e 0a d6  20 21 26 38 36 0d 01 68  |T....^.. !&86..h|
00000210  05 e0 0d ff                                       |....|
00000214