ф > 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% ѕ: Ис "Fix Y2K bug"; Т)П#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:б 0зA%=1„A%=3:П#?X%=X%!9 :5х:зA%=1„A%=2:Х#?X%,?X%!1 ‹ зA%=3„A%=4:?X%!1=љ#?X% D5X%!1=X%!1+1:X%!5=X%!5-1:э(Е#?X% Ђ A%>2)„ X%!5<1:б я