< subroutines > :begin .addall JSI ADD ADD 06 EQU .isequal JSI BRK :add1 01 RTS :add2 02 RTS :add3 03 RTS :addall .add1 JSI .add2 JSI .add3 JSI RTS :isequal .addall JSI ff RTS