Address Instruction Comments

x$3000$ R$2<-0($counter$)$

x$3001$ R$3<-$M$[$x$3012]($ptr$)$

x$30021111000000100011$ Input to R$0($TRAP x$23)$

x$3003$ R$1<-$M$[$R$3]$

x$3004$ R$4<-$R$14($EOT$)$

x$3005$ If Z$,$ goto x$300$E

x$3006$ R$1<-$NOT R$1$

x$3007$ R$1<-$R$1+1$

X$3008$ R$1<-$R$1+$ R$0$

x$3009$ If N or P$,$ goto x$300$B

x$300$A R$2<-$R$2+1$

x$300$B R$3<-$R$3+1$

x$300$C R$1<-$M$[$R$3]$

x$300$D Goto x$3004$

x$300$E R$0<-$M$[$x$3013]$

x$300$F R$0<-$R$0+$ R$2$

x$30101111000000100001$ Print R$0($TRAP x$21)$

x$30111111000000100101$ HALT $($TRAP x$25)$

X$3012$ Starting Address of File

x$30130000000000110000$ ASCII x$30(0)$