def gen 971
def netinnum 13
def nwnum 14
def ndnum 15

'gen0 randomize
cond
*.gen 0 =
*.netinnum 79 <
start
19 .netinnum *.robage sgn -1 mult 1 add mult store 
.netinnum inc
23 rnd 193 add *.netinnum store
stop

cond
*.gen 0 =
*.nwnum 361 <
start
341 .nwnum *.robage sgn -1 mult 1 add mult store 
.nwnum inc
10 rnd 5 sub *.nwnum store
stop

cond
*.gen 0 =
*.ndnum 399 <
start
379 .ndnum *.robage sgn -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