Wenn du Wert darauf legst, die UART mit Interrupt zu bedienen, mußt du einiges zu Fuß machen
Vorschlag ohne Interrupt
Code:
dim instr as string * 5
' On Urxc Onrxd    entfällt
' Enable Urxc 
Enable Interrupts 

I = 0 

Do 
input "Enter Speed ", instr
s = val(instr)
print "Speed=" ; S 
Loop 
' isr-routine entfällt