###      FORREAL MODE   	32unP


# Just get the bless'd byte. Un-fluxing MF-II is for a thread or something.


L keyreflex32unP

push A
push D
	recieve byte  $((0x60))
	1+ @ $((keylubber))
	1+ @ $((keycounter))
	= @ $((keylubber)) to D
	AND $keyringmask to D
	+ $keyring to D
	= byte A to @  D
pull D
pull A
dismisso


