From 840c00e30b70eaa1154882d4d640d5fcf1ff2a91 Mon Sep 17 00:00:00 2001 From: Fabien Freling Date: Sun, 22 Feb 2015 12:50:14 +0100 Subject: [PATCH] Read ROM title. --- src/cartridge.ml | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/src/cartridge.ml b/src/cartridge.ml index db15484..19f8c40 100644 --- a/src/cartridge.ml +++ b/src/cartridge.ml @@ -20,9 +20,17 @@ type t = { let read_cartridge file = print_endline file; let fd = openfile file [Unix.O_RDONLY] 0o644 in - let n_logo = Bytes.create 48 in + let _ = lseek fd 0x0104 SEEK_SET in + + let n_logo = Bytes.create 48 in let _ = read fd n_logo 0 48 in print_endline "Nintendo logo:"; Hexa.print_bytes n_logo ~width:16; + + let title_b = Bytes.create 16 in + let _ = read fd title_b 0 16 in + let title = Bytes.to_string title_b in + printf "ROM title: %s\n" title; + Unix.close fd