> FlexForm  BBC Flex disk formatter ? Side 0 formatted as sectors 1-10, side 1 as sectors 11-20 (B Track 0/Side 0 formatted as 0,1,3-10 with DFS catalog in 0/1 2: <% X% 31,data% 255:Y%=X%256:*DISK F. : " at line ";:"FX180,"+(/256): P *FX180,64 Z"Drive: "drive% d7"Tracks: (80) "tracks%: tracks%=0:tracks%=80 n3"Sides: (2) "sides%: sides%=0:sides%=2 x7"Start sector: (1) "A$: A$="":sec0%=1 sec0%=A$ sectors%=10  track%=0 tracks%-1  side%=0 sides%-1 : @ this%=track%: this%>79:this%=this%-80:drive%=drive% 2 ? 13;"Format ";drive%;":";this%;":";side%;3;8;8;8;  sector%=0 9 # data%!(sector%*4+0)=this% - data%?(sector%*4+1)=side%+track%80 G data%?(sector%*4+2)=sec0%+(sector%+this%*7)10+side%*sectors%  data%?(sector%*4+3)=1 F track%=0: side%=0: sector%<2:data%?(sector%*4+2)=sector%  sector%  X%?0=drive% side%*2  X%!1=data%  X%!5=&6305 " X%?7=this% , X%!8=&10002A10 6$ A%=127::&FFF1: X%?12<>&10 @' X%?12: 18);"error &";~X%?12 J : T( A%=0 255 4:data%!A%=0: A% ^ sector%=0 sectors%-1 h) sec%=sec0%+sector%+side%*sectors% r4 this%=0: side%=0: sector%<2:sec%=sector% |< 13;"Link ";drive%;":";this%;":";side%;":";sec%; 4 link0%=track%:link1%=sec%+side%*sectors%+1  sector%=sectors%-1: side%=sides%-1:link0%=track%+1:link1%=sec0%: track%=tracks%-1:link0%=0:link1%=0: End of disk V sector%=sectors%-1: track%=0: side%=0:link0%=0:link1%=0: End of catalog  data%?0=link0%  data%?1=link1%  :  X%?0=drive% side%*2  X%!1=data%  X%!5=&4B03  X%?7=this%  X%?8=sec%  X%!9=&21 & A%=127::&FFF1: X%?10<>&10 ) X%?10: 18);"error &";~X%?10  sector%  : & side% 0 track% :: D# 13;"Initialise SIR ";8;8; N$ A%=0 255 4:data%!A%=0: A% Xdata%!&1D=&0101 bdata%?&1F=tracks%-1 ldata%?&20=sectors% v6data%?&21=(sectors%*tracks%*sides%-sectors%) 256 6data%?&22=(sectors%*tracks%*sides%-sectors%) 255 data%!&23=&730101 data%?&26=tracks%-1 data%?&27=sectors% : X%?0=drive% X%!1=data% X%!5=&03004B03  X%!9=&21  A%=127::&FFF1: X%?10<>&10 # X%?10: 18);"error &";~X%?10  : "FX180,"+(/256):