@0 @1 SUB 8 SAV ADD UP MOV ACC RIGHT SWP @2 S:MOV LEFT ACC JGZ L G:MOV UP ACC SUB DOWN JLZ LL MOV -999 DOWN JMP S L:MOV DOWN NIL MOV UP NIL LL:MOV ACC DOWN @3 @4 @5 ADD 8 MOV ACC UP MOV ACC DOWN MOV UP DOWN @6 @7 MOV UP ACC ADD UP JGZ G SUB ACC G:MOV ACC DOWN @8