def gen 971 def netinnum 13 def nwnum 14 def ndnum 15 'gen0 randomize cond *.gen 0 = *.netinnum 79 < start 19 .netinnum *.robage 1 sub sgn 0 floor -1 mult 1 add mult store .netinnum inc 23 rnd 193 add *.netinnum store stop cond *.gen 0 = *.nwnum 361 < start 341 .nwnum *.robage 1 sub sgn 0 floor -1 mult 1 add mult store .nwnum inc 10 rnd 5 sub *.nwnum store stop cond *.gen 0 = *.ndnum 399 < start 379 .ndnum *.robage 1 sub sgn 0 floor -1 mult 1 add mult store .ndnum inc 1 rnd 2 mult 1 sub *.ndnum store stop 'input start *.eye4 193 store *.eye5 192 store *.eye6 191 store *.refeye 190 store 'nnet '*nip1 * *nip2 add *nip3 * add dup *nw sub sgn 0 floor *nd mult n store *20 * *21 * add *22 * add dup *342 sub sgn 0 floor mult *380 mult 179 store *23 * *24 * add *25 * add dup *343 sub sgn 0 floor mult *381 mult 178 store *26 * *27 * add *28 * add dup *344 sub sgn 0 floor mult *382 mult 177 store *29 * *30 * add *31 * add dup *345 sub sgn 0 floor mult *383 mult 176 store *32 * *33 * add *34 * add dup *346 sub sgn 0 floor mult *384 mult 175 store *35 * *36 * add *37 * add dup *347 sub sgn 0 floor mult *385 mult 174 store *38 * *39 * add *40 * add dup *348 sub sgn 0 floor mult *386 mult 173 store *41 * *42 * add *43 * add dup *349 sub sgn 0 floor mult *387 mult 172 store *44 * *45 * add *46 * add dup *350 sub sgn 0 floor mult *388 mult 171 store *47 * *48 * add *49 * add dup *351 sub sgn 0 floor mult *389 mult 170 store *50 * *51 * add *52 * add dup *352 sub sgn 0 floor mult *390 mult 169 store *53 * *54 * add *55 * add dup *353 sub sgn 0 floor mult *391 mult 168 store *56 * *57 * add *58 * add dup *354 sub sgn 0 floor mult *392 mult 167 store *59 * *60 * add *61 * add dup *355 sub sgn 0 floor mult *393 mult 166 store *62 * *63 * add *64 * add dup *356 sub sgn 0 floor mult *394 mult 165 store *65 * *66 * add *67 * add dup *357 sub sgn 0 floor mult *395 mult 164 store *68 * *69 * add *70 * add dup *358 sub sgn 0 floor mult *396 mult 163 store *71 * *72 * add *73 * add dup *359 sub sgn 0 floor mult *397 mult 162 store *74 * *75 * add *76 * add dup *360 sub sgn 0 floor mult *398 mult 161 store *77 * *78 * add *79 * add dup *361 sub sgn 0 floor mult *399 mult 160 store 'output *170 .up store *171 .aimsx store stop