format: 3  bits: 3genotype: 0095aaa  parent genotype: 0666godcomments: the ancestor for instruction set 2.track 0: prot          xwrnop1    ; 010 000 01   0 beginning markernop1    ; 010 000 01   1 beginning markernop1    ; 010 000 01   2 beginning markernop1    ; 010 000 01   3 beginning markerzero    ; 010 000 12   4 zero out ax so that adrb offset is zeroadrb    ; 010 000 1c   5 find start, ax = start+4, bx = templ size, cx = offsetnop0    ; 010 000 00   6 complement to beginning markernop0    ; 010 000 00   7 complement to beginning markernop0    ; 010 000 00   8 complement to beginning markernop0    ; 010 000 00   9 complement to beginning markerbx      ; 010 000 03  10 abcd -> babcsub     ; 010 000 11  11 bx = ax - bx, bx = start, ax = start+4, cx = offsetax      ; 010 000 02  12 ababcx      ; 010 000 04  13 cabadx      ; 010 000 05  14 dcabzero    ; 010 000 12  15 zero out dx so that adrf offset is zeroadrf    ; 010 000 1d  16 find end, dx=end, cx=templ size, ax=offset, bx=startnop0    ; 010 000 00  17 complement to end markernop0    ; 010 000 00  18 complement to end markernop0    ; 010 000 00  19 complement to end markernop1    ; 010 000 01  20 complement to end markerinc     ; 010 000 11  22 increment to include dummy instruction at endbx      ; 010 000 03  21 bdcasub     ; 010 000 11  22 cx = dx - bx, bx=mom, dx=end, cx=size, ax=offsetnop1    ; 010 000 01  23 reproduction loop markernop1    ; 010 000 01  24 reproduction loop markernop0    ; 010 000 00  25 reproduction loop markernop1    ; 010 000 01  26 reproduction loop markercx      ; 010 000 04  27 cbdc, cx=size, bx=mom, dx=endpush    ; 010 000 1a  39 save size on stackmal     ; 010 000 1e  34 allocate daughter, cx=daughter, bx=mom, dx=end, ax=offax      ; 010 000 04  27 acbdpop     ; 010 000 04  27 ax=size, cx=daughter, bx=mom, dx=end of momcall    ; 010 000 1a  39nop0    ; 010 000 00  40 copy procedure complementnop0    ; 010 000 00  41 copy procedure complementnop1    ; 010 000 01  42 copy procedure complementnop1    ; 010 000 01  43 copy procedure complement dx=ret adr, cx=size, bx=momzero    ; 010 000 12  44 zero out dx so that IP offset is zerodivide  ; 010 000 1f  45 create independent daughter cellbx      ; 010 000 04  27 bdcb, bx=mom, dx=ret adr, cx=sizejmpb    ; 010 000 19  50nop0    ; 010 000 00  51 reproduction loop complementnop0    ; 010 000 00  52 reproduction loop complementnop1    ; 010 000 01  53 reproduction loop complementnop0    ; 010 000 00  54 reproduction loop complementifz     ; 010 000 16  55nop1    ; 010 000 01  56 copy procedure templatenop1    ; 010 000 01  57 copy procedure templatenop0    ; 010 000 00  58 copy procedure templatenop0    ; 010 000 00  59 copy procedure templatepush    ; 010 000 0a  63 save (ax) length on stackbx      ; 010 000 03  60 bacd, bx=mom, ax=length, cx=daughter, dx=end of mompush    ; 010 000 0a  61 save (bx) start of mom on stackcx      ; 010 000 02  69 cbac, cx=daughter, bx=mom, ax=length, dx=end of momnop1    ; 010 000 01  64 copy loop templatenop0    ; 010 000 00  65 copy loop templatenop1    ; 010 000 01  66 copy loop templatenop0    ; 010 000 00  67 copy loop templatemovii   ; 010 000 09  70 move contents of [bx] to [cx] (copy one instruction)ax      ; 010 000 04  71 acba, ax=length, cx=daughter, bx=mom, dx=end of momdec     ; 010 000 0f  72 decrement ax (size)ifz     ; 010 000 16  78 if ax == 0 perform next instruction, otherwise skip itjmp     ; 010 000 18  79 jump to template below (copy procedure exit)nop0    ; 010 000 00  80 copy procedure exit complementnop1    ; 010 000 01  81 copy procedure exit complementnop0    ; 010 000 00  82 copy procedure exit complementnop0    ; 010 000 00  83 copy procedure exit complementbx      ; 010 000 02  84 bacb, bx=mom, ax=length, cx=daughter, dx=end of mominc     ; 010 000 0e  85 inc addr of mother cellcx      ; 010 000 03  86 cbac, cx=daughter, bx=mom, ax=length, dx=end of mominc     ; 010 000 0e  87 inc addr of daughterjmpb    ; 010 000 19  92 jump back to top of copy loopnop0    ; 010 000 00  93 copy loop complementnop1    ; 010 000 01  94 copy loop complementnop0    ; 010 000 00  95 copy loop complementnop1    ; 010 000 01  96 copy loop complementifz     ; 010 000 16  97 dummy instruction to separate templatesnop1    ; 010 000 01  98 copy procedure exit templatenop0    ; 010 000 00  99 copy procedure exit templatenop1    ; 010 000 01 100 copy procedure exit templatenop1    ; 010 000 01 101 copy procedure exit templatebx      ; 010 000 03 104 bcbapop     ; 010 000 0b 105 pop bx (start of mom) off the stackcx      ; 010 000 04 102 cbcbpop     ; 010 000 0b 103 pop cx (size) off the stackdx      ; 010 000 05 106 dcbcpop     ; 010 000 0b 107 pop dx (IP) off the stackjmp     ; 010 000 18 108 return, dx=ret adr, cx=size, bx=momifz     ; 010 000 16 109 dummy to separate jmp from templatenop1    ; 010 000 01 110 end templatenop1    ; 010 000 01 111 end templatenop1    ; 010 000 01 112 end templatenop0    ; 010 000 00 113 end templateifz     ; 010 000 16 114 dummy to separate creatures