TiBasic Input function (I think)

Question

Whether I try this code on a ti-84 plus ce or a ti-84 plus, I get a syntax error at the beginning:

ClrHome
Disp "Which unit?"
Disp "1. To Pascal"
Disp "2. To PSI"
Disp "3. To KPASS"
Input "Pick",UnitChoice

If UnitChoice=1
Then
    Input "Convert from PSI(1) or KPASS(2)", ConvertFromUnit
    If ConvertFromUnit=1
    Then
        Input "Give original value", OriginalValue
        Disp OriginalValue*6894.76
    Else
        Input "Give original value", OriginalValue
        Disp OriginalValue*1000
    End
End

If UnitChoice=2
Then
    Input "Convert from what unit (1 for PASCAL, 2 for KPAS)", ConvertFromUnit
    If ConvertFromUnit=1
    Then
        Input "Give original value", OriginalValue
        Disp OriginalValue*0.000145038
    Else
        Input "Give original value", OriginalValue
        Disp OriginalValue*0.145038
    End
End

If UnitChoice=3
Then
    Input "Convert from what unit (1 for PSI, 2 for PASCAL)", ConvertFromUnit
    If ConvertFromUnit=1
    Then
        Input "Give original value", OriginalValue
        Disp OriginalValue*6.89476
    Else
        Input "Give original value", OriginalValue
        Disp OriginalValue*0.001
    End
End

What is wrong, and how do I fix it?

Answer 1

I had to get rid of the indentation and change the variables to simples variables that were for ti basic rather than custom ones I was trying to use. I was able to find help from another user on here who walked me through the process.