Mercurial > repos > icfp2014
comparison code/gameState.lm @ 52:70423511f49d
gameState now runs in gcc to completion without runtime errors.
author | William Morgan <billjunk@mrgn.org> |
---|---|
date | Sun, 27 Jul 2014 14:50:50 -0700 |
parents | 57a4bddadd46 |
children | 2c790eabe379 |
comparison
equal
deleted
inserted
replaced
51:a482086958e1 | 52:70423511f49d |
---|---|
123 | 123 |
124 print: 14 | 124 print: 14 |
125 // 1.) movement | 125 // 1.) movement |
126 res <- executeEvents: tick 1 events gameState | 126 res <- executeEvents: tick 1 events gameState |
127 events <- res value | 127 events <- res value |
128 gameState <- (res tail) value | 128 gameState <- res tail |
129 | 129 |
130 print: 15 | 130 print: 15 |
131 // 2.) actions | 131 // 2.) actions |
132 res <- executeEvents: tick 0 events gameState | 132 res <- executeEvents: tick 0 events gameState |
133 | 133 print: #[19 res] |
134 events <- res value | 134 events <- res value |
135 gameState <- (res tail) value | 135 gameState <- res tail |
136 | 136 |
137 print: 16 | 137 print: 16 |
138 // 3.) collide pills powerpills fruit | 138 // 3.) collide pills powerpills fruit |
139 | 139 |
140 if: pillCount = 0 { | 140 if: pillCount = 0 { |
166 :runUntil { | 166 :runUntil { |
167 res <- 0 | 167 res <- 0 |
168 tick <- 1 | 168 tick <- 1 |
169 events <- [ | 169 events <- [ |
170 endOfLives: 0 | 170 endOfLives: 0 |
171 //moveLambdaman: 0 | |
171 ] | 172 ] |
172 print: 6 | 173 print: 6 |
173 gameState <- #[0 0] | 174 gameState <- #[0 0] |
174 while: {(tick < runUntil) myAnd: (not: (events empty?))} do: { | 175 while: {(tick < runUntil) myAnd: (not: (events empty?))} do: { |
175 print: 7 | 176 print: 7 |
194 ticker: 1000 | 195 ticker: 1000 |
195 print: 3 | 196 print: 3 |
196 | 197 |
197 #[0 0] | 198 #[0 0] |
198 } | 199 } |
199 | 200 /* |
200 main <- :initWorld ghostCode{ | 201 main <- :initWorld ghostCode{ |
201 #[0 step] | 202 #[0 step] |
202 } | 203 } |
204 */ | |
205 main <- { | |
206 print: (step: 0 #[ | |
207 //grid | |
208 [ | |
209 [0 0 0 0] | |
210 [0 2 2 0] | |
211 [0 1 0 0] | |
212 [0 0 0 0] | |
213 ] | |
214 //lmstate | |
215 #[0 #[1 2] 2 3 0] | |
216 //ghost state | |
217 [] | |
218 //fruit state | |
219 0 | |
220 ]) | |
221 } | |
203 } | 222 } |
204 | 223 |