PIC Basic OR

OR คือเกตที่ให้สัญญาณขาออกเป็น 0 เมื่อสัญญาณขาเข้าทุกตัวเป็น 0 และจะให้สัญญาณขาออกเป็น 1 เมื่อสัญญาณขาเข้าตัวใดตัวหนึ่งเป็น 1 เป็นความหมายเดียวกับตรรกะ “หรือ” สำหรับภาษา Basic จะใช้เครื่องหมาย | แทน OR

ตารางค่าความจริงของเกต XOR เป็นดังนี้

A	B	A | B
0	0	0
0	1	1
1	0	1
1	1	1

ตัวอย่างโปรแกรม

‘****************************************************************
‘* Name : or.BAS
‘* Author : HS3UKA
‘* Notice : Copyright (c) 2013
‘* : All Rights Reserved
‘* Date : 1/2/2013
‘* Version : 1.0
‘* Notes : http://www.hs3uka.com
‘****************************************************************
include “modedefs.bas”
define OSC 10
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 1

TRISB=%00000000

H1 VAR BYTE
H2 VAR BYTE
H3 VAR BYTE

H1=%10101011
H2=%00001111

main:
H3 = H1 | H2
lcdout $fe,$1, “(“, DEC3 H1, “) “, BIN8 H1
lcdout $fe,$C0,” OR”
lcdout $fe,$90,”(“, DEC3 H2, “) “, BIN8 H2
lcdout $fe,$D0,”(“, DEC3 H3, “) “, BIN8 H3
Pause 50

GoTo main