load mem (Register ST) = readSTRef (soundTimer mem) >>= \v -> return $ MemoryValue8 v
load mem (Register ST) = readSTRef (soundTimer mem) >>= \v -> return $ MemoryValue8 v
load mem (Register ST) = readSTRef (soundTimer mem) >>= \v -> return $ MemoryValue8 v