TERM      ORIG 3000
START     DEC4 1
          LDA 3004
          STA 0,4
          ST4 3004(1:2)
          JMP 3005,1
          STZ 0,4
          STA 3004
          END START