# init to 1 INC A_Bug INC B_Task %print reg .TODO # move B into C and adds B to A DEC B_Task .QA INC C_Story INC A_Bug DEC Z .TODO .QA # moves A into B DEC A_Bug .IN_PROG INC B_Task DEC Z .QA .IN_PROG # moves C into A DEC C_Story .OUTPUT INC A_Bug DEC Z .IN_PROG .OUTPUT %print reg %sleep 1 DEC Z .TODO