ô > PatchDFS (ô Patch DFS to select double density : (,Þ A%(4096):Ø:Þ mem% &3FFF:file$="DFS224" 2ÿ "Load "+file$+" "+Ã~mem% <ver%=mem%!13:sel=0 F&ç ver%=&34322E32:sel=&8C8F:ô v2.24 P&ç ver%=&39322E32:sel=&8CAB:ô v2.29 Z%ç sel=0:ñ"Unrecognised version":à dIpatch=&4000:õ:patch=patch-1:ýmem%?patch<>mem%?&3FFF:patch=patch+&8001 n"table=mem%!(sel-&7FFF) € &FFFF x: ‚ ã P=0 ¸ 1 ŒP%=sel:O%=P%-&8000+mem% –[OPT P*3+4:JSR DenSelect:] P%=spare%:O%=P%-&8000+mem% ª[OPT P*3+4 ´.DenSelect ¾FASL A:ASL A:\ Move b3 from drive number to b5 for DrvCtrl register È+‚ table,X:\ Mask into drive select byte ÒRTS Ü] æí ð'ñ "*SAVE ";file$+"+ ";~mem%;"+4000" ÿ