" adm lac 017777 i sad d4 jmp nofiles lac 017777 tad d1 dac name jms connect sys time llss 9 ecla lls 3 tad o60 alss 9 dac snumb ecla llss 3 tad o60 alss 9 dac snumb+1 ecla llss 3 tad o60 alss 9 dac snumb+2 lac d1 sys write; snumb; 3 lac d1 sys write; o12; 1 jms gcard; <$;<*;<$;<7;;;;012 m2s = .-m1 m2: ;;;;;;;;;;040;;040;;;;;;;;;;;;012 m4s = .-m4 stop: dpof las and o400000 sna sys save sys exit carrier: 0100000 ilock: 040000 totime: 300 disflg: 0 flush: 0 lac noc sna jmp flush i law 0104 jms message; tbuf law tbuf dac opt dzm noc jmp flush i gcard: 0 lac gcard i isz gcard sna jmp 3f lrss 9 sad o45 jmp 1f jms putc jmp gcard+1 1: -1 tad gcard i cma dac 2f isz gcard 1: law 040 jms putc isz 2f jmp 1b jmp gcard+1 2: 0 3: lac noc sna jmp gcard i sad d80 jmp gcard i law 040 jms putc jmp 3b done: jms gcard; <$;<%;6;