Name:Morality Shift
ManaCost:5 B B
Types:Sorcery
A:SP$ ChangeZoneAll | Cost$ 5 B B | ChangeType$ Card.YouCtrl | Origin$ Library | Destination$ Graveyard | SubAbility$ GraveShift | RememberChanged$ True | SpellDescription$ Exchange your graveyard and library. Then shuffle your library.
SVar:GraveShift:DB$ ChangeZoneAll | ChangeType$ Card.YouCtrl+IsNotRemembered | Origin$ Graveyard | Destination$ Library | Shuffle$ True | SubAbility$ DBCleanup
SVar:DBCleanup:DB$Cleanup | ClearRemembered$ True
SVar:RemAIDeck:True
SVar:Picture:http://www.wizards.com/global/images/magic/general/morality_shift.jpg
Oracle:Exchange your graveyard and library. Then shuffle your library.