space-invaders,lunar-rescue,balloon-bomber: let's move these into a common hierarchy

extra/roms/balloon-bomber/balloon-bomber-docs.factor

@@ -1,14 +1,14 @@
 ! Copyright (C) 2007 Chris Double.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: help.syntax help.markup cpu.8080.emulator ;
-IN: balloon-bomber
+IN: roms.balloon-bomber
 
 HELP: run-balloon
 { $description
 "Run the Balloon Bomber emulator in a new window." $nl
 { $link rom-root } " must be set to the directory containing the "
 "location of the Balloon Bomber ROM files. See "
-{ $link { "balloon-bomber" "balloon-bomber" } } " for details."
+{ $link "balloon-bomber" } " for details."
 } ;
 
 ARTICLE: "balloon-bomber" "Balloon Bomber Emulator"

extra/roms/balloon-bomber/balloon-bomber.factor

@@ -2,8 +2,8 @@
 ! See http://factorcode.org/license.txt for BSD license.
 !
 ! Balloon Bomber: https://www.emuparadise.me/M.A.M.E._-_Multiple_Arcade_Machine_Emulator_ROMs/Balloon_Bomber/11301
-USING: kernel space-invaders ui ;
+USING: kernel roms.space-invaders ui ;
-IN: balloon-bomber
+IN: roms.balloon-bomber
 
 TUPLE: balloon-bomber < space-invaders ;
 

extra/roms/lunar-rescue/lunar-rescue-docs.factor

@@ -1,7 +1,7 @@
 ! Copyright (C) 2007 Chris Double.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: help.syntax help.markup cpu.8080.emulator ;
-IN: lunar-rescue
+IN: roms.lunar-rescue
 
 HELP: run-lunar
 { $description

extra/roms/lunar-rescue/lunar-rescue.factor

@@ -2,8 +2,8 @@
 ! See http://factorcode.org/license.txt for BSD license.
 !
 ! Lunar Rescue: https://www.emuparadise.me/M.A.M.E._-_Multiple_Arcade_Machine_Emulator_ROMs/Lunar_Rescue/14294
-USING: kernel space-invaders ui ;
+USING: kernel roms.space-invaders ui ;
-IN: lunar-rescue
+IN: roms.lunar-rescue
 
 TUPLE: lunar-rescue < space-invaders ;
 

extra/roms/space-invaders/space-invaders-docs.factor

@@ -1,7 +1,7 @@
 ! Copyright (C) 2007 Chris Double.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: help.syntax help.markup cpu.8080.emulator ;
-IN: space-invaders
+IN: roms.space-invaders
 
 HELP: run-invaders
 { $description

extra/roms/space-invaders/space-invaders.factor

@@ -9,7 +9,7 @@ specialized-arrays ui ui.gadgets ui.gestures ui.render ;
 QUALIFIED: threads
 QUALIFIED: system
 SPECIALIZED-ARRAY: uchar
-IN: space-invaders
+IN: roms.space-invaders
 
 TUPLE: space-invaders < cpu
     port1 port2i port2o port3o port4lo port4hi port5o
@@ -55,16 +55,16 @@ CONSTANT: SOUND-UFO-HIT      8
 : init-sounds ( cpu -- )
     init-openal {
         [ 9 gen-sources swap sounds<< ]
-        [ SOUND-SHOT "vocab:space-invaders/resources/Shot.wav" init-sound ]
+        [ SOUND-SHOT "vocab:roms/space-invaders/resources/Shot.wav" init-sound ]
-        [ SOUND-UFO "vocab:space-invaders/resources/Ufo.wav" init-sound ]
+        [ SOUND-UFO "vocab:roms/space-invaders/resources/Ufo.wav" init-sound ]
         [ sounds>> SOUND-UFO swap nth AL_LOOPING AL_TRUE set-source-param ]
-        [ SOUND-BASE-HIT "vocab:space-invaders/resources/BaseHit.wav" init-sound ]
+        [ SOUND-BASE-HIT "vocab:roms/space-invaders/resources/BaseHit.wav" init-sound ]
-        [ SOUND-INVADER-HIT "vocab:space-invaders/resources/InvHit.Wav" init-sound ]
+        [ SOUND-INVADER-HIT "vocab:roms/space-invaders/resources/InvHit.Wav" init-sound ]
-        [ SOUND-WALK1 "vocab:space-invaders/resources/Walk1.wav" init-sound ]
+        [ SOUND-WALK1 "vocab:roms/space-invaders/resources/Walk1.wav" init-sound ]
-        [ SOUND-WALK2 "vocab:space-invaders/resources/Walk2.wav" init-sound ]
+        [ SOUND-WALK2 "vocab:roms/space-invaders/resources/Walk2.wav" init-sound ]
-        [ SOUND-WALK3 "vocab:space-invaders/resources/Walk3.wav" init-sound ]
+        [ SOUND-WALK3 "vocab:roms/space-invaders/resources/Walk3.wav" init-sound ]
-        [ SOUND-WALK4 "vocab:space-invaders/resources/Walk4.wav" init-sound ]
+        [ SOUND-WALK4 "vocab:roms/space-invaders/resources/Walk4.wav" init-sound ]
-        [ SOUND-UFO-HIT "vocab:space-invaders/resources/UfoHit.wav" init-sound ]
+        [ SOUND-UFO-HIT "vocab:roms/space-invaders/resources/UfoHit.wav" init-sound ]
         [ f swap looping?<< ]
     } cleave ;