Running LED AT89C2051/AT89S2051

Berikut ini adalah running led menggunakan mikrokontroller AT89C2051 yang memiliki banyak animasi .
Dalam pembuatannya cukup simpel dan mudah ,tinggal kita siapkan bahan bahannya :

Schematic

Daftar Komponen :
1.LED 
2.IC AT89C2051
3.X tal 12MHz
4.C 33pF
5.R 330 Ohm
6.R 56K
7.C 10uF/25Volt
8.Power Supply 5 volt




Source Codenya :

ORG 0000H

;SCH1 EQU P0.0
;SCH2 EQU P0.1
;SCH3 EQU P0.2
;SCH4 EQU P0.3

L1 EQU P3.4
L2 EQU P3.1
L3 EQU P3.0
L4 EQU P1.7
L5 EQU P1.6
L6 EQU P1.5
L7 EQU P1.4
L8 EQU P1.3
L9 EQU P1.2
L10 EQU P1.1
L11 EQU P1.0

; SETB SCH1

FNAUTO: MOV R3,#05
D1: CALL DESGN1
DJNZ R3,D1
MOV R3,#05
D2: CALL DESGN2
DJNZ R3,D2
MOV R3,#05
D3: CALL DESGN3
DJNZ R3,D3
MOV R3,#05
D4: CALL DESGN4
DJNZ R3,D4
MOV R3,#05
D5: CALL DESGN5
DJNZ R3,D5
MOV R3,#05
D6: CALL DESGN6
DJNZ R3,D6
MOV R3,#05
D7: CALL DESGN7
DJNZ R3,D7
MOV R3,#05
D8: CALL DESGN8
DJNZ R3,D8
MOV R3,#05
D9: CALL DESGN9
DJNZ R3,D9
MOV R3,#05
         JMP FNAUTO


