Já experimentou o seguinte?
Código:
É mais indicado para a voyage, mas como é em TIBASIC talvez funcione também na TI-83.