اضافه کردن دما به تابلوروان

microf

سلام – اگر بخوام در برنامه زیر که با چهار عدد دات ماتریس 8 در 8 ساخته شده دما رو نیز اضافه کنم حال با lm35 یا smt160 . چه کد هایی باید به برنامه اضافه کنم ؟

$regfile = "m16def.dat"
$crystal = 8000000

Config Porta = Output
Config Portc = Output
Config Portd = Output
Config Portb.0 = Input
Config Portb.1 = Input

Dim Scan As Byte
Dim Refresh As Byte
Dim Index As Byte
Dim S As Byte
Dim M As Byte
Dim E As Byte
Dim A As Byte

Do

' +-------------------------------------------+
' | Scrolling "Lachini" text to Left |
' +-------------------------------------------+

For S = 0 To 127
E = S + 7
For Refresh = 1 To 7

Scan = &H01
For Index = S To E

A = Index
Portd = Lookup(a , Lachini)
Portc = 1
Portc = 0

A = Index + 8
Portd = Lookup(a , Lachini)
Portc = 2
Portc = 0

A = Index + 16
Portd = Lookup(a , Lachini)
Portc = 4
Portc = 0

A = Index + 24
Portd = Lookup(a , Lachini)
Portc = 8
Portc = 0

Porta = Scan
Rotate Scan , Left , 1
Waitus 250
Porta = &H00

Next Index

Next Refresh

Next S

Loop
End 'end program

Lachini:

Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H82 , &HFE , &HFE , &H82 , &H02 , &H06 , &H0E , &H00 'L
Data &H3E , &H7E , &HD0 , &H90 , &HD0 , &H7E , &H3E , &H00 'A
Data &H38 , &H7C , &HC6 , &H82 , &H82 , &HC6 , &H44 , &H00 'C
Data &HFE , &HFE , &H10 , &H10 , &H10 , &HFE , &HFE , &H00 'H
Data &H00 , &H00 , &H82 , &HFE , &HFE , &H82 , &H00 , &H00 'I
Data &HFE , &HFE , &H60 , &H30 , &H18 , &HFE , &HFE , &H00 'N
Data &H00 , &H00 , &H82 , &HFE , &HFE , &H82 , &H00 , &H00 'I
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00

	HLachini.com صفحه اول انجمن -> تابلو روان	زمان پيشفرض سايت: ساعت گرينويچ + 3.5 ساعت
صفحه 1 از 1