I need to make a program that does the following:

Write a machine language program for the LC$3.$ It should print out your name forward

and backward. You need to only print $6$ letters of your first or last name. Your program

should NOT require user input into memory or registers. To get full credit, you must use a

loop to print the letters. Capitalize the first letter. If$.$

Here is the code I have thus far. It currently will print P at the end repeatedly, but everything else works.

$0011000000000000$ ; Start at x$3000$

$0101001001100000$ ; Set a counter$($R$1)$ to zero x$3001$

$0010011000100011$ ; Set the max $($R$3)$ value to $2$ x$3003$

$0010000000100011$ ; LD R$0<-\text{'}$P$\text{'}$ x$3004$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$P$\text{'}$ x$3005$

$0010000000100010$ ; LD R$0<-\text{'}$h$\text{'}$ x$3006$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$h$\text{'}$ x$3007$

$0010000000100001$ ; LD R$0<-\text{'}$a$\text{'}$ x$3008$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$a$\text{'}$ x$3009$

$0010000000100000$ ; LD R$0<-\text{'}$m$\text{'}$ x$300$A

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$m$\text{'}$ x$300$B

$0010000000011111$ ; LD R$0<-\text{'}$s$\text{'}$ x$300$C

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$s$\text{'}$ x$300$D

$0010000000011110$ ; LD R$0<-\text{'}$a$\text{'}$ x$300$E

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$a$\text{'}$ x$300$F

$0010000000011101$ ; LD R$0<-\text{'}$g$\text{'}$ x$3010$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$g$\text{'}$ x$3011$

$0010000000011100$ ; LD R$0<-\text{'}$e$\text{'}$ x$3012$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$e$\text{'}$ x$3013$

$0010000000011010$ ; LD R$0<-\text{'}$e$\text{'}$ x$3014$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$e$\text{'}$ x$3015$

$0010000000010111$ ; LD R$0<-\text{'}$g$\text{'}$ x$3016$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$g$\text{'}$ x$3017$

$0010000000010100$ ; LD R$0<-\text{'}$a$\text{'}$ x$3018$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$a$\text{'}$ x$3019$

$0010000000010001$ ; LD R$0<-\text{'}$s$\text{'}$ x$301$A

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$s$\text{'}$ x$301$B

$0010000000001110$ ; LD R$0<-\text{'}$m$\text{'}$ x$301$C

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$m$\text{'}$ x$301$D

$0010000000001011$ ; LD R$0<-\text{'}$a$\text{'}$ x$301$E

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$a$\text{'}$ x$301$F

$0010000000001000$ ; LD R$0<-\text{'}$h$\text{'}$ x$3020$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$h$\text{'}$ x$3021$

$0010000000000101$ ; LD R$0<-\text{'}$P$\text{'}$ x$3022$

$1111000000100001$ ; Trap x$21-$ Print letter $\text{'}$P$\text{'}$ x$3023$

$0001001001100001$ ; Decrement counter by $1$ x$3024$

$0000111111111011$ ; Go back to checking x$3025$

$1111000000100101$ ; Stop x$3026$

$0000000000000010$ ; $2=$ x$2$ x$3027$

$0000000001010000$ ; Letter $\text{'}$P$\text{'}=$ x$50$ x$3028$

$0000000001101000$ ; Letter $\text{'}$h$\text{'}=$ x$68$ x$3029$

$0000000001100001$ ; Letter $\text{'}$a$\text{'}=$ x$61$ x$302$A

$0000000001101101$ ; Letter $\text{'}$m$\text{'}=$ x$6$D x$302$B

$0000000001110011$ ; Letter $\text{'}$s$\text{'}=$ x$73$ x$302$C

$0000000001100001$ ; Letter $\text{'}$a$\text{'}=$ x$61$ x$302$D

$0000000001100111$ ; Letter $\text{'}$g$\text{'}=$ x$67$ x$302$E

$0000000001100101$ ; Letter $\text{'}$e$\text{'}=$ x$65$ x$302$F