� Zero S/W RAM
% �pass=0 � 2 � 2:P%=&B00:[OPTpass
q LDA#0:STA&FCDC:STA&FCDE:LDA&F4:PHA:LDA#15:STA&F4:STA&FE05:LDX#2:SEI:.test TXA:STA&F4:STA&FE05:LDA#0:LDA&8800
(H TAY:INC&8800:CPY&8800:BNEend:DEX:DEX:BPLtest:LDX#&FF:STA&70:JMPend2
2 .end STX&70:DEC&8800
<Q TXA:CLC:ADC#&A0:STA&72:LDA#2:STA&73:LDA#0:LDY#0:STA(&72),Y:INC&72:STA(&72),Y
F LDA#2:STA&71
P& .zero LDA#0:STA&F6:LDA#&80:STA&F7
Z� LDA#0:LDY#0:.loop STA(&F6),Y:INY:BNEloop:INC&F7:LDX&F7:CPX#&C0:BNEloop:DEC&71:BEQend2:INC&70:LDA&70:STA&F4:STA&FE05:JMPzero
dS .end2 PLA:STA&F4:STA&FE05:CLI:RTS:]:�:�&B00:� ?&70=&FF � �"No sideways RAM!":�
�

00000000  0d 00 0a 13 20 f4 20 5a  65 72 6f 20 53 2f 57 20  |.... . Zero S/W |
00000010  52 41 4d 0d 00 14 25 20  e3 70 61 73 73 3d 30 20  |RAM...% .pass=0 |
00000020  b8 20 32 20 88 20 32 3a  50 25 3d 26 42 30 30 3a  |. 2 . 2:P%=&B00:|
00000030  5b 4f 50 54 70 61 73 73  0d 00 1e 71 20 4c 44 41  |[OPTpass...q LDA|
00000040  23 30 3a 53 54 41 26 46  43 44 43 3a 53 54 41 26  |#0:STA&FCDC:STA&|
00000050  46 43 44 45 3a 4c 44 41  26 46 34 3a 50 48 41 3a  |FCDE:LDA&F4:PHA:|
00000060  4c 44 41 23 31 35 3a 53  54 41 26 46 34 3a 53 54  |LDA#15:STA&F4:ST|
00000070  41 26 46 45 30 35 3a 4c  44 58 23 32 3a 53 45 49  |A&FE05:LDX#2:SEI|
00000080  3a 2e 74 65 73 74 20 54  58 41 3a 53 54 41 26 46  |:.test TXA:STA&F|
00000090  34 3a 53 54 41 26 46 45  30 35 3a 4c 44 41 23 30  |4:STA&FE05:LDA#0|
000000a0  3a 4c 44 41 26 38 38 30  30 0d 00 28 48 20 54 41  |:LDA&8800..(H TA|
000000b0  59 3a 49 4e 43 26 38 38  30 30 3a 43 50 59 26 38  |Y:INC&8800:CPY&8|
000000c0  38 30 30 3a 42 4e 45 65  6e 64 3a 44 45 58 3a 44  |800:BNEend:DEX:D|
000000d0  45 58 3a 42 50 4c 74 65  73 74 3a 4c 44 58 23 26  |EX:BPLtest:LDX#&|
000000e0  46 46 3a 53 54 41 26 37  30 3a 4a 4d 50 65 6e 64  |FF:STA&70:JMPend|
000000f0  32 0d 00 32 19 20 2e 65  6e 64 20 53 54 58 26 37  |2..2. .end STX&7|
00000100  30 3a 44 45 43 26 38 38  30 30 0d 00 3c 51 20 54  |0:DEC&8800..<Q T|
00000110  58 41 3a 43 4c 43 3a 41  44 43 23 26 41 30 3a 53  |XA:CLC:ADC#&A0:S|
00000120  54 41 26 37 32 3a 4c 44  41 23 32 3a 53 54 41 26  |TA&72:LDA#2:STA&|
00000130  37 33 3a 4c 44 41 23 30  3a 4c 44 59 23 30 3a 53  |73:LDA#0:LDY#0:S|
00000140  54 41 28 26 37 32 29 2c  59 3a 49 4e 43 26 37 32  |TA(&72),Y:INC&72|
00000150  3a 53 54 41 28 26 37 32  29 2c 59 0d 00 46 11 20  |:STA(&72),Y..F. |
00000160  4c 44 41 23 32 3a 53 54  41 26 37 31 0d 00 50 26  |LDA#2:STA&71..P&|
00000170  20 2e 7a 65 72 6f 20 4c  44 41 23 30 3a 53 54 41  | .zero LDA#0:STA|
00000180  26 46 36 3a 4c 44 41 23  26 38 30 3a 53 54 41 26  |&F6:LDA#&80:STA&|
00000190  46 37 0d 00 5a 80 20 4c  44 41 23 30 3a 4c 44 59  |F7..Z. LDA#0:LDY|
000001a0  23 30 3a 2e 6c 6f 6f 70  20 53 54 41 28 26 46 36  |#0:.loop STA(&F6|
000001b0  29 2c 59 3a 49 4e 59 3a  42 4e 45 6c 6f 6f 70 3a  |),Y:INY:BNEloop:|
000001c0  49 4e 43 26 46 37 3a 4c  44 58 26 46 37 3a 43 50  |INC&F7:LDX&F7:CP|
000001d0  58 23 26 43 30 3a 42 4e  45 6c 6f 6f 70 3a 44 45  |X#&C0:BNEloop:DE|
000001e0  43 26 37 31 3a 42 45 51  65 6e 64 32 3a 49 4e 43  |C&71:BEQend2:INC|
000001f0  26 37 30 3a 4c 44 41 26  37 30 3a 53 54 41 26 46  |&70:LDA&70:STA&F|
00000200  34 3a 53 54 41 26 46 45  30 35 3a 4a 4d 50 7a 65  |4:STA&FE05:JMPze|
00000210  72 6f 0d 00 64 53 20 2e  65 6e 64 32 20 50 4c 41  |ro..dS .end2 PLA|
00000220  3a 53 54 41 26 46 34 3a  53 54 41 26 46 45 30 35  |:STA&F4:STA&FE05|
00000230  3a 43 4c 49 3a 52 54 53  3a 5d 3a ed 3a d6 26 42  |:CLI:RTS:]:.:.&B|
00000240  30 30 3a e7 20 3f 26 37  30 3d 26 46 46 20 8c 20  |00:. ?&70=&FF . |
00000250  f1 22 4e 6f 20 73 69 64  65 77 61 79 73 20 52 41  |."No sideways RA|
00000260  4d 21 22 3a e0 0d ff                              |M!":...|
00000267