, > MakeRFS 1.01 04-May-2023 J.G.Harston 5-<&4200:&87:-<&4200:28,0,24,39,19:=&77C0 (f"Build fast ROMFS ROM":j%19,h%255,c%&3FFF:X%=j%:Y%=X%256:"ROM title:"8""J$:J$="":J$="ROMFS" F"ROM copyright: (C)"L$:@:0:"Enter files to add, end with RETURN"::"File to add:"6""H$:H$<>"":"Filename to use: "G$:G$="":G$=H$ H$<>"":1 >H$="":?O%="+":O%=O%+1:"Save ROM as:"6""I$:I$="":11 PI$<>"":K$="SAVE "+I$+" "+~c%+" "+~O%+" 0 FFFBBC00":"Saving ";I$;:K$:: @:d%40:G=&70:H=&72:I=&74:i%=022:P%=d%:[OPTi%:.S:LDX#8:LDA(H-8&FF,X):G+0:.T:ASLG+1:ROLA:BCCU:TAY:LDAG+1:#&21:STAG+1:TYA:#&10:.U:DEX:BNET:STAG+0:INCH+0:BNEV:INCH+1:.V:DECI:BNES:RTS:]: T0:i%=462:P%=&8000:O%=c%:[OPTi%:BRK:BRK:BRK:JMPW:EQUB&82:EQUBX-&8000:EQUB&00:EQUSJ$:.X:EQUB&00:EQUS"(C)":EQUSL$:EQUB&00:.W:PHA:CMP#13:BEQY:CMP#14:BEQZ:.K:PLA:RTS:.Y:TYA:#15:CMP&F4:BCCK:LDA&F4:#15:STA&F5:LDA#L255:STA&F6:LDA#L256:STA&F7:BNEM .N:LDA(&F6),Y:TAY:LDA#1:JSRJ:.M:PLA:LDA#0:RTS:.Z:LDA&F5:#15:CMP&F4:BNEK:LDY#0:LDA&E2:#8:BNEN:LDA&C2:CMP#4:BNEN:LDA&27A:BPL_:LDA&B2:&B3:CMP#&FF:PHP:.`:PLP:._:PHP:BCSO:.a:LDA(&F6),Y:STA&FEE5:JSRQ:JSRQ:INY:CPY&3C8:BNEa:BEQb:.O:LDA(&F6),Y:STA(&B0),Y INY:CPY&3C8:BNEO:.b:TYA:JSRJ:LDA#2:JSRJ:LDA&3C9:BEQc:INC&B1:INC&F7:LDA(&F6),Y:CMP#"#":BNER:LDA#1:.d:JSRJ:BCC`:.R:INY:LDA(&F6),Y:BNER:TYA:CLC:ADC#11:TAY:LDA(&F6),Y:STA&3C8:LDA#0:STA&3C9:TYA:CLC:ADC#9:LDY#0:BEQd:.c:PLP:STA&BE:STA&BF:STA&C2:LDA#&80 OSTA&BD:STA&3CA:JMPM:.J:CLC:ADC&F6:STA&F6:LDA&F7:ADC#0:STA&F7:.Q:RTS:.L:]: n1:a%=0:A%=@(H$,5):k%=X%!2:l%=X%!6:b%=X%!10:q%=X%!14:A%:O%-c%+b%>&3F00:"Not enough space":#a%:a%=0: $A%=1:a%=(H$) .$a%=0:"File '"H$"' not found": 85G$=G$,8):e%=O%:f%=0::_%=O%:`%=b%:`%>256:`%=256 `$g%=0:b%<257:g%=&80:b%=0:g%=&C0 j$O%="*"+G$:O%=O%+1+G$:?O%=0:O%!1=k%:O%!5=l%:O%!9=f%:O%!11=`%:O%?13=g%:O%!14=0:O%=O%+18:f%=0g%<>0:!G=0:!H=_%+1:!I=O%-_%-1:d%:!O%=!G:O%=O%+2?_%="#":O%=_%+1 2(4,a%,O%,`%,0):!G=0:!H=O%:!I=`%:d%:O%!`%=!G:O%=O%+`%+2:b%=b%-`%:f%=f%+1:b%=0:e%!(15+G$)=O%-c%+&8000:!G=0:!H=e%+1:!I=18+G$:d%:e%?(19+G$)=G?0:e%?(20+G$)=G?1:_%!(15+G$)=O%-c%+&8000:!G=0:!H=_%+1:!I=18+G$:d%:_%?(19+G$)=G?0:_%?(20+G$)=G?1 #a%:a%=0: 5ݤ@(K$,A%)$h%=K$:?X%=h%:X%?1=h%256:=(&FFDD)&FF >2(A%,m%,n%,o%,p%)?X%=m%:X%!1=n%:X%!5=o%:X%!9=p%:&FFD1: