I tried using Google Gemini (formerly Bard) and it didn't do a great job, however, Bing Copilot did a pretty good job.
My prompt:
Please write an extended basic program for the TI-99/4A which animates a sprite character walking across the screen.
The generated output:
100 CALL CLEAR
110 CALL CHAR(42,"3C4242423C00") :: CALL COLOR(2,16,1)
120 CALL SPRITE(#1,42,2,15,100)
130 FOR POS=15 TO 120 STEP 5
140 CALL LOCATE(#1,POS,100)
150 CALL SOUND(100,-7,2)
160 FOR DELAY=1 TO 100 :: NEXT DELAY
170 NEXT POS
180 CALL DELSPRITE(#1)
The only problem was it named the variable POS, which it didn't like. Changing this to another name and this operates just fine.