diff --git a/src/bit.ml b/src/bit.ml index 38a3725..b483868 100644 --- a/src/bit.ml +++ b/src/bit.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + let is_set num i = if i < 0 then failwith "Invalid bit index." diff --git a/src/cartridge.ml b/src/cartridge.ml index c82ae24..a0d908c 100644 --- a/src/cartridge.ml +++ b/src/cartridge.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + (** http://bgb.bircd.org/pandocs.htm#thecartridgeheader *) diff --git a/src/cpu.ml b/src/cpu.ml index 9f13e3d..1f8477e 100644 --- a/src/cpu.ml +++ b/src/cpu.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + open Printf let frequence = 4194304 diff --git a/src/hexa.ml b/src/hexa.ml index cd3ee88..a8900d0 100644 --- a/src/hexa.ml +++ b/src/hexa.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + open Printf let rec print_slice ?(width=8) b start last = diff --git a/src/memory.ml b/src/memory.ml index 5ae0af1..62e2369 100644 --- a/src/memory.ml +++ b/src/memory.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + open Bytes open Printf diff --git a/src/oboy.ml b/src/oboy.ml index 11a9bbb..1153381 100644 --- a/src/oboy.ml +++ b/src/oboy.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + open Printf let fps = 60 diff --git a/src/screen.ml b/src/screen.ml index 8f29776..d458bf8 100644 --- a/src/screen.ml +++ b/src/screen.ml @@ -1,3 +1,11 @@ +(** + * Copyright (c) 2015, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) + let width = 160 let height = 144 @@ -87,4 +95,3 @@ let render mem = let scy = Memory.get mem 0xFF42 |> int_of_char in let scx = Memory.get mem 0xFF43 |> int_of_char in scx + scy - diff --git a/src/timer.ml b/src/timer.ml index 50fbea0..ee2ba29 100644 --- a/src/timer.ml +++ b/src/timer.ml @@ -1,3 +1,10 @@ +(** + * Copyright (c) 2016, Fabien Freling + * All rights reserved. + * + * This source code is licensed under the BSD 2-clause license found in the + * LICENSE file at the top level directory of this source tree. + *) let frequence = 4194304