outline and randomness. Afterfix now tackles if necessary

[fp1415-soccerfun.git] / src / StdReferee / NoReferee.icl

diff --git a/src/StdReferee/NoReferee.icl b/src/StdReferee/NoReferee.icl
new file mode 100644 (file)
index 0000000..88ef8d9
--- /dev/null
+++ b/src/StdReferee/NoReferee.icl
@@ -0,0 +1,21 @@
+implementation module NoReferee
+
+import StdEnvExt
+import Referee
+
+NoReferee :: !FootballField -> Referee
+NoReferee field        = { name  = "NoReferee"
+                                                         , brain = { memory = initMem
+                                                                   , ai     = randomlessRefereeAI (brain field)
+                                                                   }
+                                                         , refActionPics    = []
+                                                         }
+
+::     Memory = Memory
+
+initMem :: Memory
+initMem = Memory
+
+brain :: !FootballField !(!RefereeInput,!Memory) -> (!RefereeOutput,!Memory)
+brain field ({RefereeInput | theBall=ballState,team1,team2},memory)
+       = ([], memory)