' NUMERIC WIFI KEYPAD SIMPLE

pwmfreq 15625
pwmout 38,50  'Backlight

rx 88.8
textbox fs
html "<hr>"
cssclass "button","width:60px; height:50px"
Button "7",seven
Button "8",eight
Button "9",nine
html "<br>"
Button "4",four
Button "5",five
Button "6",six
html "<br>"
Button "1",one
Button "2",two
Button "3",three
html "<br>"
Button "0",zero
Button ".",dot
Button "ENTER",enter
wait

'--------------------------------
one:
fs = fs & "1"
wait 

two:
fs = fs & "2"
wait 

three:
fs = fs & "3"
wait 

four:
fs = fs & "4"
wait 

five:
fs = fs & "5"
wait 

six:
fs = fs & "6"
wait 

seven:
fs = fs & "7"
wait 

eight:
fs = fs & "8"
wait 

nine:
fs = fs & "9"
wait 

zero:
fs = fs & "0"
wait 

dot:
fs = fs & "."
wait 

enter:
frequency val(fs)
fs=""
wait