? FRED'S NIFTY PROGRAM TO DETERMINE THE SIZE OF 8563 DRAMr þ15: AD²Ñ("D600"): DA²ADª1: 900 : SETUP MLœ—AD,28: S²Â(DA): —DA,63 : SELECT 64KÝI²16896: žW,I256,18:žW,I¯255,19:žW,85,31 : WRITE $55(I²16896: žW,I256,18:žW,I¯255,19:žR,,31:þ C1 : READ HEREZ2I²17152: žW,I256,18:žW,I¯255,19:žR,,31:þ C2 : AND HERE›<I²16896: žW,I256,18:žW,I¯255,19:žW,170,31 : WRITE $AAÚFI²16896: žW,I256,18:žW,I¯255,19:žR,,31:þ C3 : READ HEREPI²17152: žW,I256,18:žW,I¯255,19:žR,,31:þ C4 : AND HEREJZ—AD,28: —DA,S: žÑ("FF62") : RESTORE 16/64K„d‹ C1²C2 ¯ C3²C4 § ™ "16K": Õ ™ "64K" : DID IT ECHO?Šn€²„I²0¤13: ‡A$: —Ñ("1800")ªI,Ñ(A$): ‚ðŽR²Ñ("1800"): ƒ 8E,00,D6,AD,01,D6,60 : LDA $D601: RTS.˜W²Ñ("1807"): ƒ 8E,00,D6,8D,01,D6,60 : STA $D601: RTS4¢Ž