Senin, 06 Juni 2011

Alarm Sensitive Cahaya.


Untuk membuat alarm sensitif cahaya, dibutuhkan bahan-bahan sebagai berikut:
- resistor: 10k, 47k, 1M × 3
- preset: 100k, 1M
- kapasitor: 0.01μF, 0.1μF, 10μF 25V radial
- transistor: BC108 (atau setara)
- 7.555 rendah daya timer IC
- 8-pin DIL soket untuk IC
- LDR (resistor tergantung cahaya) ORP12 jenis
- 9-12V bleeper
- saklar on / off
- baterai klip untuk 9V PP3
- papan strip 12 × 25 baris lubang

Circuit diagram
 


Cara Kerja Alarm Sensitif Cahaya
Sirkuit mendeteksi bayangan yang tiba-tiba jatuh di sensor lampu dan suara speaker kecil. Sirkuit tidak akan merespon perubahan bertahap dalam kecerahan untuk mencegah alarm palsu. Normal pencahayaan dapat digunakan, tetapi rangkaian akan bekerja jika seberkas cahaya diatur jatuh pada sensor cahaya. Sensor cahaya adalah LDR (Resistor tergantung cahaya) ini memiliki ketahanan yang rendah dalam terang ringan dan tahan yang tinggi dalam cahaya redup.







Alarm Sensitive Cahaya.



Untuk membuat alarm sensitif cahaya, dibutuhkan bahan-bahan sebagai berikut:
- resistor: 10k, 47k, 1M × 3
- preset: 100k, 1M
- kapasitor: 0.01μF, 0.1μF, 10μF 25V radial
- transistor: BC108 (atau setara)
- 7.555 rendah daya timer IC
- 8-pin DIL soket untuk IC
- LDR (resistor tergantung cahaya) ORP12 jenis
- 9-12V bleeper
- saklar on / off
- baterai klip untuk 9V PP3
- papan strip 12 × 25 baris lubang


Circuit diagram


Cara Kerja Alarm Sensitif Cahaya
Sirkuit mendeteksi bayangan yang tiba-tiba jatuh di sensor lampu dan suara speaker kecil. Sirkuit tidak akan merespon perubahan bertahap dalam kecerahan untuk mencegah alarm palsu. Normal pencahayaan dapat digunakan, tetapi rangkaian akan bekerja jika seberkas cahaya diatur jatuh pada sensor cahaya. Sensor cahaya adalah LDR (Resistor tergantung cahaya) ini memiliki ketahanan yang rendah dalam terang ringan dan tahan yang tinggi dalam cahaya redup.


Gambar Alarm Sensitif Cahaya






Minggu, 05 Juni 2011

; ; Program untuk menampilkan tulisan secara bergeser

.ASM -------------------------------------------------------------------
; --------------------------------------------------------------------------------
; Pemakaian RAM     :
;    70h-77h   = data segment display / 70h = kiri
;    78h      = data common display
;    79h      = untuk delay display 1 common
;    7Ah      = untuk delay display 8 common
;     7Bh      = utk counter RAM to PORT display
;    7Ch      = utk counter buffer RAM display
;    7Dh      = jumlah text
;    7Eh      = pointer untuk tentukan DPTR   
; --------------------------------------------------------------------------------
        ORG       0H
;
        LJMP    MULAI
; --------------------------------------------------------------------------------
;subrutin untuk mengisi buffer RAM Display
; --------------------------------------------------------------------------------
ISI_BUFFER:
        MOV    7CH,#08H    ; Jumlah digit 7 segment
        MOV    R0,#70H
ULANG:
        MOV    A,7EH        ; Isi A dengan isi dari alamat 7Eh (data DPTR)
        MOVC    A,@A+DPTR    ; Pindahkan data ke n ke A
        MOV    @R0,A        ; Pindahkan isi A ke alamat yang ditunjuk R0
        INC    DPTR        ; Siapkan data berikutnya
        INC    R0        ; tambahkan isi R0 dengan 1
        DJNZ    7CH,ULANG       ; Ulangi sampai 8 kali (jml digit 7 segment)
        RET
; --------------------------------------------------------------------------------
;subrutin untuk menampilkan isi RAM buffer display ke 8 x 7 segment
; --------------------------------------------------------------------------------
DIS8SEG:
        MOV    7BH,#08H    ; Isi RAM 7Bh dg 8 = jumlah digit 7 segment
        MOV    R1,#70H        ; R1 = Alamat buffer display
        MOV    78H,#07FH    ; Isi memory 78h dg FEh = data Common display
