changed names of programs (to be shorter and easier to type in requests)

src/robotwar/core.clj

@@ -12,7 +12,7 @@
 
 
 (def progs 
-  (repeat 3 (:moving-to-spot source-programs/programs)))
+  (repeat 3 (:mover source-programs/programs)))
 (def world
   (world/init-world progs)) 
 (defn combined-worlds [] 

src/robotwar/handler.clj

@@ -11,9 +11,9 @@
 ; TODO: have this source-code-picking be done in requests from the UI
 ; in the browser, not hard-coded here.
 (def progs (concat (vals (select-keys source-programs/programs
-                                      [:moving-to-left-and-shooting
-                                       :moving-to-top-and-shooting]))
-                   (repeat 2 (:moving-to-spot source-programs/programs))))
+                                      [:left-shooter
+                                       :right-shooter]))
+                   (repeat 2 (:mover source-programs/programs))))
 
 (defn add-game
   "a function to update the games store agent state. 

src/robotwar/source_programs.clj

@@ -33,7 +33,7 @@
  " 140 TO SPEEDX
    250 TO SPEEDY "
 
- :moving-to-spot
+ :mover
  "
                               ; Note: # means !=
 
@@ -67,7 +67,7 @@
                               ; it to set SPEEDY, which is measured in decimeters/second.
        ENDSUB "
 
- :moving-to-left-and-shooting
+ :left-shooter
  "
                               ; Note: # means !=
 
@@ -97,7 +97,7 @@
        200 TO SHOT
        GOTO MOVE "
  
- :moving-to-top-and-shooting
+ :right-shooter
  "
                               ; Note: # means !=