$MOD51
        CSEG

ROM			EQU	000H
	Org	ROM			;Reset Vector
	Ajmp	Start			;
	Org	ROM+3H			;External Interrupt 0 Vector
	Reti				;
	Org	ROM+0BH			;Timer 0 Interrupt Vector
	Reti				;
	Org	ROM+13H			;External Interrupt 1 Vector
	Reti				;
	Org	ROM+1BH			;Timer 1 Interrupt Vector
	Reti				;
	Org	ROM+23H			;Serial Interrupt Vector
	Reti
Start:
	Lcall	Init_LCD		;Reset LCD
	Mov	DPTR,#PesanJumlahStep	;Tampilkan pesan "Jumlah Step"
	Lcall	KirimPesan_LCD		;
	Lcall	Ambil3DigitKeypad	;Ambil data keypad sebanyak 3 digit
	Mov	B,#4			;Putar sebanyak jumlah step /4
	Div	AB			;
	Jz	Start			;
	Mov	R6,A			;
	Mov	DPTR,#Tabel_Kanan	;Atur arah stepper ke kanan
	Acall	GerakanStepper		;
	Ajmp	Start			;

PesanJumlahStep:
	DB	'Jumlah Step :',0FH
        $include (delay_1d.asm)
        $include (stepper.asm)
        $include (hd44780.asm)
        $include (ambkypd.asm)
        $include (keypad.asm)
        $include (tabkey2.asm)
    
        END