DESGN1: CLR L1
SETB L2
CLR L3
SETB L4
CLR L5
SETB L6
CLR L7
SETB L8
CLR L9
SETB L10
CLR L11
CALL DELAY
CLR L2
SETB L1
CLR L4
SETB L3
CLR L6
SETB L5
CLR L8
SETB L7
CLR L10
SETB L9
SETB L11
CALL DELAY
RET
DESGN2: CALL CLEAR
CLR L1
CALL DELAY
CALL CLEAR
CLR L2
CALL DELAY
CALL CLEAR
CLR L3
CALL DELAY
CALL CLEAR
CLR L4
CALL DELAY
CALL CLEAR
CLR L5
CALL DELAY
CALL CLEAR
CLR L6
CALL DELAY
CALL CLEAR
CLR L7
CALL DELAY
CALL CLEAR
CLR L8
CALL DELAY
CALL CLEAR
CLR L9
CALL DELAY
CALL CLEAR
CLR L10
CALL DELAY
CALL CLEAR
CLR L11
CALL DELAY
RET
DESGN3: CALL CLEAR
CLR L11
CALL DELAY
CALL CLEAR
CLR L10
CALL DELAY
CALL CLEAR
CLR L9
CALL DELAY
CALL CLEAR
CLR L8
CALL DELAY
CALL CLEAR
CLR L7
CALL DELAY
CALL CLEAR
CLR L6
CALL DELAY
CALL CLEAR
CLR L5
CALL DELAY
CALL CLEAR
CLR L4
CALL DELAY
CALL CLEAR
CLR L3
CALL DELAY
CALL CLEAR
CLR L2
CALL DELAY
CALL CLEAR
CLR L1
CALL DELAY
RET
DESGN4: CALL CLEAR
CLR L1
CALL DELAY
CALL CLEAR
CLR L2
CALL DELAY
CALL CLEAR
CLR L3
CALL DELAY
CALL CLEAR
CLR L4
CALL DELAY
CALL CLEAR
CLR L5
CALL DELAY
CALL CLEAR
CLR L6
CALL DELAY
CALL CLEAR
CLR L7
CALL DELAY
CALL CLEAR
CLR L8
CALL DELAY
CALL CLEAR
CLR L9
CALL DELAY
CALL CLEAR
CLR L10
CALL DELAY
CALL CLEAR
CLR L11
CALL DELAY
CALL CLEAR
CLR L11
CALL DELAY
CALL CLEAR
CLR L10
CALL DELAY
CALL CLEAR
CLR L9
CALL DELAY
CALL CLEAR
CLR L8
CALL DELAY
CALL CLEAR
CLR L7
CALL DELAY
CALL CLEAR
CLR L6
CALL DELAY
CALL CLEAR
CLR L5
CALL DELAY
CALL CLEAR
CLR L4
CALL DELAY
CALL CLEAR
CLR L3
CALL DELAY
CALL CLEAR
CLR L2
CALL DELAY
CALL CLEAR
CLR L1
CALL DELAY
RET
DESGN5: CALL CLEAR
CLR L1
CLR L11
CALL DELAY
CALL CLEAR
CLR L2
CLR L10
CALL DELAY
CALL CLEAR
CLR L3
CLR L9
CALL DELAY
CALL CLEAR
CLR L4
CLR L8
CALL DELAY
CALL CLEAR
CLR L5
CLR L7
CALL DELAY
CALL CLEAR
CLR L6
CALL DELAY
CALL CLEAR
CLR L7
CLR L5
CALL DELAY
CALL CLEAR
CLR L8
CLR L4
CALL DELAY
CALL CLEAR
CLR L9
CLR L3
CALL DELAY
CALL CLEAR
CLR L10
CLR L2
CALL DELAY
CALL CLEAR
CLR L11
CLR L1
CALL DELAY
CALL CLEAR
RET
DESGN6: CALL ALLON
CALL DELAY
CALL CLEAR
CALL DELAY
RET
DESGN7: CALL ALLON
SETB L1
CALL DELAY
CALL ALLON   
SETB L2
CALL DELAY
CALL ALLON   
SETB L3
CALL DELAY
CALL ALLON   
SETB L4
CALL DELAY
CALL ALLON   
SETB L5
CALL DELAY
CALL ALLON   
SETB L6
CALL DELAY
CALL ALLON   
SETB L7
CALL DELAY
CALL ALLON   
SETB L8
CALL DELAY
CALL ALLON   
SETB L9
CALL DELAY
CALL ALLON   
SETB L10
CALL DELAY
CALL ALLON   
SETB L11
CALL DELAY
RET
DESGN8: CALL ALLON
SETB L11
CALL DELAY
CALL ALLON   
SETB L10
CALL DELAY
CALL ALLON   
SETB L9
CALL DELAY
CALL ALLON   
SETB L8
CALL DELAY
CALL ALLON   
SETB L7
CALL DELAY
CALL ALLON   
SETB L6
CALL DELAY
CALL ALLON   
SETB L5
CALL DELAY
CALL ALLON   
SETB L4
CALL DELAY
CALL ALLON   
SETB L3
CALL DELAY
CALL ALLON   
SETB L2
CALL DELAY
CALL ALLON   
SETB L1
CALL DELAY
RET

DESGN9: CALL ALLON
SETB L11
SETB L1
CALL DELAY
CALL ALLON   
SETB L10
SETB L2
CALL DELAY
CALL ALLON   
SETB L9
SETB L3
CALL DELAY
CALL ALLON   
SETB L8
SETB L4
CALL DELAY
CALL ALLON   
SETB L7
SETB L5
CALL DELAY
CALL ALLON   
SETB L6
CALL DELAY
CALL ALLON   
SETB L5
SETB L7
CALL DELAY
CALL ALLON   
SETB L4
SETB L8
CALL DELAY
CALL ALLON   
SETB L3
SETB L9
CALL DELAY
CALL ALLON   
SETB L2
SETB L10
CALL DELAY
CALL ALLON   
SETB L1
SETB L11
CALL DELAY
RET
CLEAR: SETB L1
SETB L2
SETB L3
SETB L4
SETB L5
SETB L6
SETB L7
SETB L8
SETB L9
SETB L10
SETB L11
RET

ALLON: CLR L1
CLR L2
CLR L3
CLR L4
CLR L5
CLR L6
CLR L7
CLR L8
CLR L9
CLR L10
CLR L11
RET
DELAY: MOV R0,#0FFH
INLOP: MOV R1,#0FFH
DJNZ R1,$
DJNZ R0,INLOP
RET
END  

