key2 equ p1.1
....
keyscan:
jb key1,key01 ;鍵1如果沒按下轉
jnb key1,$ ;鍵1如果按下，等待擡起
ljmp fun1 ;轉fun1
key01:
jb key2,keyrtn ;鍵2如果沒按下轉
jnb key2,$ ;鍵2如果按下，等待擡起
ljmp fun2 ;轉fun2
keyrtn:
ret
fun1:
fun2: