PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Werte im Simulator ändern (Tempsensor und LCD Simulieren)



Papsi
22.01.2006, 22:18
Hallo,

ich habe mir im Inet folgendes rausgesucht.


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

Config Lcd = 16 * 2
Config 1wire = Portd.6

Dim Ar As Byte
Dim Temperatur As Integer

Lcd "DS1821 an PD.6"
Waitms 10
Cls
Lcd "Temp:"
Do
1wreset
1wwrite &HEE
Waitms 1
1wreset
1wwrite &HAA
Ar = 1wread()
1wwrite &H22
Locate 2 , 1
Temperatur = Ar
If Temperatur > 127 Then
Lcd "-"
Temperatur = 256 - Temperatur
Else
Lcd " "
End If
Lcd Temperatur;
Lcd " C "
Waitms 1
Loop

(Zeiten usw. nicht beachten - ist nur zum testen gedacht)

Im Simulator läuft das Programm und zeigt folgendes an:
http://home.arcor.de/daniel_papst/Forumbilder/Temperatur-LCD-BASCOM.jpg


Kann ich jetzt im Simulator die Werte so ändern, das mir das LCD auch gleich die angepassten Werte anzeigt, damit ich weitere Sachen probieren kann.


Bis dann denn

x-ryder
23.01.2006, 12:27
also den wert des tempsensors zu simulieren wird schwer, aber du kannst einfach "temperatur" (die variable) in den simu reinpacken, und selber beschreiben

Martin