 Following on from the calculator, an obvious use of a button matrix is for a PIN entry keypad.
Bear in mind that this project is only demonstrating keypad functionality, nothing else.
If you took steps to obscure script details, the wifi connection would still be vulnerable.
So although you might use it to make something kiddy-proof, it will not offer high security.The default myPIN$ = "1234", but you would obviously change that, with perhaps more digits. You could check for more than 1 PIN and branch to handle them differently, if wished.
I have a hardware door access keypad outside my 'man-cave' lab, this offers it remote access.
All entries that don't match the embedded PIN cause the LED to turn red and actions any commands found in the 'unauthorised' subroutine (perhaps issue an alert or log the attempt).
Basic:
'keypad
option lowram 12000 cls ok = 0 gosub unauthorised myPIN$ = "1234" d$ = "0" a$ = "" a$ = a$ + |<style>| a$ = a$ + | #mytable { background-color:#444444; | a$ = a$ + |border-radius:.8em;| a$ = a$ + |border: .15em solid black;}| a$ = a$ + |#mytable button {width:2.1em;background: #333333;font:2em/1.3em arial; border-radius: .1em;}| a$ = a$ + |#mytable button:hover {background: dimgray;background:radial-gradient(#999999,#666666);}| a$ = a$ + |</style>| a$ = a$ + |<br><br><br><br>| a$ = a$ + |<div id="mytable" style='display: table; margin-right: auto; margin-left: auto;' > | a$ = a$ + |<table style="text-align: center; " border1="1"| a$ = a$ + | cellpadding="3" cellspacing="5">| a$ = a$ + | <tbody>| a$ = a$ + | <tr>| a$ = a$ + |<td colspan="4" style=";">| a$ = a$ + led$(ok,"dcss") + |</td>| a$ = a$ + | </tr>| a$ = a$ + | <tr>| a$ = a$ + cssid$("bred","color:tomato;") a$ = a$ + cssid$("bblue","color:lightblue;") a$ = a$ + cssid$("bgray","color:lightgray;") a$ = a$ + cssid$("bwhite","color:white;") a$ = a$ + cssid$("byellow","color:yellow;") a$ = a$ + |<td>| + button$("1",b1,"bgray") + |</td>| a$ = a$ + |<td>| + button$("2",b2,"bgray") + |</td>| a$ = a$ + |<td>| + button$("3",b3,"bgray") + |</td>| a$ = a$ + | </tr>| a$ = a$ + | <tr>| a$ = a$ + |<td>| + button$("4",b4,"bgray") + |</td>| a$ = a$ + |<td>| + button$("5",b5,"bgray") + |</td>| a$ = a$ + |<td>| + button$("6",b6,"bgray") + |</td>| a$ = a$ + | </tr>| a$ = a$ + | <tr>| a$ = a$ + |<td>| + button$("7",b7,"bgray") + |</td>| a$ = a$ + |<td>| + button$("8",b8,"bgray") + |</td>| a$ = a$ + |<td>| + button$("9",b9,"bgray") + |</td>| a$ = a$ + | </tr>| a$ = a$ + | <tr>| a$ = a$ + |<td>| + button$("★",bstar,"bgray") + |</td>| a$ = a$ + |<td>| + button$("0",b0,"bgray") + |</td>| a$ = a$ + |<td>| + button$("#",bhash,"bwhite") + |</td>| a$ = a$ + | </tr>| a$ = a$ + | </tbody>| a$ = a$ + |</table>| a$ = a$ + |</div>| html a$ a$ = "" wait b1: d$ = d$ + "1" return b2: d$ = d$ + "2" return b3: d$ = d$ + "3" return b4: d$ = d$ + "4" return b5: d$ = d$ + "5" return b6: d$ = d$ + "6" return b7: d$ = d$ + "7" return b8: d$ = d$ + "8" return b9: d$ = d$ + "9" return b0: d$ = d$ + "0" return bstar: d$ = "" refresh return bhash: if d$ = myPIN$ then gosub authorised else gosub unauthorised refresh return authorised: ok = 1 return unauthorised: ok = 0 return '------------- End -----------------  |
Join Our DiscussionCOUNTER |
|
