Source Code CVAVR for DI-Smart KEY4X4 Input (KEYPAD 4X4)

#include <mega8535.h>

#include <delay.h>

// Alphanumeric LCD Module functions
#asm
.equ __lcd_port=0x18 ;PORTB
#endasm
#include <lcd.h>

#define pinkey PINC
#define portkey PORTC

// Declare your global variables here
char datakey, buffer;

//program pembacaaan key apa yang ditekan oleh user
//keypad yang digunakan mengunakan metode scanning
Lanjutkan membaca Source Code CVAVR for DI-Smart KEY4X4 Input (KEYPAD 4X4)

Iklan

Keypad 4×4 Matrix

Keypad Matriks adalah tombol-tombol yang disusun secara maktriks (baris x kolom) sehingga dapat mengurangi penggunaan pin input. Sebagai contoh, Keypad Matriks 4×4 cukup menggunakan 8 pin untuk 16 tombol. Hal tersebut dimungkinkan karena rangkaian tombol disusun secara horizontal membentuk baris dan secara vertikal membentuk kolom:

Namun demikian, sebagai konsekuensi dari penggunaan bersama satu jalur (semisal baris satu (B1)), maka tidak dimungkinkan pengecekkan dua tombol sekaligus dalam satu slot waktu.

Lanjutkan membaca Keypad 4×4 Matrix

Source Code BASCOM For DI-Smart KEY4X4 Input (KEYPAD 4X4)

‘Dalam bentuk PDF download di sini

$regfile = “m16def.dat”
$crystal = 11059200

‘Inisialisasi Port LCD:
$lib “lcd4busy.lbx”
Const _lcdport = Portb
Const _lcdddr = Ddrb
Const _lcdin = Pinb
Const _lcd_e = 2
Const _lcd_rw = 1
Const _lcd_rs = 0
Config Lcd = 16 * 2

Cursor Off
Cursor Noblink
Cls

‘Inisialisasi Port Keypad:
Port_keypad Alias Portc
Pin_keypad Alias Pinc
Ddr_keypad Alias Ddrc

Port_keypad = 255
Ddr_keypad = &B1111_0000

K0 Alias Pin_keypad.0
K1 Alias Pin_keypad.1
K2 Alias Pin_keypad.2
K3 Alias Pin_keypad.3
B0 Alias Port_keypad.4
B1 Alias Port_keypad.5
B2 Alias Port_keypad.6
B3 Alias Port_keypad.7

Declare Sub Keyup
Declare Function Getkey() As Byte
Dim Digit As Byte

Cls

Lcd “tes key”
Do
Keyup
Do
Digit = Getkey();
If Digit <> “$” Then
‘==================================================
‘==================================================
‘Di sini letak program utamanya: Lanjutkan membaca Source Code BASCOM For DI-Smart KEY4X4 Input (KEYPAD 4X4)