1 ! Copyright (C) 2007 Chris Double.
\r
2 ! See http://factorcode.org/license.txt for BSD license.
\r
4 ! Lunar Rescue: http://www.mameworld.net/maws/romset/lrescue
\r
14 TUPLE: lunar-rescue < space-invaders ;
\r
16 : <lunar-rescue> ( -- cpu )
\r
17 lunar-rescue new cpu-init ;
\r
19 CONSTANT: rom-info {
\r
20 { HEX: 0000 "lrescue/lrescue.1" }
\r
21 { HEX: 0800 "lrescue/lrescue.2" }
\r
22 { HEX: 1000 "lrescue/lrescue.3" }
\r
23 { HEX: 1800 "lrescue/lrescue.4" }
\r
24 { HEX: 4000 "lrescue/lrescue.5" }
\r
25 { HEX: 4800 "lrescue/lrescue.6" }
\r
29 [ "Lunar Rescue" <lunar-rescue> rom-info (run) ] with-ui ;
\r