I would try something like this. Of course, you have to

define var key
K_None con 0
K_Inc con 1
K_Dec con 2

Code:
AdcSub:
        ADCIN 0,x
        if x = $FF then key = K_None
        if x < 125 then key= K_Dec
        if x > 130 then key = K_Inc
return


MAINCODE:

      Gosub AdcSub
      if key = K_Inc then 
            y=y+1
            goto Mydelay
      endif
      if key = K_Dec then 
            y = y-1
Mydelay:
            pause 100
      endif
      Gosub Display
goto Maincode