Jika tidak mau repot compile source codenya ini ada file hex 

:100000007B05120043DBFB7B05120076DBFB7B05E7
:100010001200CFDBFB7B05120128DBFB7B05120105
:10002000D9DBFB7B05120249DBFB7B05120256DBA9
:10003000FB7B051202AFDBFB7B05120308DBFB7BBE
:100040000580BDC2B4D2B1C2B0D297C296D295C219
:1000500094D293C292D291C2901203A3C2B1D2B4ED
:10006000C297D2B0C295D296C293D294C291D29284
:10007000D2901203A322120375C2B41203A3120377
:1000800075C2B11203A3120375C2B01203A3120307
:1000900075C2971203A3120375C2961203A312032B
:1000A00075C2951203A3120375C2941203A312031F
:1000B00075C2931203A3120375C2921203A3120313
:1000C00075C2911203A3120375C2901203A32212E8
:1000D0000375C2901203A3120375C2911203A312F7
:1000E0000375C2921203A3120375C2931203A312E3
:1000F0000375C2941203A3120375C2951203A312CF
:100100000375C2961203A3120375C2971203A312BA
:100110000375C2B01203A3120375C2B11203A31276
:100120000375C2B41203A322120375C2B41203A34F
:10013000120375C2B11203A3120375C2B01203A356
:10014000120375C2971203A3120375C2961203A37A
:10015000120375C2951203A3120375C2941203A36E
:10016000120375C2931203A3120375C2921203A362
:10017000120375C2911203A3120375C2901203A356
:10018000120375C2901203A3120375C2911203A346
:10019000120375C2921203A3120375C2931203A332
:1001A000120375C2941203A3120375C2951203A31E
:1001B000120375C2961203A3120375C2971203A30A
:1001C000120375C2B01203A3120375C2B11203A3C6
:1001D000120375C2B41203A322120375C2B4C290F3
:1001E0001203A3120375C2B1C2911203A3120375C5
:1001F000C2B0C2921203A3120375C297C293120334
:10020000A3120375C296C2941203A3120375C2957A
:100210001203A3120375C294C2961203A3120375AC
:10022000C293C2971203A3120375C292C2B0120303
:10023000A3120375C291C2B11203A3120375C29037
:10024000C2B41203A31203752212038C1203A31269
:1002500003751203A32212038CD2B41203A3120358
:100260008CD2B11203A312038CD2B01203A31203D7
:100270008CD2971203A312038CD2961203A31203FB
:100280008CD2951203A312038CD2941203A31203EF
:100290008CD2931203A312038CD2921203A31203E3
:1002A0008CD2911203A312038CD2901203A32212B8
:1002B000038CD2901203A312038CD2911203A312C7
:1002C000038CD2921203A312038CD2931203A312B3
:1002D000038CD2941203A312038CD2951203A3129F
:1002E000038CD2961203A312038CD2971203A3128B
:1002F000038CD2B01203A312038CD2B11203A31247
:10030000038CD2B41203A32212038CD290D2B41263
:1003100003A312038CD291D2B11203A312038CD285
:1003200092D2B01203A312038CD293D2971203A3DA
:1003300012038CD294D2961203A312038CD295127C
:1003400003A312038CD296D2941203A312038CD26D
:1003500097D2931203A312038CD2B0D2921203A3AA
:1003600012038CD2B1D2911203A312038CD2B4D255
:10037000901203A322D2B4D2B1D2B0D297D296D2E5
:1003800095D294D293D292D291D29022C2B4C2B1D9
:10039000C2B0C297C296C295C294C293C292C29191
:0C03A000C2902278FF79FFD9FED8FA2223
:00000001FF

Kode diatas tinggal dicopy pastekan di notepad dan di save dengan ekstensi  nama .HEX.
Contoh Savenya :Running Led.HEX
Dari hasil save tadi tinggal diprogramkan ke IC AT89C2051/AT89S2051 menggunakan programmer IC
 ( untuk programmernya browsing di google )
Untuk file dalam bentuk rar disini

Lebih baik sebelum membuat di circuit nyata gunakan proteus untuk simulasinya demikian semoga bermanfaat.





No comments:

Post a Comment

//