ULANG2:
        MOV    A,@R1        ; pindahkan isi RAM yang ditunjuk oleh R1 ke A
        MOV    P0,A        ; Keluarkan data A ke port 0 (data segment)
        INC    R1             
        MOV    A,78H        ; Pindahkan isi RAM 78h ke A
        MOV    P1,A        ; Keluarkan data A ke port 1 (data common)
        RR    A       
        MOV    78H,A       
        LCALL    DELAY
        MOV    P0,#0FFH    ; matikan display sesaat (u/ menghindari
                    ; bayangan)
        MOV    P1,#0FFH
        DJNZ    7BH,ULANG2      ; Ulangi sampai 8 kali (jml digit 7 segment)
        RET
;
DELAY:        MOV    79H,#0E0H     ; Isi RAM 79h dengan 0E0 (hex)
DELAY1:        DJNZ    79H,DELAY1    ;
        RET            ; Kembali ke langkah setelah perintah Acall
                    ;
DISPLAY:
        MOV    7AH,#050H    ; Isi RAM 7Ah dengan 050 (hex)
DISPLAY1:
        LCALL    DIS8SEG       
        DJNZ    7AH,DISPLAY1   
        RET
MULAI:
                    ; teks keluar dari kanan ke kiri
        MOV    7EH,#1
        MOV    7DH,#8        ; RAM 7Dh diisi jumlah karakter yang akan
NEXTDATA:                ; di tampilkan
        MOV     DPTR,#ELINS    ; Isi DPTR dengan alamat dg label Awal
        LCALL    ISI_BUFFER   
        LCALL    DISPLAY       
        INC    7EH        ; RAM 7Eh untuk counter data berikutnya
        DJNZ    7DH,NEXTDATA    ; Ulangi sejumlah karakter yang diingikan
        LCALL    DISPLAY       
        LCALL    DISPLAY
        LCALL    DISPLAY
                    ; teks digeser masuk ke kiri
NEXTDATA2:
        DEC    7EH        ; RAM 7E untuk counter data berikutnya
        MOV    DPTR,#ELINS
        LCALL    ISI_BUFFER
        LCALL    DISPLAY   
        MOV    A,7EH
        CJNE    A,#0,NEXTDATA2
        LCALL    DISPLAY
        LCALL    DISPLAY
        LCALL    DISPLAY
        LJMP    MULAI
; --------------------------------------------------------------------------------
; DATA AREA
; --------------------------------------------------------------------------------
ELINS:    DB   0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
    DB   0FDH,0A0H,0BAH, 77H, 62H, 29H,0FDH,0FDH
;
    END

Sabtu, 04 Juni 2011

kanan kiri oce stop bozz

org 0h
saklar:jnb p1.0,kanan
       jnb p1.1,kiri
       jnb p1.2,mati
       ret
kanan:call saklar
      mov A,#0feh
puter:call saklar
      mov p0,A
      call delay
      RL A
      call saklar
      cjne A,#0feh,puter
      sjmp kanan
kiri:call saklar
     mov A,#7fh
puter1:call saklar
       mov p0,A
       call delay
       RR A
       call saklar
       cjne A,#7fh,puter1
       sjmp kiri
mati:call saklar
     mov p0,#0ffh
     call saklar
     sjmp mati
delay:mov r0,#0
delay1:mov r1,#0
delay2:mov r2,#01h
       djnz r2,$
       djnz r1,delay2
       djnz r0,delay1
       ret
       end;
org 0h
ayam:
    mov p1,#01h;ijo
    call e;
    mov p1,#02h;kuning
    call e;
    mov p1,#04h;merah
    call f;
    sjmp ayam;

e:    MOV R0,#4FH;
E1:    MOV R1,#0FAH;
E2:    MOV R2,#0FAH;
DJNZ R2,$;
DJNZ R1,E2;
DJNZ R0,E1;
RET

F:    MOV R0,#9FH;
F1:    MOV R1,#0FAH;
F2:    MOV R2,#0FAH;
DJNZ R2,$;
DJNZ R1,F2;
DJNZ R0,F1;
RET
END



bang jo ning blA blA


org 0h
ayam:
mov p1,#01h;ijo
call e;
mov p1,#02h;kuning
call e;
mov p1,#04h;merah
call f;
sjmp ayam;

e: MOV R0,#4FH;
E1: MOV R1,#0FAH;
E2: MOV R2,#0FAH;
DJNZ R2,$;
DJNZ R1,E2;
DJNZ R0,E1;
RET

F: MOV R0,#9FH;
F1: MOV R1,#0FAH;
F2: MOV R2,#0FAH;
DJNZ R2,$;
DJNZ R1,F2;
DJNZ R0,F1;
RET
END