ASMB,A,B,L,T ORG 36B START HLT 77B CLA STA COUNT LDB N IN LDA CWI OTA 10B STC 10B,C SFS 10B JMP *-1 LIA 10B SZA JMP SAVE INB,SZB JMP SAVE2 JMP RESET SAVE LDB N SAVE2 ISZ COUNT STA LOC,I ISZ LOC JMP IN RESET LDA COUNT CMA,INA STA COUNT LDA A STA LOC OUT LDA LOC,I LDB CWO OTB 11B OTA 11B STC 11B,C SFS 11B JMP *-1 ISZ LOC ISZ COUNT JMP OUT LDA A STA LOC JMP START CWI OCT 160000 CWO OCT 120000 COUNT NOP A DEF STOR  LOC DEF STOR N DEC -31 STOR BSS 7000 END