home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 April / CHIP4_98.ISO / software / ccconrad / basic.exe / CHIP / Programme.Bas / Beispiele_2 / TEMP1.BAS < prev    next >
Encoding:
BASIC Source File  |  1997-04-26  |  629 b   |  32 lines
  1. '**************************************
  2. '
  3. ' C-Control/BASIC       TEMP1.BAS
  4. '
  5. ' Aufgabe:
  6. '
  7. ' - Lesen des analogen Eingangs 2
  8. ' - Umrechnung in die Temperatur
  9. ' - Senden des Ergebnisses an den PC
  10. '
  11. '**************************************
  12. ' --- Definitionen --------------------
  13.  
  14. define Eingang AD[2]
  15. define Spannung Byte
  16. define Temp word
  17.  
  18. ' --- Programmoperationen -------------
  19.  
  20. #Loop
  21.   Spannung = Eingang    'Port lesen
  22.   print Spannung        'an PC senden
  23.   Temp = Spannung * 5 - 275
  24.   print Temp, "x 0,1 ░C"
  25.   pause 25              '0,5 s warten
  26. goto Loop               'Endlosschleife
  27. end
  28.  
  29.  
  30.  
  31.  
  32.