'20-82 ninput
'83-166 nmod
'222-242 node
'243-244 input
'167-175 thrhold


def avgpleas 13
def msection 14
def mable 15
def c1 16
def c2 17

cond
*.robage 0 =
start
1 172 store
-1 173 store
-1 174 store
1 175 store
stop

'''pleas

start
*.pleas *.robage 100 mod 540 add store
*540 *541 add *542 add *543 add *544 add *545 add *546 add *547 add *548 add *549 add *550 add *551 add *552 add *553 add *554 add *555 add *556 add *557 add *558 add *559 add *560 add *561 add *562 add *563 add *564 add *565 add *566 add *567 add *568 add *569 add *570 add *571 add *572 add *573 add *574 add *575 add *576 add *577 add *578 add *579 add *580 add *581 add *582 add *583 add *584 add *585 add *586 add *587 add *588 add *589 add *590 add *591 add *592 add *593 add *594 add *595 add *596 add *597 add *598 add *599 add *600 add *601 add *602 add *603 add *604 add *605 add *606 add *607 add *608 add *609 add *610 add *611 add *612 add *613 add *614 add *615 add *616 add *617 add *618 add *619 add *620 add *621 add *622 add *623 add *624 add *625 add *626 add *627 add *628 add *629 add *630 add *631 add *632 add *633 add *634 add *635 add *636 add *637 add *638 add *639 add 100 div .avgpleas store
stop

'''NNetmutation

cond
*.mable 1 =
*.avgpleas *172 <=
*.avgpleas *173 >=
start
*.c2 *.c1 1 rnd mult store
0 .c1 store
0 .c2 store
stop

cond
*.mable 1 =
*.avgpleas *174 <
start
*.c2 *.c1 store
0 .c1 store
0 .c2 store
stop

cond
*.mable 1 =
*.avgpleas *175 >
start
0 .c1 store
0 .c2 store
stop

cond
*.mable 0 >
start
.mable dec
stop

cond
*.avgpleas *171 <
*170 *.robage mod 0 = or
start
2 rnd 1 add .msection *.mable 1 sub abs mult store
stop

cond
*.msection 1 =
start
62 rnd 20 add .c1 store
*.c1 * .c2 store
20 rnd 222 add *.c1 store
100 .mable store
0 .msection store
stop

cond
*.msection 2 =
start
83 rnd 83 add .c1 store
*.c1 * .c2 store
10 rnd 5 sub *.c1 * add *.c1 store
100 .mable store
0 .msection store
stop

cond
*.msection 3 =
start
8 rnd 167 add .c1 store
*.c1 * .c2 store
20 rnd 222 add *.c1 store
100 .mable store
0 .msection store
stop


'''input

start
*.eye5 243 store
*.refeye 244 store
stop

'''NNet

start
*20 * *83 mult *21 * *84 mult add *22 * *85 mult add *86 add 222 store
*23 * *87 mult *24 * *88 mult add *25 * *89 mult add *90 add 223 store
*26 * *91 mult *27 * *92 mult add *28 * *93 mult add *94 add 224 store
*29 * *85 mult *30 * *96 mult add *31 * *97 mult add *98 add 225 store
*32 * *99 mult *33 * *100 mult add *34 * *101 mult add *102 add 226 store
*35 * *103 mult *36 * *104 mult add *37 * *105 mult add *106 add 227 store
*38 * *107 mult *39 * *108 mult add *40 * *109 mult add *110 add 228 store
*41 * *111 mult *42 * *112 mult add *43 * *113 mult add *114 add 229 store
*44 * *115 mult *45 * *116 mult add *46 * *117 mult add *118 add 230 store
*47 * *119 mult *48 * *120 mult add *49 * *121 mult add *122 add 231 store
*50 * *123 mult *51 * *124 mult add *52 * *125 mult add *126 add 232 store
*53 * *127 mult *54 * *128 mult add *55 * *129 mult add *130 add 233 store
*56 * *131 mult *57 * *132 mult add *58 * *133 mult add *134 add 234 store
*59 * *135 mult *60 * *136 mult add *61 * *137 mult add *138 add 235 store
*62 * *139 mult *63 * *140 mult add *64 * *141 mult add *142 add 236 store
*65 * *143 mult *66 * *144 mult add *67 * *145 mult add *146 add 237 store
*68 * *147 mult *69 * *148 mult add *70 * *149 mult add *150 add 238 store
*71 * *151 mult *72 * *152 mult add *73 * *153 mult add *154 add 239 store
*74 * *155 mult *75 * *156 mult add *76 * *157 mult add *158 add 240 store
*77 * *159 mult *78 * *160 mult add *79 * *161 mult add *162 add 241 store
*80 * *163 mult *81 * *164 mult add *82 * *165 mult add *166 add 242 store

'''output

cond
*242 *167 >
start
-1 .shoot store
stop

cond
*241 *168 >
start
*239 .up store
stop

cond
*240 *169 >
start
*238 .aimdx store
stop