> BuildMOS : &A%=0:X%=1:os%=((&FFF4)&FF00)256 (, ctrl% 31,mem% &3FFF:X%=ctrl%:Y%=X%256 27s$=".":os%32:d$="\" os%8:d$="/" s$="/":d$="." <out$="MOS321"+s$+"rom" F: Pok%=: ok%= Z" ok%:"Access "+out$+" wr/wr" d n: x"Building 128K ROM image"; out%=(out$):  rom%=8 15: A$: A$; "Load "+A$+" "+~mem% C rom%=14: A$: A$<>"": A$<>"*": 'A$;:"Load "+A$+" "+~mem% #gbpb(2,out%,mem%,&4000,#out%) : rom% :  "Set to 21st century"; )#out%=7*&4000+&9881-&8000:#out%,&20 '"Fix *MOVE bug"; )#out%=7*&4000+&91E0-&8000:#out%,&80 '"Fix OSBYTE &6B bug"; 4#out%=0*&4000+&EEAB-&C000:#out%,&EA:#out%,&98 '"Change to version 3.21"; )#out%=7*&4000+&9F07-&8000:#out%,&31 )#out%=0*&4000+&EF79-&C000:#out%,&31 "#out%:out%=0: ,"Access "+out$+" R/R" 6"SetType "+out$+" BBC" @"Stamp "+out$ J T: ^0 Filenames of ROM images to gather together h. :System.ROMs.AcornMOS.Master320.G_MOS320 r0 :System.ROMs.Filing.Disk.Acorn.DFS224+Mse |/ :System.ROMs.Filing.Disk.Acorn.DFS224MsRC / :System.ROMs.Filing.Network.Acorn.ANFS425 ) :Software.HADFS.SystemDisk.HADFSROM 0 :System.ROMs.AcornMOS.Master320.C_BASIC400 % :Info.Comp.BBC.IDE.ADFS.ADFS153 : , Filename of ROM 14 image with MOS code / :System.ROMs.AcornMOS.Master320.E_ViewB30 : 2 Filename of short ROM 14 image or * for none $ :System.ROMs.TextEd.ViewJ300lo :  Filename of ROM 15 image 0 :System.ROMs.AcornMOS.Master320.F_TUtil320 :  General OSGBPB call #gbpb(A%,chn%,addr%,num%,ptr%) &??X%=chn%:X%!1=addr%:X%!5=num%:X%!9=ptr%:<&FFFFF: &FFD1: 0A%=1A%=3:#?X%=X%!9 :5:A%=1A%=2:#?X%,?X%!1 A%=3A%=4:?X%!1=#?X% D5X%!1=X%!1+1:X%!5=X%!5-1:(#?X% A%>2) X%!5<1: