Xtreme League Baseball - Exapunks
Here is my solution for Xtreme League Baseball (142,61,3)
MAKE COPY -1 F MARK WRITE COPY M F JUMP WRITE
LINK 800 GRAB 199 MARK READ COPY F X REPL STAT TEST EOF FJMP READ DROP @REP 12 NOOP @END LINK -1 KILL GRAB 400 SEEK 1 MARK FINDMAX TEST F > X TJMP MAX SEEK -1 VOID F VOID F JUMP FINDMAX MARK MAX COPY F T SEEK -999 COPY T F COPY F X SEEK -1 VOID F VOID F JUMP FINDMAX MARK STAT GRAB X SEEK 1 ADDI F F X ADDI F X X DIVI X 3 T MULI F F X DIVI X F X ADDI T X T SUBI F F X MULI X 20 X ADDI T X X SEEK -999 COPY F T COPY X M COPY T M