%%off PREFIX : %%on Main SET floor,2; SET floorBit,1<<2 Start on 2nd floor. LDA C,Generator Make the generator the current coroutine. TRIP Continue,Elevator,0 Wake up the elevator. LDA $0,Supervisor TRIP Continue,$0,0 Wake up the supervisor. JMP G1 Contine with the generator coroutine. %%off %%% LDA $0,Generator %%% TRIP Continue,$0,0 Wake up the generator. %%% TRIP Stop,0,0 Terminate \.{Main}. %%off