-----------------------------------

Timothy Willard

Fri Jun 28, 2013 6:35 pm


Disable Turing Autoscroll

-----------------------------------

What is it you are trying to achieve?
I am trying to do a "custom get" so I can eliminate capitals from being entered, as well as detect when someone presses the up arrow (so that I can load their last entered input). However, my customGet is causing issues. 


What is the problem you are having?
My customGet works by getting each character they enter, and then adding it to "tempText", then displaying temptext on (maxrow, 1). However, everything I put tempText, it immediately scrolls, and whatever I put is then one row too high.

Post any relevant code (You may choose to attach the file instead of posting the code if it is too long)
This is my customGet code. I call it with: Input := customGet()

Also, I do realize there are some bugs current in this code (for example, immediately hitting backspace will cause the computer to try and make temptext := temptext (1..0)). Currently I am just worried about the autoscrolling, because if I can't fix this then I can't use the function anyway.

fcn customGet () : string
    tempText := ""
    var inputKey : string (1)
    var numArrowKey : int := numInputs + 1

    loop
        getch (inputKey)
        if ord (inputKey) >= 65 and ord (inputKey) = 97 and ord (inputKey) = 48
                and ord (inputKey)